Codeunit 1536 Approvals Journal Line Request, source in 29

Source29

src/Layers/W1/BaseApp/OtherCapabilities/Approvals/ApprovalsJournalLineRequest.Codeunit.al32 lines, Copyright (c) Microsoft Corporation. MIT

// ------------------------------------------------------------------------------------------------
// Copyright (c) Microsoft Corporation. All rights reserved.
// Licensed under the MIT License. See License.txt in the project root for license information.
// ------------------------------------------------------------------------------------------------
namespace System.Automation;

using Microsoft.Finance.GeneralLedger.Journal;

codeunit 1536 "Approvals Journal Line Request"
{
    TableNo = "Gen. Journal Line";

    trigger OnRun()
    begin
        OnBeforeSendJournalLineApprovalRequests(Rec);
        if WorkflowManagement.CanExecuteWorkflow(Rec, WorkflowEventHandling.RunWorkflowOnSendGeneralJournalLineForApprovalCode()) and
            not ApprovalsMgmt.HasOpenApprovalEntries(Rec.RecordId)
        then
            ApprovalsMgmt.OnSendGeneralJournalLineForApproval(Rec);
    end;

    [IntegrationEvent(false, false)]
    local procedure OnBeforeSendJournalLineApprovalRequests(var GenJournalLine: Record "Gen. Journal Line")
    begin
    end;

    var
        ApprovalsMgmt: Codeunit "Approvals Mgmt.";
        WorkflowManagement: Codeunit "Workflow Management";
        WorkflowEventHandling: Codeunit "Workflow Event Handling";
}