Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

Use this event to

...

Template

  [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Pick", 'OnGetPickOrders_OnSetFilterTransferOrder''', true, true)]
    procedure OnGetPickOrders_OnSetFilterTransferOrder(_HeaderFilter: Record "MOB NS Request Element"; var _TransferHeader: Record "Transfer Header"; var _TransferLine: Record "Transfer Line"; var _IsHandled: Boolean)
    begin
    end;

 

Example 1:

    // [Example] Handle new custom filter 'ShippingAgentCode' - Only show Transfer Orders with specific Shipping Agent Code
    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Pick", 'OnGetPickOrders_OnSetFilterTransferOrder''', true, true)]
    procedure MyOnGetPickOrders_OnSetFilterTransferOrder(_HeaderFilter: Record "MOB NS Request Element"; var _TransferHeader: Record "Transfer Header"; var _TransferLine: Record "Transfer Line"; var _IsHandled: Boolean)
    begin
        // [Scenario] Handle new custom filter 'ShippingAgentCode' - Only show Transfer Orders with specific Shipping Agent Code
        if _HeaderFilter.Name = 'ShippingAgentCode' then begin
            _TransferHeader.SetRange("Shipping Agent Code", _HeaderFilter."Value");
            _IsHandled := true;
        end;
    end;



Example 2: Add custom filters to Standard headers

...