Page Comparison

Use this event to

...

This event is executed after each of these the following events have has been executed already:

• OnGetReceiveOrderLines_OnAfterSetFromWarehouseReceiptLine
• OnGetReceiveOrderLines_OnAfterSetFromPurchaseLine
• OnGetReceiveOrderLines_OnAfterSetFromTransferLine
• OnGetReceiveOrderLines_OnAfterSetFromSalesReturnLine

...

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Receive", 'OnGetReceiveOrderLines_OnAfterSetFromAnyLine', '', true, true)]
    local procedure OnGetReceiveOrderLines_OnAfterSetFromAnyLine(_RecRef: RecordRef; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    begin
    end;

Example

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Receive", 'OnGetReceiveOrderLines_OnAfterSetFromAnyLine', '', true, true)]
    local procedure My01OnGetReceiveOrderLines_OnAfterSetFromAnyLine(_RecRef: RecordRef; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    var
        Item: Record Item;
    begin
        _BaseOrderLineElement.Set_DisplayLine2('Set from OnReceiveOnAfterSetFromAnyLine');

        // Under-/OverDeliveryValidation - The choices are: None, Warn, Block
        _BaseOrderLineElement.Set_UnderDeliveryValidation('None');
        _BaseOrderLineElement.Set_OverDeliveryValidation('None');

        Item.Get(_BaseOrderLineElement.Get_ItemNumber());
        _BaseOrderLineElement.SetValue('SpecialEquimentCode', Item."Special Equipment Code");
    end;

Example: Sort lines by custom tag

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Receive", 'OnGetReceiveOrderLines_OnAfterSetFromAnyLine', '', true, true)]
    local procedure My02OnGetReceiveOrderLines_OnAfterSetFromAnyLine(_RecRef: RecordRef; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    var
        Item: Record Item;
    begin
        // New custom tag
        Item.Get(_BaseOrderLineElement.Get_ItemNumber());
        _BaseOrderLineElement.SetValue('SpecialEquimentCode', Item."Special Equipment Code");

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

...