Skip to content

KVSADVAdvancePostingPurchase#

Events#

OnAfterUpdateAdvanceFieldsForGenJnlLineByApplicationTo(Record Gen. Journal Line, Record Vendor Ledger Entry, Integer, Code[20]) :#

[IntegrationEvent(false, false)]
local procedure OnAfterUpdateAdvanceFieldsForGenJnlLineByApplicationTo(var GenJournalLine: Record "Gen. Journal Line"; CVLedgerEntry: Record "Vendor Ledger Entry"; DocType: Integer; DocNo: Code[20]): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterUpdateAdvanceFieldsForGenJnlLineByApplicationTo', '', false, false)]
local procedure DoSomethingOnAfterUpdateAdvanceFieldsForGenJnlLineByApplicationTo(var GenJournalLine: Record "Gen. Journal Line"; CVLedgerEntry: Record "Vendor Ledger Entry"; DocType: Integer; DocNo: Code[20])
begin
end;

OnAfterFillAdvanceFieldsInCVLedgerEntryByGenJnlLine(Record Vendor Ledger Entry, Record Gen. Journal Line) :#

[IntegrationEvent(false, false)]
local procedure OnAfterFillAdvanceFieldsInCVLedgerEntryByGenJnlLine(var CVLedgerEntry: Record "Vendor Ledger Entry"; GenJournalLine: Record "Gen. Journal Line"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterFillAdvanceFieldsInCVLedgerEntryByGenJnlLine', '', false, false)]
local procedure DoSomethingOnAfterFillAdvanceFieldsInCVLedgerEntryByGenJnlLine(var CVLedgerEntry: Record "Vendor Ledger Entry"; GenJournalLine: Record "Gen. Journal Line")
begin
end;

OnBeforeTestAdvFieldsForGenJnlLineApplication(Record Gen. Journal Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeTestAdvFieldsForGenJnlLineApplication(GenJnlLine: Record "Gen. Journal Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnBeforeTestAdvFieldsForGenJnlLineApplication', '', false, false)]
local procedure DoSomethingOnBeforeTestAdvFieldsForGenJnlLineApplication(GenJnlLine: Record "Gen. Journal Line"; var IsHandled: Boolean)
begin
end;

OnAfterSetAdvFieldsForCVLedgerEntryByCVLedgerEntryBuffer(Record Vendor Ledger Entry, Record CV Ledger Entry Buffer) :#

[IntegrationEvent(false, false)]
local procedure OnAfterSetAdvFieldsForCVLedgerEntryByCVLedgerEntryBuffer(var CVLedgerEntry: Record "Vendor Ledger Entry"; CVLedgerEntryBuffer: Record "CV Ledger Entry Buffer"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterSetAdvFieldsForCVLedgerEntryByCVLedgerEntryBuffer', '', false, false)]
local procedure DoSomethingOnAfterSetAdvFieldsForCVLedgerEntryByCVLedgerEntryBuffer(var CVLedgerEntry: Record "Vendor Ledger Entry"; CVLedgerEntryBuffer: Record "CV Ledger Entry Buffer")
begin
end;

OnAfterCopyAdvanceFieldsFromCVLedgEntryToCVLedgerEntryBuffer(Record CV Ledger Entry Buffer, Record Vendor Ledger Entry) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCopyAdvanceFieldsFromCVLedgEntryToCVLedgerEntryBuffer(var CVLedgerEntryBuffer: Record "CV Ledger Entry Buffer"; CVLedgerEntry: Record "Vendor Ledger Entry"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterCopyAdvanceFieldsFromCVLedgEntryToCVLedgerEntryBuffer', '', false, false)]
local procedure DoSomethingOnAfterCopyAdvanceFieldsFromCVLedgEntryToCVLedgerEntryBuffer(var CVLedgerEntryBuffer: Record "CV Ledger Entry Buffer"; CVLedgerEntry: Record "Vendor Ledger Entry")
begin
end;

OnBeforeCheckDocHeaderOpenAdvance(Record Purchase Header, Boolean, Boolean, Boolean, Integer, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckDocHeaderOpenAdvance(DocumentHeader: Record "Purchase Header"; var SkipCreating: Boolean; var ErrorMessage: Boolean; var ExistingOfAdvance: Boolean; var AdvanceChainNo: Integer; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnBeforeCheckDocHeaderOpenAdvance', '', false, false)]
local procedure DoSomethingOnBeforeCheckDocHeaderOpenAdvance(DocumentHeader: Record "Purchase Header"; var SkipCreating: Boolean; var ErrorMessage: Boolean; var ExistingOfAdvance: Boolean; var AdvanceChainNo: Integer; var IsHandled: Boolean)
begin
end;

OnBeforeCheckFillNetAmountLCY(Record Gen. Journal Line, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckFillNetAmountLCY(GenJnlLine: Record "Gen. Journal Line"; var Result: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnBeforeCheckFillNetAmountLCY', '', false, false)]
local procedure DoSomethingOnBeforeCheckFillNetAmountLCY(GenJnlLine: Record "Gen. Journal Line"; var Result: Boolean; var IsHandled: Boolean)
begin
end;

OnAfterInitAdvCVLedgEntry(Record Vendor Ledger Entry, Record Gen. Journal Line) :#

[IntegrationEvent(false, false)]
local procedure OnAfterInitAdvCVLedgEntry(var CVLedgerEntry: Record "Vendor Ledger Entry"; var GenJnlLine: Record "Gen. Journal Line"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterInitAdvCVLedgEntry', '', false, false)]
local procedure DoSomethingOnAfterInitAdvCVLedgEntry(var CVLedgerEntry: Record "Vendor Ledger Entry"; var GenJnlLine: Record "Gen. Journal Line")
begin
end;

OnAfterAddOldApplicationAdvFieldsInDtldCVLedgEntry(Record Detailed CV Ledg. Entry Buffer, Record CV Ledger Entry Buffer, Record Vendor Ledger Entry, Record Gen. Journal Line) :#

[IntegrationEvent(false, false)]
local procedure OnAfterAddOldApplicationAdvFieldsInDtldCVLedgEntry(var DtldCVLedgEntryBuf: Record "Detailed CV Ledg. Entry Buffer"; var OldCVLedgEntryBuf: Record "CV Ledger Entry Buffer"; CVLedgerEntry: Record "Vendor Ledger Entry"; var GenJnlLine: Record "Gen. Journal Line"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterAddOldApplicationAdvFieldsInDtldCVLedgEntry', '', false, false)]
local procedure DoSomethingOnAfterAddOldApplicationAdvFieldsInDtldCVLedgEntry(var DtldCVLedgEntryBuf: Record "Detailed CV Ledg. Entry Buffer"; var OldCVLedgEntryBuf: Record "CV Ledger Entry Buffer"; CVLedgerEntry: Record "Vendor Ledger Entry"; var GenJnlLine: Record "Gen. Journal Line")
begin
end;

OnBeforeUpdateCalculatedAdvVATAmounts(Record VAT Entry, Record Detailed CV Ledg. Entry Buffer, Decimal, Decimal, Integer, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeUpdateCalculatedAdvVATAmounts(var TempAdvVATEntry: Record "VAT Entry" temporary; DtldCVLedgEntryBuf: Record "Detailed CV Ledg. Entry Buffer"; var SumVATAmount: Decimal; var SumVATBase: Decimal; var TotalOfVatEntry: Integer; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnBeforeUpdateCalculatedAdvVATAmounts', '', false, false)]
local procedure DoSomethingOnBeforeUpdateCalculatedAdvVATAmounts(var TempAdvVATEntry: Record "VAT Entry" temporary; DtldCVLedgEntryBuf: Record "Detailed CV Ledg. Entry Buffer"; var SumVATAmount: Decimal; var SumVATBase: Decimal; var TotalOfVatEntry: Integer; var IsHandled: Boolean)
begin
end;

OnBeforeCheckShouldClosInvoiceDocument(Record Purchase Header, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckShouldClosInvoiceDocument(var DocumentHeader: Record "Purchase Header"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnBeforeCheckShouldClosInvoiceDocument', '', false, false)]
local procedure DoSomethingOnBeforeCheckShouldClosInvoiceDocument(var DocumentHeader: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;

OnAfterCheckDocumentHeaderForAdvancePosting(Record Purchase Header) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCheckDocumentHeaderForAdvancePosting(DocumentHeader: Record "Purchase Header"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterCheckDocumentHeaderForAdvancePosting', '', false, false)]
local procedure DoSomethingOnAfterCheckDocumentHeaderForAdvancePosting(DocumentHeader: Record "Purchase Header")
begin
end;

OnAfterCheckAppliedCVLedgerEntryOfDocumentHeaderForAdvancePosting(Record Purchase Header, Record Vendor Ledger Entry) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCheckAppliedCVLedgerEntryOfDocumentHeaderForAdvancePosting(DocumentHeader: Record "Purchase Header"; CVLedgerEntry: Record "Vendor Ledger Entry"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterCheckAppliedCVLedgerEntryOfDocumentHeaderForAdvancePosting', '', false, false)]
local procedure DoSomethingOnAfterCheckAppliedCVLedgerEntryOfDocumentHeaderForAdvancePosting(DocumentHeader: Record "Purchase Header"; CVLedgerEntry: Record "Vendor Ledger Entry")
begin
end;

OnAfterTransferAdvFieldsFromDocumentLinesToGenJnlLine(Record Gen. Journal Line, Record Purchase Line) :#

[IntegrationEvent(false, false)]
local procedure OnAfterTransferAdvFieldsFromDocumentLinesToGenJnlLine(var GenJnlLine: Record "Gen. Journal Line"; var TotalDocumentLine: Record "Purchase Line"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterTransferAdvFieldsFromDocumentLinesToGenJnlLine', '', false, false)]
local procedure DoSomethingOnAfterTransferAdvFieldsFromDocumentLinesToGenJnlLine(var GenJnlLine: Record "Gen. Journal Line"; var TotalDocumentLine: Record "Purchase Line")
begin
end;

OnAfterTransferAdvFieldsFromDocumentHeaderToGenJnlLine(Record Gen. Journal Line, Record Purchase Header) :#

[IntegrationEvent(false, false)]
local procedure OnAfterTransferAdvFieldsFromDocumentHeaderToGenJnlLine(var GenJournalLine: Record "Gen. Journal Line"; DocumentHeader: Record "Purchase Header"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterTransferAdvFieldsFromDocumentHeaderToGenJnlLine', '', false, false)]
local procedure DoSomethingOnAfterTransferAdvFieldsFromDocumentHeaderToGenJnlLine(var GenJournalLine: Record "Gen. Journal Line"; DocumentHeader: Record "Purchase Header")
begin
end;

OnAfterTransferAdvFieldsFromDocumentLineToInvoicePostingBuffer(Record Purchase Line, Record Invoice Post. Buffer) :#

[IntegrationEvent(false, false)]
local procedure OnAfterTransferAdvFieldsFromDocumentLineToInvoicePostingBuffer(var DocumentLine: Record "Purchase Line"; var InvoicePostBuffer: Record "Invoice Post. Buffer"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterTransferAdvFieldsFromDocumentLineToInvoicePostingBuffer', '', false, false)]
local procedure DoSomethingOnAfterTransferAdvFieldsFromDocumentLineToInvoicePostingBuffer(var DocumentLine: Record "Purchase Line"; var InvoicePostBuffer: Record "Invoice Post. Buffer")
begin
end;

OnAfterAddAdvanceFieldsToGenJournalLineByAppliedDocumentHeader(Record Gen. Journal Line, Record Purchase Header) :#

[IntegrationEvent(false, false)]
local procedure OnAfterAddAdvanceFieldsToGenJournalLineByAppliedDocumentHeader(var GenJournalLine: Record "Gen. Journal Line"; AppliedDocumentHeader: Record "Purchase Header"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterAddAdvanceFieldsToGenJournalLineByAppliedDocumentHeader', '', false, false)]
local procedure DoSomethingOnAfterAddAdvanceFieldsToGenJournalLineByAppliedDocumentHeader(var GenJournalLine: Record "Gen. Journal Line"; AppliedDocumentHeader: Record "Purchase Header")
begin
end;

OnAfterTransferAdvFieldsFromDocumentLineToNewInvoicePostingBuffer(Record Purchase Line, Record Invoice Posting Buffer) :#

[IntegrationEvent(false, false)]
local procedure OnAfterTransferAdvFieldsFromDocumentLineToNewInvoicePostingBuffer(var DocumentLine: Record "Purchase Line"; var InvoicePostBuffer: Record "Invoice Posting Buffer"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterTransferAdvFieldsFromDocumentLineToNewInvoicePostingBuffer', '', false, false)]
local procedure DoSomethingOnAfterTransferAdvFieldsFromDocumentLineToNewInvoicePostingBuffer(var DocumentLine: Record "Purchase Line"; var InvoicePostBuffer: Record "Invoice Posting Buffer")
begin
end;

OnBeforeCompareDocumentLineWithAdvancePlanningEntry(Record Purchase Header, Record Purchase Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCompareDocumentLineWithAdvancePlanningEntry(DocumentHeader: Record "Purchase Header"; DocumentLine: Record "Purchase Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnBeforeCompareDocumentLineWithAdvancePlanningEntry', '', false, false)]
local procedure DoSomethingOnBeforeCompareDocumentLineWithAdvancePlanningEntry(DocumentHeader: Record "Purchase Header"; DocumentLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;

OnCompareDocumentLineWithAdvancePlanningEntryElse(Record Purchase Header, Record Purchase Line, Record KVSADVAdvance Planning Entry, Enum KVSADVCompAdvPlanWithInv) :#

[IntegrationEvent(false, false)]
local procedure OnCompareDocumentLineWithAdvancePlanningEntryElse(DocumentHeader: Record "Purchase Header"; DocumentLine: Record "Purchase Line"; var AdvancePlanningEntry: Record "KVSADVAdvance Planning Entry"; ComparisionType: Enum "KVSADVCompAdvPlanWithInv"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnCompareDocumentLineWithAdvancePlanningEntryElse', '', false, false)]
local procedure DoSomethingOnCompareDocumentLineWithAdvancePlanningEntryElse(DocumentHeader: Record "Purchase Header"; DocumentLine: Record "Purchase Line"; var AdvancePlanningEntry: Record "KVSADVAdvance Planning Entry"; ComparisionType: Enum "KVSADVCompAdvPlanWithInv")
begin
end;

OnAfterUpdateAdvancePlanFromDocumentLineBeforeModify(Record Purchase Header, Record Purchase Line, Record KVSADVAdvance Planning Entry) :#

[IntegrationEvent(false, false)]
local procedure OnAfterUpdateAdvancePlanFromDocumentLineBeforeModify(DocumentHeader: Record "Purchase Header"; DocumentLine: Record "Purchase Line"; var AdvancePlanningEntry: Record "KVSADVAdvance Planning Entry"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnAfterUpdateAdvancePlanFromDocumentLineBeforeModify', '', false, false)]
local procedure DoSomethingOnAfterUpdateAdvancePlanFromDocumentLineBeforeModify(DocumentHeader: Record "Purchase Header"; DocumentLine: Record "Purchase Line"; var AdvancePlanningEntry: Record "KVSADVAdvance Planning Entry")
begin
end;

OnBeforeCheckDocumentHeaderForAdvancePosting(Record Purchase Header, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckDocumentHeaderForAdvancePosting(PurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnBeforeCheckDocumentHeaderForAdvancePosting', '', false, false)]
local procedure DoSomethingOnBeforeCheckDocumentHeaderForAdvancePosting(PurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;

OnFindOldPlanningEntryDepositsOnAfterSetFilterSecurityDeposit(Record Purchase Header, Record KVSADVSecurityDeposit) :#

[IntegrationEvent(false, false)]
local procedure OnFindOldPlanningEntryDepositsOnAfterSetFilterSecurityDeposit(PurchaseHeader: Record "Purchase Header"; var SecurityDeposit: Record "KVSADVSecurityDeposit"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAdvancePostingPurchase", 'OnFindOldPlanningEntryDepositsOnAfterSetFilterSecurityDeposit', '', false, false)]
local procedure DoSomethingOnFindOldPlanningEntryDepositsOnAfterSetFilterSecurityDeposit(PurchaseHeader: Record "Purchase Header"; var SecurityDeposit: Record "KVSADVSecurityDeposit")
begin
end;