KVSKBAPurchaseLib#
Procedures#
CalcDUnitCostInPurchLine(Record Purchase Line) :#
procedure CalcDUnitCostInPurchLine(var PurchaseLine: Record "Purchase Line"):
SetSkipErroratNumbering(Boolean) :#
procedure SetSkipErroratNumbering(NewSkipErroratNumbering: Boolean):
SetSkipShowNumberingPage(Boolean) :#
procedure SetSkipShowNumberingPage(NewSkipShowNumberingPage: Boolean):
EvaluatePurchaseLine(Record Purchase Header, Boolean) :#
procedure EvaluatePurchaseLine(PurchaseHeader: Record "Purchase Header"; PosNumbering: Boolean):
CalcSubTotals39(Record Purchase Line) :#
procedure CalcSubTotals39(var PurchaseLine: Record "Purchase Line"):
ResetSubTotalsTab39(Record Purchase Line) :#
procedure ResetSubTotalsTab39(var PurchaseLine: Record "Purchase Line"):
CalcFieldsAfterInitInTab39(Record Purchase Line, Record Purchase Line) :#
procedure CalcFieldsAfterInitInTab39(var PurchaseLine: Record "Purchase Line"; xPurchaseLine: Record "Purchase Line"):
FindBundlePurchRcptLine(Record Purch. Rcpt. Line, Record Purch. Rcpt. Line) : Boolean#
procedure FindBundlePurchRcptLine(PurchRcptLine: Record "Purch. Rcpt. Line"; var BundleStartPurchRcptLine: Record "Purch. Rcpt. Line"): Boolean
FindBundleReturnShptLine(Record Return Shipment Line, Record Return Shipment Line) : Boolean#
procedure FindBundleReturnShptLine(ReturnShipmentLine: Record "Return Shipment Line"; var BundleStartReturnShipmentLine: Record "Return Shipment Line"): Boolean
InsertBundleLines(Record Purchase Line, Boolean, Boolean, Boolean, Text[100], Code[20]) :#
procedure InsertBundleLines(PurchaseLine: Record "Purchase Line"; BeforeCurrentLine: Boolean; CloseOldBundle: Boolean; OpenNewBundle: Boolean; DescriptionText: Text[100]; PosNo: Code[20]):
CheckVendorInNoTab38(Record Purchase Header) :#
procedure CheckVendorInNoTab38(PurchaseHeader: Record "Purchase Header"):
CalcPurchHistoryDateFilter(Text) :#
procedure CalcPurchHistoryDateFilter(var NewDateFilter: Text):
CalcNoOfDocuments(Record Vendor, Boolean, Integer) :#
procedure CalcNoOfDocuments(var Vendor: Record "Vendor"; PayTo: Boolean; var NoOfDocsArray: Integer):
DeleteAddedTablesTab38(Record Purchase Header) :#
procedure DeleteAddedTablesTab38(PurchHeaderPar: Record "Purchase Header"):
DeleteAddedTablesTab39(Record Purchase Line) :#
procedure DeleteAddedTablesTab39(PurchaseLine: Record "Purchase Line"):
CopyAddedTablesLineNoToTab39(Record Purchase Line) :#
procedure CopyAddedTablesLineNoToTab39(PurchaseLine: Record "Purchase Line"):
CopyAddedTablesTab38ToTab38(Record Purchase Header, Record Purchase Header) :#
procedure CopyAddedTablesTab38ToTab38(FromPurchaseHeader: Record "Purchase Header"; PurchaseHeader: Record "Purchase Header"):
CopyAddedTablesTab39ToTab39(Record Purchase Line, Record Purchase Line) :#
procedure CopyAddedTablesTab39ToTab39(FromPurchaseLine: Record "Purchase Line"; ToPurchaseLine: Record "Purchase Line"):
CopyAddedTablesTab121ToTab39(Record Purch. Rcpt. Line, Record Purchase Line) :#
procedure CopyAddedTablesTab121ToTab39(FromPurchRcptLine: Record "Purch. Rcpt. Line"; ToPurchaseLine: Record "Purchase Line"):
CopyAddedTablesTab123ToTab39(Record Purch. Inv. Line, Record Purchase Line) :#
procedure CopyAddedTablesTab123ToTab39(FromPurchInvLine: Record "Purch. Inv. Line"; ToPurchaseLine: Record "Purchase Line"):
CopyAddedTablesTab125ToTab39(Record Purch. Cr. Memo Line, Record Purchase Line) :#
procedure CopyAddedTablesTab125ToTab39(FromPurchCrMemoLine: Record "Purch. Cr. Memo Line"; ToPurchaseLine: Record "Purchase Line"):
CopyAddedTablesTab6651ToTab39(Record Return Shipment Line, Record Purchase Line) :#
procedure CopyAddedTablesTab6651ToTab39(FromReturnShipmentLine: Record "Return Shipment Line"; ToPurchaseLine: Record "Purchase Line"):
CopyAddedTablesTab5109ToTab38(Record Purchase Header Archive, Record Purchase Header) :#
procedure CopyAddedTablesTab5109ToTab38(FromPurchaseHeaderArchive: Record "Purchase Header Archive"; ToPurchaseHeader: Record "Purchase Header"):
CopyAddedTablesTab5110ToTab39(Record Purchase Line Archive, Record Purchase Line) :#
procedure CopyAddedTablesTab5110ToTab39(FromPurchaseLineArchive: Record "Purchase Line Archive"; ToPurchaseLine: Record "Purchase Line"):
ShowPurchDocTextLines(Enum Purchase Document Type, Code[20], Integer, Enum KVSKBATextPosition) :#
procedure ShowPurchDocTextLines(PurchaseDocumentType: Enum "Purchase Document Type"; DocNo: Code[20]; DocLineNo: Integer; TextPosition: Enum "KVSKBATextPosition"):
CalcNoOfPurchDocTextLines(Enum Purchase Document Type, Code[20], Integer, Enum KVSKBATextPosition) : Integer#
procedure CalcNoOfPurchDocTextLines(PurchaseDocumentType: Enum "Purchase Document Type"; DocNo: Code[20]; DocLineNo: Integer; TextPosition: Enum "KVSKBATextPosition"): Integer
GetSpecialNote(Integer, Code[20]) : Text[50]#
procedure GetSpecialNote(TableNo: Integer; No: Code[20]): Text[50]
ShowSpecialNote(Integer, Code[20]) :#
procedure ShowSpecialNote(TableNo: Integer; No: Code[20]):
CheckTotalStructureInPurchLine(Record Purchase Header, Boolean) :#
procedure CheckTotalStructureInPurchLine(PurchaseHeader: Record "Purchase Header"; CheckTotaling: Boolean):
RunCalcPosNoInPurchLines(Record Purchase Header, Boolean) : Boolean#
procedure RunCalcPosNoInPurchLines(PurchaseHeader: Record "Purchase Header"; Unconditionally: Boolean): Boolean
CheckPosNoNotEmptyInPurchLine(Record Purchase Header) :#
procedure CheckPosNoNotEmptyInPurchLine(PurchaseHeader: Record "Purchase Header"):
CreatePurchOrderConfLines(Record Purchase Line) :#
Summary: Create "Purch. Order Confirmation"s for all marked lines (parameter PurchLineVar) A ConfNo and a ConfDate will be added. Both will be getted by a dialog-form, opened at the beginning.
procedure CreatePurchOrderConfLines(var PurchaseLine: Record "Purchase Line"):
Parameters:
PurchaseLine:
CalcPurchOrderConfLine4PurchLi(Record Purchase Line, Code[20], Date, Record KVSKBAPurchOrderConfLine) :#
procedure CalcPurchOrderConfLine4PurchLi(PurchaseLine: Record "Purchase Line"; ConfNo: Code[20]; ConfDate: Date; var PurchOrderConfLine: Record "KVSKBAPurchOrderConfLine"):
ShowPurchOrderConfLines(Enum Purchase Document Type, Code[20], Integer) :#
procedure ShowPurchOrderConfLines(PurchaseDocumentType: Enum "Purchase Document Type"; DocNo: Code[20]; LineNo: Integer):
ValidQuoteBlanketOrderLinesExistPurchaseLine(Record Purchase Line, Boolean, Boolean, Boolean, Boolean) :#
procedure ValidQuoteBlanketOrderLinesExistPurchaseLine(var OrigPurchaseLine: Record "Purchase Line"; CheckQuotes: Boolean; CheckBlankOrders: Boolean; var MessageQuotesShown: Boolean; var MessageBlankOrdersShown: Boolean):
Events#
OnAfterCopyPriceUnitFromPurchPriceToPurchLine(Record KVSKBAPurchasePrice, Record Purchase Line) :#
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 OnAfterCopyPriceUnitFromPurchPriceToPurchLine(KVSKBAPurchPrice: Record "KVSKBAPurchasePrice"; var PurchLine: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnAfterCopyPriceUnitFromPurchPriceToPurchLine', '', false, false)]
local procedure DoSomethingOnAfterCopyPriceUnitFromPurchPriceToPurchLine(KVSKBAPurchPrice: Record "KVSKBAPurchasePrice"; var PurchLine: Record "Purchase Line")
begin
end;
OnAfterShowPurchDocTextLines(Enum Purchase Document Type, Code[20], Integer, Enum KVSKBATextPosition) :#
[IntegrationEvent(false, false)]
local procedure OnAfterShowPurchDocTextLines(PurchaseDocumentType: Enum "Purchase Document Type"; DocNo: Code[20]; DocLineNo: Integer; KVSKBATextPosition: Enum "KVSKBATextPosition"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnAfterShowPurchDocTextLines', '', false, false)]
local procedure DoSomethingOnAfterShowPurchDocTextLines(PurchaseDocumentType: Enum "Purchase Document Type"; DocNo: Code[20]; DocLineNo: Integer; KVSKBATextPosition: Enum "KVSKBATextPosition")
begin
end;
OnBeforeGetDefaultPurchaseOrderType(Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeGetDefaultPurchaseOrderType(var PurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeGetDefaultPurchaseOrderType', '', false, false)]
local procedure DoSomethingOnBeforeGetDefaultPurchaseOrderType(var PurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;
OnAfterTestAdditionalTableRelationatPurchLine(Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterTestAdditionalTableRelationatPurchLine(PurchaseLine: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnAfterTestAdditionalTableRelationatPurchLine', '', false, false)]
local procedure DoSomethingOnAfterTestAdditionalTableRelationatPurchLine(PurchaseLine: Record "Purchase Line")
begin
end;
OnBeforeCalcNoOfPurchDocTextLines(Enum Purchase Document Type, Code[20], Integer, Enum KVSKBATextPosition, Decimal, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcNoOfPurchDocTextLines(DocType: Enum "Purchase Document Type"; DocNo: Code[20]; DocLineNo: Integer; Position: Enum "KVSKBATextPosition"; var ReturnValue: Decimal; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcNoOfPurchDocTextLines', '', false, false)]
local procedure DoSomethingOnBeforeCalcNoOfPurchDocTextLines(DocType: Enum "Purchase Document Type"; DocNo: Code[20]; DocLineNo: Integer; Position: Enum "KVSKBATextPosition"; var ReturnValue: Decimal; var Handled: Boolean)
begin
end;
OnBeforeCalcPurchOrderConfLine4PurchLi(Record Purchase Line, Code[20], Date, Record KVSKBAPurchOrderConfLine, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcPurchOrderConfLine4PurchLi(PurchaseLine: Record "Purchase Line"; ConfNo: Code[20]; ConfDate: Date; var PurchOrderConfLine: Record "KVSKBAPurchOrderConfLine"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcPurchOrderConfLine4PurchLi', '', false, false)]
local procedure DoSomethingOnBeforeCalcPurchOrderConfLine4PurchLi(PurchaseLine: Record "Purchase Line"; ConfNo: Code[20]; ConfDate: Date; var PurchOrderConfLine: Record "KVSKBAPurchOrderConfLine"; var Handled: Boolean)
begin
end;
OnBeforeCheckPosNoNotEmptyInPurchLine(Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCheckPosNoNotEmptyInPurchLine(PurchaseHeaderPar: Record "Purchase Header"; var HandledVar: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCheckPosNoNotEmptyInPurchLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckPosNoNotEmptyInPurchLine(PurchaseHeaderPar: Record "Purchase Header"; var HandledVar: Boolean)
begin
end;
OnBeforeCreatePurchOrderConfLines(Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCreatePurchOrderConfLines(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCreatePurchOrderConfLines', '', false, false)]
local procedure DoSomethingOnBeforeCreatePurchOrderConfLines(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean)
begin
end;
OnBeforeTransferfieldHeaderInTab39(Record Purchase Header, Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeTransferfieldHeaderInTab39(PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeTransferfieldHeaderInTab39', '', false, false)]
local procedure DoSomethingOnBeforeTransferfieldHeaderInTab39(PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line"; var Handled: Boolean)
begin
end;
OnBeforeTransferPurchLine2ItemJnLine(Record Purchase Header, Record Purchase Line, Record Item Journal Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeTransferPurchLine2ItemJnLine(PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line"; var ItemJournalLine: Record "Item Journal Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeTransferPurchLine2ItemJnLine', '', false, false)]
local procedure DoSomethingOnBeforeTransferPurchLine2ItemJnLine(PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line"; var ItemJournalLine: Record "Item Journal Line"; var Handled: Boolean)
begin
end;
OnBeforeCalcPUInPurchLine(Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcPUInPurchLine(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcPUInPurchLine', '', false, false)]
local procedure DoSomethingOnBeforeCalcPUInPurchLine(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean)
begin
end;
OnBeforeCalcDUnitCostPUInPurchLine(Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcDUnitCostPUInPurchLine(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcDUnitCostPUInPurchLine', '', false, false)]
local procedure DoSomethingOnBeforeCalcDUnitCostPUInPurchLine(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean)
begin
end;
OnBeforeCalcDUnitCostInPurchLine(Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcDUnitCostInPurchLine(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcDUnitCostInPurchLine', '', false, false)]
local procedure DoSomethingOnBeforeCalcDUnitCostInPurchLine(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean)
begin
end;
OnBeforeCalcNoInPurchLine(Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcNoInPurchLine(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcNoInPurchLine', '', false, false)]
local procedure DoSomethingOnBeforeCalcNoInPurchLine(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean)
begin
end;
OnBeforeCalcPUInPurchPrice(Record KVSKBAPurchasePrice, 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 OnBeforeCalcPUInPurchPrice(var PurchasePrice: Record "KVSKBAPurchasePrice"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcPUInPurchPrice', '', false, false)]
local procedure DoSomethingOnBeforeCalcPUInPurchPrice(var PurchasePrice: Record "KVSKBAPurchasePrice"; var Handled: Boolean)
begin
end;
OnBeforeCalcDUnitCostInPurchPrice(Record KVSKBAPurchasePrice, 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 OnBeforeCalcDUnitCostInPurchPrice(var PurchasePrice: Record "KVSKBAPurchasePrice"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcDUnitCostInPurchPrice', '', false, false)]
local procedure DoSomethingOnBeforeCalcDUnitCostInPurchPrice(var PurchasePrice: Record "KVSKBAPurchasePrice"; var Handled: Boolean)
begin
end;
OnBeforeCalcPUInReqLine(Record Requisition Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcPUInReqLine(var RequisitionLine: Record "Requisition Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcPUInReqLine', '', false, false)]
local procedure DoSomethingOnBeforeCalcPUInReqLine(var RequisitionLine: Record "Requisition Line"; var Handled: Boolean)
begin
end;
OnBeforeCalcDUnitCostPUInReqLine(Record Requisition Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcDUnitCostPUInReqLine(var RequisitionLine: Record "Requisition Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcDUnitCostPUInReqLine', '', false, false)]
local procedure DoSomethingOnBeforeCalcDUnitCostPUInReqLine(var RequisitionLine: Record "Requisition Line"; var Handled: Boolean)
begin
end;
OnBeforeCalcDUnitCostInReqLine(Record Requisition Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcDUnitCostInReqLine(var RequisitionLine: Record "Requisition Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCalcDUnitCostInReqLine', '', false, false)]
local procedure DoSomethingOnBeforeCalcDUnitCostInReqLine(var RequisitionLine: Record "Requisition Line"; var Handled: Boolean)
begin
end;
OnBeforeCheckPrintLineInTabPurchaseLine(Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCheckPrintLineInTabPurchaseLine(PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCheckPrintLineInTabPurchaseLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckPrintLineInTabPurchaseLine(PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;
OnCreatePurchOrderConfLinesOnBeforeValidatePurchLinePromisedReceiptDate(Record Purchase Line, Code[20], Date, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnCreatePurchOrderConfLinesOnBeforeValidatePurchLinePromisedReceiptDate(var PurchaseLine: Record "Purchase Line"; ConfNo: Code[20]; ConfDate: Date; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCreatePurchOrderConfLinesOnBeforeValidatePurchLinePromisedReceiptDate', '', false, false)]
local procedure DoSomethingOnCreatePurchOrderConfLinesOnBeforeValidatePurchLinePromisedReceiptDate(var PurchaseLine: Record "Purchase Line"; ConfNo: Code[20]; ConfDate: Date; var IsHandled: Boolean)
begin
end;
OnCreatePurchOrderConfLinesOnBeforePurchaseLineFindSet(Record Purchase Line, Code[20], Date, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnCreatePurchOrderConfLinesOnBeforePurchaseLineFindSet(var PurchaseLine: Record "Purchase Line"; ConfNo: Code[20]; ConfDate: Date; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCreatePurchOrderConfLinesOnBeforePurchaseLineFindSet', '', false, false)]
local procedure DoSomethingOnCreatePurchOrderConfLinesOnBeforePurchaseLineFindSet(var PurchaseLine: Record "Purchase Line"; ConfNo: Code[20]; ConfDate: Date; var IsHandled: Boolean)
begin
end;
OnCopyAddedTablesVendToTab38(Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesVendToTab38(PurchaseHeaderPar: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesVendToTab38', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesVendToTab38(PurchaseHeaderPar: Record "Purchase Header")
begin
end;
OnCopyAddedTablesLineNoToTab39(Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesLineNoToTab39(PurchaseLinePar: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesLineNoToTab39', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesLineNoToTab39(PurchaseLinePar: Record "Purchase Line")
begin
end;
OnBeforeCopyAddedTablesTab38ToTab38(Record Purchase Header, Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab38ToTab38(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab38ToTab38', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab38ToTab38(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab38ToTab120(Record Purchase Header, Record Purch. Rcpt. Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab38ToTab120(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchRcptHeaderPar: Record "Purch. Rcpt. Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab38ToTab120', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab38ToTab120(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchRcptHeaderPar: Record "Purch. Rcpt. Header"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab38ToTab122(Record Purchase Header, Record Purch. Inv. Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab38ToTab122(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchInvHeaderPar: Record "Purch. Inv. Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab38ToTab122', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab38ToTab122(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchInvHeaderPar: Record "Purch. Inv. Header"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab38ToTab124(Record Purchase Header, Record Purch. Cr. Memo Hdr., Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab38ToTab124(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchCrMemoHdrPar: Record "Purch. Cr. Memo Hdr."; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab38ToTab124', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab38ToTab124(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchCrMemoHdrPar: Record "Purch. Cr. Memo Hdr."; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab38ToTab6650(Record Purchase Header, Record Return Shipment Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab38ToTab6650(FromPurchaseHeaderPar: Record "Purchase Header"; ToReturnShipmentHeaderPar: Record "Return Shipment Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab38ToTab6650', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab38ToTab6650(FromPurchaseHeaderPar: Record "Purchase Header"; ToReturnShipmentHeaderPar: Record "Return Shipment Header"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab38ToTab5109(Record Purchase Header, Record Purchase Header Archive, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab38ToTab5109(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchaseHeaderArchivePar: Record "Purchase Header Archive"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab38ToTab5109', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab38ToTab5109(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchaseHeaderArchivePar: Record "Purchase Header Archive"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab39ToTab39(Record Purchase Line, Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab39ToTab39(FromPurchaseLinePar: Record "Purchase Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab39ToTab39', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab39ToTab39(FromPurchaseLinePar: Record "Purchase Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab39ToTab121(Record Purchase Line, Record Purch. Rcpt. Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab39ToTab121(FromPurchaseLinePar: Record "Purchase Line"; ToPurchRcptLinePar: Record "Purch. Rcpt. Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab39ToTab121', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab39ToTab121(FromPurchaseLinePar: Record "Purchase Line"; ToPurchRcptLinePar: Record "Purch. Rcpt. Line"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab39ToTab123(Record Purchase Line, Record Purch. Inv. Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab39ToTab123(FromPurchaseLinePar: Record "Purchase Line"; ToPurchInvLinePar: Record "Purch. Inv. Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab39ToTab123', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab39ToTab123(FromPurchaseLinePar: Record "Purchase Line"; ToPurchInvLinePar: Record "Purch. Inv. Line"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab39ToTab125(Record Purchase Line, Record Purch. Cr. Memo Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab39ToTab125(FromPurchaseLinePar: Record "Purchase Line"; ToPurchCrMemoLinePar: Record "Purch. Cr. Memo Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab39ToTab125', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab39ToTab125(FromPurchaseLinePar: Record "Purchase Line"; ToPurchCrMemoLinePar: Record "Purch. Cr. Memo Line"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab39ToTab6651(Record Purchase Line, Record Return Shipment Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab39ToTab6651(FromPurchaseLinePar: Record "Purchase Line"; ToReturnShipmentLinePar: Record "Return Shipment Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab39ToTab6651', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab39ToTab6651(FromPurchaseLinePar: Record "Purchase Line"; ToReturnShipmentLinePar: Record "Return Shipment Line"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab39ToTab5110(Record Purchase Line, Record Purchase Line Archive, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab39ToTab5110(FromPurchaseLinePar: Record "Purchase Line"; ToPurchaseLineArchivePar: Record "Purchase Line Archive"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab39ToTab5110', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab39ToTab5110(FromPurchaseLinePar: Record "Purchase Line"; ToPurchaseLineArchivePar: Record "Purchase Line Archive"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab120ToTab38(Record Purch. Rcpt. Header, Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab120ToTab38(FromPurchRcptHeaderPar: Record "Purch. Rcpt. Header"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab120ToTab38', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab120ToTab38(FromPurchRcptHeaderPar: Record "Purch. Rcpt. Header"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab121ToTab39(Record Purch. Rcpt. Line, Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab121ToTab39(FromPurchRcptLinePar: Record "Purch. Rcpt. Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab121ToTab39', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab121ToTab39(FromPurchRcptLinePar: Record "Purch. Rcpt. Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab122ToTab38(Record Purch. Inv. Header, Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab122ToTab38(FromPurchInvHeaderPar: Record "Purch. Inv. Header"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab122ToTab38', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab122ToTab38(FromPurchInvHeaderPar: Record "Purch. Inv. Header"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab123ToTab39(Record Purch. Inv. Line, Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab123ToTab39(FromPurchInvLinePar: Record "Purch. Inv. Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab123ToTab39', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab123ToTab39(FromPurchInvLinePar: Record "Purch. Inv. Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab124ToTab38(Record Purch. Cr. Memo Hdr., Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab124ToTab38(FromPurchCrMemoHdrPar: Record "Purch. Cr. Memo Hdr."; toPurchHeaderPar: Record "Purchase Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab124ToTab38', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab124ToTab38(FromPurchCrMemoHdrPar: Record "Purch. Cr. Memo Hdr."; toPurchHeaderPar: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab125ToTab39(Record Purch. Cr. Memo Line, Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab125ToTab39(FromPurchCrMemoLinePar: Record "Purch. Cr. Memo Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab125ToTab39', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab125ToTab39(FromPurchCrMemoLinePar: Record "Purch. Cr. Memo Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab6650ToTab38(Record Return Shipment Header, Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab6650ToTab38(FromReturnShipmentHeaderPar: Record "Return Shipment Header"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab6650ToTab38', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab6650ToTab38(FromReturnShipmentHeaderPar: Record "Return Shipment Header"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab6651ToTab39(Record Return Shipment Line, Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab6651ToTab39(FromReturnShipmentLinePar: Record "Return Shipment Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab6651ToTab39', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab6651ToTab39(FromReturnShipmentLinePar: Record "Return Shipment Line"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab5109ToTab38(Record Purchase Header Archive, Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab5109ToTab38(FromPurchaseHeaderArchivePar: Record "Purchase Header Archive"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab5109ToTab38', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab5109ToTab38(FromPurchaseHeaderArchivePar: Record "Purchase Header Archive"; ToPurchaseHeaderPar: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;
OnBeforeShowPurchDocTextLines(Enum Purchase Document Type, Code[20], Integer, Enum KVSKBATextPosition, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeShowPurchDocTextLines(PurchaseDocumentType: Enum "Purchase Document Type"; DocNo: Code[20]; DocLineNo: Integer; KVSKBATextPosition: Enum "KVSKBATextPosition"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeShowPurchDocTextLines', '', false, false)]
local procedure DoSomethingOnBeforeShowPurchDocTextLines(PurchaseDocumentType: Enum "Purchase Document Type"; DocNo: Code[20]; DocLineNo: Integer; KVSKBATextPosition: Enum "KVSKBATextPosition"; var IsHandled: Boolean)
begin
end;
OnBeforeCopyAddedTablesTab5110ToTab39(Record Purchase Line Archive, Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCopyAddedTablesTab5110ToTab39(FromPurchaseLineArchivePar: Record "Purchase Line Archive"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCopyAddedTablesTab5110ToTab39', '', false, false)]
local procedure DoSomethingOnBeforeCopyAddedTablesTab5110ToTab39(FromPurchaseLineArchivePar: Record "Purchase Line Archive"; ToPurchaseLinePar: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;
OnCopyAddedTablesTab38ToTab38(Record Purchase Header, Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab38ToTab38(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchaseHeaderPar: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab38ToTab38', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab38ToTab38(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchaseHeaderPar: Record "Purchase Header")
begin
end;
OnCopyAddedTablesTab38ToTab120(Record Purchase Header, Record Purch. Rcpt. Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab38ToTab120(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchRcptHeaderPar: Record "Purch. Rcpt. Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab38ToTab120', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab38ToTab120(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchRcptHeaderPar: Record "Purch. Rcpt. Header")
begin
end;
OnCopyAddedTablesTab38ToTab122(Record Purchase Header, Record Purch. Inv. Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab38ToTab122(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchInvHeaderPar: Record "Purch. Inv. Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab38ToTab122', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab38ToTab122(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchInvHeaderPar: Record "Purch. Inv. Header")
begin
end;
OnCopyAddedTablesTab38ToTab124(Record Purchase Header, Record Purch. Cr. Memo Hdr.) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab38ToTab124(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchCrMemoHdrPar: Record "Purch. Cr. Memo Hdr."):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab38ToTab124', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab38ToTab124(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchCrMemoHdrPar: Record "Purch. Cr. Memo Hdr.")
begin
end;
OnCopyAddedTablesTab38ToTab6650(Record Purchase Header, Record Return Shipment Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab38ToTab6650(FromPurchaseHeaderPar: Record "Purchase Header"; ToReturnShipmentHeaderPar: Record "Return Shipment Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab38ToTab6650', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab38ToTab6650(FromPurchaseHeaderPar: Record "Purchase Header"; ToReturnShipmentHeaderPar: Record "Return Shipment Header")
begin
end;
OnCopyAddedTablesTab38ToTab5109(Record Purchase Header, Record Purchase Header Archive) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab38ToTab5109(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchaseHeaderArchivePar: Record "Purchase Header Archive"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab38ToTab5109', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab38ToTab5109(FromPurchaseHeaderPar: Record "Purchase Header"; ToPurchaseHeaderArchivePar: Record "Purchase Header Archive")
begin
end;
OnCopyAddedTablesTab39ToTab39(Record Purchase Line, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab39ToTab39(FromPurchaseLinePar: Record "Purchase Line"; ToPurchaseLinePar: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab39ToTab39', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab39ToTab39(FromPurchaseLinePar: Record "Purchase Line"; ToPurchaseLinePar: Record "Purchase Line")
begin
end;
OnCopyAddedTablesTab39ToTab121(Record Purchase Line, Record Purch. Rcpt. Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab39ToTab121(FromPurchaseLinePar: Record "Purchase Line"; ToPurchRcptLinePar: Record "Purch. Rcpt. Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab39ToTab121', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab39ToTab121(FromPurchaseLinePar: Record "Purchase Line"; ToPurchRcptLinePar: Record "Purch. Rcpt. Line")
begin
end;
OnCopyAddedTablesTab39ToTab123(Record Purchase Line, Record Purch. Inv. Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab39ToTab123(FromPurchaseLinePar: Record "Purchase Line"; ToPurchInvLinePar: Record "Purch. Inv. Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab39ToTab123', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab39ToTab123(FromPurchaseLinePar: Record "Purchase Line"; ToPurchInvLinePar: Record "Purch. Inv. Line")
begin
end;
OnCopyAddedTablesTab39ToTab125(Record Purchase Line, Record Purch. Cr. Memo Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab39ToTab125(FromPurchaseLinePar: Record "Purchase Line"; ToPurchCrMemoLinePar: Record "Purch. Cr. Memo Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab39ToTab125', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab39ToTab125(FromPurchaseLinePar: Record "Purchase Line"; ToPurchCrMemoLinePar: Record "Purch. Cr. Memo Line")
begin
end;
OnCopyAddedTablesTab39ToTab6651(Record Purchase Line, Record Return Shipment Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab39ToTab6651(FromPurchaseLinePar: Record "Purchase Line"; ToReturnShipmentLinePar: Record "Return Shipment Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab39ToTab6651', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab39ToTab6651(FromPurchaseLinePar: Record "Purchase Line"; ToReturnShipmentLinePar: Record "Return Shipment Line")
begin
end;
OnCopyAddedTablesTab39ToTab5110(Record Purchase Line, Record Purchase Line Archive) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab39ToTab5110(FromPurchaseLinePar: Record "Purchase Line"; ToPurchaseLineArchivePar: Record "Purchase Line Archive"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab39ToTab5110', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab39ToTab5110(FromPurchaseLinePar: Record "Purchase Line"; ToPurchaseLineArchivePar: Record "Purchase Line Archive")
begin
end;
OnCopyAddedTablesTab120ToTab38(Record Purch. Rcpt. Header, Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab120ToTab38(FromPurchRcptHeaderPar: Record "Purch. Rcpt. Header"; ToPurchaseHeaderPar: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab120ToTab38', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab120ToTab38(FromPurchRcptHeaderPar: Record "Purch. Rcpt. Header"; ToPurchaseHeaderPar: Record "Purchase Header")
begin
end;
OnCopyAddedTablesTab121ToTab39(Record Purch. Rcpt. Line, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab121ToTab39(FromPurchRcptLinePar: Record "Purch. Rcpt. Line"; ToPurchaseLinePar: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab121ToTab39', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab121ToTab39(FromPurchRcptLinePar: Record "Purch. Rcpt. Line"; ToPurchaseLinePar: Record "Purchase Line")
begin
end;
OnCopyAddedTablesTab122ToTab38(Record Purch. Inv. Header, Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab122ToTab38(FromPurchInvHeaderPar: Record "Purch. Inv. Header"; ToPurchaseHeaderPar: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab122ToTab38', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab122ToTab38(FromPurchInvHeaderPar: Record "Purch. Inv. Header"; ToPurchaseHeaderPar: Record "Purchase Header")
begin
end;
OnCopyAddedTablesTab123ToTab39(Record Purch. Inv. Line, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab123ToTab39(FromPurchInvLinePar: Record "Purch. Inv. Line"; ToPurchaseLinePar: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab123ToTab39', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab123ToTab39(FromPurchInvLinePar: Record "Purch. Inv. Line"; ToPurchaseLinePar: Record "Purchase Line")
begin
end;
OnCopyAddedTablesTab124ToTab38(Record Purch. Cr. Memo Hdr., Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab124ToTab38(FromPurchCrMemoHdrPar: Record "Purch. Cr. Memo Hdr."; toPurchHeaderPar: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab124ToTab38', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab124ToTab38(FromPurchCrMemoHdrPar: Record "Purch. Cr. Memo Hdr."; toPurchHeaderPar: Record "Purchase Header")
begin
end;
OnCopyAddedTablesTab125ToTab39(Record Purch. Cr. Memo Line, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab125ToTab39(FromPurchCrMemoLinePar: Record "Purch. Cr. Memo Line"; ToPurchaseLinePar: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab125ToTab39', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab125ToTab39(FromPurchCrMemoLinePar: Record "Purch. Cr. Memo Line"; ToPurchaseLinePar: Record "Purchase Line")
begin
end;
OnCopyAddedTablesTab6650ToTab38(Record Return Shipment Header, Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab6650ToTab38(FromReturnShipmentHeaderPar: Record "Return Shipment Header"; ToPurchaseHeaderPar: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab6650ToTab38', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab6650ToTab38(FromReturnShipmentHeaderPar: Record "Return Shipment Header"; ToPurchaseHeaderPar: Record "Purchase Header")
begin
end;
OnCopyAddedTablesTab6651ToTab39(Record Return Shipment Line, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab6651ToTab39(FromReturnShipmentLinePar: Record "Return Shipment Line"; ToPurchaseLinePar: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab6651ToTab39', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab6651ToTab39(FromReturnShipmentLinePar: Record "Return Shipment Line"; ToPurchaseLinePar: Record "Purchase Line")
begin
end;
OnCopyAddedTablesTab5109ToTab38(Record Purchase Header Archive, Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab5109ToTab38(FromPurchaseHeaderArchivePar: Record "Purchase Header Archive"; ToPurchaseHeaderPar: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab5109ToTab38', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab5109ToTab38(FromPurchaseHeaderArchivePar: Record "Purchase Header Archive"; ToPurchaseHeaderPar: Record "Purchase Header")
begin
end;
OnCopyAddedTablesTab5110ToTab39(Record Purchase Line Archive, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnCopyAddedTablesTab5110ToTab39(FromPurchaseLineArchivePar: Record "Purchase Line Archive"; ToPurchaseLinePar: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCopyAddedTablesTab5110ToTab39', '', false, false)]
local procedure DoSomethingOnCopyAddedTablesTab5110ToTab39(FromPurchaseLineArchivePar: Record "Purchase Line Archive"; ToPurchaseLinePar: Record "Purchase Line")
begin
end;
OnCreatePurchHeaderForSalesOrderBeforePurchHeaderModify(Record Purchase Header, Record Sales Header) :#
[IntegrationEvent(false, false)]
local procedure OnCreatePurchHeaderForSalesOrderBeforePurchHeaderModify(var PurchaseHeader: Record "Purchase Header"; SalesHeader: Record "Sales Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCreatePurchHeaderForSalesOrderBeforePurchHeaderModify', '', false, false)]
local procedure DoSomethingOnCreatePurchHeaderForSalesOrderBeforePurchHeaderModify(var PurchaseHeader: Record "Purchase Header"; SalesHeader: Record "Sales Header")
begin
end;
OnDeleteAddedTablesTab38(Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnDeleteAddedTablesTab38(PurchaseHeaderPar: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnDeleteAddedTablesTab38', '', false, false)]
local procedure DoSomethingOnDeleteAddedTablesTab38(PurchaseHeaderPar: Record "Purchase Header")
begin
end;
OnDeleteAddedTablesTab39(Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnDeleteAddedTablesTab39(PurchaseLinePar: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnDeleteAddedTablesTab39', '', false, false)]
local procedure DoSomethingOnDeleteAddedTablesTab39(PurchaseLinePar: Record "Purchase Line")
begin
end;
OnGetSpecialNoteSetCommentLineFilter(Record Comment Line) :#
[IntegrationEvent(false, false)]
local procedure OnGetSpecialNoteSetCommentLineFilter(var CommentLine: Record "Comment Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnGetSpecialNoteSetCommentLineFilter', '', false, false)]
local procedure DoSomethingOnGetSpecialNoteSetCommentLineFilter(var CommentLine: Record "Comment Line")
begin
end;
OnBeforeTestAdditionalTableRelationatT39(Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeTestAdditionalTableRelationatT39(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeTestAdditionalTableRelationatT39', '', false, false)]
local procedure DoSomethingOnBeforeTestAdditionalTableRelationatT39(var PurchaseLine: Record "Purchase Line"; var Handled: Boolean)
begin
end;
OnSetPurchLinePriceOriginFromPurchPriceOnBeforePurchPriceTypeCaseElse(Record Purchase Line, Record KVSKBAPurchasePrice, 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 OnSetPurchLinePriceOriginFromPurchPriceOnBeforePurchPriceTypeCaseElse(var PurchaseLine: Record "Purchase Line"; PurchasePrice: Record "KVSKBAPurchasePrice"; var Ishandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnSetPurchLinePriceOriginFromPurchPriceOnBeforePurchPriceTypeCaseElse', '', false, false)]
local procedure DoSomethingOnSetPurchLinePriceOriginFromPurchPriceOnBeforePurchPriceTypeCaseElse(var PurchaseLine: Record "Purchase Line"; PurchasePrice: Record "KVSKBAPurchasePrice"; var Ishandled: Boolean)
begin
end;
OnMessageExistBlankOrderPurchaseLineOnSetFilter(Record Purchase Line, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnMessageExistBlankOrderPurchaseLineOnSetFilter(var BlanketOrderPurchaseLine: Record "Purchase Line"; SourcePurchaseLine: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnMessageExistBlankOrderPurchaseLineOnSetFilter', '', false, false)]
local procedure DoSomethingOnMessageExistBlankOrderPurchaseLineOnSetFilter(var BlanketOrderPurchaseLine: Record "Purchase Line"; SourcePurchaseLine: Record "Purchase Line")
begin
end;
OnAfterCheckPosNoInPurchLine(Record Purchase Header, Option) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCheckPosNoInPurchLine(PurchaseHeader: Record "Purchase Header"; var Result: Option):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnAfterCheckPosNoInPurchLine', '', false, false)]
local procedure DoSomethingOnAfterCheckPosNoInPurchLine(PurchaseHeader: Record "Purchase Header"; var Result: Option)
begin
end;
OnBeforeTestAndUpdatePostingCodeTab38(Record Purchase Header, Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeTestAndUpdatePostingCodeTab38(var PurchaseHeader: Record "Purchase Header"; xPurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeTestAndUpdatePostingCodeTab38', '', false, false)]
local procedure DoSomethingOnBeforeTestAndUpdatePostingCodeTab38(var PurchaseHeader: Record "Purchase Header"; xPurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;
OnBeforeTypeAndNoAreStatedPurchaseLine(Record Purchase Line, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeTypeAndNoAreStatedPurchaseLine(PurchaseLine: Record "Purchase Line"; var ReturnValue: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeTypeAndNoAreStatedPurchaseLine', '', false, false)]
local procedure DoSomethingOnBeforeTypeAndNoAreStatedPurchaseLine(PurchaseLine: Record "Purchase Line"; var ReturnValue: Boolean; var IsHandled: Boolean)
begin
end;
OnBeforeSetPaymentTermsFromPurchaseOrderType(Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeSetPaymentTermsFromPurchaseOrderType(var PurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeSetPaymentTermsFromPurchaseOrderType', '', false, false)]
local procedure DoSomethingOnBeforeSetPaymentTermsFromPurchaseOrderType(var PurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;
OnAfterCalcPurchOrderConfLine4PurchLi(Record Purchase Line, Code[20], Date, Record KVSKBAPurchOrderConfLine) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCalcPurchOrderConfLine4PurchLi(PurchaseLine: Record "Purchase Line"; ConfNo: Code[20]; ConfDate: Date; var PurchOrderConfLine: Record "KVSKBAPurchOrderConfLine"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnAfterCalcPurchOrderConfLine4PurchLi', '', false, false)]
local procedure DoSomethingOnAfterCalcPurchOrderConfLine4PurchLi(PurchaseLine: Record "Purchase Line"; ConfNo: Code[20]; ConfDate: Date; var PurchOrderConfLine: Record "KVSKBAPurchOrderConfLine")
begin
end;
OnAfterSetAssignedUserID(Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnAfterSetAssignedUserID(var PurchaseHeader: Record "Purchase Header"; OnInsertMode: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnAfterSetAssignedUserID', '', false, false)]
local procedure DoSomethingOnAfterSetAssignedUserID(var PurchaseHeader: Record "Purchase Header"; OnInsertMode: Boolean)
begin
end;
OnBeforeAddSpecialOrderToAddress(Record Purchase Header, Record Service Header, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeAddSpecialOrderToAddress(var PurchaseHeader: Record "Purchase Header"; var ServiceHeader: Record "Service Header"; ShowError: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeAddSpecialOrderToAddress', '', false, false)]
local procedure DoSomethingOnBeforeAddSpecialOrderToAddress(var PurchaseHeader: Record "Purchase Header"; var ServiceHeader: Record "Service Header"; ShowError: Boolean; var IsHandled: Boolean)
begin
end;
OnCreatePurchaseHeaderForServiceOrderBeforePurchHeaderModify(Record Purchase Header, Record Service Header) :#
[IntegrationEvent(false, false)]
local procedure OnCreatePurchaseHeaderForServiceOrderBeforePurchHeaderModify(var PurchaseHeader: Record "Purchase Header"; ServiceHeader: Record "Service Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnCreatePurchaseHeaderForServiceOrderBeforePurchHeaderModify', '', false, false)]
local procedure DoSomethingOnCreatePurchaseHeaderForServiceOrderBeforePurchHeaderModify(var PurchaseHeader: Record "Purchase Header"; ServiceHeader: Record "Service Header")
begin
end;
OnAfterAddSpecialOrderToAddress(Record Purchase Header, Record Service Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnAfterAddSpecialOrderToAddress(var PurchaseHeader: Record "Purchase Header"; var ServiceHeader: Record "Service Header"; ShowError: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnAfterAddSpecialOrderToAddress', '', false, false)]
local procedure DoSomethingOnAfterAddSpecialOrderToAddress(var PurchaseHeader: Record "Purchase Header"; var ServiceHeader: Record "Service Header"; ShowError: Boolean)
begin
end;
OnBeforeCreatePurchHeaderForSalesOrder(Record Purchase Header, Code[20], Record Sales Header, Option, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCreatePurchHeaderForSalesOrder(var PurchaseHeader: Record "Purchase Header"; VendorNo: Code[20]; SalesHeader: Record "Sales Header"; OrderType: Option; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCreatePurchHeaderForSalesOrder', '', false, false)]
local procedure DoSomethingOnBeforeCreatePurchHeaderForSalesOrder(var PurchaseHeader: Record "Purchase Header"; VendorNo: Code[20]; SalesHeader: Record "Sales Header"; OrderType: Option; var IsHandled: Boolean)
begin
end;
OnBeforeCreatePurchaseHeaderForServiceOrder(Record Purchase Header, Code[20], Record Service Header, Option, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCreatePurchaseHeaderForServiceOrder(var PurchaseHeader: Record "Purchase Header"; VendorNo: Code[20]; ServiceHeader: Record "Service Header"; OrderType: Option; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLib", 'OnBeforeCreatePurchaseHeaderForServiceOrder', '', false, false)]
local procedure DoSomethingOnBeforeCreatePurchaseHeaderForServiceOrder(var PurchaseHeader: Record "Purchase Header"; VendorNo: Code[20]; ServiceHeader: Record "Service Header"; OrderType: Option; var IsHandled: Boolean)
begin
end;