Page Comparison

Use this event to

...

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrderLines_OnAddStepsToAnyHeaderOnAfterAddStep', '', true, true)]
    localprocedure OnGetPickOrderLines_OnAddStepsToAnyHeaderOnAfterAddStep(_RecRef: RecordRef; var _StepsElement: Record "MOB Steps Element")
    begin
    end;

Example

    //
    // [Example]: Update defaultvalue for a custom header step  (a step created from another app)
    //

    // Imitate some custom step from another app (for this example, mirror the Pack&Ship StagingHint-step)
    // Creating a new step should really happen in the other app and are included here for the example only.
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrderLines_OnAddStepsToAnyHeader', '', true, true)]
    localprocedure OnGetPickOrderLines_OnAddStepsToAnyHeader(_RecRef: RecordRef; var _StepsElement: Record "MOB Steps Element")
    var
        MobLanguage: Codeunit "MOB WMS Language";
    begin
        _StepsElement.Create_TextStep(61020, 'StagingHint');
        _StepsElement.Set_header('Staging Hint');
        _StepsElement.Set_label('');
        _StepsElement.Set_helpLabel('Shipment area staging bin');
        _StepsElement.Set_defaultValue('');
        _StepsElement.Set_length(50);
        _StepsElement.Set_optional(true);
    end;

    // Update properties for an existing header step (usually a customized step from another app)
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrderLines_OnAddStepsToAnyHeaderOnAfterAddStep', '', true, true)]
    localprocedure MyOnGetPickOrderLines_OnAddStepsToAnyHeaderOnAfterAddStep(_RecRef: RecordRef; var _StepsElement: Record "MOB Steps Element")
    begin
        if _StepsElement.Get_name() = 'StagingHint'thenbegin
            _StepsElement.Set_defaultValue('MyNewDefaultStagingHintValue');
            _StepsElement.Save();
        end;
    end;

...