To implement this hotfix, you must have a developer license.
You do not have to have rights to the data stores unless you have to perform data repair.
function in the Whse. Worksheet Line table (7326) as follows:
...
LOCAL PROCEDURE CheckAvailableQtyBase@2() AvailableQtyToPickBase : Decimal;
VAR
AvailableQtyBase@1000 : Decimal;
LineReservedQtyBase@1001 : Decimal;
BEGIN
// Delete the following lines.
LineReservedQtyBase :=
WMSMgt.CalcLineReservedQtyonInvt(
"Source Type","Source Subtype","Source No.",
"Source Line No.","Source Subline No.",
'','');
AvailableQtyBase := CalcAvailableQtyBase(FALSE);
AvailableQtyToPickBase := AvailableQtyBase + LineReservedQtyBase + xRec."Qty. to Handle (Base)";
// End of the lines.
END;
PROCEDURE AssignedQtyOnReservedLines@29() : Decimal;
VAR
WhseWkshLine@1000 : Record 7326;
...
...
LOCAL PROCEDURE CheckAvailableQtyBase@2() AvailableQtyToPickBase : Decimal;
VAR
AvailableQtyBase@1000 : Decimal;
LineReservedQtyBase@1001 : Decimal;
BEGIN
// Add the following lines.
IF "Build Kit" THEN
AvailableQtyToPickBase := CalcAvailableKitQty(Rec,FALSE)
ELSE BEGIN
LineReservedQtyBase :=
WMSMgt.CalcLineReservedQtyonInvt(
"Source Type","Source Subtype","Source No.",
"Source Line No.","Source Subline No.",
'','');
AvailableQtyBase := CalcAvailableQtyBase(FALSE);
AvailableQtyToPickBase := AvailableQtyBase + LineReservedQtyBase + xRec."Qty. to Handle (Base)";
END;
// End of the lines.
END;
PROCEDURE AssignedQtyOnReservedLines@29() : Decimal;
VAR
WhseWkshLine@1000 : Record 7326;
...