Page Comparison

Use this event to

...

Template

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ReceiveMOB WMS Put Away", 'OnGetReceiveOrderLinesOnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine', '', true true, true true)]
    local procedure OnGetReceiveOrderLines OnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine(_WhseReceiptLineWhseActLineTake: Record "Warehouse Receipt LineWarehouse Activity Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel ElementMOB Ns BaseDataModel Element")
    begin
    end;

Example

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ReceiveMOB WMS Put Away", 'OnGetReceiveOrderLinesOnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine', '', true true, true true)]
    local procedure OnGetReceiveOrderLines My01OnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine(_WhseReceiptLineWhseActLineTake: Record "Warehouse Receipt LineWarehouse Activity Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel ElementMOB Ns BaseDataModel Element")
begin
     with _BaseOrderLineElement do begin    var
        Item: Record Item;
    begin
        Item.Get(_BaseOrderLineElement.Get_ItemNumber());

           _BaseOrderLineElement.Set_DisplayLine1DisplayLine5('Set from OnGetReceiveOrderLinesSet from OnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine');
        _BaseOrderLineElement.SetValue('SpecialEquimentCode', 'SpecialEquimentCode: ' + Item."Special Equipment Code");
    end;

Example: Sort lines by custom tag

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Put Away",   Set_DisplayLine2('');
          SetValue('MyOnGetReceiveOrderLines_OnAfterSetFromWarehouseReceiptLine', 'OnGetReceiveOrderLines_OnAfterSetFromWarehouseReceiptLine Custom Tag for Item Number ' + _'OnGetPutAwayOrderLines_OnAfterSetFromWarehouseActivityLine', '', true, true)]
    local procedure My02OnGetPutAwayOrderLines_OnAfterSetFromWarehouseActivityLine(_WhseActLineTake: Record "Warehouse Activity Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    var
        Item: Record Item;
    begin
        // New custom tag
        Item.Get(_BaseOrderLineElement.Get_ItemNumber());
     end;
        _BaseOrderLineElement.SetValue('SpecialEquimentCode', Item."Special Equipment Code");

        // Sort by custom tag
        _BaseOrderLineElement.Set_Sorting1(_BaseOrderLineElement.GetValue('SpecialEquimentCode'));
    end;

...