AMC Banking 365 BC - Al Code example

This guide provides a short step-by-step instructions on how to start developing a custom automatch codeunit.

11 steps

Amcbanking

app.json - dependencies

In your AL Project for developing Custom Automatch Codeunit,\ open the project app.json

In the section dependencies, make sure below dependency is present.\ Align version with the current version of AMC Banking 365 BC installed in your Business Central enviroment.

CustomAutomatch codeunit

Open or create your CustomAutomatch codeunit.

Give your Custom Automatch codeunit a unique object Id within your idranges in your app.json file.\ \ Give your Custom Automatch codeunit a unique Name.

Make sure your custom automatch coduenit refers to\ TableNo = "Bank Acc. Reconciliation Line";

Define your variables to fetch the filter values provided by the reference record.

Fetch the reference record filters to be used later in the code, ensuring that processing is limited to the **Payment Reconciliation Journal** that was selected when the automatch process was initiated.

Simple code example

Implement your custom automatch logic here using the key values above to filter either **table "Bank Acc. Reconciliation"** or **table "Bank Acc. Reconciliation Line"**. Alternatively, create a separate procedure to handle the automatching process. See this the simple example :

Subscriber event

Make sure the event subscriber below is implemented; otherwise, your custom automatch codeunit will not be invoked by the AMC Banking main process.

In the subscriber event, ensure that the **Custom Automatch codeunit object ID** is correctly specified. Otherwise, the custom automatch codeunit will not be invoked.

Examples of the app.json file and the CustomAutomatch codeunit file

Click the symbol to open the original script to obtain a better starting point for copying the example files or just click next.

Example of the app.json file! ```json { "id": "dead61d2-95ca-4729-9eea-9f8b5be7a160", "name": "TestCustomAutomatch", "publisher": "Default Publisher", "version": "1.0.0.0", "brief": "", "description": "", "privacyStatement": "", "EULA": "", "help": "", "url": "", "logo": "", "dependencies": [ { "id": "bf906c31-a573-4a88-bbab-7424304fe6c9", "name": "AMC Banking 365 BC", "publisher": "AMC Banking", "version": "26.0.0.5" } ], "screenshots": [], "platform": "1.0.0.0", "application": "26.0.0.0", "idRanges": [ { "from": 50100, "to": 50149 } ], "resourceExposurePolicy": { "allowDebugging": true, "allowDownloadingSource": true, "includeSourceInSymbolFile": true }, "runtime": "15.2", "features": [ "NoImplicitWith" ] } ```

Example of the CustomAutomatch codeunit file! ```al codeunit 50110 CustomAutomatch //Replace with your own object ID and name { TableNo = "Bank Acc. Reconciliation Line"; var trigger OnRun() var BankAccReconciliation: Record "Bank Acc. Reconciliation"; StatementType: Enum "Bank Acc. Rec. Stmt. Type"; BankAccountNo: Code[20]; StatementNo: Code[20]; begin StatementType := StatementType::"Payment Application"; BankAccountNo := CopyStr(rec.GetFilter("Bank Account No."), 1, 20); StatementNo := CopyStr(rec.GetFilter("Statement No."), 1, 20); // Implement your custom automatch logic here based on above key values for filtering // table "Bank Acc. Reconciliation" // or // Implement your custom automatch logic here based on rec for filtering // table "Bank Acc. Reconciliation Line" // See below example logic //Load the Bank Acc. Reconciliation header record if (BankAccReconciliation.Get(StatementType, BankAccountNo, StatementNo)) then begin //Search for unmatched lines in the Bank Acc. Reconciliation Line table rec.SetAutoCalcFields("Match Confidence"); if Rec.FindSet() then begin repeat // Example custom logic: Keep applied payments with zero difference // and Accepted or Manual match confidence If (BankAccReconciliation."AMC EF Keep Applied") and (Rec.Difference = 0) and ((Rec."Match Confidence" = Rec."Match Confidence"::Accepted) or (Rec."Match Confidence" = Rec."Match Confidence"::Manual)) then continue; // Example custom logic: Apply payments to eg. G/L Account // or make other custom logic as needed to handle unmatched lines rec.RejectAppliedPayment(); rec.Validate("Account Type", rec."Account Type"::"G/L Account"); rec.Validate("Account No.", '31320'); // Example G/L Account No. rec.Modify(true); rec.TransferRemainingAmountToAccount(); until Rec.Next() = 0; end; end; end; // Event Subscriber to integrate with AMC Banking Management [EventSubscriber(ObjectType::Codeunit, Codeunit::"AMC CU Banking Mgt.", 'AMCCallCustomAutomatch', '', true, true)] local procedure AMCCallCustomAutomatch(BankAccount: Record "Bank Account"; var Handled: Boolean) var YourCustomautomatchcodeunitID: Integer; begin // Set Handled to true if your values in BankAccount."AMC EF Automatch Custom CU" // is equal to your Custom automatch codeunit ID Handled := false; YourCustomautomatchcodeunitID := Codeunit::"CustomAutomatch"; // Replace with your actual codeunit ID if (BankAccount."AMC EF Automatch Custom CU" = YourCustomautomatchcodeunitID) then Handled := true; end; } ```