Use this event to

Populate fields at Warehouse Shipment Header when posting ToteShipping.

Template

// [Template]
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnToteShipping_OnBeforeModifyWarehouseShipmentHeader', '', true, true)]
local procedure OnPostAdhocRegistrationOnToteShipping_OnBeforeModifyWarehouseShipmentHeader(var _RequestValues: Record "MOB NS Request Element"; _ToteFilter: Text; var _WhseShptHeader: Record "Warehouse Shipment Header")
begin
end;

Example

For you to read step values "ShippingAgentCode" and "ShippingAgentServiceCode" you must first create these steps: See OnGetRegistrationConfiguration_OnAddSteps

// [Example]
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnToteShipping_OnBeforeModifyWarehouseShipmentHeader', '', true, true)]
local procedure MyOnPostAdhocRegistrationOnToteShipping_OnBeforeModifyWarehouseShipmentHeader(var _RequestValues: Record "MOB NS Request Element"; _ToteFilter: Text; var _WhseShptHeader: Record "Warehouse Shipment Header")
var
ShippingAgentCode: Code[10];
ShippingAgentServiceCode: Code[10];
begin

ShippingAgentCode := CopyStr(_RequestValues.GetValue('ShippingAgentCode'), 1, MaxStrLen(ShippingAgentCode));
ShippingAgentServiceCode := CopyStr(_RequestValues.GetValue('ShippingAgentServiceCode'), 1, MaxStrLen(ShippingAgentServiceCode));

_WhseShptHeader.Validate("Shipping Agent Code", ShippingAgentCode);
_WhseShptHeader.Validate("Shipping Agent Service Code", ShippingAgentServiceCode);
end;

More examples

There are no items with the selected labels at this time.

Version History

Version	Changes
MOB5.17	Introduced

Browser not supported