...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
Excerpt |
---|
Populate values in Order Lines displayed at the mobile device (derived from Warehouse Activity Line). |
Template
...
Use this event to
Excerpt |
---|
Populate values in Order Lines displayed at the mobile device (derived from Warehouse Shipment Line). |
Template 1
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine', '', true, true)]
procedure OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine(_WhseShipmentLine: Record "Warehouse Shipment Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
begin
end;
Template 2
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine', '', true, true)]
procedure OnGetShipOrderLines_OnAfterSetFromWarehouseShipmentLine2(_WhseShipmentLine: Record "Warehouse Shipment Line"; _TempReservationEntry: Record "Reservation Entry"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel ElementMOB Ns BaseDataModel Element")
begin
// (optional parameter _TempReservationEntry can be used when specific knowledge of the associated Reservation Entry is required)
end;
Example 1
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Put AwayMOB WMS Ship", 'OnGetPutAwayOrderLinesOnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine', '', true true, true true)]
procedure OnGetPutAwayOrderLines My01OnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine(_WhseActLineTakeWhseShipmentLine: Record "Warehouse Activity LineWarehouse Shipment Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel ElementMOB Ns BaseDataModel Element")
var
Item Item: Record Item;
begin
with with _BaseOrderLineElement do begin
Item Item.Get(Get_ItemNumber());
Set Set_DisplayLine5('Set from OnGetPutAwayOrderLinesSet from OnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine');
SetValue SetValue('SpecialEquimentCode', 'SpecialEquimentCode: ' + Item Item."Special Equipment CodeSpecial Equipment Code");
end end;
end;
Example: Sort lines by custom tag
Example 2
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Put AwayMOB WMS Ship", 'OnGetPutAwayOrderLinesOnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine', '', true true, true true)]
procedure OnGetPutAwayOrderLines My02OnGetShipOrderLines_OnAfterSetFromWarehouseActivityLineOnAfterSetFromWarehouseShipmentLine(_WhseActLineTakeWhseShipmentLine: Record "Warehouse Activity LineWarehouse Shipment Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel ElementMOB Ns BaseDataModel Element")
var
Item Item: Record Item;
begin
with with _BaseOrderLineElement do begin
// New custom tag
Item // New custom tag
Item.Get(Get_ItemNumber());
SetValue SetValue('SpecialEquimentCode', Item Item."Special Equipment CodeSpecial Equipment Code");
// Sort by custom tag
Set Sort by custom tag
Set_Sorting1(CopyStr(GetValue('SpecialEquimentCode'), 1, MaxStrLen("Sorting1 (internal)")));
end;
end;
Filter by label (Content by label) | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Version History
Version | Changes |
---|---|
MOB5.00 | Introduced |
...