Codeunit 1536 Approvals Journal Line Request
- App
- Base Application
- Namespace
- System.Automation
- Versions
- 23-28
Versions171819202122232425262728
Source29
Source in 29
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";
}