You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Dear team,
Could we get the event OnBeforeUnApplyVendInvoices on Codeunit 367 - "CheckManagement"?
local procedure UnApplyVendInvoices(var CheckLedgEntry: Record "Check Ledger Entry"; VoidDate: Date): Boolean
var
BankAccountLedgerEntry: Record "Bank Account Ledger Entry";
OrigPaymentVendorLedgerEntry: Record "Vendor Ledger Entry";
PayDetailedVendorLedgEntry: Record "Detailed Vendor Ledg. Entry";
GenJournalLine3: Record "Gen. Journal Line";
AppliesID: Code[50];
**Result: Boolean;
IsHandled: Boolean;**
begin
**IsHandled := false;
OnBeforeUnApplyVendInvoices(CheckLedgEntry, VoidDate, IsHandled, Result);
If IsHandled then
exit(Result);**
BankAccountLedgerEntry.Get(CheckLedgEntry."Bank Account Ledger Entry No.");
if CheckLedgEntry."Bal. Account Type" = CheckLedgEntry."Bal. Account Type"::Vendor then begin
OrigPaymentVendorLedgerEntry.SetCurrentKey("Transaction No.");
OrigPaymentVendorLedgerEntry.SetRange("Transaction No.", BankAccountLedgerEntry."Transaction No.");
OrigPaymentVendorLedgerEntry.SetRange("Document No.", BankAccountLedgerEntry."Document No.");
OrigPaymentVendorLedgerEntry.SetRange("Posting Date", BankAccountLedgerEntry."Posting Date");
if not OrigPaymentVendorLedgerEntry.FindFirst() then
exit(false);
end
else
exit(false);
AppliesID := CheckLedgEntry."Document No.";
...
[IntegrationEvent(false, false)]
local procedure OnBeforeUnApplyVendInvoices(var CheckLedgEntry: Record "Check Ledger Entry"; VoidDate: Date; var IsHandled: Boolean; var Result: Boolean);
begin
end;
Thank you in advance!
Additional context
I'd like to have logic added here.
Internal work item: AB#561106
The text was updated successfully, but these errors were encountered:
Describe the request
Dear team,
Could we get the event OnBeforeUnApplyVendInvoices on Codeunit 367 - "CheckManagement"?
Thank you in advance!
Additional context
I'd like to have logic added here.
Internal work item: AB#561106
The text was updated successfully, but these errors were encountered: