Page Comparison

Use this event to

Template 1

      [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine', '', true, true)]
    local procedure OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine(_WhseShipmentLine: Record "Warehouse Shipment Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    begin
    end;

Template 2

      [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine', '', true, true)]
    local procedure OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine2(_WhseShipmentLine: Record "Warehouse Shipment Line"; _TempReservationEntry: Record "Reservation Entry"; var _BaseOrderLineElement: Record "MOB 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::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine', '', true, true)]
    local procedure My01OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine(_WhseShipmentLine: Record "Warehouse Shipment 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 OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine');
            SetValue        _BaseOrderLineElement.SetValue('SpecialEquipmentCode', 'SpecialEquipmentCode: ' + Item."Special Equipment Code");
        end;
    end;

Example 2

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine', '', true, true)]
    local procedure My02OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine(_WhseShipmentLine: Record "Warehouse Shipment Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    var
        Item: Record Item;
    begin
        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;

...