Use this event to
| Excerpt |
|---|
| Populate values on Order Lines displayed at the mobile device when derived from Transfer Line (Transfer Orders). |
If your code is not specific for Transfer Lines consider using the OnGetPickOrderLines_OnAfterSetFromAnyLine event.
Template
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrderLines_OnAfterSetFromTransferLine', '', true, true)]
local 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)]
local procedure OnGetPickOrderLines MyOnGetPickOrderLines_OnAfterSetFromTransferLine(_TransferLine: Record "Transfer Line"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
var
Item: Record Item;
begin
with _BaseOrderLineElement do begin
Item Item.Get(_BaseOrderLineElement.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 _BaseOrderLineElement.Set_DisplayLine5('Using special equipment is mandatory');
SetValue _BaseOrderLineElement.SetValue('SpecialEquipmentCodeSpecialequipmentCode', 'SpecialEquipmentCodeSpecialequipmentCode: ' + Item."Special Equipment Code");
end else begin
Set _BaseOrderLineElement.Set_DisplayLine5('');
SetValue _BaseOrderLineElement.SetValue('SpecialEquipmentCode', '');
end;
end;
end;
| Filter by label (Content by label) | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
...