Use this event to
...
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrders_OnSetFilterWarehouseActivity', '', true, true)]
local procedure MyOnGetPickOrders_OnSetFilterWarehouseActivity01(_HeaderFilter: Record "MOB NS Request Element"; var _WhseActHeader: Record "Warehouse Activity Header"; var _WhseActLine: Record "Warehouse Activity Line"; var _IsHandled: Boolean)
begin
end;
Example 1: Modify standard header filter
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrders_OnSetFilterWarehouseActivity', '', true, true)]
local procedure MyOnGetPickOrders_OnSetFilterWarehouseActivity02(_HeaderFilter: Record "MOB NS Request Element"; var _WhseActHeader: Record "Warehouse Activity Header"; var _WhseActLine: Record "Warehouse Activity Line"; var _IsHandled: Boolean)
begin
// [Scenario] Overrule when the standard filter "Scanned Value".
// [Scenario] Instead of searching for Item No., use the value to filter Document no.
// [Scenario] Handle the filter, so standard filter is overruled
if _HeaderFilter.Name = 'ScannedValue' then begin
_WhseActHeader.SetRange("No.", _HeaderFilter."Value");
_IsHandled := true;
end;
end;
Example 2: Add custom filters to Standard headers
...