KVSKBASalesPriceCalcMgt#
Obsolete
This Element will be removed or changed with a future Version of the App.
Procedures#
CalcBestUnitPrice(Record KVSKBASalesPrice, Boolean) :#
procedure CalcBestUnitPrice(var SalesPrice: Record "KVSKBASalesPrice"; DoNotFindBestPrice: Boolean):
CalcBestLineDisc(Record KVSKBASalesLineDiscount, Boolean) :#
procedure CalcBestLineDisc(var SalesLineDisc: Record "KVSKBASalesLineDiscount"; DoNotFindBestPrice: Boolean):
FindSalesPrice(Record KVSKBASalesPrice, Code[20], Code[20], Code[10], Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean, Code[10], Record KVSKBASalesConditionLine, Code[10], Code[10], Code[20]) :#
procedure FindSalesPrice(var ToSalesPrice: Record "KVSKBASalesPrice"; CustNo: Code[20]; ContNo: Code[20]; CustPriceGrCode: Code[10]; CampaignNo: Code[20]; ItemNo: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean; RespCenterCode: Code[10]; var ToSalesCondLine: Record "KVSKBASalesConditionLine"; SalesOrderTypeCode: Code[10]; ItemPriceGrCode: Code[10]; ItemCategoryCode: Code[20]):
FindSalesLineDisc(Record KVSKBASalesLineDiscount, Code[20], Code[20], Code[20], Code[20], Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean, Code[10], Record KVSKBASalesConditionLine, Decimal, Code[10]) :#
procedure FindSalesLineDisc(var ToSalesLineDisc: Record "KVSKBASalesLineDiscount"; CustNo: Code[20]; ContNo: Code[20]; CustDiscGrCode: Code[20]; CampaignNo: Code[20]; ItemNo: Code[20]; ItemDiscGrCode: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean; RespCenterCode: Code[10]; var ToSalesCondLine: Record "KVSKBASalesConditionLine"; InitialPrice: Decimal; SalesOrderTypeCode: Code[10]):
CopySalesPriceToSalesPrice(Record KVSKBASalesPrice, Record KVSKBASalesPrice, Code[10], Code[20], Code[10], Record KVSKBASalesConditionLine) :#
procedure CopySalesPriceToSalesPrice(var FromSalesPrice: Record "KVSKBASalesPrice"; var ToSalesPrice: Record "KVSKBASalesPrice"; UOMCode: Code[10]; ItemNo: Code[20]; VariantCode: Code[10]; var ToSalesCondLine: Record "KVSKBASalesConditionLine"):
SetItem(Code[20]) :#
procedure SetItem(ItemNo: Code[20]):
SetCurrency(Code[10], Decimal, Date) :#
procedure SetCurrency(CurrencyCode2: Code[10]; CurrencyFactor2: Decimal; ExchRateDate2: Date):
SetVAT(Boolean, Decimal, Enum Tax Calculation Type, Code[20]) :#
procedure SetVAT(PriceInclVAT2: Boolean; VATPerCent2: Decimal; VATCalcType2: Enum "Tax Calculation Type"; VATBusPostingGr2: Code[20]):
SetUoM(Decimal, Decimal) :#
procedure SetUoM(Qty2: Decimal; QtyPerUoM2: Decimal):
SetLineDisc(Decimal, Boolean, Boolean) :#
procedure SetLineDisc(LineDiscPerCent2: Decimal; AllowLineDisc2: Boolean; AllowInvDisc2: Boolean):
ActivatedCampaignExists(Record Campaign Target Group, Code[20], Code[20], Code[20]) : Boolean#
procedure ActivatedCampaignExists(var ToCampaignTargetGr: Record "Campaign Target Group"; CustNo: Code[20]; ContNo: Code[20]; CampaignNo: Code[20]): Boolean
FindJobPlanningLineLineDisc(Record Job Planning Line) :#
procedure FindJobPlanningLineLineDisc(var JobPlanningLine: Record "Job Planning Line"):
FindJobJnlLineLineDisc(Record Job Journal Line) :#
procedure FindJobJnlLineLineDisc(var JobJnlLine: Record "Job Journal Line"):
JobJnlLineStartDate(Record Job Journal Line, Text[30]) : Date#
procedure JobJnlLineStartDate(JobJnlLine: Record "Job Journal Line"; var DateCaption: Text[30]): Date
SetDocLocationCode(Code[10]) :#
procedure SetDocLocationCode(DocLocationCodePar: Code[10]):
GetDocLocationCode() : Code[10]#
procedure GetDocLocationCode(): Code[10]
OnCalcBestUnitPriceOnBeforeCaseBestSalesPrice(Record KVSKBASalesPrice, Boolean, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
procedure OnCalcBestUnitPriceOnBeforeCaseBestSalesPrice(var SalesPrice: Record "KVSKBASalesPrice"; DoNotFindBestPrice: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnCalcBestUnitPriceOnBeforeCaseBestSalesPrice', '', false, false)]
local procedure DoSomethingOnCalcBestUnitPriceOnBeforeCaseBestSalesPrice(var SalesPrice: Record "KVSKBASalesPrice"; DoNotFindBestPrice: Boolean; var IsHandled: Boolean)
begin
end;
Events#
OnAfterCalcBestUnitPrice(Record KVSKBASalesPrice) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterCalcBestUnitPrice(var SalesPrice: Record "KVSKBASalesPrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterCalcBestUnitPrice', '', false, false)]
local procedure DoSomethingOnAfterCalcBestUnitPrice(var SalesPrice: Record "KVSKBASalesPrice")
begin
end;
OnAfterCalcBestUnitPriceAsItemUnitPrice(Record KVSKBASalesPrice, Record Item) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterCalcBestUnitPriceAsItemUnitPrice(var SalesPrice: Record "KVSKBASalesPrice"; var Item: Record "Item"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterCalcBestUnitPriceAsItemUnitPrice', '', false, false)]
local procedure DoSomethingOnAfterCalcBestUnitPriceAsItemUnitPrice(var SalesPrice: Record "KVSKBASalesPrice"; var Item: Record "Item")
begin
end;
OnAfterCopyJobResPriceToJobJnlLine(Record Job Journal Line, Record Job Resource Price) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCopyJobResPriceToJobJnlLine(var JobJnlLine: Record "Job Journal Line"; JobResPrice: Record "Job Resource Price"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterCopyJobResPriceToJobJnlLine', '', false, false)]
local procedure DoSomethingOnAfterCopyJobResPriceToJobJnlLine(var JobJnlLine: Record "Job Journal Line"; JobResPrice: Record "Job Resource Price")
begin
end;
OnAfterFindItemJnlLinePrice(Record Item Journal Line, Record KVSKBASalesPrice, Integer) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindItemJnlLinePrice(var ItemJournalLine: Record "Item Journal Line"; var SalesPrice: Record "KVSKBASalesPrice"; CalledByFieldNo: Integer):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindItemJnlLinePrice', '', false, false)]
local procedure DoSomethingOnAfterFindItemJnlLinePrice(var ItemJournalLine: Record "Item Journal Line"; var SalesPrice: Record "KVSKBASalesPrice"; CalledByFieldNo: Integer)
begin
end;
OnAfterFindJobJnlLineResPrice(Record Job Journal Line, Record KVSKBAResourcePrice) :#
[IntegrationEvent(false, false)]
local procedure OnAfterFindJobJnlLineResPrice(var JobJournalLine: Record "Job Journal Line"; var ResourcePrice: Record "KVSKBAResourcePrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindJobJnlLineResPrice', '', false, false)]
local procedure DoSomethingOnAfterFindJobJnlLineResPrice(var JobJournalLine: Record "Job Journal Line"; var ResourcePrice: Record "KVSKBAResourcePrice")
begin
end;
OnAfterFindJobJnlLineLineDisc(Record Job Journal Line, Record KVSKBASalesLineDiscount) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindJobJnlLineLineDisc(var JobJournalLine: Record "Job Journal Line"; var TempSalesLineDisc: Record "KVSKBASalesLineDiscount" temporary):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindJobJnlLineLineDisc', '', false, false)]
local procedure DoSomethingOnAfterFindJobJnlLineLineDisc(var JobJournalLine: Record "Job Journal Line"; var TempSalesLineDisc: Record "KVSKBASalesLineDiscount" temporary)
begin
end;
OnAfterFindJobPlanningLineLineDisc(Record Job Planning Line, Record KVSKBASalesLineDiscount) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindJobPlanningLineLineDisc(var JobPlanningLine: Record "Job Planning Line"; var TempSalesLineDisc: Record "KVSKBASalesLineDiscount" temporary):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindJobPlanningLineLineDisc', '', false, false)]
local procedure DoSomethingOnAfterFindJobPlanningLineLineDisc(var JobPlanningLine: Record "Job Planning Line"; var TempSalesLineDisc: Record "KVSKBASalesLineDiscount" temporary)
begin
end;
OnAfterFindJobPlanningLineResPrice(Record Job Planning Line, Record KVSKBAResourcePrice) :#
[IntegrationEvent(false, false)]
local procedure OnAfterFindJobPlanningLineResPrice(var JobPlanningLine: Record "Job Planning Line"; var ResourcePrice: Record "KVSKBAResourcePrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindJobPlanningLineResPrice', '', false, false)]
local procedure DoSomethingOnAfterFindJobPlanningLineResPrice(var JobPlanningLine: Record "Job Planning Line"; var ResourcePrice: Record "KVSKBAResourcePrice")
begin
end;
OnAfterFindStdItemJnlLinePrice(Record Standard Item Journal Line, Record KVSKBASalesPrice, Integer) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindStdItemJnlLinePrice(var StdItemJnlLine: Record "Standard Item Journal Line"; var SalesPrice: Record "KVSKBASalesPrice"; CalledByFieldNo: Integer):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindStdItemJnlLinePrice', '', false, false)]
local procedure DoSomethingOnAfterFindStdItemJnlLinePrice(var StdItemJnlLine: Record "Standard Item Journal Line"; var SalesPrice: Record "KVSKBASalesPrice"; CalledByFieldNo: Integer)
begin
end;
OnAfterFindSalesLinePrice(Record Sales Line, Record Sales Header, Record KVSKBASalesPrice, Record KVSKBAResourcePrice, Integer) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindSalesLinePrice(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var SalesPrice: Record "KVSKBASalesPrice"; var ResourcePrice: Record "KVSKBAResourcePrice"; CalledByFieldNo: Integer):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindSalesLinePrice', '', false, false)]
local procedure DoSomethingOnAfterFindSalesLinePrice(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var SalesPrice: Record "KVSKBASalesPrice"; var ResourcePrice: Record "KVSKBAResourcePrice"; CalledByFieldNo: Integer)
begin
end;
OnAfterFindSalesLineLineDisc(Record Sales Line, Record Sales Header, Record KVSKBASalesLineDiscount) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindSalesLineLineDisc(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var SalesLineDiscount: Record "KVSKBASalesLineDiscount"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindSalesLineLineDisc', '', false, false)]
local procedure DoSomethingOnAfterFindSalesLineLineDisc(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var SalesLineDiscount: Record "KVSKBASalesLineDiscount")
begin
end;
OnAfterFindSalesPrice(Record KVSKBASalesPrice, Record KVSKBASalesPrice, Decimal, Decimal, Code[20], Code[20], Code[10], Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean, Code[10], Record KVSKBASalesConditionLine, Code[10], Code[10], Code[20]) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindSalesPrice(var ToSalesPrice: Record "KVSKBASalesPrice"; var FromSalesPrice: Record "KVSKBASalesPrice"; QtyPerUOM: Decimal; Qty: Decimal; CustNo: Code[20]; ContNo: Code[20]; CustPriceGrCode: Code[10]; CampaignNo: Code[20]; ItemNo: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean; RespCenterCode: Code[10]; var ToSalesCondLine: Record "KVSKBASalesConditionLine"; SalesOrderTypeCode: Code[10]; ItemPriceGrCode: Code[10]; ItemCategoryCode: Code[20]):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindSalesPrice', '', false, false)]
local procedure DoSomethingOnAfterFindSalesPrice(var ToSalesPrice: Record "KVSKBASalesPrice"; var FromSalesPrice: Record "KVSKBASalesPrice"; QtyPerUOM: Decimal; Qty: Decimal; CustNo: Code[20]; ContNo: Code[20]; CustPriceGrCode: Code[10]; CampaignNo: Code[20]; ItemNo: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean; RespCenterCode: Code[10]; var ToSalesCondLine: Record "KVSKBASalesConditionLine"; SalesOrderTypeCode: Code[10]; ItemPriceGrCode: Code[10]; ItemCategoryCode: Code[20])
begin
end;
OnAfterFindSalesLineItemPrice(Record Sales Line, Record KVSKBASalesPrice, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindSalesLineItemPrice(var SalesLine: Record "Sales Line"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary; var FoundSalesPrice: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindSalesLineItemPrice', '', false, false)]
local procedure DoSomethingOnAfterFindSalesLineItemPrice(var SalesLine: Record "Sales Line"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary; var FoundSalesPrice: Boolean)
begin
end;
OnAfterFindSalesLineResPrice(Record Sales Line, Record KVSKBAResourcePrice) :#
[IntegrationEvent(false, false)]
local procedure OnAfterFindSalesLineResPrice(var SalesLine: Record "Sales Line"; var ResPrice: Record "KVSKBAResourcePrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindSalesLineResPrice', '', false, false)]
local procedure DoSomethingOnAfterFindSalesLineResPrice(var SalesLine: Record "Sales Line"; var ResPrice: Record "KVSKBAResourcePrice")
begin
end;
OnAfterFindSalesLineDisc(Record KVSKBASalesLineDiscount, Code[20], Code[20], Code[20], Code[20], Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindSalesLineDisc(var ToSalesLineDisc: Record "KVSKBASalesLineDiscount"; CustNo: Code[20]; ContNo: Code[20]; CustDiscGrCode: Code[20]; CampaignNo: Code[20]; ItemNo: Code[20]; ItemDiscGrCode: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindSalesLineDisc', '', false, false)]
local procedure DoSomethingOnAfterFindSalesLineDisc(var ToSalesLineDisc: Record "KVSKBASalesLineDiscount"; CustNo: Code[20]; ContNo: Code[20]; CustDiscGrCode: Code[20]; CampaignNo: Code[20]; ItemNo: Code[20]; ItemDiscGrCode: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean)
begin
end;
OnAfterFindServLinePrice(Record Service Line, Record Service Header, Record KVSKBASalesPrice, Record KVSKBAResourcePrice, Record Service Cost, Integer) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindServLinePrice(var ServiceLine: Record "Service Line"; var ServiceHeader: Record "Service Header"; var SalesPrice: Record "KVSKBASalesPrice"; var ResourcePrice: Record "KVSKBAResourcePrice"; var ServiceCost: Record "Service Cost"; CalledByFieldNo: Integer):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindServLinePrice', '', false, false)]
local procedure DoSomethingOnAfterFindServLinePrice(var ServiceLine: Record "Service Line"; var ServiceHeader: Record "Service Header"; var SalesPrice: Record "KVSKBASalesPrice"; var ResourcePrice: Record "KVSKBAResourcePrice"; var ServiceCost: Record "Service Cost"; CalledByFieldNo: Integer)
begin
end;
OnAfterFindServLineResPrice(Record Service Line, Record KVSKBAResourcePrice) :#
[IntegrationEvent(false, false)]
local procedure OnAfterFindServLineResPrice(var ServiceLine: Record "Service Line"; var ResPrice: Record "KVSKBAResourcePrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindServLineResPrice', '', false, false)]
local procedure DoSomethingOnAfterFindServLineResPrice(var ServiceLine: Record "Service Line"; var ResPrice: Record "KVSKBAResourcePrice")
begin
end;
OnAfterFindServLineDisc(Record Service Line, Record Service Header, Record KVSKBASalesLineDiscount) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterFindServLineDisc(var ServiceLine: Record "Service Line"; var ServiceHeader: Record "Service Header"; var SalesLineDiscount: Record "KVSKBASalesLineDiscount"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterFindServLineDisc', '', false, false)]
local procedure DoSomethingOnAfterFindServLineDisc(var ServiceLine: Record "Service Line"; var ServiceHeader: Record "Service Header"; var SalesLineDiscount: Record "KVSKBASalesLineDiscount")
begin
end;
OnAfterGetSalesLinePrice(Record Sales Header, Record Sales Line, Record KVSKBASalesPrice) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterGetSalesLinePrice(var SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterGetSalesLinePrice', '', false, false)]
local procedure DoSomethingOnAfterGetSalesLinePrice(var SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary)
begin
end;
OnAfterGetSalesLineLineDisc(Record Sales Line, Record KVSKBASalesLineDiscount) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterGetSalesLineLineDisc(var SalesLine: Record "Sales Line"; var SalesLineDiscount: Record "KVSKBASalesLineDiscount"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterGetSalesLineLineDisc', '', false, false)]
local procedure DoSomethingOnAfterGetSalesLineLineDisc(var SalesLine: Record "Sales Line"; var SalesLineDiscount: Record "KVSKBASalesLineDiscount")
begin
end;
OnAfterJobJnlLineFindJTPriceGLAccount(Record Job Journal Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterJobJnlLineFindJTPriceGLAccount(var JobJournalLine: Record "Job Journal Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterJobJnlLineFindJTPriceGLAccount', '', false, false)]
local procedure DoSomethingOnAfterJobJnlLineFindJTPriceGLAccount(var JobJournalLine: Record "Job Journal Line")
begin
end;
OnAfterJobJnlLineFindJTPriceItem(Record Job Journal Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterJobJnlLineFindJTPriceItem(var JobJournalLine: Record "Job Journal Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterJobJnlLineFindJTPriceItem', '', false, false)]
local procedure DoSomethingOnAfterJobJnlLineFindJTPriceItem(var JobJournalLine: Record "Job Journal Line")
begin
end;
OnAfterJobJnlLineFindJTPriceResource(Record Job Journal Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterJobJnlLineFindJTPriceResource(var JobJournalLine: Record "Job Journal Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterJobJnlLineFindJTPriceResource', '', false, false)]
local procedure DoSomethingOnAfterJobJnlLineFindJTPriceResource(var JobJournalLine: Record "Job Journal Line")
begin
end;
OnAfterJobJnlLineLineDiscExists(Record Job Journal Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterJobJnlLineLineDiscExists(var JobJournalLine: Record "Job Journal Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterJobJnlLineLineDiscExists', '', false, false)]
local procedure DoSomethingOnAfterJobJnlLineLineDiscExists(var JobJournalLine: Record "Job Journal Line")
begin
end;
OnAfterJobPlanningLineLineDiscExists(Record Job Planning Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterJobPlanningLineLineDiscExists(var JobPlanningLine: Record "Job Planning Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterJobPlanningLineLineDiscExists', '', false, false)]
local procedure DoSomethingOnAfterJobPlanningLineLineDiscExists(var JobPlanningLine: Record "Job Planning Line")
begin
end;
OnAfterSalesLineLineDiscExists(Record Sales Line, Record Sales Header, Record KVSKBASalesLineDiscount, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterSalesLineLineDiscExists(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var TempSalesLineDisc: Record "KVSKBASalesLineDiscount" temporary; ShowAll: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterSalesLineLineDiscExists', '', false, false)]
local procedure DoSomethingOnAfterSalesLineLineDiscExists(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var TempSalesLineDisc: Record "KVSKBASalesLineDiscount" temporary; ShowAll: Boolean)
begin
end;
OnAfterSalesLinePriceExists(Record Sales Line, Record Sales Header, Record KVSKBASalesPrice, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnAfterSalesLinePriceExists(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary; ShowAll: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterSalesLinePriceExists', '', false, false)]
local procedure DoSomethingOnAfterSalesLinePriceExists(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary; ShowAll: Boolean)
begin
end;
OnAfterServLinePriceExists(Record Service Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterServLinePriceExists(var ServiceLine: Record "Service Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterServLinePriceExists', '', false, false)]
local procedure DoSomethingOnAfterServLinePriceExists(var ServiceLine: Record "Service Line")
begin
end;
OnAfterServLineLineDiscExists(Record Service Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterServLineLineDiscExists(var ServiceLine: Record "Service Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnAfterServLineLineDiscExists', '', false, false)]
local procedure DoSomethingOnAfterServLineLineDiscExists(var ServiceLine: Record "Service Line")
begin
end;
OnBeforeCalcBestUnitPrice(Record KVSKBASalesPrice) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcBestUnitPrice(var SalesPrice: Record "KVSKBASalesPrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeCalcBestUnitPrice', '', false, false)]
local procedure DoSomethingOnBeforeCalcBestUnitPrice(var SalesPrice: Record "KVSKBASalesPrice")
begin
end;
OnBeforeConvertPriceToVAT(Record VAT Posting Setup) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeConvertPriceToVAT(var VATPostingSetup: Record "VAT Posting Setup"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeConvertPriceToVAT', '', false, false)]
local procedure DoSomethingOnBeforeConvertPriceToVAT(var VATPostingSetup: Record "VAT Posting Setup")
begin
end;
OnBeforeFindAnalysisReportPrice(Code[20], Date, Decimal, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindAnalysisReportPrice(ItemNo: Code[20]; Date: Date; var UnitPrice: Decimal; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindAnalysisReportPrice', '', false, false)]
local procedure DoSomethingOnBeforeFindAnalysisReportPrice(ItemNo: Code[20]; Date: Date; var UnitPrice: Decimal; var IsHandled: Boolean)
begin
end;
OnBeforeFindItemJnlLinePrice(Record Item Journal Line, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindItemJnlLinePrice(var ItemJournalLine: Record "Item Journal Line"; CalledByFieldNo: Integer; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindItemJnlLinePrice', '', false, false)]
local procedure DoSomethingOnBeforeFindItemJnlLinePrice(var ItemJournalLine: Record "Item Journal Line"; CalledByFieldNo: Integer; var IsHandled: Boolean)
begin
end;
OnBeforeFindJobJnlLinePrice(Record Job Journal Line, Integer, Boolean) :#
[IntegrationEvent(true, false)]
local procedure OnBeforeFindJobJnlLinePrice(var JobJournalLine: Record "Job Journal Line"; CalledByFieldNo: Integer; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindJobJnlLinePrice', '', false, false)]
local procedure DoSomethingOnBeforeFindJobJnlLinePrice(var JobJournalLine: Record "Job Journal Line"; CalledByFieldNo: Integer; var IsHandled: Boolean)
begin
end;
OnBeforeFindJobPlanningLineResPrice(Record Job Planning Line, Record KVSKBAResourcePrice) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindJobPlanningLineResPrice(var JobPlanningLine: Record "Job Planning Line"; var ResourcePrice: Record "KVSKBAResourcePrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindJobPlanningLineResPrice', '', false, false)]
local procedure DoSomethingOnBeforeFindJobPlanningLineResPrice(var JobPlanningLine: Record "Job Planning Line"; var ResourcePrice: Record "KVSKBAResourcePrice")
begin
end;
OnBeforeFindJobPlanningLinePrice(Record Job Planning Line, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindJobPlanningLinePrice(var JobPlanningLine: Record "Job Planning Line"; CalledByFieldNo: Integer; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindJobPlanningLinePrice', '', false, false)]
local procedure DoSomethingOnBeforeFindJobPlanningLinePrice(var JobPlanningLine: Record "Job Planning Line"; CalledByFieldNo: Integer; var IsHandled: Boolean)
begin
end;
OnBeforeFindJobResPrice(Record Job Resource Price, Code[10], Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindJobResPrice(var JobResPrice: Record "Job Resource Price"; WorkTypeCode: Code[10]; var ReturnValue: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindJobResPrice', '', false, false)]
local procedure DoSomethingOnBeforeFindJobResPrice(var JobResPrice: Record "Job Resource Price"; WorkTypeCode: Code[10]; var ReturnValue: Boolean; var IsHandled: Boolean)
begin
end;
OnBeforeFindSalesPrice(Record KVSKBASalesPrice, Record KVSKBASalesPrice, Decimal, Decimal, Code[20], Code[20], Code[10], Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnBeforeFindSalesPrice(var ToSalesPrice: Record "KVSKBASalesPrice"; var FromSalesPrice: Record "KVSKBASalesPrice"; var QtyPerUOM: Decimal; var Qty: Decimal; var CustNo: Code[20]; var ContNo: Code[20]; var CustPriceGrCode: Code[10]; var CampaignNo: Code[20]; var ItemNo: Code[20]; var VariantCode: Code[10]; var UOM: Code[10]; var CurrencyCode: Code[10]; var StartingDate: Date; var ShowAll: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindSalesPrice', '', false, false)]
local procedure DoSomethingOnBeforeFindSalesPrice(var ToSalesPrice: Record "KVSKBASalesPrice"; var FromSalesPrice: Record "KVSKBASalesPrice"; var QtyPerUOM: Decimal; var Qty: Decimal; var CustNo: Code[20]; var ContNo: Code[20]; var CustPriceGrCode: Code[10]; var CampaignNo: Code[20]; var ItemNo: Code[20]; var VariantCode: Code[10]; var UOM: Code[10]; var CurrencyCode: Code[10]; var StartingDate: Date; var ShowAll: Boolean)
begin
end;
OnBeforeFindSalesLinePrice(Record Sales Line, Record Sales Header, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindSalesLinePrice(var SalesLine: Record "Sales Line"; SalesHeader: Record "Sales Header"; CalledByFieldNo: Integer; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindSalesLinePrice', '', false, false)]
local procedure DoSomethingOnBeforeFindSalesLinePrice(var SalesLine: Record "Sales Line"; SalesHeader: Record "Sales Header"; CalledByFieldNo: Integer; var IsHandled: Boolean)
begin
end;
OnBeforeFindSalesLineDisc(Record KVSKBASalesLineDiscount, Code[20], Code[20], Code[20], Code[20], Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnBeforeFindSalesLineDisc(var ToSalesLineDisc: Record "KVSKBASalesLineDiscount"; CustNo: Code[20]; ContNo: Code[20]; CustDiscGrCode: Code[20]; CampaignNo: Code[20]; ItemNo: Code[20]; ItemDiscGrCode: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindSalesLineDisc', '', false, false)]
local procedure DoSomethingOnBeforeFindSalesLineDisc(var ToSalesLineDisc: Record "KVSKBASalesLineDiscount"; CustNo: Code[20]; ContNo: Code[20]; CustDiscGrCode: Code[20]; CampaignNo: Code[20]; ItemNo: Code[20]; ItemDiscGrCode: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean)
begin
end;
OnBeforeFindSalesLineLineDisc(Record Sales Line, Record Sales Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindSalesLineLineDisc(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindSalesLineLineDisc', '', false, false)]
local procedure DoSomethingOnBeforeFindSalesLineLineDisc(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var IsHandled: Boolean)
begin
end;
OnBeforeFindSalesLineResPrice(Record Sales Header, Record Sales Line, Record KVSKBAResourcePrice) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindSalesLineResPrice(SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"; var ResPrice: Record "KVSKBAResourcePrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindSalesLineResPrice', '', false, false)]
local procedure DoSomethingOnBeforeFindSalesLineResPrice(SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"; var ResPrice: Record "KVSKBAResourcePrice")
begin
end;
OnBeforeFindServLinePrice(Record Service Line, Record Service Header, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindServLinePrice(var ServiceLine: Record "Service Line"; ServiceHeader: Record "Service Header"; CalledByFieldNo: Integer; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindServLinePrice', '', false, false)]
local procedure DoSomethingOnBeforeFindServLinePrice(var ServiceLine: Record "Service Line"; ServiceHeader: Record "Service Header"; CalledByFieldNo: Integer; var IsHandled: Boolean)
begin
end;
OnBeforeFindServLineDisc(Record Service Header, Record Service Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindServLineDisc(var ServiceHeader: Record "Service Header"; var ServiceLine: Record "Service Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindServLineDisc', '', false, false)]
local procedure DoSomethingOnBeforeFindServLineDisc(var ServiceHeader: Record "Service Header"; var ServiceLine: Record "Service Line"; var IsHandled: Boolean)
begin
end;
OnBeforeFindServLineResPrice(Record Service Header, Record Service Line, Record KVSKBAResourcePrice) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindServLineResPrice(ServiceHeader: Record "Service Header"; var ServiceLine: Record "Service Line"; var ResPrice: Record "KVSKBAResourcePrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindServLineResPrice', '', false, false)]
local procedure DoSomethingOnBeforeFindServLineResPrice(ServiceHeader: Record "Service Header"; var ServiceLine: Record "Service Line"; var ResPrice: Record "KVSKBAResourcePrice")
begin
end;
OnBeforeFindStdItemJnlLinePrice(Record Standard Item Journal Line, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeFindStdItemJnlLinePrice(var StandardItemJournalLine: Record "Standard Item Journal Line"; CalledByFieldNo: Integer; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindStdItemJnlLinePrice', '', false, false)]
local procedure DoSomethingOnBeforeFindStdItemJnlLinePrice(var StandardItemJournalLine: Record "Standard Item Journal Line"; CalledByFieldNo: Integer; var IsHandled: Boolean)
begin
end;
OnBeforeGetSalesLineLineDisc(Record Sales Header, Record Sales Line) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeGetSalesLineLineDisc(var SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeGetSalesLineLineDisc', '', false, false)]
local procedure DoSomethingOnBeforeGetSalesLineLineDisc(var SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line")
begin
end;
OnBeforeJobJnlLineFindJobResPrice(Record Job Journal Line, Record Job Resource Price, Option, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeJobJnlLineFindJobResPrice(var JobJnlLine: Record "Job Journal Line"; var JobResPrice: Record "Job Resource Price"; PriceType: Option; var ReturnValue: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeJobJnlLineFindJobResPrice', '', false, false)]
local procedure DoSomethingOnBeforeJobJnlLineFindJobResPrice(var JobJnlLine: Record "Job Journal Line"; var JobResPrice: Record "Job Resource Price"; PriceType: Option; var ReturnValue: Boolean; var IsHandled: Boolean)
begin
end;
OnBeforeJobJnlLineLineDiscExists(Record Job Journal Line) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeJobJnlLineLineDiscExists(var JobJournalLine: Record "Job Journal Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeJobJnlLineLineDiscExists', '', false, false)]
local procedure DoSomethingOnBeforeJobJnlLineLineDiscExists(var JobJournalLine: Record "Job Journal Line")
begin
end;
OnBeforeFindJobJnlLineLineDisc(Record Job Journal Line, Boolean) :#
[IntegrationEvent(true, false)]
local procedure OnBeforeFindJobJnlLineLineDisc(var JobJournalLine: Record "Job Journal Line"; IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindJobJnlLineLineDisc', '', false, false)]
local procedure DoSomethingOnBeforeFindJobJnlLineLineDisc(var JobJournalLine: Record "Job Journal Line"; IsHandled: Boolean)
begin
end;
OnBeforeJobPlanningLineLineDiscExists(Record Job Planning Line) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeJobPlanningLineLineDiscExists(var JobPlanningLine: Record "Job Planning Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeJobPlanningLineLineDiscExists', '', false, false)]
local procedure DoSomethingOnBeforeJobPlanningLineLineDiscExists(var JobPlanningLine: Record "Job Planning Line")
begin
end;
OnBeforeJobPlanningLineFindJTPrice(Record Job Planning Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeJobPlanningLineFindJTPrice(var JobPlanningLine: Record "Job Planning Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeJobPlanningLineFindJTPrice', '', false, false)]
local procedure DoSomethingOnBeforeJobPlanningLineFindJTPrice(var JobPlanningLine: Record "Job Planning Line"; var IsHandled: Boolean)
begin
end;
OnBeforeSalesLineLineDiscExists(Record Sales Line, Record Sales Header, Record KVSKBASalesLineDiscount, Date, Decimal, Decimal, Boolean, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnBeforeSalesLineLineDiscExists(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var TempSalesLineDisc: Record "KVSKBASalesLineDiscount" temporary; StartingDate: Date; Qty: Decimal; QtyPerUOM: Decimal; ShowAll: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeSalesLineLineDiscExists', '', false, false)]
local procedure DoSomethingOnBeforeSalesLineLineDiscExists(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var TempSalesLineDisc: Record "KVSKBASalesLineDiscount" temporary; StartingDate: Date; Qty: Decimal; QtyPerUOM: Decimal; ShowAll: Boolean; var IsHandled: Boolean)
begin
end;
OnBeforeSalesLinePriceExists(Record Sales Line, Record Sales Header, Record KVSKBASalesPrice, Record Currency, Decimal, Date, Decimal, Decimal, Boolean, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnBeforeSalesLinePriceExists(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary; Currency: Record "Currency"; CurrencyFactor: Decimal; StartingDate: Date; Qty: Decimal; QtyPerUOM: Decimal; ShowAll: Boolean; var InHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeSalesLinePriceExists', '', false, false)]
local procedure DoSomethingOnBeforeSalesLinePriceExists(var SalesLine: Record "Sales Line"; var SalesHeader: Record "Sales Header"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary; Currency: Record "Currency"; CurrencyFactor: Decimal; StartingDate: Date; Qty: Decimal; QtyPerUOM: Decimal; ShowAll: Boolean; var InHandled: Boolean)
begin
end;
OnBeforeServLinePriceExists(Record Service Line, Record Service Header, Record KVSKBASalesPrice, Boolean, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnBeforeServLinePriceExists(var ServiceLine: Record "Service Line"; var ServiceHeader: Record "Service Header"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary; ShowAll: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeServLinePriceExists', '', false, false)]
local procedure DoSomethingOnBeforeServLinePriceExists(var ServiceLine: Record "Service Line"; var ServiceHeader: Record "Service Header"; var TempSalesPrice: Record "KVSKBASalesPrice" temporary; ShowAll: Boolean; var IsHandled: Boolean)
begin
end;
OnBeforeServLineLineDiscExists(Record Service Line, Record Service Header) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeServLineLineDiscExists(var ServiceLine: Record "Service Line"; var ServiceHeader: Record "Service Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeServLineLineDiscExists', '', false, false)]
local procedure DoSomethingOnBeforeServLineLineDiscExists(var ServiceLine: Record "Service Line"; var ServiceHeader: Record "Service Header")
begin
end;
OnGetCustNoForSalesHeader(Record Sales Header, Code[20]) :#
[IntegrationEvent(false, false)]
local procedure OnGetCustNoForSalesHeader(var SalesHeader: Record "Sales Header"; var CustomerNo: Code[20]):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnGetCustNoForSalesHeader', '', false, false)]
local procedure DoSomethingOnGetCustNoForSalesHeader(var SalesHeader: Record "Sales Header"; var CustomerNo: Code[20])
begin
end;
OnFindSalesLineDiscOnAfterSetFilters(Record KVSKBASalesLineDiscount) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnFindSalesLineDiscOnAfterSetFilters(var SalesLineDiscount: Record "KVSKBASalesLineDiscount"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnFindSalesLineDiscOnAfterSetFilters', '', false, false)]
local procedure DoSomethingOnFindSalesLineDiscOnAfterSetFilters(var SalesLineDiscount: Record "KVSKBASalesLineDiscount")
begin
end;
OnFindSalesLineLineDiscOnBeforeCalcLineDisc(Record Sales Header, Record Sales Line, Record KVSKBASalesLineDiscount, Decimal, Decimal, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnFindSalesLineLineDiscOnBeforeCalcLineDisc(var SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var TempSalesLineDiscount: Record "KVSKBASalesLineDiscount" temporary; Qty: Decimal; QtyPerUOM: Decimal; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnFindSalesLineLineDiscOnBeforeCalcLineDisc', '', false, false)]
local procedure DoSomethingOnFindSalesLineLineDiscOnBeforeCalcLineDisc(var SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var TempSalesLineDiscount: Record "KVSKBASalesLineDiscount" temporary; Qty: Decimal; QtyPerUOM: Decimal; var IsHandled: Boolean)
begin
end;
OnJobJnlLineFindJTPriceCaseGLAccountOnBeforeSetFilter(Record Job G/L Account Price, Record Job Journal Line) :#
[IntegrationEvent(false, false)]
local procedure OnJobJnlLineFindJTPriceCaseGLAccountOnBeforeSetFilter(var JobGLAccountPrice: Record "Job G/L Account Price"; var JobJournalLine: Record "Job Journal Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnJobJnlLineFindJTPriceCaseGLAccountOnBeforeSetFilter', '', false, false)]
local procedure DoSomethingOnJobJnlLineFindJTPriceCaseGLAccountOnBeforeSetFilter(var JobGLAccountPrice: Record "Job G/L Account Price"; var JobJournalLine: Record "Job Journal Line")
begin
end;
OnJobJnlLineFindJTPriceCaseItemOnBeforeSetFilter(Record Job Item Price, Record Job Journal Line) :#
[IntegrationEvent(false, false)]
local procedure OnJobJnlLineFindJTPriceCaseItemOnBeforeSetFilter(var JobItemPrice: Record "Job Item Price"; var JobJournalLine: Record "Job Journal Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnJobJnlLineFindJTPriceCaseItemOnBeforeSetFilter', '', false, false)]
local procedure DoSomethingOnJobJnlLineFindJTPriceCaseItemOnBeforeSetFilter(var JobItemPrice: Record "Job Item Price"; var JobJournalLine: Record "Job Journal Line")
begin
end;
OnJobJnlLineFindJTPriceCaseResourceOnBeforeSetFilter(Record Job Resource Price, Record Job Journal Line) :#
[IntegrationEvent(false, false)]
local procedure OnJobJnlLineFindJTPriceCaseResourceOnBeforeSetFilter(var JobResourcePrice: Record "Job Resource Price"; var JobJournalLine: Record "Job Journal Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnJobJnlLineFindJTPriceCaseResourceOnBeforeSetFilter', '', false, false)]
local procedure DoSomethingOnJobJnlLineFindJTPriceCaseResourceOnBeforeSetFilter(var JobResourcePrice: Record "Job Resource Price"; var JobJournalLine: Record "Job Journal Line")
begin
end;
OnBeforeSalesHeaderStartDate(Record Sales Header, Text[30], Date, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeSalesHeaderStartDate(var SalesHeader: Record "Sales Header"; var DateCaption: Text[30]; var ReturnValue: Date; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeSalesHeaderStartDate', '', false, false)]
local procedure DoSomethingOnBeforeSalesHeaderStartDate(var SalesHeader: Record "Sales Header"; var DateCaption: Text[30]; var ReturnValue: Date; var IsHandled: Boolean)
begin
end;
OnBeforeServHeaderStartDate(Record Service Header, Text[30], Date, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeServHeaderStartDate(var ServiceHeader: Record "Service Header"; var DateCaption: Text[30]; var ReturnValue: Date; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeServHeaderStartDate', '', false, false)]
local procedure DoSomethingOnBeforeServHeaderStartDate(var ServiceHeader: Record "Service Header"; var DateCaption: Text[30]; var ReturnValue: Date; var IsHandled: Boolean)
begin
end;
OnBeforeFindSalesPriceOnBeforeDeleteTempTable(Record KVSKBASalesPrice, Code[20], Code[20], Code[10], Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean, Code[10], Record KVSKBASalesConditionLine, Code[10], Code[10], Code[20], Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnBeforeFindSalesPriceOnBeforeDeleteTempTable(var ToSalesPrice: Record "KVSKBASalesPrice"; CustNo: Code[20]; ContNo: Code[20]; CustPriceGrCode: Code[10]; CampaignNo: Code[20]; ItemNo: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean; RespCenterCode: Code[10]; var ToSalesCondLine: Record "KVSKBASalesConditionLine"; SalesOrderTypeCode: Code[10]; ItemPriceGrCode: Code[10]; ItemCategoryCode: Code[20]; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeFindSalesPriceOnBeforeDeleteTempTable', '', false, false)]
local procedure DoSomethingOnBeforeFindSalesPriceOnBeforeDeleteTempTable(var ToSalesPrice: Record "KVSKBASalesPrice"; CustNo: Code[20]; ContNo: Code[20]; CustPriceGrCode: Code[10]; CampaignNo: Code[20]; ItemNo: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean; RespCenterCode: Code[10]; var ToSalesCondLine: Record "KVSKBASalesConditionLine"; SalesOrderTypeCode: Code[10]; ItemPriceGrCode: Code[10]; ItemCategoryCode: Code[20]; var IsHandled: Boolean)
begin
end;
OnCopySalesPriceToSalesPriceOnBeforeRepeatCode(Record KVSKBASalesPrice, Record KVSKBASalesPrice, Code[10], Code[20], Code[10], Record KVSKBASalesConditionLine, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
local procedure OnCopySalesPriceToSalesPriceOnBeforeRepeatCode(var FromSalesPrice: Record "KVSKBASalesPrice"; var ToSalesPrice: Record "KVSKBASalesPrice"; UOMCode: Code[10]; ItemNo: Code[20]; VariantCode: Code[10]; var ToSalesCondLine: Record "KVSKBASalesConditionLine"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnCopySalesPriceToSalesPriceOnBeforeRepeatCode', '', false, false)]
local procedure DoSomethingOnCopySalesPriceToSalesPriceOnBeforeRepeatCode(var FromSalesPrice: Record "KVSKBASalesPrice"; var ToSalesPrice: Record "KVSKBASalesPrice"; UOMCode: Code[10]; ItemNo: Code[20]; VariantCode: Code[10]; var ToSalesCondLine: Record "KVSKBASalesConditionLine"; var IsHandled: Boolean)
begin
end;
OnCalcBestUnitPriceOnBeforeCaseBestSalesPrice(Record KVSKBASalesPrice, Boolean, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the function will not be available in the future.', '18.3')]
[IntegrationEvent(false, false)]
procedure OnCalcBestUnitPriceOnBeforeCaseBestSalesPrice(var SalesPrice: Record "KVSKBASalesPrice"; DoNotFindBestPrice: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnCalcBestUnitPriceOnBeforeCaseBestSalesPrice', '', false, false)]
local procedure DoSomethingOnCalcBestUnitPriceOnBeforeCaseBestSalesPrice(var SalesPrice: Record "KVSKBASalesPrice"; DoNotFindBestPrice: Boolean; var IsHandled: Boolean)
begin
end;
OnBeforeGetSalesLinePrice(Record Sales Header, Record Sales Line) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeGetSalesLinePrice(SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeGetSalesLinePrice', '', false, false)]
local procedure DoSomethingOnBeforeGetSalesLinePrice(SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line")
begin
end;
OnBeforeActivatedCampaignExists(Record Campaign Target Group, Code[20], Code[20], Code[20], Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeActivatedCampaignExists(var ToCampaignTargetGroup: Record "Campaign Target Group"; CustNo: Code[20]; ContNo: Code[20]; CampaignNo: Code[20]; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnBeforeActivatedCampaignExists', '', false, false)]
local procedure DoSomethingOnBeforeActivatedCampaignExists(var ToCampaignTargetGroup: Record "Campaign Target Group"; CustNo: Code[20]; ContNo: Code[20]; CampaignNo: Code[20]; var IsHandled: Boolean)
begin
end;
OnSetPriceHierarchyLevelOnCaseSalesTypeCaseElse(Record KVSKBASalesPrice, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnSetPriceHierarchyLevelOnCaseSalesTypeCaseElse(var KVSKBASalesPrice: Record "KVSKBASalesPrice"; var Ishandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnSetPriceHierarchyLevelOnCaseSalesTypeCaseElse', '', false, false)]
local procedure DoSomethingOnSetPriceHierarchyLevelOnCaseSalesTypeCaseElse(var KVSKBASalesPrice: Record "KVSKBASalesPrice"; var Ishandled: Boolean)
begin
end;
OnSetLineDiscHierarchyLevelOnCaseSalesTypeCaseElse(Record KVSKBASalesLineDiscount, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnSetLineDiscHierarchyLevelOnCaseSalesTypeCaseElse(var KVSKBASalesLineDiscount: Record "KVSKBASalesLineDiscount"; var Ishandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnSetLineDiscHierarchyLevelOnCaseSalesTypeCaseElse', '', false, false)]
local procedure DoSomethingOnSetLineDiscHierarchyLevelOnCaseSalesTypeCaseElse(var KVSKBASalesLineDiscount: Record "KVSKBASalesLineDiscount"; var Ishandled: Boolean)
begin
end;
OnReplacePriceifMoreSpecificOnSalesPriceSalesTypeCaseElse(Record KVSKBASalesPrice, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnReplacePriceifMoreSpecificOnSalesPriceSalesTypeCaseElse(KVSKBASalesPrice: Record "KVSKBASalesPrice"; var SalesTypePriority: Integer; Ishandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnReplacePriceifMoreSpecificOnSalesPriceSalesTypeCaseElse', '', false, false)]
local procedure DoSomethingOnReplacePriceifMoreSpecificOnSalesPriceSalesTypeCaseElse(KVSKBASalesPrice: Record "KVSKBASalesPrice"; var SalesTypePriority: Integer; Ishandled: Boolean)
begin
end;
OnReplacePriceifMoreSpecificOnBestSalesPriceSalesTypeCaseElse(Record KVSKBASalesPrice, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnReplacePriceifMoreSpecificOnBestSalesPriceSalesTypeCaseElse(KVSKBABestSalesPrice: Record "KVSKBASalesPrice"; var BestSalesTypePriority: Integer; Ishandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnReplacePriceifMoreSpecificOnBestSalesPriceSalesTypeCaseElse', '', false, false)]
local procedure DoSomethingOnReplacePriceifMoreSpecificOnBestSalesPriceSalesTypeCaseElse(KVSKBABestSalesPrice: Record "KVSKBASalesPrice"; var BestSalesTypePriority: Integer; Ishandled: Boolean)
begin
end;
OnReplacePriceifMoreSpecificOnBeforeComparisonSalesTypePriorities(Record KVSKBASalesPrice, Record KVSKBASalesPrice, Integer, Integer) :#
[IntegrationEvent(false, false)]
local procedure OnReplacePriceifMoreSpecificOnBeforeComparisonSalesTypePriorities(KVSKBASalesPrice: Record "KVSKBASalesPrice"; KVSKBABestSalesPrice: Record "KVSKBASalesPrice"; var SalesTypePriority: Integer; var BestSalesTypePriority: Integer):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnReplacePriceifMoreSpecificOnBeforeComparisonSalesTypePriorities', '', false, false)]
local procedure DoSomethingOnReplacePriceifMoreSpecificOnBeforeComparisonSalesTypePriorities(KVSKBASalesPrice: Record "KVSKBASalesPrice"; KVSKBABestSalesPrice: Record "KVSKBASalesPrice"; var SalesTypePriority: Integer; var BestSalesTypePriority: Integer)
begin
end;
OnReplaceLineDiscifMoreSpecificOnSalesLineDiscountSalesTypeCaseElse(Record KVSKBASalesLineDiscount, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnReplaceLineDiscifMoreSpecificOnSalesLineDiscountSalesTypeCaseElse(var KVSKBASalesLineDiscount: Record "KVSKBASalesLineDiscount"; var SalesTypePriority: Integer; Ishandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnReplaceLineDiscifMoreSpecificOnSalesLineDiscountSalesTypeCaseElse', '', false, false)]
local procedure DoSomethingOnReplaceLineDiscifMoreSpecificOnSalesLineDiscountSalesTypeCaseElse(var KVSKBASalesLineDiscount: Record "KVSKBASalesLineDiscount"; var SalesTypePriority: Integer; Ishandled: Boolean)
begin
end;
OnReplaceLineDiscifMoreSpecificOnBestSalesLineDiscountSalesTypeCaseElse(Record KVSKBASalesLineDiscount, Integer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnReplaceLineDiscifMoreSpecificOnBestSalesLineDiscountSalesTypeCaseElse(KVSKBABestSalesLineDiscount: Record "KVSKBASalesLineDiscount"; var BestSalesTypePriority: Integer; Ishandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnReplaceLineDiscifMoreSpecificOnBestSalesLineDiscountSalesTypeCaseElse', '', false, false)]
local procedure DoSomethingOnReplaceLineDiscifMoreSpecificOnBestSalesLineDiscountSalesTypeCaseElse(KVSKBABestSalesLineDiscount: Record "KVSKBASalesLineDiscount"; var BestSalesTypePriority: Integer; Ishandled: Boolean)
begin
end;
OnReplaceLineDiscifMoreSpecificOnBeforeComparisonSalesTypePriorities(Record KVSKBASalesLineDiscount, Record KVSKBASalesLineDiscount, Integer, Integer) :#
[IntegrationEvent(false, false)]
local procedure OnReplaceLineDiscifMoreSpecificOnBeforeComparisonSalesTypePriorities(var KVSKBASalesLineDiscount: Record "KVSKBASalesLineDiscount"; KVSKBABestSalesLineDiscount: Record "KVSKBASalesLineDiscount"; var SalesTypePriority: Integer; var BestSalesTypePriority: Integer):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesPriceCalcMgt", 'OnReplaceLineDiscifMoreSpecificOnBeforeComparisonSalesTypePriorities', '', false, false)]
local procedure DoSomethingOnReplaceLineDiscifMoreSpecificOnBeforeComparisonSalesTypePriorities(var KVSKBASalesLineDiscount: Record "KVSKBASalesLineDiscount"; KVSKBABestSalesLineDiscount: Record "KVSKBASalesLineDiscount"; var SalesTypePriority: Integer; var BestSalesTypePriority: Integer)
begin
end;