Use this event to
...
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrders_OnIncludeSalesHeader', '', true, true)]
local procedure OnGetPickOrders_OnIncludeSalesHeader(_SalesHeader: Record "Sales Header"; var _HeaderFilters: Record "MOB NS Request Element"; var _HeaderFilters: Record "MOB NS Request Element"; var _IncludeInOrderList: Boolean)
begin
end;
Example
// [Example]: Do not include in order list if customer is blocked
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrders_OnIncludeSalesHeader', '', true, true)]
local procedure MyOnGetPickOrders_OnIncludeSalesHeader(_SalesHeader: Record "Sales Header"; var _HeaderFilters: Record "MOB NS Request Element"; var _HeaderFilters: Record "MOB NS Request Element"; var _IncludeInOrderList: Boolean)
var
Customer: Record Customer;
begin
if Customer.get(_SalesHeader."Sell-to Customer No.") and (Customer.Blocked <> Customer.Blocked::" ") then
_IncludeInOrderList := false;
end;
Filter by label (Content by label) | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
|
...