Vous voulez enlever de votre log un message que vous avez intercepté et traité, il suffit de lire les messages d'exceptions la file d'attente externe 

exemple :

            CHGVAR     VAR(&IPNAME) VALUE(&RIPNAME)
               MONMSG     MSGID(MCH3601) EXEC(DO)
                 RCVMSG     MSGTYPE(*EXCP)
               ENDDO

ou en une seule ligne si vous n'avez pas d'autres instructions dans le DO

               MONMSG     MSGID(MCH3601) EXEC(RCVMSG MSGTYPE(*EXCP))