tengo algo así en crystal
Local NumberVar str := 0;
Local NumberVar x;
x := {Comando.Quantity}/{Comando.PackQty};
Local NumberVar strLen :=
Local NumberVar i := 1;
While i <= X Do
(
i:= str + 1;
)
pero me manda un error se evaluo un ciclo mas de las veces permitidas