Use this event to
| Excerpt |
|---|
Populate values displayed at the mobile device for indented OrderLinesList-elements representing 'Consumption' |
...
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Assembly", 'OnGetAssemblyOrderLines_OnAfterSetFromAssemblyLine', '', true, true)]
local procedure OnGetAssemblyOrderLines_OnAfterSetFromAssemblyLine(_AssemblyLine: Record "Assembly Line"; _TrackingSpecification: Record "Tracking Specification"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
begin
end;
Example
// [Example] Display special equipment for this 'Consumption' item
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Assembly", 'OnGetAssemblyOrderLines_OnAfterSetFromAssemblyLine', '', true, true)]
local procedure MyOnGetAssemblyOrderLines_OnAfterSetFromAssemblyLine(_AssemblyLine: Record "Assembly Line"; _TrackingSpecification: Record "Tracking Specification"; var _BaseOrderLineElement: Record "MOB Ns BaseDataModel Element")
var
Item: Record Item;
begin
if _AssemblyLine.Type <> _AssemblyLine.Type::Item then
exit;
Item.Get(_AssemblyLine."No.");
if (Item."Special Equipment Code" <> '') then begin
_BaseOrderLineElement.Set_DisplayLine9(' ' + 'Using special equipment is mandatory'); // Indentation on Output Lines
_BaseOrderLineElement.SetValue('SpecialequipmentCode', 'SpecialequipmentCode: ' + Item."Special Equipment Code");
end else begin
_BaseOrderLineElement.Set_DisplayLine9('');
_BaseOrderLineElement.SetValue('SpecialEquipmentCode', '');
end;
end;
| Filter by label (Content by label) | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
...