Ok - I have a challenge that is likely very easy and one of those many "Well, duh!" moments I have.
To test something I have two CLLE programs.
The first one - TESTJOB1:
Pretty straightforward - just submit a job that calls TESTJOB2.
TESTJOB2 is:
Program PGMX doesn't exist - if I do a call to TESTJOB2 I get the expected 'CPF0001 received by procedure TESTJOB2 (C D I R) . Joblog shows message CPD0170 indicating that program PGMX was not found.
Now if I do a call to TESTJOB1 it submits the job, the job ends abnormally, QSYSOPR shows the message CPF0001 with an autoreply of 'C'.
I don't want it to auto reply - I want it to show me the error and make me reply to it. My job description has INQMSGRPY(*RQD) - and that is also specified in the SBMJOB command above.
What am I missing?
To test something I have two CLLE programs.
The first one - TESTJOB1:
Code:
PGM SBMJOB CMD(CALL PGM(TESTJOB2)) JOB(TESTJOB2) + INQMSGRPY(*RQD) ENDPGM
TESTJOB2 is:
Code:
PGM CALL PGM(PGMX) endpgm
Now if I do a call to TESTJOB1 it submits the job, the job ends abnormally, QSYSOPR shows the message CPF0001 with an autoreply of 'C'.
I don't want it to auto reply - I want it to show me the error and make me reply to it. My job description has INQMSGRPY(*RQD) - and that is also specified in the SBMJOB command above.
What am I missing?
Comment