OnGetPutAwayOrders_OnIncludeWarehouseActivityHeader

Use this event to

Add filter conditions for Warehouse Activity Headers that cannot be solved by OnSetFilter-event.

Description

This event is triggered after filters have been applied to the Warehouse Activity Header. The event should be used only when it is not possible to use OnSetFilter-event to solve if the Header should be included in the OrderList response.

The Warehouse Activity Header can be excluded from the OrderList response by setting the parameter _IncludeInOrderList to false.

Template

[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Put Away", 'OnGetPutAwayOrders_OnIncludeWarehouseActivityHeader', '', true, true)]
procedure OnGetPutAwayOrders_OnIncludeWarehouseActivityHeader(_WhseActHeader: Record "Warehouse Activity Header"; var _IncludeInOrderList: Boolean)
begin
end;

Example: Don't include Invt. Picks when the source doc.(Purchase Order) is not released.

[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Put Away", 'OnGetPutAwayOrders_OnIncludeWarehouseActivityHeader', '', true, true)]
procedure OnGetPutAwayOrders_OnIncludeWarehouseActivityHeader(_WhseActHeader: Record "Warehouse Activity Header"; var _IncludeInOrderList: Boolean)
var
    PurchaseHeader: Record "Purchase Header";
begin
    if (_WhseActHeader.Type = _WhseActHeader.Type::"Invt. Put-away") and (_WhseActHeader."Source Document" = _WhseActHeader."Source Document"::"Purchase Order") then
        if PurchaseHeader.Get(_WhseActHeader."Source Subtype", _WhseActHeader."Source No.") and (PurchaseHeader.Status < PurchaseHeader.Status::Released) then
            _IncludeInOrderList := false;
end;

Version History