Page Comparison

Use this event to

Template 1

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

Example 1

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Move", 'OnGetMoveOrderLines_OnAfterSetFromWarehouseActivityLine', '', true, true)]
    local procedure OnGetMoveOrderLines My01OnGetMoveOrderLines_OnAfterSetFromWarehouseActivityLine(_WhseActLineTake: Record "Warehouse Activity Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    var
        Item: Record Item;
    begin
        with _BaseOrderLineElement do begin
            Item        Item.Get(_BaseOrderLineElement.Get_ItemNumber());

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

Example 2

    // [Example] 2
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Move", 'OnGetMoveOrderLines_OnAfterSetFromWarehouseActivityLine', '', true, true)]
    local procedure OnGetMoveOrderLines 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        Item.Get(_BaseOrderLineElement.Get_ItemNumber());
            SetValue        _BaseOrderLineElement.SetValue('SpecialEquipmentCode', Item."Special Equipment Code");
            
        // Sort by custom tag
            Set        _BaseOrderLineElement.Set_Sorting1(_BaseOrderLineElement.GetValue('SpecialEquipmentCode'));
        end;
    end;

...