OnPostShipOrder_OnAddStepsToWarehouseShipmentHeader

Use this event to

Interrupt Warehouse Shipment posting and add extra steps (“Header Steps”) based on values already collected.

Description

Interrupt posting and add extra steps (“Header Steps”) based on values already collected.

• Add extra steps during posting (interrupt posting to collect addtional steps)
• Used for "conditional" steps i.e. when values from previously collected steps determines if the step are to be included
• Extra steps can be collected for the "header" only. Extra steps per document line are currently not supported for planned document types
• Posting are restarted (started over) when the additional steps have been collected on the mobile device
• Events are executed every time posting starts over and can be used to chain even more steps.

Steps with no "conditions" are better created using the OnGetShipOrderLines_OnAddStepsToWarehouseShipmentHeader-event.

Template

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnPostShipOrder_OnAddStepsToWarehouseShipmentHeader', '', true, true)]
    local procedure OnPostShipOrder_OnAddStepsToWarehouseShipmentHeader(var _OrderValues: Record "MOB Common Element"; _WhseShipmentHeader: Record "Warehouse Shipment Header"; var _StepsElement: Record "MOB Steps Element")
    begin
    end;

Example

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Ship", 'OnPostShipOrder_OnAddStepsToWarehouseShipmentHeader', '', true, true)]
    local procedure MyOnPostShipOrder_OnAddStepsToWarehouseShipmentHeader(var _OrderValues: Record "MOB Common Element"; _WhseShipmentHeader: Record "Warehouse Shipment Header"; var _StepsElement: Record "MOB Steps Element")
    begin
        // Break if some condition to include news step(s) is not met
        // if .... then
        //    exit;

        // Break if new datestep is already collected to prevent infinite loop
        if _OrderValues.HasValue('MyPostingDate') then
            exit;

        // Create a new date step for manually selecting Posting Date
        _StepsElement.Create_DateStep(10000, 'MyPostingDate');
        _StepsElement.Set_header('Posting Date');
        _StepsElement.Set_minDate(Today() - 10);
        _StepsElement.Set_maxDate(Today());
    end;

Version History