Discussion :

[rgccx]

Bonjour,

Je voudrais faire un pgm CL qui envoie un mail d'alerte quand un job est en MSGW sur la machine de production.
Je fais une boucle là-dessus :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
RCVMSG MSGQ(QSYSOPR)  MSGTYPE(*INQ) RMV(*NO)
       MSG(&MSG) MSGID(&MSGID) SEV(&SEV)
       RTNTYPE(&RTNTYPE)

Problème : les messages qui ont été en MSGW mais auxquels on a déjà répondu sont interceptés aussi.

Quelle est l'astuce pour n'avoir que les messages non répondus ?

Merci !

Christophe.

[Mercure]

Regarde ce que j'ai fait ici.

[rgccx]

Impressionnant !

Je ne dirai qu'un mot : merci Mercure

Christophe.