...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
Use this event to
| Excerpt |
|---|
| Set custom values On "lookup PostShipment" values for <LookupResponse>-elements derived from Warehouse Shipment Header. |
Sample request
<request name="Lookup" created="2019-08-14T10:39:46+02:00" xmlns="http://schemas.microsoft.com/Dynamics/Mobile/2007/04/Documents/Request">
<requestData name="Lookup">
<LocationFilter>WHITE</LocationFilter>
<ShipmentNoFilter>SH000004</ShipmentNoFilter>
<LookupType>PostShipment</LookupType>
</requestData>
</request>
Template
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Lookup", 'OnLookupOnPostShipment_OnAfterSetFromWarehouseShipmentHeader', '', true, true)]
procedure OnLookupOnPostShipment_OnAfterSetFromWarehouseShipmentHeader(_WhseShipmentHeader: Record "Warehouse Shipment Header"; var _LookupResponseElement: Record "MOB NS WhseInquery Element")
begin
end;
Example
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Lookup", 'OnLookupOnPostShipment_OnAfterSetFromWarehouseShipmentHeader', '', true, true)]
procedure MyOnLookupOnPostShipment_OnAfterSetFromWarehouseShipmentHeader(_WhseShipmentHeader: Record "Warehouse Shipment Header"; var _LookupResponseElement: Record "MOB NS WhseInquery Element")
begin
with _LookupResponseElement do begin
Set_DisplayLine1('Set from OnPostShipmentOnAfterSetFromWhseShipmentHeader');
SetValue('ShippingAgentCode', 'OnPostShipmentOnAfterSetFromWhseShipmentHeader Custom Tag for Shipping Agent Code ' + _WhseShipmentHeader."Shipping Agent Code");
end;
end;
Version History
| Version | Changes |
|---|---|
| MOB5.00 | Introduced |
...