KVSKBAPriceCalcPricePrio#
Procedures#
GetLine(Variant) :#
procedure GetLine(var Line: Variant):
Init(Interface Line With Price, Record Price Calculation Setup) :#
procedure Init(NewLineWithPrice: Interface "Line With Price"; PriceCalculationSetup: Record "Price Calculation Setup"):
ApplyDiscount() :#
procedure ApplyDiscount():
ApplyPrice(Integer) :#
procedure ApplyPrice(CalledByFieldNo: Integer):
CountDiscount(Boolean) : Integer#
procedure CountDiscount(ShowAll: Boolean): Integer
CountPrice(Boolean) : Integer#
procedure CountPrice(ShowAll: Boolean): Integer
FindDiscount(Record Price List Line, Boolean) : Boolean#
procedure FindDiscount(var TempPriceListLine: Record "Price List Line"; ShowAll: Boolean): Boolean
FindPrice(Record Price List Line, Boolean) : Boolean#
procedure FindPrice(var TempPriceListLine: Record "Price List Line"; ShowAll: Boolean): Boolean
IsDiscountExists(Boolean) : Boolean#
procedure IsDiscountExists(ShowAll: Boolean): Boolean
IsPriceExists(Boolean) : Boolean#
procedure IsPriceExists(ShowAll: Boolean): Boolean
PickDiscount() :#
procedure PickDiscount():
PickPrice() :#
procedure PickPrice():
ShowPrices(Record Price List Line) :#
procedure ShowPrices(var TempPriceListLine: Record "Price List Line"):
IsBetterLine(Record Price List Line, Enum Price Amount Type, Record Price List Line) : Boolean#
procedure IsBetterLine(var PriceListLine: Record "Price List Line"; AmountType: Enum "Price Amount Type"; BestPriceListLine: Record "Price List Line"): Boolean
FindLines(Enum Price Amount Type, Record Price List Line, Codeunit Price Calculation Buffer Mgt., Boolean) : Boolean#
procedure FindLines(AmountType: Enum "Price Amount Type"; var TempPriceListLine: Record "Price List Line" temporary; var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt."; ShowAll: Boolean): Boolean
CopyLinesBySource(Record Price List Line, Record Price Source, Codeunit Price Asset List, Record Price List Line) : Boolean#
procedure CopyLinesBySource(var PriceListLine: Record "Price List Line"; PriceSource: Record "Price Source"; var PriceAssetList: Codeunit "Price Asset List"; var TempPriceListLine: Record "Price List Line" temporary): Boolean
CopyLinesBySource(Record Price List Line, Record Price Source, Record Price Asset, Record Price List Line) : Boolean#
procedure CopyLinesBySource(var PriceListLine: Record "Price List Line"; PriceSource: Record "Price Source"; PriceAsset: Record "Price Asset"; var TempPriceListLine: Record "Price List Line" temporary): Boolean
CalcBestAmount(Enum Price Amount Type, Codeunit Price Calculation Buffer Mgt., Record Price List Line) : Boolean#
procedure CalcBestAmount(AmountType: Enum "Price Amount Type"; var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt."; var PriceListLine: Record "Price List Line"): Boolean
Events#
OnAfterIsBetterLine(Record Price List Line, Enum Price Amount Type, Record Price List Line, Boolean) :#
[IntegrationEvent(true, false)]
local procedure OnAfterIsBetterLine(PriceListLine: Record "Price List Line"; AmountType: Enum "Price Amount Type"; BestPriceListLine: Record "Price List Line"; var Result: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnAfterIsBetterLine', '', false, false)]
local procedure DoSomethingOnAfterIsBetterLine(PriceListLine: Record "Price List Line"; AmountType: Enum "Price Amount Type"; BestPriceListLine: Record "Price List Line"; var Result: Boolean)
begin
end;
OnAfterIsDegradedLine(Record Price List Line, Record Price List Line, Boolean) :#
[IntegrationEvent(true, false)]
local procedure OnAfterIsDegradedLine(PriceListLine: Record "Price List Line"; BestPriceListLine: Record "Price List Line"; var Result: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnAfterIsDegradedLine', '', false, false)]
local procedure DoSomethingOnAfterIsDegradedLine(PriceListLine: Record "Price List Line"; BestPriceListLine: Record "Price List Line"; var Result: Boolean)
begin
end;
OnAfterIsImprovedLine(Record Price List Line, Record Price List Line, Boolean) :#
[IntegrationEvent(true, false)]
local procedure OnAfterIsImprovedLine(PriceListLine: Record "Price List Line"; BestPriceListLine: Record "Price List Line"; var Result: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnAfterIsImprovedLine', '', false, false)]
local procedure DoSomethingOnAfterIsImprovedLine(PriceListLine: Record "Price List Line"; BestPriceListLine: Record "Price List Line"; var Result: Boolean)
begin
end;
OnAfterPickBestLine(Enum Price Amount Type, Record Price List Line, Record Price List Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnAfterPickBestLine(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnAfterPickBestLine', '', false, false)]
local procedure DoSomethingOnAfterPickBestLine(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean)
begin
end;
OnBeforePickBestLine(Enum Price Amount Type, Record Price List Line, Record Price List Line, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforePickBestLine(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnBeforePickBestLine', '', false, false)]
local procedure DoSomethingOnBeforePickBestLine(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean; var IsHandled: Boolean)
begin
end;
OnBeforeCalcBestAmount(Enum Price Amount Type, Codeunit Price Calculation Buffer Mgt., Record Price List Line) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcBestAmount(AmountType: Enum "Price Amount Type"; var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt."; var PriceListLine: Record "Price List Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnBeforeCalcBestAmount', '', false, false)]
local procedure DoSomethingOnBeforeCalcBestAmount(AmountType: Enum "Price Amount Type"; var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt."; var PriceListLine: Record "Price List Line")
begin
end;
OnIsDisabled(Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnIsDisabled(var Disabled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnIsDisabled', '', false, false)]
local procedure DoSomethingOnIsDisabled(var Disabled: Boolean)
begin
end;
OnFindLinesOnBefoerPriceSourceListGetMinMaxLevel(Codeunit Price Asset List, Codeunit Price Source List, Enum Price Amount Type, Codeunit Price Calculation Buffer Mgt.) :#
[IntegrationEvent(false, false)]
local procedure OnFindLinesOnBefoerPriceSourceListGetMinMaxLevel(var PriceAssetList: Codeunit "Price Asset List"; var PriceSourceList: Codeunit "Price Source List"; AmountType: Enum "Price Amount Type"; var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt."):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnFindLinesOnBefoerPriceSourceListGetMinMaxLevel', '', false, false)]
local procedure DoSomethingOnFindLinesOnBefoerPriceSourceListGetMinMaxLevel(var PriceAssetList: Codeunit "Price Asset List"; var PriceSourceList: Codeunit "Price Source List"; AmountType: Enum "Price Amount Type"; var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt.")
begin
end;
OnAfterCalcBestAmount(Enum Price Amount Type, Codeunit Price Calculation Buffer Mgt., Record Price List Line, Boolean) :#
[IntegrationEvent(true, false)]
local procedure OnAfterCalcBestAmount(AmountType: Enum "Price Amount Type"; var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt."; var PriceListLine: Record "Price List Line"; var FoundBestPrice: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnAfterCalcBestAmount', '', false, false)]
local procedure DoSomethingOnAfterCalcBestAmount(AmountType: Enum "Price Amount Type"; var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt."; var PriceListLine: Record "Price List Line"; var FoundBestPrice: Boolean)
begin
end;
OnAfterReplaceifMoreSpecific(Enum Price Amount Type, Record Price List Line, Record Price List Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnAfterReplaceifMoreSpecific(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnAfterReplaceifMoreSpecific', '', false, false)]
local procedure DoSomethingOnAfterReplaceifMoreSpecific(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean)
begin
end;
OnBeforeCalcBestAmountLine(Enum Price Amount Type, Record Price List Line, Record Price List Line, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcBestAmountLine(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean; var KVSKBANotFindBestPrice: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnBeforeCalcBestAmountLine', '', false, false)]
local procedure DoSomethingOnBeforeCalcBestAmountLine(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean; var KVSKBANotFindBestPrice: Boolean)
begin
end;
OnAfterCalcBestAmountLine(Enum Price Amount Type, Record Price List Line, Record Price List Line, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCalcBestAmountLine(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean; var KVSKBANotFindBestPrice: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnAfterCalcBestAmountLine', '', false, false)]
local procedure DoSomethingOnAfterCalcBestAmountLine(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"; var BestPriceListLine: Record "Price List Line"; var FoundBestLine: Boolean; var KVSKBANotFindBestPrice: Boolean)
begin
end;
OnKVSKBACollectHierachyLevelOnBeforeFindCustomerPriceGroup(Record Customer, Code[20], Code[20], Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnKVSKBACollectHierachyLevelOnBeforeFindCustomerPriceGroup(HierarchyCustomer: Record "Customer"; ItemCategoryCode: Code[20]; var CustPriceGrCode: Code[20]; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnKVSKBACollectHierachyLevelOnBeforeFindCustomerPriceGroup', '', false, false)]
local procedure DoSomethingOnKVSKBACollectHierachyLevelOnBeforeFindCustomerPriceGroup(HierarchyCustomer: Record "Customer"; ItemCategoryCode: Code[20]; var CustPriceGrCode: Code[20]; var IsHandled: Boolean)
begin
end;
OnFindLinesOnBeforeCopyConditionLines(Record Price Calculation Buffer, Record Price List Line) :#
[IntegrationEvent(false, false)]
local procedure OnFindLinesOnBeforeCopyConditionLines(var KVSKBAPriceCalculationBuffer: Record "Price Calculation Buffer"; var TempPriceListLine: Record "Price List Line" temporary):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnFindLinesOnBeforeCopyConditionLines', '', false, false)]
local procedure DoSomethingOnFindLinesOnBeforeCopyConditionLines(var KVSKBAPriceCalculationBuffer: Record "Price Calculation Buffer"; var TempPriceListLine: Record "Price List Line" temporary)
begin
end;
OnFindLinesOnAfterCopyConditionLines(Record Price Calculation Buffer, Record Price List Line) :#
[IntegrationEvent(false, false)]
local procedure OnFindLinesOnAfterCopyConditionLines(var KVSKBAPriceCalculationBuffer: Record "Price Calculation Buffer"; var TempPriceListLine: Record "Price List Line" temporary):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPriceCalcPricePrio", 'OnFindLinesOnAfterCopyConditionLines', '', false, false)]
local procedure DoSomethingOnFindLinesOnAfterCopyConditionLines(var KVSKBAPriceCalculationBuffer: Record "Price Calculation Buffer"; var TempPriceListLine: Record "Price List Line" temporary)
begin
end;