OnGetAssemblyOrderLines_OnAfterSetCurrentKey

Use this event to

Change sort order for the OrderLinesList at the mobile device. 

Description

You may use this event only to change sort order of the OrderLinesList-elements displayed at the mobile device. You cannot set any values from this event.

Sorting by existing fields

• Change sorting key

  • Use .SetCurrentKey(field)-function with any of the existing fields from the Line table (Record parameter on this event).
    
    

• Change sorting direction

  • Use .Ascending(true/false)-function. 
    
    

Sorting by custom fields

• Change sorting key 

  • Not possible from this event. Use OnGetAssemblyOrderLines_OnAfterSetFromAssemblyLine with the Set_Sorting1()-function instead.
    
    

• Change sorting direction

  • This requires two steps for custom fields:
  1. Use OnGetAssemblyOrderLines_OnAfterSetFromAssemblyLine with Set_Sorting1()-function as described above.
  2. Then use .Ascending()-function in this event.

Template

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Assembly", 'OnGetAssemblyOrderLines_OnAfterSetCurrentKey', '', true, true)]
    local procedure OnGetAssemblyOrderLines_OnAfterSetCurrentKey(var _BaseOrderLineElementView: Record "MOB Ns BaseDataModel Element")
    begin
    end;

Example

    // [Example]  Change sorting to Unit Of Measure, then Item Number BUT ensure 'Output' (Assembly Header) is still displayed prior to 'Consumption' (Assembly Lines)
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Assembly", 'OnGetAssemblyOrderLines_OnAfterSetCurrentKey', '', true, true)]
    local procedure MyOnGetAssemblyOrderLines_OnAfterSetCurrentKey(var _BaseOrderLineElementView: Record "MOB Ns BaseDataModel Element")
    begin
        _BaseOrderLineElementView.SetCurrentKey("Sorting1 (internal)", UnitOfMeasure, ItemNumber);
        _BaseOrderLineElementView.Ascending(true);
    end;

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Assembly", 'OnGetAssemblyOrderLines_OnAfterSetFromAssemblyHeader', '', true, true)]
    local procedure OnGetAssemblyOrderLines_OnAfterSetFromAssemblyHeader(_AssemblyHeader: Record "Assembly Header"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    begin
        _BaseOrderLineElement."Sorting1 (internal)" := Format(Database::"Assembly Header"); // '900'  (sort before '901')
    end;

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Assembly", 'OnGetAssemblyOrderLines_OnAfterSetFromAssemblyLine', '', true, true)]
    local procedure OnGetAssemblyOrderLines_OnAfterSetFromAssemblyLine(_AssemblyLine: Record "Assembly Line"; _TrackingSpecification: Record "Tracking Specification"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
    begin
        _BaseOrderLineElement."Sorting1 (internal)" := Format(Database::"Assembly Line"); // '901'  (sort after '900')
    end;

Version History