OnAfterGenJnlLineInit in report 1497 "Trans. Bank Rec. to Gen. Jnl."

[TKapitan]

Why do you need this change?

We need to populate custom fields before the document number and balance account is assigned.

Describe the request

                    GenJnlLine.Init();
--> NEW EVENT
                    OnAfterGenJnlLineInit(GenJnlLine, "Bank Acc. Reconciliation Line");
<-- NEW EVENT
                    GenJnlLine."Line No." := GenJnlLine."Line No." + 10000;
                    GenJnlLine.Validate("Posting Date", "Transaction Date");
                    SourceCodeSetup.Get();
                    case
                        GenJnlTemplate.Type of
                        GenJnlTemplate.Type::General:

    [IntegrationEvent(false, false)]
    local procedure OnAfterGenJnlLineInit(var GenJournalLine: Record "Gen. Journal Line"; BankAccReconciliationLine: Record "Bank Acc. Reconciliation Line")
    begin
    end;

Internal work item: AB#622665

[AleksandricMarko]

✅ Analysis complete - approved for implementation

---

Implementation:

Add the event right after GenJnlLine.Init(); on line 45 in the OnAfterGetRecord trigger of the 'Bank Acc. Reconciliation Line' dataitem.

Location in OnAfterGetRecord trigger (around line 45):

GenJnlLine.Init();
OnAfterGenJnlLineInit(GenJnlLine, "Bank Acc. Reconciliation Line");
GenJnlLine."Line No." := GenJnlLine."Line No." + 10000;
GenJnlLine.Validate("Posting Date", "Transaction Date");
SourceCodeSetup.Get();
case
    GenJnlTemplate.Type of
    GenJnlTemplate.Type::General:

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

[IntegrationEvent(false, false)]
local procedure OnAfterGenJnlLineInit(var GenJournalLine: Record "Gen. Journal Line"; BankAccReconciliationLine: Record "Bank Acc. Reconciliation Line")
begin
end;

---

File: TransBankRectoGenJnl.Report.al