Page Comparison

Use this event to

...

Template

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader', '', true, true)]
    procedure OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader(_WhseShipmentHeader: Record "Warehouse Shipment Header"; var _BaseOrderElement: Record "MOB NS BaseDataModel Element")
    begin
    end;

Example 1

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader', '', true, true)]
    procedure OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader(_WhseShipmentHeader: Record "Warehouse Shipment Header"; var _BaseOrderElement: Record "MOB NS BaseDataModel Element")
    begin
        with _BaseOrderElement do begin
            Set_DisplayLine5('Set from OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader');
            SetValue('MyOnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader', 'OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader Custom Tag for BackendID ' + Get_BackendID());
        end;
    end;

Example 2

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader', '', true, true)]
    procedure OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader(_WhseShipmentHeader: Record "Warehouse Shipment Header"; var _BaseOrderElement: Record "MOB NS BaseDataModel Element")
    begin
        with _BaseOrderElement do begin
            SetValue('AssignedUserID', 'Assigned to: ' + _WhseShipmentHeader."Assigned User ID");

            Set_Sorting1(CopyStr(GetValue('AssignedUserID'), 1, MaxStrLen("Sorting1 (internal)")));
            Set_Sorting2(CopyStr(Get_ItemNumber(), 1, MaxStrLen("Sorting2 (internal)")));
        end;
    end;

...