Skip to content

[NL][Codeunit][11000006][CBGStatementReconciliation][ProcessPostDesRecDescription] Add integration event OnAfterProcessPostDesRecDescription #30161

@KateDovgalova

Description

@KateDovgalova

Why do you need this change?

In 4PS Construct we need to capture the parsed Name, Address, and City values extracted from the CBG statement line's additional info records. Since this subscriber codeunit maintains its own state (it is a SingleInstance codeunit managing stateful reconciliation data), it must receive these values via the event to synchronize its local fields after each call to ProcessPostDesRecDescription. Without this event, the stateful subscriber would have no way to stay in sync with the reconciliation data parsed in the base codeunit.

Describe the request

Dear ALAppExtensions team,

On behalf of 4PS I would like to request integration event 'OnAfterProcessPostDesRecDescription' to be added to procedure ProcessPostDesRecDescription of codeunit 11000006 "CBG Statement Reconciliation".

    local procedure ProcessPostDesRecDescription(CBGStatementLine: Record "CBG Statement Line")
    var
        CBGStatementLineAddInfo: Record "CBG Statement Line Add. Info.";
    begin
        TempBankAccount.DeleteAll();
        Clear(TempBankAccount);
        Clear(Name);
        Clear(Address);
        Clear(City);
        Clear(Identification);

        CBGStatementLineAddInfo.SetRange("Journal Template Name", CBGStatementLine."Journal Template Name");
        CBGStatementLineAddInfo.SetRange("CBG Statement No.", CBGStatementLine."No.");
        CBGStatementLineAddInfo.SetRange("CBG Statement Line No.", CBGStatementLine."Line No.");

        if CBGStatementLineAddInfo.FindSet() then
            repeat
                case CBGStatementLineAddInfo."Information Type" of
                    CBGStatementLineAddInfo."Information Type"::"Description and Sundries":
                        SplitAccountNumber(CBGStatementLineAddInfo.Description);
                    CBGStatementLineAddInfo."Information Type"::"Account No. Balancing Account":
                        AddPossibleBankAccount(CBGStatementLineAddInfo.Description);
                    CBGStatementLineAddInfo."Information Type"::"Name Acct. Holder":
                        Name := CBGStatementLineAddInfo.Description;
                    CBGStatementLineAddInfo."Information Type"::"Address Acct. Holder":
                        Address := CBGStatementLineAddInfo.Description;
                    CBGStatementLineAddInfo."Information Type"::"City Acct. Holder":
                        City := CBGStatementLineAddInfo.Description;
                    CBGStatementLineAddInfo."Information Type"::"Payment Identification":
                        Identification := CBGStatementLineAddInfo.Description;
                    else
                        OnProcessPostDesRecDescriptionCaseElse(CBGStatementLineAddInfo)
                end;
            until CBGStatementLineAddInfo.Next() = 0;

        OnAfterProcessPostDesRecDescription(Name, Address, City); //new
    end;
    [IntegrationEvent(false, false)]
    local procedure OnAfterProcessPostDesRecDescription(CBGStatementLineName: Code[80]; CBGStatementLineAddress: Code[80]; CBGStatementLineCity: Code[80])
    begin
        //new
    end;

Internal work item: AB#636781

Metadata

Metadata

Assignees

No one assigned

    Labels

    FinanceGitHub request for Finance areaevent-requestRequest for adding an event

    Type

    No fields configured for Task.

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions