Why do you need this change?
I would like to request this change to make it possible to pick from and to the same bin.
Describe the request
I would like to propose to replace the code below in table 5767 warehouse activity line, in the procedure checkinvalidbincode:
if ("Location Code" = WarehouseActivityLine."Location Code") and
("Bin Code" = WarehouseActivityLine."Bin Code") and
("Unit of Measure Code" = WarehouseActivityLine."Unit of Measure Code")
then
Error(Text019, Format("Action Type"), Format(WarehouseActivityLine."Action Type"), Location.Code);
To replace it with a call to a new procedure below:
local procedure CompareWarehouseActivityLineBin(Rec, WarehouseActivityLine)
var
IsEqual: Boolean;
begin
IsEqual := ("Location Code" = WarehouseActivityLine."Location Code") and
("Bin Code" = WarehouseActivityLine."Bin Code") and
("Unit of Measure Code" = WarehouseActivityLine."Unit of Measure Code");
OnBeforeCompareWarehouseActivityLineBin(Rec, WarehouseActivityLine, IsEqual);
if IsEqual then
Error(Text019, Format("Action Type"), Format(WarehouseActivityLine."Action Type"), Location.Code);
end;
[IntegrationEvent(false, false)]
local procedure OnBeforeCompareWarehouseActivityLineBin(WarehouseActivityLine: Record "Warehouse Activity Line"; WarehouseActivityLine2: Record "Warehouse Activity Line";var IsEqual: Boolean)
begin
end;
Why do you need this change?
I would like to request this change to make it possible to pick from and to the same bin.
Describe the request
I would like to propose to replace the code below in table 5767 warehouse activity line, in the procedure checkinvalidbincode:
To replace it with a call to a new procedure below: