25
Hi team,
We are trying to create automatically the Pick from a Warehouse Shipment document when all items are available to be picked (to avoid "nothing to handle" error message in Warehouse people's operation). The only missing part is to run the native Create Pick Action that is available in Warehouse Shipment document, we are not sure how to add the Warehouse Shipment input to run the code unit.
Do you have any ideas on how to proceed? I appreciate the help.
Thank you,
Hi,
This is the procedure in standard that is creating Pick from Warehouse document. You can get inspiration from this. But make sure you have done proper validations to avoid inconsistencies.
Share
Report
All responses (
Answers (
procedure CreatePickDoc(var WhseShptLine: Record "Warehouse Shipment Line"; WhseShptHeader2: Record "Warehouse Shipment Header")
var
IsHandled: Boolean;
begin
IsHandled := false;
OnCreatePickDocOnBeforeCreatePickDoc(Rec, WhseShptLine, WhseShptHeader2, HideValidationDialog, IsHandled);
if IsHandled then
exit;
WhseShptHeader2.TestField(Status, WhseShptHeader.Status::Released);
WhseShptLine.SetFilter(Quantity, '>0');
WhseShptLine.SetRange("Completely Picked", false);
if WhseShptLine.Find('-') then
CreatePickDocFromWhseShpt(WhseShptLine, WhseShptHeader2, HideValidationDialog)
else
if not HideValidationDialog then
Message(Text011);
end;
