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;