Perdona, me faltó la E, sería así (probado y funcionando en V5R3):
fprudsdw cf e workstn
d dsdtaara euds dtaara('JCPC/PRUDSDA')
d extname(prudsdw:panta01)
/free
clear fld001;
clear fld002;
exfmt panta01;
out dsdtaara;
*inlr=*on;
return;
/end-free
Saludos.
Juan Carlos.
-----Mensaje original-----
De: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED] En nombre de Juan Antonio
Enviado el: viernes, 21 de abril de 2006 10:43
Para: [email protected]
Asunto: RE: Area de Datos
Lo he intentado pero no compila. Exige E DS, pero en distintas combinaciones sigue dando errores.
Gracias.
_____
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] En nombre de Juan Carlos Paredes
Enviado el: jueves, 20 de abril de 2006 18:25
Para: [email protected]
Asunto: RE: Area de Datos
No lo he intentado nunca, pero en principio creo que esto debería funcionar:
d dsdtaara uds dtaara('XXXX')
d extname(fichero_pantalla:formato_registro)
y en el cálculo un simple OUT DSDTAARA
Saludos.
Juan Carlos.
-----Mensaje original-----
De: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED] En nombre de Juan Antonio
Enviado el: jueves, 20 de abril de 2006 17:40
Para: [email protected]
Asunto: Area de Datos
Buenas tardes.
En un programa ILE, quiero volcar el contenido de los campos de una pantalla, que pido previamente, a un área de datos “XXXX”, sin moves de cada uno de los campos etc y de la forma más sencilla con la utilización de la hoja D solo y alguna keyword. ¿Es posible?.
Gracias.
__________________________________________________ Forum.HELP400 es un servicio mas de NEWS/400. ) Publicaciones Help400, S.L. - Todos los derechos reservados HYPERLINK "http://www.help400.es"http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: HYPERLINK "http://coyote.combios.es/mailman/listinfo/forum.help400"http://coyote.combios.es/mailman/listinfo/forum.help400
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.1.385 / Virus Database: 268.4.4/319 - Release Date: 19/04/2006
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.1.385 / Virus Database: 268.4.4/320 - Release Date: 20/04/2006
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.1.385 / Virus Database: 268.4.4/320 - Release Date: 20/04/2006
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.1.385 / Virus Database: 268.4.4/320 - Release Date: 20/04/2006
