...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
Use this event to
| Excerpt |
|---|
Populate values in Orders displayed at the mobile device (derived from Warehouse Shipments). |
Template
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ShipMOB WMS Move", 'OnGetShipOrdersOnGetMoveOrders_OnAfterSetFromWarehouseShipmentHeaderOnAfterSetFromWarehouseActivityHeader', '', true, true)]
local procedure OnGetShipOrders OnGetMoveOrders_OnAfterSetFromWarehouseShipmentHeaderOnAfterSetFromWarehouseActivityHeader(var _WhseShipmentHeaderBaseOrderElement: Record "Warehouse Shipment HeaderMOB NS BaseDataModel Element"; var _BaseOrderElementWhseActHeader: Record "MOB NS BaseDataModel ElementWarehouse Activity Header")
begin
end;
Example 1
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ShipMOB WMS Move", 'OnGetShipOrdersOnGetMoveOrders_OnAfterSetFromWarehouseShipmentHeaderOnAfterSetFromWarehouseActivityHeader', '', true, true)]
local procedure OnGetShipOrders My01OnGetMoveOrders_OnAfterSetFromWarehouseShipmentHeaderOnAfterSetFromWarehouseActivityHeader(var _WhseShipmentHeaderBaseOrderElement: Record "Warehouse Shipment HeaderMOB NS BaseDataModel Element"; var _BaseOrderElementWhseActHeader: Record "MOB NS BaseDataModel ElementWarehouse Activity Header")
begin
with _BaseOrderElement do begin
Set_BaseOrderElement.Set_DisplayLine5('Set from OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader');
SetValue _BaseOrderElement.SetValue('MyOnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader', 'OnGetShipOrders_OnAfterSetFromWarehouseShipmentHeader Custom Tag for BackendID ' + Get _BaseOrderElement.Get_BackendID());
end;
end;
Example 2
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ShipMOB WMS Move", 'OnGetShipOrdersOnGetMoveOrders_OnAfterSetFromWarehouseShipmentHeaderOnAfterSetFromWarehouseActivityHeader', '', true, true)]
local procedure OnGetShipOrders My02OnGetMoveOrders_OnAfterSetFromWarehouseShipmentHeaderOnAfterSetFromWarehouseActivityHeader(var _WhseShipmentHeaderBaseOrderElement: Record "Warehouse Shipment HeaderMOB NS BaseDataModel Element"; var _BaseOrderElementWhseActHeader: Record "MOB NS BaseDataModel ElementWarehouse Activity Header")
begin
with _BaseOrderElement do begin
SetValue_BaseOrderElement.SetValue('AssignedUserID', 'Assigned to: ' + _WhseShipmentHeaderWhseActHeader."Assigned User ID");
Set _BaseOrderElement.Set_Sorting1(CopyStr(_BaseOrderElement.GetValue('AssignedUserID'), 1, MaxStrLen("Sorting1 (internal)")));
Set _BaseOrderElement.Set_Sorting2(CopyStr(_BaseOrderElement.Get_ItemNumber(), 1, MaxStrLen("Sorting2 (internal)")));
end;
end;
| Filter by label (Content by label) | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Version History
| Version | Changes |
|---|---|
| MOB5.00 | Introduced |
...