Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

...

Excerpt

Populate values in Order Lines displayed at the mobile device (derived from Warehouse Activity Line).

Template

...

Use this event to

Excerpt

Populate values in Order Lines displayed at the mobile device (derived from Warehouse Shipment Line).


Template 1

  [EventSubscriber(ObjectType::CodeunitCodeunit::"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

  [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Ship", 'OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine''', true, true)]
    procedure OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine2(_WhseShipmentLine: Record "Warehouse Shipment Line"; _TempReservationEntry: Record "Reservation Entry"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel ElementMOB Ns BaseDataModel Element")
    begin
        // (optional parameter _TempReservationEntry can be used when specific knowledge of the associated Reservation Entry is required)
    end;


Example 1

  [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Put AwayMOB WMS Ship", 'OnGetPutAwayOrderLinesOnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine''', true true, true true)]
    procedure OnGetPutAwayOrderLines My01OnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine(_WhseActLineTakeWhseShipmentLineRecord "Warehouse Activity LineWarehouse Shipment Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel ElementMOB Ns BaseDataModel Element")
    var
     Item        ItemRecord Item;
    begin
     with        with _BaseOrderLineElement do begin
          Item            Item.Get(Get_ItemNumber());

          Set            Set_DisplayLine5('Set from OnGetPutAwayOrderLinesSet from OnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine');
          SetValue            SetValue('SpecialEquimentCode''SpecialEquimentCode: ' + Item Item."Special Equipment CodeSpecial Equipment Code");
     end        end;
    end;

Example: Sort lines by custom tag


Example 2

    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Put AwayMOB WMS Ship", 'OnGetPutAwayOrderLinesOnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine''', true true, true true)]
    procedure OnGetPutAwayOrderLines My02OnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine(_WhseActLineTakeWhseShipmentLineRecord "Warehouse Activity LineWarehouse Shipment Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel ElementMOB Ns BaseDataModel Element")
    var
     Item        ItemRecord Item;
    begin
     with        with _BaseOrderLineElement do begin
          // New custom tag
          Item            // New custom tag
            Item.Get(Get_ItemNumber());
          SetValue            SetValue('SpecialEquimentCode', Item Item."Special Equipment CodeSpecial Equipment Code");


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


Filter by label (Content by label)
showLabelsfalse
showSpacefalse
sorttitle
titleMore examples
excerptTypesimple
cqllabel = "bc" and label = "orderlines" and label = "example" and label = "onaftersetfrom"


Version History

VersionChanges
MOB5.00Introduced

...