Use this event to
| Excerpt |
|---|
| Populate values on Order Lines displayed at the mobile device when derived from Transfer Line (Transfer Orders). |
...
Template
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrderLines_OnAfterSetFromTransferLine', '', true, true)]
procedure OnGetPickOrderLines_OnAfterSetFromTransferLine(_TransferLine: Record "Transfer Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
begin
end;
Example
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrderLines_OnAfterSetFromTransferLine', '', true, true)]
procedure MyOnGetPickOrderLines OnGetPickOrderLines_OnAfterSetFromTransferLine(_TransferLine: Record "Transfer Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
var
Item: Record Item;
begin
with _BaseOrderLineElement do begin
Item.Get(Get_ItemNumber()); // Get_ItemNumber() is referring to value already set for the BaseOrderLineElement prior to this event
if (Item."Special Equipment Code" <> '') then begin
Set_DisplayLine5('Using special equipment is mandatory');
SetValue('SpecialEquipmentCode', 'SpecialEquipmentCode: ' + Item."Special Equipment Code");
end else begin
Set_DisplayLine5('');
SetValue('SpecialEquipmentCode', '');
end;
end;
end;
| Filter by label (Content by label) | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
...