For interactive jobs, I like to give the users IBM-supplied messages whenever possible-such as the completion message after a Submit Job (SBMJOB) command. This can be accomplished by adding a few extra lines within a CL program. See 3 for an example.
For interactive jobs, I like to give the users IBM-supplied messages whenever possible-such as the completion message after a Submit Job (SBMJOB) command. This can be accomplished by adding a few extra lines within a CL program. See Figure 3 for an example.
The IBM-supplied completion message for SBMJOB is sent to the previous program queue.
IBM-supplied Completion Message
Figure 3 Sending a Completion Message
PGM DCL VAR(&MSG) TYPE(*CHAR) LEN(512) SBMJOB CMD(CALL PGM(pgm-name)) JOB(job-name) RCVMSG MSGTYPE(*COMP) MSG(&MSG) MONMSG MSGID(CPF0000) EXEC(GOTO CMDLBL(EXIT)) SNDPGMMSG MSG(&MSG) MSGTYPE(*COMP) EXIT: ENDPGM
LATEST COMMENTS
MC Press Online