Objects/Codeunits/Codeunit 977 Asm. Whse. Worksheet Line

Codeunit 977 Asm. Whse. Worksheet Line, source in 29

Jonas Paprotka, Base Application, releases/29.x at a66254c3b8, checked 2026-09-20

Source29

src/Layers/W1/BaseApp/Assembly/Warehouse/Worksheet/AsmWhseWorksheetLine.Codeunit.al21 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.Warehouse.Worksheet;

using Microsoft.Assembly.Document;
using Microsoft.Warehouse.Tracking;

codeunit 977 "Asm. Whse. Worksheet Line"
{
    [EventSubscriber(ObjectType::Table, Database::"Whse. Worksheet Line", 'OnWhseItemTrackingLinesSetSource', '', false, false)]
    local procedure OnWhseItemTrackingLinesSetSource(var WhseWorksheetLine: Record "Whse. Worksheet Line"; var WhseItemTrackingLines: Page "Whse. Item Tracking Lines"; var IsHandled: Boolean)
    begin
        if WhseWorksheetLine."Whse. Document Type" = WhseWorksheetLine."Whse. Document Type"::Assembly then begin
            WhseItemTrackingLines.SetSource(WhseWorksheetLine, Database::"Assembly Line");
            IsHandled := true;
        end;
    end;
}