Hola,
aqu� tienes el fuente de un pgm CL que muestra una pantalla en la que
aparece la hora del sistema y que se va refrescando sin pulsar INTRO. El
programa finaliza al pulsar F3 en la pantalla y la hora se refresca o
pulsando INTRO o cada x segundos. Los x segundos los determinas t� con el
par�metro tiempo de espera de registro (WAITRCD) al crear el fichero de
pantalla con CRTDSPF:
PGM
DCLF FILE(PANT)
YEAH: SNDRCVF DEV(*FILE) RCDFMT(PIE) WAIT(*NO)
WAIT
MONMSG MSGID(CPF0889)
IF COND(&IN03 *EQ '1') THEN(GOTO CMDLBL(FIN))
GOTO CMDLBL(YEAH)
FIN: ENDPGM
aqu� te mando tambi�n la DDS de pantalla para que puedas probar el
funcionamiento:
A DSPSIZ(24 80 *DS3)
A R PIE
A WINDOW(8 35 4 8)
A WDWBORDER((*COLOR PNK) (*DSPATR RI)-
A (*CHAR ' '))
A CA03(03)
A OVERLAY
A 2 1TIME
A COLOR(BLU)
A 3 1'F3-Salir'
A DSPATR(HI)
A R WIN ASSUME OVERLAY PROTECT KEEP
A 1 2' '
bueno, es un ejemplo muy sencillo pero tendr�s por donde empezar.
-----Mensaje original-----
De: Dpto.Inform�tica Prod.Climax(Jos� S�nchez)
[mailto:[EMAIL PROTECTED]
Enviado el: jueves, 21 de octubre de 2004 15:19
Para: Forum. [EMAIL PROTECTED] Es (E-mail)
Asunto: Bucle de Pantalla
Hola a todos.
Intento hacer una pantalla que cada x segundos refresque autom�ticamente un
dato, pero que el usuario pueda introducir unos d�gitos en cualquier momento
y el proceso contin�e. Sabemos que se puede hacer, algunos ya lo hab�amos
visto pero no recordamos la combinaci�n exacta entre el DLYJOB, el SNDF y el
RCVF, algo faltar� pero no sabemos el que.
�alguno de vosotros tiene algo parecido?
Jos� S�nchez
Dpto.Inform�tica Prod.Climax, S.A.
Pol.Ind.Sector Mollet C/A N� 1
08150-Parets del Valles(Barcelona)
www.productosclimax.com
_____________________________________________________
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]
_____________________________________________________
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]
