Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

Use this event to

...

Use this event to return extra steps based on already collected values. 

Info

You may (optionally) validate the current steps value prior to returning new steps. In this case you must use the OnWhseInquiryOnCustomDocumentType event.

If the OnWhseInquiryOnCustomDocumentTypeAsXml event was used for such validation the full response Xml has been generated already and cannot be further modified by this event.



Template

    // [Template]
    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Whse. Inquiry", 'OnWhseInquiry_OnAddSteps''', true, true)]
    local procedure OnWhseInquiry_OnAddSteps(_DocumentType: Textvar _RequestValues: Record "MOB NS Request Element"; var _Steps: Record "MOB Steps Element"; var _RegistrationTypeTracking: Textvar _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")
    var
        RequestValues: Record "MOB NS Request Element" temporary;
    begin
        case _DocumentType of
            'ValidateMyLotNumber':
                begin
                    _Steps.Create_TextStep(10, 'MyTextStep1');
                    _Steps.Set_defaultValue('MyTextDefaultValue1');
                    _Steps.Set_header('MyTextStep1 - ' + _RequestValues.Get_LotNumber());

                    _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()));

                    _Steps.Create_TextStep(20, 'MyQtySteps2');
                    _Steps.Set_defaultValue('MyQtySteps2');
                    _Steps.Set_header('MyQtySteps2');
                    exit;
                end;
            else
                exit;
        end;
    end;


Filter by label (Content by label)
showLabelsfalse
showSpacefalse
sorttitle
titleMore examples
excerptTypesimple
cqllabel = "bc" and label = "example" and label in ("onwhseinquiryoncustomdocumenttypeasxml","onwhseinquiryonaddsteps","onwhseinquiryoncustomdocumenttype")

...