[Event Request] Codeunit 181 "Copy Gen. Journal Mgt."

Why do you need this change?

Please add a new event in the ShowFinishMessage to have a possibility to ignore the FinishMessage and run custom functionality.

Describe the request

local procedure ShowFinishMessage(LineCount: Integer; CopyGenJournalParameters: Record "Copy Gen. Journal Parameters")
   var
       GenJournalBatch: Record "Gen. Journal Batch";
       ConfirmManagement: Codeunit "Confirm Management";
       GenJnlManagement: Codeunit GenJnlManagement;
       IsHandled: Boolean;
   begin
       // >>>
       IsHandled := false;
       OnBeforeShowFinishMessage(LineCount, CopyGenJournalParameters);
       if IsHandled then
           exit();
       // <<<

       if ConfirmManagement.GetResponse(StrSubstNo(CopiedLinesTxt, LineCount), false) then begin
           GenJournalBatch.Get(CopyGenJournalParameters."Journal Template Name", CopyGenJournalParameters."Journal Batch Name");
           GenJnlManagement.TemplateSelectionFromBatch(GenJournalBatch);
       end;
   end;

[IntegrationEvent(false, false)]
    local procedure OnBeforeShowFinishMessage(LineCount: Integer; CopyGenJournalParameters: Record "Copy Gen. Journal Parameters"; var IsHandled: Boolean)
    begin
    end;

Start in Codeunit 181, "Copy Gen. Journal Mgt.", at the ShowFinishMessage procedure and review the requested OnBeforeShowFinishMessage event shape. Done means the event permits subscribers to skip the finish message and run custom functionality; note that this repository says application contributions have moved to BCApps.