Codeunit 5877 Phys. Invt. Rec.-Reopen (Y/N)

App
Base Application
Namespace
Microsoft.Inventory.Counting.Recording
Versions
17-28

Versions171819202122232425262728

Source29

Source in 29

src/Layers/W1/BaseApp/Inventory/Counting/Recording/PhysInvtRecReopenYN.Codeunit.al27 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 Microsoft.Inventory.Counting.Recording;

codeunit 5877 "Phys. Invt. Rec.-Reopen (Y/N)"
{
    TableNo = "Phys. Invt. Record Header";

    trigger OnRun()
    var
        PhysInvtRecordHeader: Record "Phys. Invt. Record Header";
    begin
        PhysInvtRecordHeader.Copy(Rec);

        if Confirm(ConfirmReopenQst, false) then
            CODEUNIT.Run(CODEUNIT::"Phys. Invt. Rec.-Reopen", PhysInvtRecordHeader);

        Rec := PhysInvtRecordHeader;
    end;

    var
        ConfirmReopenQst: Label 'Do you want to reopen the recording?';
}