I have a CL program, part of logic goes like below -
OPNDBF FILE(&USRLIB/FILE) OPTION(*ALL)
MONMSG MSGID(CPF4174) EXEC(DO) /* If already open, close and reopen */
CLOF OPNID(FLDSPF100)
OPNDBF FILE(&USRLIB/FILE) OPTION(*ALL)
ENDDO
RCVMSG MSGTYPE(*COMP) /* remove CPF message */
Assume that the file is already open. So, when i do OPNDBF, i get CPF4174 and MONMSG handles that. It closes the file and performs OPNDBF again. Now, this generates a completion message in job log as below -
Member Filename file Filename in Library opened.
However, i am performing a RCVMSG COMP type at the end. I expect this to remove the above message from job log. But, thats not happening. At the end of the program call, the message remains in the job log.
What am I missing here? Does this depend on the compilation parameter or job log security level, etc?
OPNDBF FILE(&USRLIB/FILE) OPTION(*ALL)
MONMSG MSGID(CPF4174) EXEC(DO) /* If already open, close and reopen */
CLOF OPNID(FLDSPF100)
OPNDBF FILE(&USRLIB/FILE) OPTION(*ALL)
ENDDO
RCVMSG MSGTYPE(*COMP) /* remove CPF message */
Assume that the file is already open. So, when i do OPNDBF, i get CPF4174 and MONMSG handles that. It closes the file and performs OPNDBF again. Now, this generates a completion message in job log as below -
Member Filename file Filename in Library opened.
However, i am performing a RCVMSG COMP type at the end. I expect this to remove the above message from job log. But, thats not happening. At the end of the program call, the message remains in the job log.
What am I missing here? Does this depend on the compilation parameter or job log security level, etc?
Comment