Use this event to
Excerpt |
---|
Populate values in OrderLines-list Order Lines displayed at the mobile device (derived from Warehouse Receipt Activity Line). |
...
. |
...
Template
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ReceivePut Away", 'OnGetReceiveOrderLinesOnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine', '', true, true)]
procedure OnGetReceiveOrderLines OnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine(_WhseReceiptLineWhseActLineTake: Record "Warehouse Receipt Activity Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
begin
end;
Example
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS ReceivePut Away", 'OnGetReceiveOrderLinesOnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine', '', true, true)]
procedure OnGetReceiveOrderLines OnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine(_WhseReceiptLineWhseActLineTake: Record "Warehouse Receipt Activity Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
var
Item: Record Item;
begin
with _BaseOrderLineElement BaseOrderLineElement do begin
Item.Get(Get_ItemNumber());
Set_DisplayLine1DisplayLine5('Set from OnGetReceiveOrderLinesOnGetPutAwayOrderLines_OnAfterSetFromWarehouseReceiptLineOnAfterSetFromWarehouseActivityLine');
SetValue('SpecialEquimentCode', 'SpecialEquimentCode: ' Set_DisplayLine2('');+ Item."Special Equipment Code");
end;
end;
Example: Sort lines by custom tag
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Put Away", 'OnGetPutAwayOrderLines_OnAfterSetFromWarehouseActivityLine', '', true, true)]
procedure OnGetPutAwayOrderLines_OnAfterSetFromWarehouseActivityLine(_WhseActLineTake: Record "Warehouse Activity Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
var
Item: Record Item;
begin
with _BaseOrderLineElement do begin
// New custom tag
Item.Get(Get_ItemNumber());
SetValue('MyOnGetReceiveOrderLines_OnAfterSetFromWarehouseReceiptLineSpecialEquimentCode', 'OnGetReceiveOrderLines_OnAfterSetFromWarehouseReceiptLine Custom Tag for Item Number ' + _BaseOrderLineElement.Get_ItemNumber(."Special Equipment Code");
// Sort by custom tag
Set_Sorting1(GetValue('SpecialEquimentCode'));
end;
end;
Filter by label (Content by label) | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
|
...