Page Comparison

Use this event to

Template 1

  [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine', '', true, true)]
    procedure OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine(_WhseShipmentLine: Record "Warehouse Shipment Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    begin
    end;

Template 2

...

Use this event to

Template 1

   [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ShipMOB WMS Move", 'OnGetShipOrderLinesOnGetMoveOrderLines_OnAfterSetFromWarehouseShipmentLineOnAfterSetFromWarehouseActivityLine', '', true, true)]
    procedure OnGetShipOrderLines OnGetMoveOrderLines_OnAfterSetFromWarehouseShipmentLine2OnAfterSetFromWarehouseActivityLine(_WhseShipmentLineWhseActLineTake: Record "Warehouse Shipment LineWarehouse Activity Line"; _TempReservationEntry: Record "Reservation Entry"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    begin
        // (optional parameter _TempReservationEntry can be used when specific knowledge of the associated Reservation Entry is required)MOB NS BaseDataModel Element")
    begin
    end;

Example 1

      [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ShipMOB WMS Move", 'OnGetShipOrderLinesOnGetMoveOrderLines_OnAfterSetFromWarehouseShipmentLineOnAfterSetFromWarehouseActivityLine', '', true, true)]
    procedure My01OnGetShipOrderLines My01OnGetMoveOrderLines_OnAfterSetFromWarehouseShipmentLineOnAfterSetFromWarehouseActivityLine(_WhseShipmentLineWhseActLineTake: Record "Warehouse Shipment LineWarehouse Activity Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    var
        Item: Record Item;
    begin
        with _BaseOrderLineElement do begin
            Item.Get(Get_ItemNumber());

            Set_DisplayLine5('Set from OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLineSet from OnMoveOnAfterSetFromWarehouseActivityLine');
            SetValue('SpecialEquimentCode', 'SpecialEquimentCode: ' + Item."Special Equipment Code");
        end;
    end;

Example 2

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ShipMOB WMS Move", 'OnGetShipOrderLinesOnGetMoveOrderLines_OnAfterSetFromWarehouseShipmentLineOnAfterSetFromWarehouseActivityLine', '', true, true)]
    procedure My02OnGetShipOrderLines My02OnGetMoveOrderLines_OnAfterSetFromWarehouseShipmentLineOnAfterSetFromWarehouseActivityLine(_WhseShipmentLineWhseActLineTake: Record "Warehouse Shipment LineWarehouse Activity Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    var
        Item: Record Item;
    begin
        // [Scenario] Sort lines by custom tag
        with _BaseOrderLineElement do begin
            
           

            // New custom tag
            Item.Get(Get_ItemNumber());
            SetValue('SpecialEquimentCode', Item."Special Equipment Code");

            // Sort by custom tag
            Set_Sorting1(CopyStr(GetValue('SpecialEquimentCode'), 1, MaxStrLen("Sorting1 (internal)")));
        end;
    end;

...