| Info | ||
|---|---|---|
| ||
|
...
| Note |
|---|
You may validate the current steps value prior to returning new steps. In this case you must use the OnWhseInquiryOnCustomDocumentType event. |
Template
// [Template]
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Whse. Inquiry", 'OnWhseInquiry_OnAddSteps', '', true, true)]
local procedure OnWhseInquiry_OnAddSteps(_DocumentType: Text; var _RequestValues: Record "MOB NS Request Element"; var _Steps: Record "MOB Steps Element"; var _RegistrationTypeTracking: Text; var _IsHandled: Boolean)
begin
end;
Example
// [Example 1]
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Whse. Inquiry", 'OnWhseInquiry_OnAddSteps', '', true, true)]
procedure Ex01_OnWhseInquiry_OnAddSteps(_DocumentType: Text; var _RequestValues: Record "MOB NS Request Element"; var _Steps: Record "MOB Steps Element")
begin
case _DocumentType of
'ValidateMyLotNumber':
begin
_Steps.Create_TextStep(10, 'MyTextStep1');
_Steps.Set_defaultValue('MyTextDefaultValue1');
_Steps.Set_header('MyTextStep1 - ' + _RequestValues.Get_LotNumber()); // Reading value from already collected step
_Steps.Create_TextStep(20, 'MyTextStep2');
_Steps.Set_defaultValue('MyTextDefaultValue2');
_Steps.Set_header('MyTextStep2');
exit;
end;
'ValidateMyQuantity':
begin
_Steps.Create_TextStep(10, 'MyQtySteps1');
_Steps.Set_defaultValue('MyQtySteps1');
_Steps.Set_header('MyQtySteps1 - ' + Format(_RequestValues.Get_Quantity())); // Reading value from already collected step
_Steps.Create_TextStep(20, 'MyQtySteps2');
_Steps.Set_defaultValue('MyQtySteps2');
_Steps.Set_header('MyQtySteps2');
exit;
end;
else
exit;
end;
end;
Related change to application.cfg:
Each new DocumentType to be validated DocumentType must have a related change to the a service-section in the application.cfg. In this example, the service for the Pick page is modified. See further examples in the links below.
...