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(1000050, 'ImageCapture', 'Take a Picture');
_StepsElement.Set_helpLabel('Take a picture of the item');
end;
Step 2 - Handle the header step
...
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pick", 'OnPostPickOrder_OnBeforePostWarehouseActivityOrder', '', true, true)]
localprocedure OnPostPickOrder_OnBeforePostWarehouseActivityOrder(var _OrderValues: Record"MOB Common Element"; var _WhseActivityHeader: Record"Warehouse Activity Header")
var
MobWmsLanguage: Codeunit"MOB WMS Language";
MobMedia: Codeunit"MOB WMS Media";
ImageIdsAndNotes: Text;
begin
ImageIdsAndNotes:=_OrderValues.GetValue('ImageCapture', true);
if ImageIdsAndNotes =''then
Error(MobWmsLanguage.GetMessage('NO_PICTURE_TO_ATTACH'));
MobMedia.AddImageToMediaQueue(ImageIdsAndNotes);
end;
...
ImageCapture Step in Pick
From BC, go to the Mobile WMS Media Queue page.
The picture and note were saved in Mob Wms Media Queue
...