Eliminer les exceptions ne résultant pas d’erreurs

Ce code dans des programmes CL permet d'éliminer les exceptions qui ne sont pas de vraies erreurs dans la job log. Il faut bien sûr savoir quels messages on veut surveiller et supprimer :

DLTF          FILE(QTEMP/DSPOBJD)
MONMSG    MSGID(CPF2105)
 EXEC(DO)
    RCVMSG     MSGTYPE(*EXCP) RMV(*YES)
 ENDO

Scott Cole, analyste technique sénior
Excel

Corporation
Wichita, Kansas