Cuestión : los iSeries - supervisar la coleta de mensaje múltiple

Quisiera superviso continuamente MSGQ múltiples en los iSeries. Quisiera específicamente supervisar el QSYSOPR y las coletas de mensaje de QSYSMSGQ. Voy a utilizar el comando de RCVMSG.  ¿Si se encuentra un mensaje, enviaré un email con los detalles y entonces volver a supervisar el queue.

Will tengo que tener 2 programas separados del CL - uno para la supervisión QSYSOPR y el otro para la supervisión QSYSMSGQ?  ¿Es posible hacer en un CL?
class= > " claro " del
> del " codeSnippet " del class= del
class= " lineNumbers " del
class= del
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
>MONITOR notpretty " del class= " del id= " codeSnippet805695 del
           
class= del

Respuesta : los iSeries - supervisar la coleta de mensaje múltiple

Máximo dice el “bloque aquí hasta que se reciba un nuevo mensaje. ”

Fino para procesar una coleta, pero no aceptable para el múltiplo de la interrogación hace cola.

Para las coletas múltiples usted quiere ver rápidamente que I allí es el esperar del mensaje.

También observar que si un mensaje se recibe en una coleta dada usted puede ser que quiera colocar en esa coleta hasta que todos los mensajes se reciban algo que votando la coleta siguiente.

Hacer hasta no más de mensajes
    Recibir queue1 la espera 0
extremo
hacer hasta no más de mensajes
   Recibir q2 la espera 0
extremo
etc
retardo
tapa indicada
mientras que msgid <> '  
Otras soluciones  
 
programming4us programming4us