[NL][Codeunit][11400][LocalFunctionalityMgt][CheckBankAccNo] Add integration event OnCheckBankAccNoAfterNormalizeAcc

[KateDovgalova]

Why do you need this change?

In 4PS Construct we need to run additional NL-specific normalization for Account number in procedure CheckBankAccNo of codeunit 11400 "Local Functionality Mgt.". It should be executed after initial normalization but before the main validation logic runs therefore we need new integration event.

Describe the request

Dear ALAppExtensions team,

On behalf of 4PS I would like to request integration event 'OnCheckBankAccNoAfterNormalizeAcc' to be added to procedure CheckBankAccNo of codeunit 11400 "Local Functionality Mgt.":

    procedure CheckBankAccNo(Acc: Text[30]; CountryCode: Code[10]; var AccountNo: Text[30]) Result: Boolean
    var
        Len: Integer;
        BaseLen: Integer;
        FirstCharacter: Char;
        IsHandled: Boolean;
    begin
        IsHandled := false;
        OnBeforeCheckBankAccNo(Acc, CountryCode, AccountNo, Result, IsHandled);
        if IsHandled then
            exit(Result);

        AccountNo := Acc;
        if CountryCode <> '' then
            exit(true);
        Acc := CharacterFilter(UpperCase(Acc), Text1000031);
        Acc := DelChr(Acc, '>', Text1000034);
        OnCheckBankAccNoAfterNormalizeAcc(Acc); //new
        BaseLen := StrLen(Acc);

    [IntegrationEvent(false, false)]
    local procedure OnCheckBankAccNoAfterNormalizeAcc(var Acc: Text[30])
    begin
        //new
    end;

[github-actions]

✅ Analysis complete - ready for further processing

---

Implementation:

Add a new integration event in CheckBankAccNo() after the standard account-number normalization and before BaseLen := StrLen(Acc);.

Location in CheckBankAccNo() procedure:

        AccountNo := Acc;
        if CountryCode <> '' then
            exit(true);
        Acc := CharacterFilter(UpperCase(Acc), Text1000031);
        Acc := DelChr(Acc, '>', Text1000034);
        OnCheckBankAccNoOnAfterNormalizeAcc(Acc); // NEW
        BaseLen := StrLen(Acc);
        if (StrPos(Acc, Text1000032) = 1) or
           (StrPos(Acc, Text1000033) = 1)
        then begin

Event Publisher (add at the end of the codeunit with other events):

    [IntegrationEvent(false, false)] // NEW
    local procedure OnCheckBankAccNoOnAfterNormalizeAcc(var NormalizedAccountNo: Text[30])
    begin // NEW
    end; // NEW

---

File: LocalFunctionalityMgt.Codeunit.al

Note

Automatically generated by the Triage Agent — advisory only. An engineer will review before any action is taken.

Tip

Not accurate? Reply with /not-accurate (optional: add a short explanation). Your feedback improves future responses.