Use this event to
| Excerpt |
|---|
Populate values in Output Lines displayed at the mobile device. |
...
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Lookup", 'OnLookupOnProdOutput_OnAfterSetFromProductionOutput', '', true, true)]
local procedure OnLookupOnProdOutput_OnAfterSetFromProductionOutput(_ProdOrderLine: Record "Prod. Order Line"; _ProdOrderRtngLine: Record "Prod. Order Routing Line"; _TrackingSpecification: Record "Tracking Specification"; var _LookupResponseElement: Record "MOB NS WhseInquery Element")
begin
end;
Example
// [Example] Display special equipment for the item
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Lookup", 'OnLookupOnProdOutput_OnAfterSetFromProductionOutput', '', true, true)]
local procedure MyOnLookupOnProdOutput_OnAfterSetFromProductionOutput(_ProdOrderLine: Record "Prod. Order Line"; _ProdOrderRtngLine: Record "Prod. Order Routing Line"; _TrackingSpecification: Record "Tracking Specification"; var _LookupResponseElement: Record "MOB NS WhseInquery Element")
var
Item: Record Item;
begin
Item.Get(_LookupResponseElement.Get_ItemNumber()); // Get_ItemNumber() is referring to value already set for the LookupResponseElement prior to this event
if (Item."Special Equipment Code" <> '') then begin
_LookupResponseElement.Set_DisplayLine9('Using special equipment is mandatory');
_LookupResponseElement.SetValue('SpecialequipmentCode', 'SpecialequipmentCode: ' + Item."Special Equipment Code");
end else begin
_LookupResponseElement.Set_DisplayLine9('');
_LookupResponseElement.SetValue('SpecialEquipmentCode', '');
end;
end;
| Filter by label (Content by label) | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
...