> Tech > Recevoir des messages sur les jobs effectués

Recevoir des messages sur les jobs effectués

Tech - Par Renaud ROSSET - Publié le 24 juin 2010

Pour voir les messages sur les jobs effectués, on peut utiliser DLVRY(*BREAK). Mais, c'est parfois agaçant. Mieux vaut recourir à  ce programme de traitement des messages, qui affiche chaque message sur la dernière ligne de l'écran :

PGM         PARM(&msgq &msgqlib &msgkey)
DCL         VAR(&msgq) TYPE(*CHAR) LEN(10)
DCL         VAR(&msgqlib) TYPE(*CHAR) LEN(10)

DCL VAR(&msgkey) TYPE(*CHAR) LEN(4)
DCL VAR(&msgdta) TYPE(*CHAR) LEN(132)
RCVMSG MSGQ(&msgqlib/&msgq)
MSGKEY(&msgkey)
RMV(*NO) MSG(&msgdta)
SNDPGMMSG MSGID(CPF9897) MSGF(QCPFMSG)
MSGDTA(&msgdta) TOPGMQ(*EXT)
MSGTYPE(*STATUS)
ENDPGM

Pour cela, il faut modifier la file d’attente des messages en ajoutant ce qui suit au programme initial :

CHGMSGQ	MSGQ(*USRPRF) PGM(MONMSG)
CHGMSGQ	MSGQ(*WRKSTN) PGM(MONMSG)

Rob Freeling, AS/400 Consultant
Gap Gemini Information
Delft, Pays-Bas

Téléchargez cette ressource

Guide de Cyber-résilience pour Microsoft 365

Guide de Cyber-résilience pour Microsoft 365

La violation de votre tenant M365 va au-delà d’un simple incident de cybersécurité. Elle peut entraîner une interruption opérationnelle généralisée, des perturbations commerciales et une exposition de vos données sensibles. Découvrez les méthodes et technologies pour évaluer, comparer et renforcer votre posture de sécurité Microsoft 365.

Les plus consultés sur iTPro.fr

A lire aussi sur le site

À la une de la chaîne Tech