Buenos días compañeros.
Hace un tiempo hice una consulta sobre la creación
(En Free) de un array referente a varios campos de un fichero. Lo que era la
hoja I.
Tipo
IREMPRESA
I EJC1 EJC(1)
I EJC2 EJC(2)
Y se resolvía con algo así;
Dcl-ds Ejerc ;
Ejc1;
Ejc2;
Ejc LIKE(Ejc1) Pos(1) dim(2);
End-ds;
Pues bien, necesito hacer una cosa parecida en un registro definido tal que así:
DCL-DS Registre ext EXTNAME('FICHERO') occurs(999);
Y no tengo manera humana de conseguirlo.
Alguien me puede dar una idea?
Gracias!!
____________________________________________________
�nete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 � Publicaciones Help400, S.L.
