KVSKBAPurchasePriceLib#
Procedures#
AddPricesListLineHierachy(Codeunit Price Source List, Code[20]) :#
procedure AddPricesListLineHierachy(var PriceSourceList: Codeunit "Price Source List"; VendorNo: Code[20]):
CopyPurchCondLinesLDiscPriceListLine(Record Price List Line, Record KVSKBAPurchaseConditionLine, Code[20], Decimal, Record Currency, Decimal, Date, Code[10], Decimal) :#
procedure CopyPurchCondLinesLDiscPriceListLine(var FromPriceListLine: Record "Price List Line"; var toPurchCondLineVar: Record "KVSKBAPurchaseConditionLine"; itemNoPar: Code[20]; initialPricePar: Decimal; docCurrencyPar: Record "Currency"; docCurrencyFactorPar: Decimal; docExchDatePar: Date; docUOMCodePar: Code[10]; docQtyPerUOMPar: Decimal):
ShowPurchPriceDiscCalcLines(Record Purchase Line, Option) :#
procedure ShowPurchPriceDiscCalcLines(var purchLineVar: Record "Purchase Line"; lineTypePar: Option):
DeletePurchPriceDiscCalcTab38(Record Purchase Header) :#
procedure DeletePurchPriceDiscCalcTab38(purchHeaderPar: Record "Purchase Header"):
DeletePurchPriceDiscCalcTab39(Record Purchase Line, Option, Boolean, Decimal, Boolean) :#
procedure DeletePurchPriceDiscCalcTab39(purchLinePar: Record "Purchase Line"; lineTypePar: Option; unconditionalPar: Boolean; comparativeValuePar: Decimal; hideConfirmPar: Boolean):
CopyPurchPriceDiscTab39Tab39(Record Purchase Line, Record Purchase Line) :#
procedure CopyPurchPriceDiscTab39Tab39(fromPurchLinePar: Record "Purchase Line"; toPurchLinePar: Record "Purchase Line"):
CopyPurchPriceDiscTab5110Tab39(Record Purchase Line Archive, Record Purchase Line) :#
procedure CopyPurchPriceDiscTab5110Tab39(fromPurchLineArchPar: Record "Purchase Line Archive"; toPurchLinePar: Record "Purchase Line"):
NewCalcDUCostLDiscPurchLines(Record Purchase Line) :#
Summary: the function starts a new calculation of "Direct Unit Cost" and "Line Discount %" of the filtered purchase lines
procedure NewCalcDUCostLDiscPurchLines(var PurchaseLine: Record "Purchase Line"):
Parameters:
PurchaseLine: filtered purchase lines
CheckExtendedPriceCalcEnabled() : 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')]
procedure CheckExtendedPriceCalcEnabled(): Boolean
Events#
OnLookupPurchCondNoInPurchPriceOnSetFilterPurchCondHeader(Record KVSKBAPurchaseConditionHeader, Record KVSKBAPurchasePrice) :#
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 OnLookupPurchCondNoInPurchPriceOnSetFilterPurchCondHeader(PurchaseConditionHeader: Record "KVSKBAPurchaseConditionHeader"; var PurchasePrice: Record "KVSKBAPurchasePrice"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchasePriceLib", 'OnLookupPurchCondNoInPurchPriceOnSetFilterPurchCondHeader', '', false, false)]
local procedure DoSomethingOnLookupPurchCondNoInPurchPriceOnSetFilterPurchCondHeader(PurchaseConditionHeader: Record "KVSKBAPurchaseConditionHeader"; var PurchasePrice: Record "KVSKBAPurchasePrice")
begin
end;
OnLookupPurchPriceCondNoInPricePriceListOnSetFilterPurchCondHeader(Record KVSKBAPurchaseConditionHeader, Record Price List Line) :#
[IntegrationEvent(false, false)]
local procedure OnLookupPurchPriceCondNoInPricePriceListOnSetFilterPurchCondHeader(KVSKBAPurchaseConditionHeader: Record "KVSKBAPurchaseConditionHeader"; var PriceListLine: Record "Price List Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchasePriceLib", 'OnLookupPurchPriceCondNoInPricePriceListOnSetFilterPurchCondHeader', '', false, false)]
local procedure DoSomethingOnLookupPurchPriceCondNoInPricePriceListOnSetFilterPurchCondHeader(KVSKBAPurchaseConditionHeader: Record "KVSKBAPurchaseConditionHeader"; var PriceListLine: Record "Price List Line")
begin
end;
OnCalcPurchCondNoInPriceListLineOnBeforeCheckAllowBaseofCalculation(Record KVSKBAPurchaseConditionHeader, Record Price List Line, Boolean) :#
Obsolete
This Element will be removed or changed with a future Version of the App.
[IntegrationEvent(false, false)]
[Obsolete('Use OnCalcPurchCondNoInPriceListLineOnBeforeCheckAllowBaseofCalculationwithIsHandled instead', '24.3')]
local procedure OnCalcPurchCondNoInPriceListLineOnBeforeCheckAllowBaseofCalculation(KVSKBAPurchaseConditionHeader: Record "KVSKBAPurchaseConditionHeader"; var PriceListLine: Record "Price List Line"; IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchasePriceLib", 'OnCalcPurchCondNoInPriceListLineOnBeforeCheckAllowBaseofCalculation', '', false, false)]
local procedure DoSomethingOnCalcPurchCondNoInPriceListLineOnBeforeCheckAllowBaseofCalculation(KVSKBAPurchaseConditionHeader: Record "KVSKBAPurchaseConditionHeader"; var PriceListLine: Record "Price List Line"; IsHandled: Boolean)
begin
end;
OnCalcPurchCondNoInPriceListLineOnBeforeCheckAllowBaseofCalculationwithIsHandled(Record KVSKBAPurchaseConditionHeader, Record Price List Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnCalcPurchCondNoInPriceListLineOnBeforeCheckAllowBaseofCalculationwithIsHandled(KVSKBAPurchaseConditionHeader: Record "KVSKBAPurchaseConditionHeader"; var PriceListLine: Record "Price List Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchasePriceLib", 'OnCalcPurchCondNoInPriceListLineOnBeforeCheckAllowBaseofCalculationwithIsHandled', '', false, false)]
local procedure DoSomethingOnCalcPurchCondNoInPriceListLineOnBeforeCheckAllowBaseofCalculationwithIsHandled(KVSKBAPurchaseConditionHeader: Record "KVSKBAPurchaseConditionHeader"; var PriceListLine: Record "Price List Line"; var IsHandled: Boolean)
begin
end;
OnShowPurchPriceDiscCalcLinesOnBeforeCaseLineType(Record Purchase Line, Option, Record KVSKBAPurchPriceDiscCalcLine, Record KVSKBAPurchPriceDiscCalcLine) :#
[IntegrationEvent(false, false)]
local procedure OnShowPurchPriceDiscCalcLinesOnBeforeCaseLineType(var PurchaseLine: Record "Purchase Line"; LineType: Option; PurchPriceDiscCalcLine: Record "KVSKBAPurchPriceDiscCalcLine"; var TempPurchPriceDiscCalcLine: Record "KVSKBAPurchPriceDiscCalcLine" temporary):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchasePriceLib", 'OnShowPurchPriceDiscCalcLinesOnBeforeCaseLineType', '', false, false)]
local procedure DoSomethingOnShowPurchPriceDiscCalcLinesOnBeforeCaseLineType(var PurchaseLine: Record "Purchase Line"; LineType: Option; PurchPriceDiscCalcLine: Record "KVSKBAPurchPriceDiscCalcLine"; var TempPurchPriceDiscCalcLine: Record "KVSKBAPurchPriceDiscCalcLine" temporary)
begin
end;
OnBeforeCheckExtendedPriceCalcEnabled(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 OnBeforeCheckExtendedPriceCalcEnabled(var ExtendedPriceCalcEnabled: Boolean; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchasePriceLib", 'OnBeforeCheckExtendedPriceCalcEnabled', '', false, false)]
local procedure DoSomethingOnBeforeCheckExtendedPriceCalcEnabled(var ExtendedPriceCalcEnabled: Boolean; var Handled: Boolean)
begin
end;
OnBeforeDeletePurchPriceDiscCalcTab39(Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeDeletePurchPriceDiscCalcTab39(PurchaseLine: Record "Purchase Line"; var Unconditional: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchasePriceLib", 'OnBeforeDeletePurchPriceDiscCalcTab39', '', false, false)]
local procedure DoSomethingOnBeforeDeletePurchPriceDiscCalcTab39(PurchaseLine: Record "Purchase Line"; var Unconditional: Boolean)
begin
end;