RE: Mensajes de estado de proceso.

[medina]

Mira si te sirve de ejemplo esto:   DCL        &REPLY        TYPE(*CHAR)   LEN(8)                                                          DCL        &KEYVAR       TYPE(*CHAR)   LEN(4)                                                                                                             RMVMSG     PGMQ(*EXT) CLEAR(*ALL)                                                                                                                       SNDPGMMSG  MSG(' COMPROBAR LISTADO ARTICULOS SELECCION +                                                                                                           ANTES DE  PULSAR 0 ---> INTRO')  +                                                                                                                      TOPGMQ(*EXT) MSGTYPE(*INQ) KEYVAR(&KEYVAR)                                                                                                   RCVMSG     PGMQ(*EXT) MSGTYPE(*RPY) WAIT(*MAX) +                                                                                                                   KEYVAR(&KEYVAR) MSG(&REPLY)                                                                                                                  RMVMSG     PGMQ(*EXT) CLEAR(*ALL)                          espero te sirva de algo. Saludos Paco Medina Dpto.Informatica Exclusivas Camacho, S.Ltda. -----Mensaje original----- De: Grupo400 [mailto:[EMAIL PROTECTED] Enviado el: viernes, 14 de marzo de 2003 12:58 Para: [EMAIL PROTECTED] Asunto: Mensajes de estado de proceso. Desearia que en un proceso con varios programas que no utilizan ningun fichero de pantalla pudieran visualizarse mensajes del estado del trabajo.   Es una CL con varios RPG. Cada RPG hace una tarea y me gustaria que en pantalla apareciera un mensaje cuando se procesa el primer RPG y que cuando acabara el proceso de este RPG el mensaje desapareciera.   Y lo mismo para el resto de RPG's.   Gacias por vuestra ayuda.