...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
Use this event to
| Excerpt |
|---|
| Modify properties for any single header step (usually a customized step from another app) |
Description
- You may use this event to change any property e.g. the defaultValue
- This event is executed once for every Step added from OnGetPickOrderLines_OnAddStepsToAnyHeader
See also: OnGetPickOrderLines_OnAddStepsToAnyHeader
Template
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnGetPickOrderLines_OnAddStepsToAnyHeaderOnAfterAddStepOnAfterAddStepToAnyHeader', '', true, true)]
localprocedure OnGetPickOrderLines_OnAddStepsToAnyHeaderOnAfterAddStepOnAfterAddStepToAnyHeader(_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_OnAddStepsToAnyHeaderOnAfterAddStepOnAfterAddStepToAnyHeader', '', true, true)]
localprocedure MyOnGetPickOrderLines_OnAddStepsToAnyHeaderOnAfterAddStepOnAfterAddStepToAnyHeader(_RecRef: RecordRef; var _StepsElement: Record "MOB Steps Element")
begin
if _StepsElement.Get_name() = 'StagingHint'thenbegin
_StepsElement.Set_defaultValue('MyNewDefaultStagingHintValue');
_StepsElement.Save();
end;
end;
| Filter by label (Content by label) | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Version History
| Version | Changes |
|---|---|
| MOB5.34 | Introduced |