Table of Contents

KVSKBAPurchPriceCalcMgt

OBSOLETE

This Element will be removed or changed with a future Version of the App.

Procedures

CalcBestDirectUnitCost(Record KVSKBAPurchasePrice) :

procedure CalcBestDirectUnitCost(var PurchPrice: Record "KVSKBAPurchasePrice"):

CalcBestLineDisc(Record KVSKBAPurchaseLineDiscount) :

procedure CalcBestLineDisc(var PurchLineDisc: Record "KVSKBAPurchaseLineDiscount"):

FindPurchPrice(Record KVSKBAPurchasePrice, Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean, Code[10], Record KVSKBAPurchaseConditionLine, Code[10]) :

procedure FindPurchPrice(var ToPurchPrice: Record "KVSKBAPurchasePrice"; VendorNo: Code[20]; ItemNo: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean; RespCenterCode: Code[10]; var ToPurchCondLine: Record "KVSKBAPurchaseConditionLine"; ItemPriceGrCode: Code[10]):

FindPurchLineDisc(Record KVSKBAPurchaseLineDiscount, Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean, Decimal, Decimal, Code[10], Record KVSKBAPurchaseConditionLine, Decimal) :

procedure FindPurchLineDisc(var ToPurchLineDisc: Record "KVSKBAPurchaseLineDiscount"; VendorNo: Code[20]; ItemNo: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean; QuantityPerUoM: Decimal; Quantity: Decimal; RespCenterCode: Code[10]; var ToPurchCondLine: Record "KVSKBAPurchaseConditionLine"; initialPrice: Decimal):

SetCurrency(Code[10], Decimal, Date) :

procedure SetCurrency(CurrencyCode2: Code[10]; CurrencyFactor2: Decimal; ExchRateDate2: Date):

SetVAT(Boolean, Decimal, Code[20]) :

procedure SetVAT(PriceInclVAT2: Boolean; VATPerCent2: Decimal; VATBusPostingGr2: Code[20]):

SetUoM(Decimal, Decimal) :

procedure SetUoM(Qty2: Decimal; QtyPerUoM2: Decimal):

SetLineDisc(Decimal) :

procedure SetLineDisc(LineDiscPerCent2: Decimal):

ConvertPriceToVAT(Boolean, Code[20], Code[20], Decimal) :

procedure ConvertPriceToVAT(FromPriceInclVAT: Boolean; FromVATProdPostingGr: Code[20]; FromVATBusPostingGr: Code[20]; var UnitPrice: Decimal):

PurchHeaderStartDate(Record Purchase Header, Text[30]) : Date

procedure PurchHeaderStartDate(var PurchHeader: Record "Purchase Header"; var DateCaption: Text[30]): Date

FindGenerallyPrice(Record Vendor, Code[10], Code[10], Decimal, Date, Code[10], Record Item, Code[10], Decimal, Code[10], Decimal, Code[10], Decimal) : Decimal

procedure FindGenerallyPrice(PayToVendPar: Record "Vendor"; ResponsibilityCenterPar: Code[10]; CurrencyCodePar: Code[10]; CurrencyFactorPar: Decimal; DatePar: Date; LocationCodePar: Code[10]; ItemPar: Record "Item"; VariantCodePar: Code[10]; QtyPar: Decimal; UnitOfMeasureCodePar: Code[10]; QtyPerUnitOfMeasurePar: Decimal; ItemPriceGroupPar: Code[10]; QtyItemPriceGrpPar: Decimal): Decimal

FindGenerallyLineDisc(Record Vendor, Code[10], Code[10], Decimal, Date, Record Item, Code[10], Decimal, Code[10], Decimal, Decimal) : Decimal

procedure FindGenerallyLineDisc(PayToVendPar: Record "Vendor"; ResponsibilityCenterPar: Code[10]; CurrencyCodePar: Code[10]; CurrencyFactorPar: Decimal; DatePar: Date; ItemPar: Record "Item"; VariantCodePar: Code[10]; QtyPar: Decimal; UnitOfMeasureCodePar: Code[10]; QtyPerUnitOfMeasurePar: Decimal; DirectUnitCostPar: Decimal): Decimal

SetItem(Code[20]) :

procedure SetItem(ItemNo: Code[20]):

SetPriceInSKU(Code[10], Code[20], Code[10]) :

procedure SetPriceInSKU(LocationCode: Code[10]; ItemNo: Code[20]; VariantCode: Code[10]):

Events

OnAfterFindJobJnlLinePrice(Record Job Journal Line, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnAfterFindJobJnlLinePrice(var JobJournalLine: Record "Job Journal Line"; var IsHandled: Boolean):

OnAfterFindJobJnlLinePriceItem(Record Job Journal Line) :

[IntegrationEvent(false, false)]
local procedure OnAfterFindJobJnlLinePriceItem(var JobJournalLine: Record "Job Journal Line"):

OnAfterFindJobJnlLinePriceResource(Record Job Journal Line) :

[IntegrationEvent(false, false)]
local procedure OnAfterFindJobJnlLinePriceResource(var JobJournalLine: Record "Job Journal Line"):

OnAfterFindPurchPrice(Record KVSKBAPurchasePrice, Record KVSKBAPurchasePrice, Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean, Decimal, Decimal) :

[IntegrationEvent(false, false)]
local procedure OnAfterFindPurchPrice(var ToPurchPrice: Record "KVSKBAPurchasePrice"; FromPurchasePrice: Record "KVSKBAPurchasePrice"; VendorNo: Code[20]; ItemNo: Code[20]; VariantCode: Code[10]; UOM: Code[10]; CurrencyCode: Code[10]; StartingDate: Date; ShowAll: Boolean; Qty: Decimal; QtyPerUOM: Decimal):

OnAfterFindPurchLinePrice(Record Purchase Line, Record Purchase Header, Record KVSKBAPurchasePrice, Integer) :

[IntegrationEvent(false, false)]
local procedure OnAfterFindPurchLinePrice(var PurchaseLine: Record "Purchase Line"; var PurchaseHeader: Record "Purchase Header"; var PurchasePrice: Record "KVSKBAPurchasePrice"; CalledByFieldNo: Integer):

OnAfterFindPurchLineDisc(Record KVSKBAPurchaseLineDiscount, Record KVSKBAPurchaseLineDiscount, Code[20], Decimal, Decimal, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnAfterFindPurchLineDisc(var ToPurchaseLineDiscount: Record "KVSKBAPurchaseLineDiscount"; var FromPurchaseLineDiscount: Record "KVSKBAPurchaseLineDiscount"; ItemNo: Code[20]; QuantityPerUoM: Decimal; Quantity: Decimal; ShowAll: Boolean):

OnAfterFindPurchLineLineDisc(Record Purchase Line, Record Purchase Header, Record KVSKBAPurchaseLineDiscount) :

[IntegrationEvent(false, false)]
local procedure OnAfterFindPurchLineLineDisc(var PurchaseLine: Record "Purchase Line"; var PurchaseHeader: Record "Purchase Header"; var TempPurchLineDisc: Record "KVSKBAPurchaseLineDiscount" temporary):

OnAfterFindReqLinePrice(Record Requisition Line, Record KVSKBAPurchasePrice, Integer) :

[IntegrationEvent(false, false)]
local procedure OnAfterFindReqLinePrice(var ReqLine: Record "Requisition Line"; var TempPurchasePrice: Record "KVSKBAPurchasePrice" temporary; CalledByFieldNo: Integer):

OnAfterFindReqLineDisc(Record Requisition Line) :

[IntegrationEvent(false, false)]
local procedure OnAfterFindReqLineDisc(var ReqLine: Record "Requisition Line"):

OnAfterGetPurchLinePrice(Record Purchase Header, Record Purchase Line, Record KVSKBAPurchasePrice) :

[IntegrationEvent(false, false)]
local procedure OnAfterGetPurchLinePrice(var PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line"; var TempPurchasePrice: Record "KVSKBAPurchasePrice" temporary):

OnAfterJobJnlLineFindResCost(Record Job Journal Line, Integer, Record Resource Cost, Record Currency, Boolean) :

OBSOLETE

This Element will be removed or changed with a future Version of the App.

[IntegrationEvent(false, false)]
[Obsolete('Use OnAfterJobJnlLineFindResCost2 instead', '24.3')]
local procedure OnAfterJobJnlLineFindResCost(var JobJournalLine: Record "Job Journal Line"; CalledByFieldNo: Integer; var ResourceCost: Record "Resource Cost"; Currency: Record "Currency"; IsHandled: Boolean):

OnAfterJobJnlLineFindResCost2(Record Job Journal Line, Integer, Record Resource Cost, Record Currency, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnAfterJobJnlLineFindResCost2(var JobJournalLine: Record "Job Journal Line"; CalledByFieldNo: Integer; var ResourceCost: Record "Resource Cost"; Currency: Record "Currency"; var IsHandled: Boolean):

OnAfterJobPlanningLineFindResCost(Record Job Planning Line, Integer, Record Resource Cost, Record Currency, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnAfterJobPlanningLineFindResCost(var JobPlanningLine: Record "Job Planning Line"; CalledByFieldNo: Integer; var ResourceCost: Record "Resource Cost"; Currency: Record "Currency"; var IsHandled: Boolean):

OnAfterPurchLineLineDiscExists(Record Purchase Line) :

[IntegrationEvent(false, false)]
local procedure OnAfterPurchLineLineDiscExists(var PurchaseLine: Record "Purchase Line"):

OnAfterPurchLinePriceExists(Record Purchase Line) :

[IntegrationEvent(false, false)]
local procedure OnAfterPurchLinePriceExists(var PurchaseLine: Record "Purchase Line"):

OnBeforeConvertPriceToVAT(Record VAT Posting Setup) :

[IntegrationEvent(false, false)]
local procedure OnBeforeConvertPriceToVAT(var VATPostingSetup: Record "VAT Posting Setup"):

OnBeforeFindItemJnlLinePrice(Record Item Journal Line, Integer, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforeFindItemJnlLinePrice(var ItemJournalLine: Record "Item Journal Line"; CalledByFieldNo: Integer; var IsHandled: Boolean):

OnBeforeFindJobJnlLinePrice(Record Job Journal Line, Integer, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforeFindJobJnlLinePrice(var JobJournalLine: Record "Job Journal Line"; CalledByFieldNo: Integer; var IsHandled: Boolean):

OnBeforeJobJnlLineFindResCost(Record Job Journal Line, Integer, Record Resource Cost) :

[IntegrationEvent(false, false)]
local procedure OnBeforeJobJnlLineFindResCost(var JobJournalLine: Record "Job Journal Line"; CalledByFieldNo: Integer; var ResourceCost: Record "Resource Cost"):

OnBeforeFindJobPlanningLinePrice(Record Job Planning Line, Integer, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforeFindJobPlanningLinePrice(var JobPlanningLine: Record "Job Planning Line"; CalledByFieldNo: Integer; var IsHandled: Boolean):

OnBeforeFindPurchPrice(Record KVSKBAPurchasePrice, Record KVSKBAPurchasePrice, Code[20], Code[20], Code[10], Code[10], Code[10], Date, Boolean, Decimal, Decimal) :

[IntegrationEvent(false, false)]
local procedure OnBeforeFindPurchPrice(var ToPurchPrice: Record "KVSKBAPurchasePrice"; var FromPurchasePrice: Record "KVSKBAPurchasePrice"; var VendorNo: Code[20]; var ItemNo: Code[20]; var VariantCode: Code[10]; var UOM: Code[10]; var CurrencyCode: Code[10]; var StartingDate: Date; var ShowAll: Boolean; var Qty: Decimal; var QtyPerUOM: Decimal):

OnBeforeFindStdItemJnlLinePrice(Record Standard Item Journal Line, Integer, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforeFindStdItemJnlLinePrice(var StandardItemJnlLine: Record "Standard Item Journal Line"; CalledByFieldNo: Integer; var IsHandled: Boolean):

OnBeforeFindReqLinePrice(Record Requisition Line, Integer, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforeFindReqLinePrice(var RequisitionLine: Record "Requisition Line"; CalledByFieldNo: Integer; var IsHandled: Boolean):

OnBeforeFindReqLinePriceOnCaseItem(Record KVSKBAPurchasePrice, Record Requisition Line, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforeFindReqLinePriceOnCaseItem(var TempPurchasePrice: Record "KVSKBAPurchasePrice" temporary; var ReqLine: Record "Requisition Line"; var IsHandled: Boolean):

OnBeforeFindReqLineDisc(Record Requisition Line, Record KVSKBAPurchaseLineDiscount, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforeFindReqLineDisc(var ReqLine: Record "Requisition Line"; var TempPurchaseLineDiscount: Record "KVSKBAPurchaseLineDiscount" temporary; var IsHandled: Boolean):

OnBeforeFindPurchLinePrice(Record Purchase Line, Record Purchase Header, Integer, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforeFindPurchLinePrice(var PurchaseLine: Record "Purchase Line"; var PurchaseHeader: Record "Purchase Header"; CalledByFieldNo: Integer; var IsHandled: Boolean):

OnBeforePurchLinePriceExists(Record Purchase Line, Record Purchase Header, Record KVSKBAPurchasePrice, Boolean, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforePurchLinePriceExists(var PurchaseLine: Record "Purchase Line"; var PurchaseHeader: Record "Purchase Header"; var TempPurchasePrice: Record "KVSKBAPurchasePrice" temporary; ShowAll: Boolean; var IsHandled: Boolean):

OnBeforePurchLineLineDiscExists(Record Purchase Line, Record Purchase Header, Record KVSKBAPurchaseLineDiscount, Boolean, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnBeforePurchLineLineDiscExists(var PurchaseLine: Record "Purchase Line"; var PurchaseHeader: Record "Purchase Header"; var TempPurchLineDisc: Record "KVSKBAPurchaseLineDiscount" temporary; ShowAll: Boolean; var IsHandled: Boolean):

OnCalcBestDirectUnitCostOnAfterSetUnitCost(Record KVSKBAPurchasePrice) :

[IntegrationEvent(false, false)]
local procedure OnCalcBestDirectUnitCostOnAfterSetUnitCost(var PurchasePrice: Record "KVSKBAPurchasePrice"):

OnCalcBestDirectUnitCostOnBeforeNoPriceFound(Record KVSKBAPurchasePrice, Record Item, Boolean) :

[IntegrationEvent(false, false)]
local procedure OnCalcBestDirectUnitCostOnBeforeNoPriceFound(var PurchasePrice: Record "KVSKBAPurchasePrice"; Item: Record "Item"; var IsHandled: Boolean):

OnGetPurchLinePriceOnAfterLookup(Record Purchase Header, Record Purchase Line, Record KVSKBAPurchasePrice) :

[IntegrationEvent(false, false)]
local procedure OnGetPurchLinePriceOnAfterLookup(PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line"; var TempPurchasePrice: Record "KVSKBAPurchasePrice" temporary):

OnGetPurchLineLineDiscOnAfterLookup(Record Purchase Header, Record Purchase Line, Record KVSKBAPurchaseLineDiscount) :

[IntegrationEvent(false, false)]
local procedure OnGetPurchLineLineDiscOnAfterLookup(PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line"; var TempPurchaseLineDiscount: Record "KVSKBAPurchaseLineDiscount" temporary):

OnFindItemJnlLinePriceOnBeforeCalcBestDirectUnitCost(Record Item Journal Line, Record KVSKBAPurchasePrice) :

[IntegrationEvent(false, false)]
local procedure OnFindItemJnlLinePriceOnBeforeCalcBestDirectUnitCost(var ItemJournalLine: Record "Item Journal Line"; var TempPurchasePrice: Record "KVSKBAPurchasePrice" temporary):

OnFindJobJnlLinePriceOnBeforeCalcBestDirectUnitCost(Record Job Journal Line, Record KVSKBAPurchasePrice) :

[IntegrationEvent(false, false)]
local procedure OnFindJobJnlLinePriceOnBeforeCalcBestDirectUnitCost(var JobJournalLine: Record "Job Journal Line"; var TempPurchasePrice: Record "KVSKBAPurchasePrice" temporary):