Re: Recibir mensajes QSYSOPR sin bloquear la msgq

[JCarreras]

Hola Marti,

Yo utilizo el Api QMHLSTM.
Puedes consultar en http://public.boulder.ibm.com/pubs/html/as400/v4r5/ic2978/info/apis/QMHLSTM.HTM
Hay un ejemplo en : http://www.iseriesnetwork.com/resources/code/misccode/rpgcode/SampleUseQMHLSTM.zip (no sé si hace falta estar subscrito) Si no puedes descargártelo te lo puedo mandar a tu correo personal.
Espero te funcione perfectamente.
Saludos,

Jordi.

"Marti Riera" <[EMAIL PROTECTED]>

"Marti Riera" <[EMAIL PROTECTED]> Enviado por: [EMAIL PROTECTED] 19/04/2006 11:01 Por favor, responda a forum.help400@combios.es

Para "Foro Help400" <forum.help400@combios.es> cc Asunto Recibir mensajes QSYSOPR sin bloquear la msgq

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