KVSADVAutoPostingPurchase#
Procedures#
OnRun#
procedure OnRun(Rec: Record "#437dbf0e84ff417a965ded2bb9650972#Purchase Header")
CreateCorrectionAdvanceCreditMemoForPostedInvoice(Record Purch. Inv. Header, Boolean) : Code[20]#
procedure CreateCorrectionAdvanceCreditMemoForPostedInvoice(PostedInvoiceHeader: Record "Purch. Inv. Header"; OpenCreatedCrMemo: Boolean): Code[20]
CalcRealAmt(Record Vendor Ledger Entry) : Decimal#
procedure CalcRealAmt(CVLedgerEntryToCalc: Record "Vendor Ledger Entry"): Decimal
CalcRealAmt(Record Vendor Ledger Entry, Option) : Decimal#
procedure CalcRealAmt(CVLedgerEntryToCalc: Record "Vendor Ledger Entry"; AmountType: Option): Decimal
Events#
OnAfterSetFilterCVLedgerEntriesForInsertCloseCredMemo(Record Purchase Header, Record Vendor Ledger Entry) :#
[IntegrationEvent(false, false)]
local procedure OnAfterSetFilterCVLedgerEntriesForInsertCloseCredMemo(ApplDocumentHeader: Record "Purchase Header"; var CVLedgerEntry: Record "Vendor Ledger Entry"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterSetFilterCVLedgerEntriesForInsertCloseCredMemo', '', false, false)]
local procedure DoSomethingOnAfterSetFilterCVLedgerEntriesForInsertCloseCredMemo(ApplDocumentHeader: Record "Purchase Header"; var CVLedgerEntry: Record "Vendor Ledger Entry")
begin
end;
OnAfterInsertCloseCredMemo(Record Purchase Header, Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnAfterInsertCloseCredMemo(var CloseCredMemo: Record "Purchase Header"; ApplDocumentHeader: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterInsertCloseCredMemo', '', false, false)]
local procedure DoSomethingOnAfterInsertCloseCredMemo(var CloseCredMemo: Record "Purchase Header"; ApplDocumentHeader: Record "Purchase Header")
begin
end;
OnBeforeInsertCloseCredMemo(Record Purchase Header, Record Purchase Header, Record Vendor Ledger Entry, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeInsertCloseCredMemo(var CloseCredMemo: Record "Purchase Header"; ApplDocumentHeader: Record "Purchase Header"; CVLedgerEntry: Record "Vendor Ledger Entry"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforeInsertCloseCredMemo', '', false, false)]
local procedure DoSomethingOnBeforeInsertCloseCredMemo(var CloseCredMemo: Record "Purchase Header"; ApplDocumentHeader: Record "Purchase Header"; CVLedgerEntry: Record "Vendor Ledger Entry"; var IsHandled: Boolean)
begin
end;
OnBeforeInsertRemCredMemoWithBuffer(Record Purchase Header, Record KVSADVAutoCreatedDocsBuffer, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeInsertRemCredMemoWithBuffer(ClosingInvHeader: Record "Purchase Header"; var AutoCreatedDocsBuffer: Record "KVSADVAutoCreatedDocsBuffer"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforeInsertRemCredMemoWithBuffer', '', false, false)]
local procedure DoSomethingOnBeforeInsertRemCredMemoWithBuffer(ClosingInvHeader: Record "Purchase Header"; var AutoCreatedDocsBuffer: Record "KVSADVAutoCreatedDocsBuffer"; var IsHandled: Boolean)
begin
end;
OnBeforeCreateAdvCrMemoHeaderFromInvoiceCVLedgerEntry(Record Vendor Ledger Entry, Record Purchase Header, Code[20], Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCreateAdvCrMemoHeaderFromInvoiceCVLedgerEntry(CVLedgerEntry: Record "Vendor Ledger Entry"; InvoiceHeader: Record "Purchase Header"; var CreatedDocHeaderNo: Code[20]; var Result: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforeCreateAdvCrMemoHeaderFromInvoiceCVLedgerEntry', '', false, false)]
local procedure DoSomethingOnBeforeCreateAdvCrMemoHeaderFromInvoiceCVLedgerEntry(CVLedgerEntry: Record "Vendor Ledger Entry"; InvoiceHeader: Record "Purchase Header"; var CreatedDocHeaderNo: Code[20]; var Result: Boolean; var IsHandled: Boolean)
begin
end;
OnAfterCreateAdvCrMemoHeaderFromInvoiceCVLedgerEntry(Record Purchase Header, Record Vendor Ledger Entry, Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCreateAdvCrMemoHeaderFromInvoiceCVLedgerEntry(var CreditMHeader: Record "Purchase Header"; CVLedgerEntry: Record "Vendor Ledger Entry"; InvoiceHeader: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCreateAdvCrMemoHeaderFromInvoiceCVLedgerEntry', '', false, false)]
local procedure DoSomethingOnAfterCreateAdvCrMemoHeaderFromInvoiceCVLedgerEntry(var CreditMHeader: Record "Purchase Header"; CVLedgerEntry: Record "Vendor Ledger Entry"; InvoiceHeader: Record "Purchase Header")
begin
end;
OnBeforeCreateCorrectionAdvanceCreditMemoForPostedInvoice(Record Purch. Inv. Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCreateCorrectionAdvanceCreditMemoForPostedInvoice(PostedInvoiceHeader: Record "Purch. Inv. Header"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforeCreateCorrectionAdvanceCreditMemoForPostedInvoice', '', false, false)]
local procedure DoSomethingOnBeforeCreateCorrectionAdvanceCreditMemoForPostedInvoice(PostedInvoiceHeader: Record "Purch. Inv. Header"; var IsHandled: Boolean)
begin
end;
OnBeforePostExRateDiffbyClCMGenJnlLine(Record Gen. Journal Line, Codeunit Gen. Jnl.-Post Line, Record KVSADVAdvClosingCredMemoEntry, Record Purchase Header, Record Purchase Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforePostExRateDiffbyClCMGenJnlLine(var GenJnlLine: Record "Gen. Journal Line"; var GenJnlLinePost: Codeunit "Gen. Jnl.-Post Line"; AdvClosingCMEntry: Record "KVSADVAdvClosingCredMemoEntry"; DocumentHeader: Record "Purchase Header"; DocumentLine: Record "Purchase Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforePostExRateDiffbyClCMGenJnlLine', '', false, false)]
local procedure DoSomethingOnBeforePostExRateDiffbyClCMGenJnlLine(var GenJnlLine: Record "Gen. Journal Line"; var GenJnlLinePost: Codeunit "Gen. Jnl.-Post Line"; AdvClosingCMEntry: Record "KVSADVAdvClosingCredMemoEntry"; DocumentHeader: Record "Purchase Header"; DocumentLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;
OnAfterCalcClosedAmtWithRemAmt(Record Purch. Cr. Memo Hdr., Decimal, Decimal) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCalcClosedAmtWithRemAmt(var AdvCredMemo: Record "Purch. Cr. Memo Hdr."; var OverHeadClosAmt: Decimal; var RealAmt: Decimal):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCalcClosedAmtWithRemAmt', '', false, false)]
local procedure DoSomethingOnAfterCalcClosedAmtWithRemAmt(var AdvCredMemo: Record "Purch. Cr. Memo Hdr."; var OverHeadClosAmt: Decimal; var RealAmt: Decimal)
begin
end;
OnBeforeCreateAndPostRealInvoice(Record Purch. Cr. Memo Hdr., Code[20], Boolean, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCreateAndPostRealInvoice(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; var PostedRealInvNo: Code[20]; var InsertRI: Boolean; var RIHasBeenPosted: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforeCreateAndPostRealInvoice', '', false, false)]
local procedure DoSomethingOnBeforeCreateAndPostRealInvoice(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; var PostedRealInvNo: Code[20]; var InsertRI: Boolean; var RIHasBeenPosted: Boolean; var IsHandled: Boolean)
begin
end;
OnAfterCreateRealInvoiceHeader(Record Purch. Cr. Memo Hdr., Record Vendor Ledger Entry, Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCreateRealInvoiceHeader(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; CVLedgerEntry: Record "Vendor Ledger Entry"; var RealInvHeader: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCreateRealInvoiceHeader', '', false, false)]
local procedure DoSomethingOnAfterCreateRealInvoiceHeader(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; CVLedgerEntry: Record "Vendor Ledger Entry"; var RealInvHeader: Record "Purchase Header")
begin
end;
OnAfterCreateRealInvoiceLine(Record Purch. Cr. Memo Hdr., Record Purch. Cr. Memo Line, Record Purchase Header, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCreateRealInvoiceLine(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; AdvCredMemoLine: Record "Purch. Cr. Memo Line"; RealInvHeader: Record "Purchase Header"; var RealInvLine: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCreateRealInvoiceLine', '', false, false)]
local procedure DoSomethingOnAfterCreateRealInvoiceLine(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; AdvCredMemoLine: Record "Purch. Cr. Memo Line"; RealInvHeader: Record "Purchase Header"; var RealInvLine: Record "Purchase Line")
begin
end;
OnBeforePostRealInvoice(Record Purch. Cr. Memo Hdr., Record Vendor Ledger Entry, Record Purchase Header, Boolean, Code[20], Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforePostRealInvoice(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; CVLedgerEntry: Record "Vendor Ledger Entry"; var RealInvHeader: Record "Purchase Header"; var RIHasBeenPosted: Boolean; var PostedRealInvNo: Code[20]; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforePostRealInvoice', '', false, false)]
local procedure DoSomethingOnBeforePostRealInvoice(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; CVLedgerEntry: Record "Vendor Ledger Entry"; var RealInvHeader: Record "Purchase Header"; var RIHasBeenPosted: Boolean; var PostedRealInvNo: Code[20]; var IsHandled: Boolean)
begin
end;
OnBeforeInsertCorrInvOfClCrMemo(Record Purch. Cr. Memo Hdr., Code[20], Date, Code[20], Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeInsertCorrInvOfClCrMemo(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; NewDocNo: Code[20]; NewPostingDate: Date; var PostedCorrInvNo: Code[20]; var PostCorrInv: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforeInsertCorrInvOfClCrMemo', '', false, false)]
local procedure DoSomethingOnBeforeInsertCorrInvOfClCrMemo(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; NewDocNo: Code[20]; NewPostingDate: Date; var PostedCorrInvNo: Code[20]; var PostCorrInv: Boolean; var IsHandled: Boolean)
begin
end;
OnAfterCreateCorrInvOfClCrMemoHeader(Record Purch. Cr. Memo Hdr., Record Purchase Header) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCreateCorrInvOfClCrMemoHeader(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; var CorrInvHeader: Record "Purchase Header"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCreateCorrInvOfClCrMemoHeader', '', false, false)]
local procedure DoSomethingOnAfterCreateCorrInvOfClCrMemoHeader(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; var CorrInvHeader: Record "Purchase Header")
begin
end;
OnAfterCreateCorrInvOfClCrMemoLine(Record Purch. Cr. Memo Hdr., Record Purch. Cr. Memo Line, Record Purchase Header, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCreateCorrInvOfClCrMemoLine(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; AdvCredMemoLine: Record "Purch. Cr. Memo Line"; CorrInvHeader: Record "Purchase Header"; var CorrInvLine: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCreateCorrInvOfClCrMemoLine', '', false, false)]
local procedure DoSomethingOnAfterCreateCorrInvOfClCrMemoLine(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; AdvCredMemoLine: Record "Purch. Cr. Memo Line"; CorrInvHeader: Record "Purchase Header"; var CorrInvLine: Record "Purchase Line")
begin
end;
OnAfterCreateCorrInvClosCreditMemoEntry(Record Purch. Cr. Memo Hdr., Record Purch. Cr. Memo Line, Record Purchase Header, Record Purchase Line, Record KVSADVPostedAdvClosCrMemoEntry, Record KVSADVAdvClosingCredMemoEntry) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCreateCorrInvClosCreditMemoEntry(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; AdvCredMemoLine: Record "Purch. Cr. Memo Line"; CorrInvHeader: Record "Purchase Header"; CorrInvLine: Record "Purchase Line"; AdvPostExchRateCMEntry: Record "KVSADVPostedAdvClosCrMemoEntry"; var AdvExchRateCMEntry: Record "KVSADVAdvClosingCredMemoEntry"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCreateCorrInvClosCreditMemoEntry', '', false, false)]
local procedure DoSomethingOnAfterCreateCorrInvClosCreditMemoEntry(AdvCredMemo: Record "Purch. Cr. Memo Hdr."; AdvCredMemoLine: Record "Purch. Cr. Memo Line"; CorrInvHeader: Record "Purchase Header"; CorrInvLine: Record "Purchase Line"; AdvPostExchRateCMEntry: Record "KVSADVPostedAdvClosCrMemoEntry"; var AdvExchRateCMEntry: Record "KVSADVAdvClosingCredMemoEntry")
begin
end;
OnAfterCalcRealAmt(Record Vendor Ledger Entry, Option, Record Purch. Inv. Header, Record Purch. Cr. Memo Hdr., Decimal) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCalcRealAmt(CVLedgerEntryToCalc: Record "Vendor Ledger Entry"; AmountType: Option; var RealInvHeader: Record "Purch. Inv. Header"; var RealCMHeader: Record "Purch. Cr. Memo Hdr."; var RealAmt: Decimal):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCalcRealAmt', '', false, false)]
local procedure DoSomethingOnAfterCalcRealAmt(CVLedgerEntryToCalc: Record "Vendor Ledger Entry"; AmountType: Option; var RealInvHeader: Record "Purch. Inv. Header"; var RealCMHeader: Record "Purch. Cr. Memo Hdr."; var RealAmt: Decimal)
begin
end;
OnAfterCalcOverpaidAdvanceAmount(Record Vendor Ledger Entry, Decimal) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCalcOverpaidAdvanceAmount(AdvInvCVLedgEntry: Record "Vendor Ledger Entry"; var AmtOverPaid: Decimal):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCalcOverpaidAdvanceAmount', '', false, false)]
local procedure DoSomethingOnAfterCalcOverpaidAdvanceAmount(AdvInvCVLedgEntry: Record "Vendor Ledger Entry"; var AmtOverPaid: Decimal)
begin
end;
OnBeforeInsertOverPaidCredMemo(Record Vendor Ledger Entry, Decimal, Code[20], Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeInsertOverPaidCredMemo(FromCVLedgEntry: Record "Vendor Ledger Entry"; OverPaidAmt: Decimal; var CreatedCreditMemoNo: Code[20]; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforeInsertOverPaidCredMemo', '', false, false)]
local procedure DoSomethingOnBeforeInsertOverPaidCredMemo(FromCVLedgEntry: Record "Vendor Ledger Entry"; OverPaidAmt: Decimal; var CreatedCreditMemoNo: Code[20]; var IsHandled: Boolean)
begin
end;
OnAfterCreateOverpaidCreditMemoHeader(Record Purchase Header, Record Purch. Inv. Header, Record Vendor Ledger Entry) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCreateOverpaidCreditMemoHeader(var CredMemoHeader: Record "Purchase Header"; AdvInvoiceHeader: Record "Purch. Inv. Header"; FromCVLedgEntry: Record "Vendor Ledger Entry"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCreateOverpaidCreditMemoHeader', '', false, false)]
local procedure DoSomethingOnAfterCreateOverpaidCreditMemoHeader(var CredMemoHeader: Record "Purchase Header"; AdvInvoiceHeader: Record "Purch. Inv. Header"; FromCVLedgEntry: Record "Vendor Ledger Entry")
begin
end;
OnAfterCreateOverpaidCreditMemoLine(Record Purchase Header, Record Purch. Inv. Header, Record Purch. Inv. Line, Record Purchase Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterCreateOverpaidCreditMemoLine(CredMemoHeader: Record "Purchase Header"; AdvInvoiceHeader: Record "Purch. Inv. Header"; AdvInvoiceLine: Record "Purch. Inv. Line"; var CredMemoLine: Record "Purchase Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterCreateOverpaidCreditMemoLine', '', false, false)]
local procedure DoSomethingOnAfterCreateOverpaidCreditMemoLine(CredMemoHeader: Record "Purchase Header"; AdvInvoiceHeader: Record "Purch. Inv. Header"; AdvInvoiceLine: Record "Purch. Inv. Line"; var CredMemoLine: Record "Purchase Line")
begin
end;
OnBeforePostClosingCreditMemo(Record Purchase Header, Record Purchase Header, Codeunit Purch.-Post) :#
[IntegrationEvent(false, false)]
local procedure OnBeforePostClosingCreditMemo(InvoiceHeader: Record "Purchase Header"; var CreditMemoHeader: Record "Purchase Header"; var AdvanceDocumentPost: Codeunit "Purch.-Post"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforePostClosingCreditMemo', '', false, false)]
local procedure DoSomethingOnBeforePostClosingCreditMemo(InvoiceHeader: Record "Purchase Header"; var CreditMemoHeader: Record "Purchase Header"; var AdvanceDocumentPost: Codeunit "Purch.-Post")
begin
end;
OnBeforePostRemainingAmountCreditMemo(Record Purchase Header, Record Purchase Header, Codeunit Purch.-Post) :#
[IntegrationEvent(false, false)]
local procedure OnBeforePostRemainingAmountCreditMemo(InvoiceHeader: Record "Purchase Header"; var CreditMemoHeader: Record "Purchase Header"; var AdvanceDocumentPost: Codeunit "Purch.-Post"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnBeforePostRemainingAmountCreditMemo', '', false, false)]
local procedure DoSomethingOnBeforePostRemainingAmountCreditMemo(InvoiceHeader: Record "Purchase Header"; var CreditMemoHeader: Record "Purchase Header"; var AdvanceDocumentPost: Codeunit "Purch.-Post")
begin
end;
OnAfterPostClosingCreditMemo(Record Purchase Header, Record Purchase Header, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnAfterPostClosingCreditMemo(DocumentHeader: Record "Purchase Header"; var CreditMemoHeader: Record "Purchase Header"; var AdvCloseCMPost: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterPostClosingCreditMemo', '', false, false)]
local procedure DoSomethingOnAfterPostClosingCreditMemo(DocumentHeader: Record "Purchase Header"; var CreditMemoHeader: Record "Purchase Header"; var AdvCloseCMPost: Boolean)
begin
end;
OnAfterPostRemainingAmountCreditMemo(Record Purchase Header, Record Purchase Header, Codeunit Purch.-Post, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnAfterPostRemainingAmountCreditMemo(DocumentHeader: Record "Purchase Header"; var CreditMemoHeader: Record "Purchase Header"; AdvanceDocumentPost: Codeunit "Purch.-Post"; var AdvRemCMPost: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSADVAutoPostingPurchase", 'OnAfterPostRemainingAmountCreditMemo', '', false, false)]
local procedure DoSomethingOnAfterPostRemainingAmountCreditMemo(DocumentHeader: Record "Purchase Header"; var CreditMemoHeader: Record "Purchase Header"; AdvanceDocumentPost: Codeunit "Purch.-Post"; var AdvRemCMPost: Boolean)
begin
end;