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
Explorez les méandres d’une investigation de ransomware, avec les experts de Palo Alto Networks et Unit 42 pour faire la lumière dans la nébuleuse des rançongiciels. Plongez au cœur de l’enquête pour comprendre les méthodes, les outils et les tactiques utilisés par les acteurs de la menace. Découvrez comment prévenir les attaques, les contrer et minimiser leur impact. Des enseignements indispensables aux équipes cyber.
