Tal dia far� un any, Jos� Berm�dez Huerta va dir:
> Como se hace en ILE-RPG una serie de 2 o m�s dimensiones
>
> Quiero guardar datos en un serie de 2 dimensiones pero no se como definirla y
> acceder a ella.
Puedes probar a emularla con una funci�n muy sencilla, al fin y al cabo los lenguajes
que implementan series de varias dimensiones las emulan de una manera bastante
parecida.
Aqu� tienes un ejemplo sencillo:
D MaxFil C const(20)
D MaxCol C const(12)
D Serie S 5P 0 dim(240)
D Pos PR 3 0
D Fila 2 0 const
D Columna 2 0 const
C 1 DO 20 X 2 0
C 1 DO 12 Y 2 0
C EVAL Serie(Pos(X:Y)) = X*100+Y
C ENDDO
C ENDDO
* ...
P Pos B
D Pos PI 3 0
D Fila 2 0 const
D Columna 2 0 const
C RETURN (Fila-1) * MaxCol + Columna
P Pos E
Espero que te sirva.
Cordialmente:
Carlos Portol�s
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]
