Buenas Foro.
Para crear un array a partir de unos campos, se hacía lo siguiente:
1) definir la variable en la hoja D
D VariableA     S              2  0 DIM(2)
D VariableB     S              5  0 DIM(2)
y luego, se le cambiaba el nombre al campo en la hoja I:
IRfichero 
I              VariableA1                Variablea(1)
I              VariableA2                Variablea(2)
I              VariableB1                VariableB(1)
I              VariableB2                VariableB(2)

El caso es que esto es cuando se define un fichero internamente, 
pero...aqui viene la pregunta:
..Y si el registro está descrito en un Extname?
 DRfichero       E DS                  occurs(999) Extname(ficheroext)

Gracias!!! 
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a