Use this event to
...
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrders_OnSetFilterTransferOrder', '', true, true)]
local 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: Only Transfer Orders with specific Shipping Agent Code
// [Example]: Handle new custom filter 'ShippingAgentCode' - Only show Transfer Orders with specific Shipping Agent Code
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrders_OnSetFilterTransferOrder', '', true, true)]
local procedure MyOnGetPickOrders_OnSetFilterTransferOrder(_HeaderFilter: Record "MOB NS Request Element"; var _TransferHeader: Record "Transfer Header"; var _TransferLine: Record "Transfer Line"; var _IsHandled: Boolean)
begin
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
...