Buenos días :

¿Alguien me podría decir cómo renombar los campos de un archivo con la sintaxis 
de ile rpg free?
Basándome en los comentarios del foro, he hecho este fuente de ejemplo 
mezclando formato libre con fijo.

Primero me gustaría saber si es correcto :

ctl-opt datedit(*ymd) datfmt(*iso);
dcl-f file1 disk(*ext) usage(*update);

       //Renombar campos file1
     Ireg1          21
     I              ANYARR                      @NYARR
     I              MESARR                      @ESARR
     I              DIAARR                       @IAARR

       //sentencias

       *inlr = *on;

A modo de ejemplo, me interesaría utilizar los campos del archivo renombrados 
como @nyarr, @esarr, etc.

Y luego, si habría otra forma más "elegante" de hacerlo, es decir, utilizando 
el formato libre.

Un saludo y gracias,
Javier

[https://ipmcdn.avast.com/images/icons/icon-envelope-tick-round-orange-animated-no-repeat-v1.gif]<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>
  Libre de virus. 
www.avast.com<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a