Hola Marcel. Lo que yo hago es igual que t� pero en ILE. Con archivos normales no tengo problema pero con subficheros me da errores al hacer el write del registro de datos porque interpreta que no he definido SFLDSPCTL y SFLDSP y esto pasa cuando indico INVITE. 0098.00 C SETON 85 0099.00 C WRITE CONTROL 0100.00 C CLEAR DATOS 0101.00 C SETOFF 85 si quito INVITE no peta, pero obviamente tampoco funciona la temporizaci�n. Haceis algo especial en los subficheros? Gr�cies
-----Mensaje original----- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]En nombre de Marcel Cortilla (Tejidos Cornejo s.a.) Enviado el: lunes 9 de diciembre de 2002 11:28 Para: [EMAIL PROTECTED] Asunto: RE: Temporizar una pantalla Hola, Alberto. Nosotros hace a�os que estamos usando la temporizaci�n en pantallas. Expongo aqu� los pasos a seguir (que ya expliqu� hace tiempo), para aplicarlo en un programa RPG OPM (no ILE) : 1 - El archivo de pantalla debe estar creado (CRTDSPF) con el par�metro WAITRCD (por defecto *NOMAX) con el n�mero de segundos que quieras que est� "en espera" la pantalla. Tambi�n puedes compilarlo con el valor por defecto *NOMAX y luego hacer OVRDSPF nombre_pantalla WAITRCD(x) en un CL que llame al RPG (as� por ejemplo lo puedes activar o no seg�n el usuario que vaya a utilizar el programa, que es como lo tenemos nosotros). 2 - En cada registro de dicha pantalla que requieras la funcionalidad, has de especificar la palabra clave INVITE (al nivel de las OVERLAY, etc.). 3 - En la hoja F del RPG, donde declaras el archivo de pantalla, defines con KINFDS el nombre de una DS (por ejemplo PANTDS), que luego defines en la hoja I con la palabra clave *STATUS y una variable que usar�s durante el programa (p.ejemplo FSTATUS). 4 - En la hoja F del RPG, adem�s de KINFDS, poner KNUM 1. 5 - En el programa RPG, donde hagas EXFMT del formato de registro que tengas con INVITE, debes cambiarlo por WRITE nombre_registro_pantalla y justo debajo READ nombre_pantalla (atenci�n : el READ ha de ser del fichero de pantalla, no del registro!!!). Pon indicadores en las posiciones de menor e igual (las dos "de la derecha") en este READ, para evitar que el programa d� error, y luego del READ miras el valor de la variable FSTATUS, que si contiene el valor 1331 es que ha pasado el tiempo especificado en el WAITRCD y no se ha pulsado ninguna tecla de mandato o intro, y entonces haces lo que necesites. En ILE, se debe usar la palabra clave MAXDEV(*FILE), no MAXDEV(*ONLY), en la hoja F del archivo de pantalla. No s� si he sido lo suficientemente claro. Si necesitas m�s informaci�n, no dudes en solicit�rmela. Marcel. > -----Mensaje original----- > De: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]En nombre de Alberto > Enviado el: lunes, 09 de diciembre de 2002 9:13 > Para: [EMAIL PROTECTED] > Asunto: Temporizar una pantalla > > > Hola Foro. > Alguno de vosotros temporiza pantallas? > A m� me funciona siempre que no sea un subfichero, porque al poner la > palabra clave INVITE > (que por cierto me deja ponerla y no me da error al compilar) ignora > totalmente SFLDSPCTL y SFLDSP. y sin INVITE no me funciona. > Alguien ha temporizado una pantalla con subfichero? > Tendr� que recurrir al truco de poner INVITE en el registro de 'pie'? > Gr�cies > > _____________________________________________________ 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]?body=LEAVE _____________________________________________________ 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]?body=LEAVE
