Hola a [EMAIL PROTECTED]:
Alguien sabe como leer mensajes de la cola QSYSOPR sin bloquearla?
Yo actualmente utilizo el mandato RCVMSG para leer los mensajes que esperan respuesta en la cola del operador:
RCVMSG MSGQ(QSYS/QSYSOPR) MSGTYPE(*INQ) WAIT(*MAX) RMV(*NO)
KEYVAR(&MSGMRK) MSG(&MSG) SECLVL(&SECLVL) MSGID(&MSGID) SENDER(&SENDER) SENDERFMT(*SHORT)
Hasta ahora me ha ido bien pero tiene una pega que bloquea la cola de mensajes QSYSOPR como *EXCL y ahora estamos haciendo pruebas con otro producto que intenta leerla también pero casca por dicho bloqueo (además no puedo configurarlo), por tanto esto intentando cambiar mi programa para que no bloquee, pero la verdad no se como hacerlo de manera fácil.
Gracias anticipadas por vuestras arrotaciones y Saludos.
--
Martí Riera
