Info | ||
---|---|---|
| ||
|
...
// Create an ImageCapture header step that interrupts the posting of a pick.
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnPostPickOrder_OnAddStepsToWarehouseActivityHeader', '', true, true)]
localprocedure MyOnPostPickOrder_OnAddStepsToWarehouseActivityHeader(var _OrderValues: Record"MOB Common Element"; _WhseActivityHeader: Record"Warehouse Activity Header"; var _StepsElement: Record"MOB Steps Element")
begin
//Already collected, break to avoid adding the same new step indefinitely
if _OrderValues.HasValue('ImageCapture') then
exit;
_StepsElement.Create_ImageCaptureStep(50, 'ImageCapture');
_StepsElement.Set_helpLabel('Take a picture of the item');
end;
Step 2 - Handle the header step
...
//Step 2: Handle the step, saving the values in the Mob Wms Media queue.
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnPostPickOrder_OnBeforePostWarehouseActivityOrder', '', true, true)]
localprocedure MyOnPostPickOrder_OnBeforePostWarehouseActivityOrder(var _OrderValues: Record"MOB Common Element"; var _WhseActivityHeader: Record"Warehouse Activity Header")
var
MobMedia: Codeunit"MOB WMS Media";
ImageIdsAndNotes: Text;
begin
if _OrderValues.GetValue('ImageCapture') <>''thenbegin
ImageIdsAndNotes:=_OrderValues.GetValue('ImageCapture');
MobMedia.AddImageToMediaQueue(ImageIdsAndNotes);
end;
end;
...