Skip to end of metadata
Go to start of metadata

You are viewing an old version of this page. View the current version.

Compare with Current View Page History

« Previous Version 2 Next »

Use this event to

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

Template 1

   [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Move", 'OnGetMoveOrderLines_OnAfterSetFromWarehouseActivityLine''', true, true)]
    procedure OnGetMoveOrderLines_OnAfterSetFromWarehouseActivityLine(_WhseActLineTake: Record "Warehouse Activity Line"; var _BaseOrderLineElement: Record "MOB NS BaseDataModel Element")
    begin
    end;


Example 1

    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Move", 'OnGetMoveOrderLines_OnAfterSetFromWarehouseActivityLine''', true, true)]
    procedure My01OnGetMoveOrderLines_OnAfterSetFromWarehouseActivityLine(_WhseActLineTake: Record "Warehouse 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 OnMoveOnAfterSetFromWarehouseActivityLine');
            SetValue('SpecialEquimentCode''SpecialEquimentCode: ' + Item."Special Equipment Code");
        end;
    end;

Example 2

[EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Move", 'OnGetMoveOrderLines_OnAfterSetFromWarehouseActivityLine''', true, true)]
    procedure My02OnGetMoveOrderLines_OnAfterSetFromWarehouseActivityLine(_WhseActLineTake: Record "Warehouse 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;

More examples


Version History

VersionChanges
MOB5.00Introduced


  • No labels