OnGetCountOrderLines_OnAfterSetFromAnyLine

Use this event to

Populate values on Order Lines displayed at the mobile device (derived from any of two associated line tables). Parameters include a RecRef-instance for the line table.

This event is executed after following events has been executed

• OnGetCountOrderLines_OnAfterSetFromWarehouseJournalLine
• OnGetCountOrderLines_OnAfterSetFromItemJournalLine
  
  

Template

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

Example 1

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Count", 'OnGetCountOrderLines_OnAfterSetFromAnyLine', '', true, true)]
    local procedure MyOnGetCountOrderLines_OnAfterSetFromAnyLine(_RecRef: RecordRef; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    var
        Item: Record Item;
    begin
        _BaseOrderLineElement.Set_DisplayLine2('Set from OnCountOnAfterSetFromAnyLine');

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

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

Example 2

    // [Example]: Sort by custom tag
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Count", 'OnGetCountOrderLines_OnAfterSetFromAnyLine', '', true, true)]
    local procedure SortByCustomTag_OnGetCountOrderLines_OnAfterSetFromAnyLine(_RecRef: RecordRef; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    begin
        _BaseOrderLineElement.Set_Sorting1(CopyStr(_BaseOrderLineElement.Get_FromBin(), 1, MaxStrLen(_BaseOrderLineElement."Sorting1 (internal)")));
        _BaseOrderLineElement.Set_Sorting2(CopyStr(_BaseOrderLineElement.Get_ItemNumber(), 1, MaxStrLen(_BaseOrderLineElement."Sorting2 (internal)")));
    end;

Version History