Hola,

Eso te lo digo en base de que las declaraciones no se pueden poner antes de la 
8, si se pone antes da esto
[cid:3b6cb745-fe7b-4829-ad71-53c83154c59a]
si te fijas marca la linea como error.

Saludos,

________________________________
De: forum.help400-boun...@listas.combios.es 
<forum.help400-boun...@listas.combios.es> en nombre de Javier B. 
<reiv...@hotmail.com>
Enviado: martes, 20 de agosto de 2019 15:46
Para: 'forum.help400' <forum.help400@listas.combios.es>
Asunto: RV: Hoja h en formato libre de ile rpg

Hola Reinaldo :

¿Entonces el formato libre se tiene que codificar a partir de las columna 8?, 
lo digo porque me ha parecido ver en la documentación de IBM que se podía 
codificar en cualquier columna.

Un saludo y gracias,
Javier




________________________________
De: forum.help400-boun...@listas.combios.es 
<forum.help400-boun...@listas.combios.es> en nombre de Reinaldo Diaz 
<r.diaz.d...@hotmail.com>
Enviado: martes, 20 de agosto de 2019 15:14
Para: forum.help400 <forum.help400@listas.combios.es>
Asunto: RE: Hoja h en formato libre de ile rpg

Hola,

Simplemente ya el compilar es inteligente(no al 100% pero va a ello), imagino 
que si encuentra una C/D/F/H/I en la pos 6, sabrá que es un RPG 
antiguo(llamemos lo así)  y si encuentra algo a partir de la pos 8 sabrá que es 
formato libre..

Es mi interpretación.

Saludos

________________________________
De: forum.help400-boun...@listas.combios.es 
<forum.help400-boun...@listas.combios.es> en nombre de Javier B. 
<reiv...@hotmail.com>
Enviado: martes, 20 de agosto de 2019 14:15
Para: forum.help400 <forum.help400@listas.combios.es>
Asunto: Re: Hoja h en formato libre de ile rpg

Entonces si no hay que poner lo del /Free ni **Free,  ¿cómo sabe el SEU que 
tiene que procesar el formato libre o el fijo? , ¿o el miembro tiene que tener 
un tipo determinado?

Saludos,
Javier



De: Reinaldo Diaz
Enviado: martes, 20 de agosto 11:39
Asunto: Re: Hoja h en formato libre de ile rpg
Para: forum.help400


Hola buenos días

Desde la 7.1 no hace falta indicar los /free o el **free.



Enviado desde mi smartphone Samsung Galaxy.


-------- Mensaje original --------
De: "Javier B." <reiv...@hotmail.com>
Fecha: 20/8/19 10:04 (GMT+01:00)
Para: "forum.help400" <forum.help400@listas.combios.es>
Asunto: RE: Hoja h en formato libre de ile rpg

Gracias Txema :

Creo que desde v7.3 se puede dejar de poner /FREE../END-FREE, pero he visto 
fuentes en internet sin **FREE (en fila 1 columna 1), y esto me desconcierta.
Entonces, si se puede mezclar formato libre con fijo, ¿se podría hacer algo 
así? :

h datfmt(*iso)
ctl-opt datedit(*ymd) ;

¿Es decir, la hoja h en columna 1 (SIN el ";" al final) y el resto a partir de 
la columna 3?
¿Y ctl-opt en cualquier columna?
Anque, en realidad, no tiene mucho sentido hacerlo así, es para coger la idea.

Y ya para terminar, ¿tendrías un ejemplo de definicion de subarchivo con 
formato libre?.

Un saludo,
Javier

De: forum.help400-boun...@listas.combios.es 
<forum.help400-boun...@listas.combios.es> en nombre de Txema Sagredo Sancho 
(DHL ES) <txema.sagr...@dhl.com>
Enviado: martes, 20 de agosto de 2019 9:29
Para: forum.help400 <forum.help400@listas.combios.es>
Asunto: RE: Hoja h en formato libre de ile rpg

Si ,  exactamente asi

CTL-OPT DATEDIT(*YMD.);
Se puede mezclar, free con formato fijo.
No se desde que versión , no hay que poner /free   /end-Free

Salu2




Txema Sagredo Sancho
Solutions Management
DHL Parcel Iberia, S.L.U.
Paseo Mikeletegi, nº 65
Parque Tecnológico de San Sebastián
E-20009 San Sebastián
Phone: +34 943 37 92 59
txema.sagr...@dhl.com<mailto:txema.sagr...@dhl.com>
www.dhl.es<http://www.dhl.es/>
[LOGO DHL PARCEL]
GOGREEN – Environmental protection with DHL
Por favor, ten en cuenta el medio ambiente antes de imprimir este correo

From: forum.help400-boun...@listas.combios.es 
[mailto:forum.help400-boun...@listas.combios.es] On Behalf Of Javier B.
Sent: martes, 20 de agosto de 2019 8:50
To: forum.help400
Subject: Re: Hoja h en formato libre de ile rpg

Lo siento pero no lo entiendo,  ¿pero delante no tengo que poner "ctl-opt"?, es 
decir :
CTL-OPT DATEDIT(*YMD.)
Saludos,
Javier


De: Txema Sagredo Sancho (DHL ES)
Enviado: martes, 20 de agosto 8:25
Asunto: RE: Hoja h en formato libre de ile rpg
Para: forum.help400

Buenos días

Aquí lo tienes.  DATEDIT(*YMD.)

Salu2


Txema Sagredo Sancho
Solutions Management
DHL Parcel Iberia, S.L.U.
Paseo Mikeletegi, nº 65
Parque Tecnológico de San Sebastián
E-20009 San Sebastián
Phone: +34 943 37 92 59
txema.sagr...@dhl.com<mailto:txema.sagr...@dhl.com>
www.dhl.es<http://www.dhl.es/>
[LOGO DHL PARCEL]
GOGREEN – Environmental protection with DHL
Por favor, ten en cuenta el medio ambiente antes de imprimir este correo

From: forum.help400-boun...@listas.combios.es 
[mailto:forum.help400-boun...@listas.combios.es] On Behalf Of Javier B.
Sent: lunes, 19 de agosto de 2019 15:36
To: 'forum.help400'
Subject: Hoja h en formato libre de ile rpg

Buenas tardes :

¿Alguien me podría decir por favor cual es la sintaxis de "h datedit(*ymd)" con 
formato libre de ile rpg.

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