Skip to content

KVSKBAServicePriceLib#

Procedures#

ShowServicePriceDiscCalcLines(Record Service Line, Enum KVSKBAPriceDiscLineType) :#

Summary: Show Price Condition from Servcie Line

procedure ShowServicePriceDiscCalcLines(var ServiceLine: Record "Service Line"; PriceDiscLineLineType: Enum "KVSKBAPriceDiscLineType"):

Parameters:

  • ServiceLine: for which line the condition is to be displayed
  • PriceDiscLineLineType: which condition is to be displayed, Price or Discount Condition

ShowServicePriceDiscCalcLinesArchive(Record Service Line Archive, Enum KVSKBAPriceDiscLineType) :#

Summary: Show Price Condition from Service Line Archive

procedure ShowServicePriceDiscCalcLinesArchive(ServiceLineArchive: Record "Service Line Archive"; PriceDiscLineLineType: Enum "KVSKBAPriceDiscLineType"):

Parameters:

  • ServiceLineArchive: for which line the condition is to be displayed
  • PriceDiscLineLineType: which condition is to be displayed, Price or Discount Condition

ShowPostServicePriceDiscCalcLines(Record Service Header, Record Service Line, Enum KVSKBAPostedServiceDocType, Code[20], Integer, Enum KVSKBAPriceDiscLineType) :#

Summary: Show Price Condition from Posted Service Line

procedure ShowPostServicePriceDiscCalcLines(PostedServiceHeader: Record "Service Header"; PostedServiceLine: Record "Service Line"; PostedServiceDocType: Enum "KVSKBAPostedServiceDocType"; DocumentNo: Code[20]; DocumentLineNo: Integer; PriceDiscLineLineType: Enum "KVSKBAPriceDiscLineType"):

Parameters:

  • PostedServiceHeader: for which Header the condition is to be displayed, Service Headercopied from posted Document Header
  • PostedServiceLine: for which line the condition is to be displayed, Service Line copied from posted Document Line
  • PostedServiceDocType: for which type of posted document the condition is to be displayed
  • DocumentNo: for which document no the condition is to be displayed
  • DocumentLineNo: for which document line no the condition is to be displayed
  • PriceDiscLineLineType: which condition is to be displayed, Price or Discount Condition

DeleteServicePriceDiscCalcfromServiceLineArchiv(Record Service Line Archive) :#

Summary: Delete price conditions from archived document

procedure DeleteServicePriceDiscCalcfromServiceLineArchiv(ServiceLineArchive: Record "Service Line Archive"):

Parameters:

  • ServiceLineArchive: Record, which is deleted

DeleteServicePriceDiscCalcfromServiceLine(Record Service Line, Enum KVSKBAPriceDiscLineType, Boolean, Decimal, Boolean) :#

Summary: Delete price conditions from Service Line

procedure DeleteServicePriceDiscCalcfromServiceLine(ServiceLine: Record "Service Line"; PriceDiscLineLineType: Enum "KVSKBAPriceDiscLineType"; Unconditional: Boolean; ComparativeValue: Decimal; HideConfirm: Boolean):

Parameters:

  • ServiceLine: Service Line at which the conditions are to be deleted
  • PriceDiscLineLineType: which condition, Price or Discount Condition
  • Unconditional: no check, only delete
  • ComparativeValue: Value to be checked during the test
  • HideConfirm: Suppress confirm

CopyServicePriceDiscCalcLinefromServiceLinetoServiceLine(Record Service Line, Record Service Line) :#

Summary: Copies the Service Price Dicsount Line from one service line to another

procedure CopyServicePriceDiscCalcLinefromServiceLinetoServiceLine(FromServiceLine: Record "Service Line"; ToServiceLine: Record "Service Line"):

Parameters:

  • FromServiceLine: Price list to copy from
  • ToServiceLine: Price list to copy to

Events#

OnBeforeShowServicePriceDiscCalcLines(Record Service Line, Enum KVSKBAPriceDiscLineType, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeShowServicePriceDiscCalcLines(var ServiceLine: Record "Service Line"; KVSKBAPriceDiscLineLineType: Enum "KVSKBAPriceDiscLineType"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAServicePriceLib", 'OnBeforeShowServicePriceDiscCalcLines', '', false, false)]
local procedure DoSomethingOnBeforeShowServicePriceDiscCalcLines(var ServiceLine: Record "Service Line"; KVSKBAPriceDiscLineLineType: Enum "KVSKBAPriceDiscLineType"; var IsHandled: Boolean)
begin
end;

OnShowServicePriceDiscCalcLinesOnbeforeCaseLineTypePrice(Record Service Line, Enum KVSKBAPriceDiscLineType, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnShowServicePriceDiscCalcLinesOnbeforeCaseLineTypePrice(var ServiceLine: Record "Service Line"; KVSKBAPriceDiscLineLineType: Enum "KVSKBAPriceDiscLineType"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAServicePriceLib", 'OnShowServicePriceDiscCalcLinesOnbeforeCaseLineTypePrice', '', false, false)]
local procedure DoSomethingOnShowServicePriceDiscCalcLinesOnbeforeCaseLineTypePrice(var ServiceLine: Record "Service Line"; KVSKBAPriceDiscLineLineType: Enum "KVSKBAPriceDiscLineType"; var IsHandled: Boolean)
begin
end;