Codeunit 5881 Phys. Invt. Order-Reopen (Y/N)
- App
- Base Application
- Namespace
- Microsoft.Inventory.Counting.Document
- Versions
- 17-28
Versions171819202122232425262728
Source29
Source in 29
src/Layers/W1/BaseApp/Inventory/Counting/Document/PhysInvtOrderReopenYN.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.Document;
codeunit 5881 "Phys. Invt. Order-Reopen (Y/N)"
{
TableNo = "Phys. Invt. Order Header";
trigger OnRun()
var
PhysInvtOrderHeader: Record "Phys. Invt. Order Header";
begin
PhysInvtOrderHeader.Copy(Rec);
if Confirm(ConfirmReopenQst, false) then
CODEUNIT.Run(CODEUNIT::"Phys. Invt. Order-Reopen", PhysInvtOrderHeader);
Rec := PhysInvtOrderHeader;
end;
var
ConfirmReopenQst: Label 'Do you want to reopen the order?';
}