> 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

Mac en entreprise : le levier d’un poste de travail moderne

Mac en entreprise : le levier d’un poste de travail moderne

Ce livre blanc répond aux 9 questions clés des entreprises sur l’intégration du Mac : sécurité, compatibilité, gestion, productivité, coûts, attractivité talents, RSE et IA, et l’accompagnement sur mesure proposé par inmac wstore.

Les plus consultés sur iTPro.fr

A lire aussi sur le site

À la une de la chaîne Tech