Te puedo pasar el ejemplo en RPG 3 El 07/08/2014 06:50, "Javier B." <[email protected]> escribió:
> Pues me temo que no porque no utilizo ILE y porque me sale otro error : > "No hay coincidencia INDARA entre el programa y el archivo PMTU140" > > Saludos y gracias de todas formas, > > Javier > > > ------------------------------ > > > > Message: 2 > > Date: Wed, 6 Aug 2014 08:21:26 -0600 > > From: Bernabé Estrada <[email protected]> > > Subject: RE: No me muestra registro de pantalla > > To: "'forum.help400'" <[email protected]> > > Message-ID: <[email protected]> > > Content-Type: text/plain; charset="iso-8859-1" > > > > Quizás te sirva este ejemplo: > > > > > > > > Importante, maxdev en hoja f, indicadores de respuesta en write y read, > en > > el registro a mostrar INVITE y al compilar la pantalla WAITRCD que puede > ser > > *IMMED. > > > > > > > > > > > > fpantalla cf e workstn maxdev(*file) > > > > C dou *in03 > > > > C write registro 77 > > > > C read pantalla 8899 > > > > c if not(*in03) > > > > c eval resul = dato * 2 > > > > c endif > > > > C enddo > > > > C eval *inlr = *on > > > > > > > > > > > > A*%% > > > > A DSPSIZ(24 80 *DS3) > > > > A CA03(03) > > > > A R REGISTRO > > > > A*%% > > > > A INVITE > > > > A 1 17'Hora:' > > > > A 1 23TIME > > > > A 3 1'Dato:' > > > > A 4 23'F3' > > > > A DSPATR(HI) > > > > A 4 26'Salir' > > > > A DATO 3Y 0B 3 9EDTCDE(4) > > > > A 3 17'Dato x 2' > > > > A RESUL 5S 0O 3 26 > > > > > > > > CHGDSPF FILE(PANTALLA) WAITRCD(2) > > > > > > > > > > > > From: [email protected] > > [mailto:[email protected]] On Behalf Of Javier B. > > Sent: miércoles, 06 de agosto de 2014 05:06 a.m. > > To: Foro-Help400 > > Subject: Re: No me muestra registro de pantalla > > > > > > > > Hola Juan Ramón : > > > > > > > > Rectifico, no es que no lo vea, me da los siguientes errores : > > > > > > > > "Se ha producido un error de E/S permanente (C G S D F)." > > > > "No se ha podido transmitir al dispositivo S1PC10. La sesión no está en > > condición de envío." > > > > > > > > Es un programa que carga un subfile (SFL) y por cada registro marcado, > hará > > una tarea. > > > > En este momento ya conozco el nº de registros a leer (yy). > > > > Por cada registro leído (xx) del SFL (o cada 100 registros), quiero > mostrar > > una ventana que ponga "Registro leído : xx de yy". > > > > El SFL lo leo con CHAIN (READC no me vale porque quiero leer todos los > > registros que tengan una "X", y esta "X" se puede escribir con el > teclado o > > mediante una tecla de función que pone "X" en todos los registros). > > > > Y cuando quiero mostrar la ventana de "Registro leído...", lo hago con > > WRITE. > > > > > > > > Un saludo y gracias, > > > > Javier > > > > > > > > > > > > > > ------------------------------ > > > > > > Message: 2 > > > Date: Tue, 5 Aug 2014 12:11:47 +0200 > > > From: Juan Ramón Garcia <[email protected]> > > > Subject: Re: No me muestra registro de pantalla > > > To: "forum.help400" <[email protected]> > > > Message-ID: > > > <cabs2mgnwtmvvgkk3f162wyfia+lqff_yzz5_oa-z6pf75xw...@mail.gmail.com> > > > Content-Type: text/plain; charset="utf-8" > > > > > > Hola Javier: > > > > > > Al crear el archivo de pantalla CRTDSPF ENHDSP(*YES) DFRWRT(*NO) > > > También lo puedes hacer con CHGDSPF. > > > > > > Un saludo. > > > Juanra > > > > > > > > > El 5 de agosto de 2014, 12:06, Javier B. <[email protected]> > escribió: > > > > > > > Buenas tardes : > > > > > > > > Estoy intentando poner en un programa que tarda mucho, el nº de > registro > > > > leído, para que el usuario tenga una idea de cuánto va a tardar el > > proceso. > > > > Lo que hago es que por cada 100 registros leídos, intento mostrar una > > > > ventana del tipo "Registro leído : nn de nn". > > > > Entonces lo que hago (utilizo RPG/400) es una 'WRITE registro', pero > no > > me > > > > lo muestra. > > > > Me suena que había alguna forma de forzar que visualice el contanido > de > > un > > > > registro de pantalla aunque no se haga un EXFMT, ¿es posible? > > > > He probado con KEEP (en la DDS de pantalla) y nada. > > > > > > > > ¿Me podéis ayudar por favor? > > > > A parte de saber por qué no la muestra, ¿hay otra forma más eficaz de > > > > conseguir lo mismo? > > > > > > > > Javier > > > > > > > > ------------ próxima parte ------------ > > Se ha borrado un adjunto en formato HTML... > > URL: < > http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20140806/7956e811/attachment.htm > > > > > > ------------------------------ > > > > Message: 3 > > Date: Wed, 06 Aug 2014 14:11:26 -0400 > > From: josepo <[email protected]> > > Subject: Msg:Demasiados archivos abiertos para procesar > > To: "[email protected]" > > <[email protected]> > > Message-ID: <[email protected]> > > Content-Type: text/plain; charset="utf-8" > > > > Hola estoy ejecutando un programa Rpg que no abre archivos y cual llama > a programa socket al llegar a las 200 llamadas me aborta el programa y me > da el mensaje anterior. Solo se normaliza cuando cierro la sesión. > > Alguien me podría ayudar. > > Gracias. > > > > Enviado desde Samsung Mobile > > ------------ próxima parte ------------ > > Se ha borrado un adjunto en formato HTML... > > URL: < > http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20140806/4326e4c6/attachment.htm > > > > > > ------------------------------ > > > > Message: 4 > > Date: Thu, 7 Aug 2014 07:54:57 +0200 > > From: Juan Ramón Garcia <[email protected]> > > Subject: Re: No me muestra registro de pantalla > > To: "forum.help400" <[email protected]> > > Message-ID: > > <cabs2mgm1vexvwfugrktzsdsr54psu5py9qxhv6enpewxxho...@mail.gmail.com> > > Content-Type: text/plain; charset="utf-8" > > > > Hola Javier: > > > > Tendrás que mirar el motivo por el que te da el error, desde luego para > > poder visualizar algo en pantalla con WRITE debes compilarla como te dije > > porque, por defecto, el sistema espera a una operación de entrada o a > > llenar el buffer antes de mostrar la pantalla (para mejorar el > rendmiento). > > > > Un saludo. > > Juanra > > > > > > > > El 6 de agosto de 2014, 13:06, Javier B. <[email protected]> escribió: > > > > > Hola Juan Ramón : > > > > > > Rectifico, no es que no lo vea, me da los siguientes errores : > > > > > > "Se ha producido un error de E/S permanente (C G S D F)." > > > "No se ha podido transmitir al dispositivo S1PC10. La sesión no está en > > > condición de envío." > > > > > > Es un programa que carga un subfile (SFL) y por cada registro marcado, > > > hará una tarea. > > > En este momento ya conozco el nº de registros a leer (yy). > > > Por cada registro leído (xx) del SFL (o cada 100 registros), quiero > > > mostrar una ventana que ponga "Registro leído : xx de yy". > > > El SFL lo leo con CHAIN (READC no me vale porque quiero leer todos los > > > registros que tengan una "X", y esta "X" se puede escribir con el > teclado o > > > mediante una tecla de función que pone "X" en todos los registros). > > > Y cuando quiero mostrar la ventana de "Registro leído...", lo hago con > > > WRITE. > > > > > > Un saludo y gracias, > > > Javier > > > > > > > > > > > > > > ------------------------------ > > > > > > > > Message: 2 > > > > Date: Tue, 5 Aug 2014 12:11:47 +0200 > > > > From: Juan Ramón Garcia <[email protected]> > > > > Subject: Re: No me muestra registro de pantalla > > > > To: "forum.help400" <[email protected]> > > > > Message-ID: > > > > <cabs2mgnwtmvvgkk3f162wyfia+lqff_yzz5_oa-z6pf75xw...@mail.gmail.com> > > > > Content-Type: text/plain; charset="utf-8" > > > > > > > > > > > Hola Javier: > > > > > > > > Al crear el archivo de pantalla CRTDSPF ENHDSP(*YES) DFRWRT(*NO) > > > > También lo puedes hacer con CHGDSPF. > > > > > > > > Un saludo. > > > > Juanra > > > > > > > > > > > > El 5 de agosto de 2014, 12:06, Javier B. <[email protected]> > escribió: > > > > > > > > > > > > Buenas tardes : > > > > > > > > > > Estoy intentando poner en un programa que tarda mucho, el nº de > > > registro > > > > > leído, para que el usuario tenga una idea de cuánto va a tardar el > > > proceso. > > > > > Lo que hago es que por cada 100 registros leídos, intento mostrar > una > > > > > ventana del tipo "Registro leído : nn de nn". > > > > > Entonces lo que hago (utilizo RPG/400) es una 'WRITE registro', > pero > > > no me > > > > > lo muestra. > > > > > Me suena que había alguna forma de forzar que visualice el > contanido > > > de un > > > > > registro de pantalla aunque no se haga un EXFMT, ¿es posible? > > > > > He probado con KEEP (en la DDS de pantalla) y nada. > > > > > > > > > > ¿Me podéis ayudar por favor? > > > > > A parte de saber por qué no la muestra, ¿hay otra forma más eficaz > de > > > > > conseguir lo mismo? > > > > > > > > > > Javier > > > > > > > > > > > > > > ____________________________________________________ > > > Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) > > > Forum.Help400 © Publicaciones Help400, S.L. > > > > > ------------ próxima parte ------------ > > Se ha borrado un adjunto en formato HTML... > > URL: < > http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20140807/098b29b9/attachment.htm > > > > > > ------------------------------ > > > > __________________________________________________ > > Forum.HELP400 es un servicio m&amp;#225;s de ServerNEWS. > > &amp;#169; Publicaciones Help400, S.L. - Todos los derechos > reservados > > http://www.help400.es > > _____________________________________________________ > > > > Para darte de baja visita la siguente URL: > > http://listas.combios.es/mailman/listinfo/forum.help400 > > > > Fin de Resumen de Forum.help400, Vol 94, Envío 3 > > ************************************************ > > ____________________________________________________ > Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) > Forum.Help400 © Publicaciones Help400, S.L. >
____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
