...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
Use this event to
Excerpt |
---|
Add filter conditions for Warehouse Receipt Headers Activity Headers that cannot be solved by OnSetFilter-event. |
...
Description
This event is triggered after filters have been applied to the Warehouse Receipt 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 Receipt Header Activity Header can be excluded from the OrderList response by setting the parameter _IncludeInOrderList to false.
...
Learn about Basic vs. Complex filtering
Template
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ReceiveMOB WMS Put Away", 'OnGetReceiveOrdersOnGetPutAwayOrders_OnIncludeWarehouseReceiptHeaderOnIncludeWarehouseActivityHeader', '', true, true)]
local procedure OnGetReceiveOrders OnGetPutAwayOrders_OnIncludeWarehouseReceiptHeaderOnIncludeWarehouseActivityHeader(_WhseReceiptHeaderWhseActHeader: Record "Warehouse Receipt HeaderWarehouse Activity Header"; var _HeaderFilters: Record "MOB NS Request Element"; var _IncludeInOrderList: Boolean)
begin
end;
Example:
...
Exclude Inventory Picks when the source document (the purchase order) is not released
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ReceiveMOB WMS Put Away", 'OnGetReceiveOrdersOnGetPutAwayOrders_OnIncludeWarehouseReceiptHeaderOnIncludeWarehouseActivityHeader', '', true, true)]
local procedure MyOnGetReceiveOrders MyOnGetPutAwayOrders_OnIncludeWarehouseReceiptHeaderOnIncludeWarehouseActivityHeader(_WhseReceiptHeaderWhseActHeader: Record "Warehouse Receipt Header"Warehouse Activity Header"; var _HeaderFilters: Record "MOB NS Request Element"; var _IncludeInOrderList: Boolean)
var
WhseReceiptLine PurchaseHeader: Record "Warehouse Receipt LinePurchase Header";
PurchaseHeader MobToolbox: RecordCodeunit "Purchase Header";
Vendor: Record VendorMOB Toolbox";
begin
if WhseReceiptLine.FindSet() then
repeat
if WhseReceiptLine (_WhseActHeader.Type = _WhseActHeader.Type::"Invt. Put-away") and (_WhseActHeader."Source Document" = WhseReceiptLine _WhseActHeader."Source Document"::"Purchase Order") then begin
PurchaseHeader if PurchaseHeader.Get(WhseReceiptLine_WhseActHeader."Source Subtype", WhseReceiptLine _WhseActHeader."Source No.");
if Vendor.Get and (MobToolbox.AsInteger(PurchaseHeader."Buy-from Vendor No.") and not (Vendor.Blocked < Vendor.Blocked::AllStatus) < MobToolbox.AsInteger(PurchaseHeader.Status::Released)) then
_IncludeInOrderList := false;
end;
until (WhseReceiptLine.Next() = 0) or not _IncludeInOrderList;
end;
Filter by label (Content by label) | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Version History
Version | Changes |
---|---|
MOB5.13 | Introduced |
...