IF Then ELSE in JCL

srajanbose · New User Joined: 11 Oct 2004 Posts: 69 Location: chennai

Hi,

I am passing two parameters in a PROC and based on those parameters I need to execute my steps in a JCL.My Proc has following steps:
// PROC AVT=,AVT1=
// IF &AVT=1 THEN
//STEP2 EXEC PGM=SAMPLE5
//STEPLIB DD DSN=TEST.COBOL.LOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD DUMMY
// ENDIF

// IF &AVT1=2 THEN
//STEP3 EXEC PGM=SAMPLE6
//STEPLIB DD DSN=TEST.COBOL.LOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD DUMMY
// ENDIF

My Job is:
//ABC JOB LASS=E,MSGCLASS=U,REGION=0M,NOTIFY=&SYSUID
//PROCLIB JCLLIB ORDER=TEST.SOURCE.JCL
//STEP01 EXEC IFTHENJ,AVT=1,AVT1=3

If I pass a different value for AVT1 variable other than 2 then my first step is executed and the next one is not executing as the condition is not satisfied Whereas when i change the value as AVT=3,AVT1=2 then both the steps are executed.
When the condition is AVT=3,AVT1=2 only my second condition should be executed.Please suggest

expat · Posted: Mon Jan 31, 2011 1:58 pm

What does it say in the JCL reference manual, easily reached by clicking the "IBM Manuals" button at the top of any page, about defining your own variables for comparison.

dick scherrer · Posted: Mon Jan 31, 2011 9:41 pm

Hello,

Bill O'Boyle · Posted: Tue Feb 01, 2011 3:13 am

This might be a crazy WAG, but insert (as your first step in the PROC before any) an IDCAMS which issues a SET MAXCC=0. This statement needs to be assigned to //SYSIN as a PDS member or sequential file, because //SYSIN DD * stream data is not allowed in a PROC.

Give it a try....

Bill

Jeffrey Ranney · New User Joined: 23 Dec 2010 Posts: 20 Location: USA

You cannot SET your own variables for testing in a JCL "IF" condition, as explained in the JCL manual. You can only test RETURN-CODEs of a particular step or of the entire job.

Bill O'Boyle · Posted: Wed Feb 09, 2011 7:17 am

In addition to issuing an IDCAMS SET MAXCC=0 before executing any step, review the following, as it does work -

ibmmainframes.com/viewtopic.php?p=258902&highlight=#258902

Bill

krishna rao M · New User Joined: 10 Feb 2011 Posts: 9 Location: India

Hi
i think first step should not have if condition
try it like this

// PROC AVT=,AVT1=
//STEP1 EXEC PGM=DISP
//STEPLIB DD DSN=T91IPRR.RAVEENDR.COBOL.LOADLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD DUMMY

// IF &AVT=1 THEN
//STEP2 EXEC PGM=DISP
//STEPLIB DD DSN=T91IPRR.RAVEENDR.COBOL.LOADLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD DUMMY
// ENDIF

// IF &AVT1=2 THEN
//STEP3 EXEC PGM=DISP
//STEPLIB DD DSN=T91IPRR.RAVEENDR.COBOL.LOADLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD DUMMY
// ENDIF

you can pass different values and check it
please acknowledge me

dick scherrer · Posted: Mon Feb 14, 2011 12:46 am

Hello and welcome to the forum,

Did you test using &AVT= the way you have shown?

If not, do so and post the result.

Robert Sample · Posted: Mon Feb 14, 2011 12:52 am

krishna rao, did you not read the previous posts in this thread? The JCL Reference manual explicitly states: