Page Comparison

...

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Receive", 'OnPostReceiveOrder_OnAddStepsToAnyHeader', '', true, true)]
    local procedure OnPostReceiveOrder_OnAddStepsToAnyHeader(var _OrderValues: Record "MOB Common Element"; _RecRef: RecordRef; var _StepsStepsElement: Record "MOB Steps Element")
    begin
    end;

Example

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Receive", 'OnPostReceiveOrder_OnAddStepsToAnyHeader', '', true, true)]
    local procedure MyOnPostReceiveOrder_OnAddStepsToAnyHeader(var _OrderValues: Record "MOB Common Element"; _RecRef: RecordRef; var _StepsStepsElement: 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
        _StepsStepsElement.Create_DateStep(10000, 'MyPostingDate');
        _StepsStepsElement.Set_header('Posting Date');
        _StepsStepsElement.Set_minDate(Today() - 10);
        _StepsStepsElement.Set_maxDate(Today());
    end;

Version History