UNA DUDA

Hola a todos…. De antemano GRACIAS!!!!

Esto se puede o alguna forma de hacer algo parecido?

DECLARE

Rec RECORD;

Var1 VARCHAR;

Var2 VARCHAR;

Var3 VARCHAR;

Var4 VARCHAR;

i : INTEGER;

BEGIN

i := 0;

FOR rec in Select field from tabla_detalle where id = 123456 LOOP

i := i +1;

‘Var’||CAST(i AS VARCHAR) := rec.field;

END LOOP;

END;

Tengo una tabla base de registro base y otra donde estan los detalles de
estos registros (Ej productos y ventas de productos.)

Lo que quiero es almacenar los detalles (Ej. ventas) en un juego de
variables para poder tratarlas y realizar calculos con ellos y como los
detalles pueden ser variables unos tendrán 1 otros 6 otros 12 por eso
quisiera hacerla con un LOOP y no manual.

Y además quisiera saber si se puede obviar las Var1, Var2, Var3 y en vez de
ello colocar un array dinamico.

Algo así (pascal):

Procedure nombre;

Var Variables : Array of String; i, Ln : Integer;

Begin

Ln := Length(Variables);

For i := 0 to Ln-1 do Variables[i] := ‘valor’;

End;

Alguien que me ayude con esta duda?

Bendiciones…

Miguel A. Valero

SPC Limitada

Sistemas