Page Comparison

Use this event to

...

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Put Away", 'OnGetPutAwayOrders_OnAfterSetFromWarehouseActivityHeader', '', true, true)]
        local procedure OnGetPutAwayOrders_OnAfterSetFromWarehouseActivityHeader(_WhseActHeader: Record "Warehouse Activity Header"; var _BaseOrderElement: Record "MOB Ns BaseDataModel Element")
    begin
    end;

Example

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Put Away", 'OnGetPutAwayOrders_OnAfterSetFromWarehouseActivityHeader', '', true, true)]
        local procedure My01OnGetPutAwayOrders_OnAfterSetFromWarehouseActivityHeader(_WhseActHeader: Record "Warehouse Activity Header"; var _BaseOrderElement: Record "MOB Ns BaseDataModel Element")
    begin
        _BaseOrderElement.Set_DisplayLine5('Set from OnGetPutAwayOrders_OnAfterSetFromWarehouseActivityHeader');
        _BaseOrderElement.SetValue('MyOnGetPutAwayOrders_OnAfterSetFromWarehouseActivityHeader', 'OnGetPutAwayOrders_OnAfterSetFromWarehouseActivityHeader Custom Tag for BackendID ' + _BaseOrderElement.Get_BackendID());
    end;

Example: Sort by custom tag

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Put Away", 'OnGetPutAwayOrders_OnAfterSetFromWarehouseActivityHeader', '', true, true)]
        local procedure My02OnGetPutAwayOrders_OnAfterSetFromWarehouseActivityHeader(_WhseActHeader: Record "Warehouse Activity Header"; var _BaseOrderElement: Record "MOB Ns BaseDataModel Element")
    begin
        _BaseOrderElement.SetValue('AssignedUserID', 'Assigned to: ' + _WhseActHeader."Assigned User ID");  // new custom tag
        _BaseOrderElement.Set_Sorting1(_BaseOrderElement.GetValue('AssignedUserID'));
        _BaseOrderElement.Set_Sorting2(_BaseOrderElement.Get_ItemNumber());
    end;

...