How to code MAXCC in a JCL

kaushikmitra · New User Joined: 11 Apr 2008 Posts: 26 Location: MONTEREY

Hi ,

How to code the maximum return code in JCL . I did the below -

IF ABEND | MAXCC > 3000 THEN

some JCL code here ......

//ENDIF

But the JCL could not identify MAXCC.

superk · Posted: Thu Jul 24, 2008 4:42 am

I'm pretty sure that MAXCC isn't a valid parameter for an IF/THEN/ELSE check. You need to stick with RC.

kaushikmitra · New User Joined: 11 Apr 2008 Posts: 26 Location: MONTEREY

Then is there any way out for this. All I want is that if any of the job step has return code more than 3000 (i.e. the MXCC of the JCL > 3000) then the logic inside IF/THEN should execute.

dick scherrer · Posted: Thu Jul 24, 2008 5:11 am

Hello,

kaushikmitra · New User Joined: 11 Apr 2008 Posts: 26 Location: MONTEREY

Requirement is -

If RC of any step in the JCL is > 3000 then the job should write a message in a output file.

For that I added a step in the last of the JCL -

// IF RC > 3000 THEN

But that does not work out as RC only refers to the return code of the previous step.

dick scherrer · Posted: Thu Jul 24, 2008 5:40 am

Hello,

dick scherrer · Posted: Thu Jul 24, 2008 5:46 am

Hello,

You might look here:
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/handheld/Connected/BOOKS/iea2b650/17.1.10.4?

gcicchet · Posted: Thu Jul 24, 2008 6:03 am

Hi,

I have to disagree, // IF RC > 3000 THEN refers to any prior step and not previous step.

Gerry

dick scherrer · Posted: Thu Jul 24, 2008 7:06 am

Hi Gerry,

Yup, that was the reason for my prior 2 posts. . . The first was to offer an alternative to IF/THEN as it was not understood. The second to an example of IF/THEN showing what you said. I may have gone the long way around.

Hopefully, this will help. . .

d

gcicchet · Posted: Thu Jul 24, 2008 7:14 am

Hi Dick,

actually I missed this

dick scherrer · Posted: Thu Jul 24, 2008 7:53 am

Hi Gerry,

Not to worry - i've been known to mis-speak and/or mis-type. . .

For my $.02, i'd rather someone jump in

d

kaushikmitra · New User Joined: 11 Apr 2008 Posts: 26 Location: MONTEREY

Hi Dick and Gerry
Thanks for your replies...

I tried the JCL with COND . Here is what I coded in the JCL in the last step -

//STEP03 EXEC PGM=IEBGENER,COND=(3000,GT)
//SYSUT1 DD *
JOB XXXXXXXX HAS ABENDED
/*
//SYSUT2 DD DSN=XXXX.XXXXXX.XXXXX.XXXXX,DISP=MOD
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*

One of the previous steps in the JCL abended with a return code of U3002.

I was expecting this will trigger my above step as 3002 is greater than 3000. But that step flushed out and did not execute.

expat · Posted: Thu Jul 24, 2008 1:27 pm

Aaaaaaaaah, an abend is an abend not a return code.

You could try to code COND=(ONLY,(3000,GT)) to cater for an abend

dick scherrer · Posted: Thu Jul 24, 2008 1:28 pm

Hello,

A user abend is neither a return code nor a maxcc. It is an abend. No conditon code check will test if an abend occurred.

Look up COND=ONLY in that JCL manual and see if this will help with what you need.

gcicchet · Posted: Thu Jul 24, 2008 2:35 pm

Hi,

there is another issue here when using COND=(3000,GT)

expat · Posted: Thu Jul 24, 2008 2:45 pm

Gerry, good spot.

I'd forgotten that the RC checking will be satisfied if only one previous RC was LE 3000.

Just had a look at the example linked by Dicks post, which seems a good way to go. I guess that using IF/THEN/ELSE that you can combine abend checking with RC checking too.

kaushikmitra · New User Joined: 11 Apr 2008 Posts: 26 Location: MONTEREY

Thanks all for the help so far ...

I have run the job with COND=(ONLY,(3000,GT)) as suggested by expat.
Only one problem I am facing if any prior step gets a JCL error , my abend step - //STEP03 EXEC PGM=IEBGENER,COND=(ONLY,(3000,GT))
does not run.

What is the return code (RC) of the job in case of JCL error.

dick scherrer · Posted: Thu Jul 24, 2008 11:18 pm

Hello,

You cannot test for prior jcl error(s).

You need to set up your jcl so that (after testing is complete) there will be no jcl errors.

There should never be a jcl error in a production job.

kaushikmitra · New User Joined: 11 Apr 2008 Posts: 26 Location: MONTEREY

Thanks All of you for your help !!!!