Use this event to
Excerpt |
---|
Validate or update Mobile WMS Registration values during ToteShipping. |
...
Code to be executed prior to posting via standard posting routines. |
Description
The event can be used to call functions on the standard posting codeunit before run to i.e. print document on posting.
Template
// [Template]
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnToteShipping_OnBeforeModifyRegistrationOnBeforeRunWhsePostShipment', '', true, true)]
local procedure OnPostAdhocRegistrationOnToteShipping_OnBeforeModifyRegistratioOnBeforeRunWhsePostShipment(var _WhseShptLine: Record "Warehouse Shipment Line"; var _RequestValuesWhsePostShipment: RecordCodeunit "MOB NS Request Element"; var _Registration: Record "MOB WMS Registration"Whse.-Post Shipment")
begin
end;
Example
// [Example]
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnToteShipping_OnBeforeModifyRegistrationOnBeforeRunWhsePostShipment', '', true, true)]
local procedure MyOnPostAdhocRegistrationOnToteShipping_OnBeforeModifyRegistrationOnBeforeRunWhsePostShipment(var _WhseShptLine: Record "Warehouse Shipment Line"; var _RequestValuesWhsePostShipment: RecordCodeunit "MOB NS Request Element"; var _Registration: Record "MOB WMS Registration"Whse.-Post Shipment")
var
RegisteredToteID: Text;
begin
RegisteredToteID := _Registration."Tote ID";
if not RegisteredToteID.Contains(_RequestValues.GetValue('ToteID')) then
_Registration.FieldError("Tote ID");
// Assign any field at MobWmsRegistration here...
// ...
_WhsePostShipment.SetPrint(true);
end;
Filter by label (Content by label) | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Version History
Version | Changes |
---|---|
MOB5.17 | Introduced |
...