MVSFORUMS.com

[Raaj]

I have 6 steps in a Jcl and I wanted to execute only the steps 3 & 5 How to handle this?

Step 1

Step 2

Step 3

Step 4

Step 5

Step 6

I tried using COND but it's not apt. Any other way?

[Phantom]

Raaj,

[Raaj]

[Phantom]

Raaj,

If you don't want to execute Steps 1,2,4,6,7 always then u can easily turn them off using COND=(00,LE). This will never allow the steps to execute whatsoever be the return code of previous steps (0 or non-zero value).

Here is a sample:

[kolusu]

Raaj,

Phantom's solution WILL execuete the first step as there is NO return code to check against it. so you need a ONLY cond to bypass the first step. COND=ONLY executes when the step previous to the first step Abends, but there is no step before the first step ! So, the first step that also has a COND=ONLY will never get executed. After step3 you can Don't need a ONLY clause , as there is a step3 return code which can be used to check.

Check this link which discusses the similar issue

http://www.mvsforums.com/helpboards/viewtopic.php?t=1273&highlight=cond

[Phantom]

Oops,

That was a Gr8 Catch Kolusu. Somehow missed that.

Thanks,
Phantom

[Raaj]

Hi Phantom/Kolusu,

That's really superb and Fantastic.,

Thanks a lot!!

Regards,
JR.

[PHacker]

We use combinations depending on what is needed.

One, //IFA IF (JS002.RC > 4) THEN
// ENDIF

is used with return codes from particular steps.

Another, of course, is the COND in each EXEC STMT.
//JS058 EXEC PGM=I9EXPDNL,PARM=(&PYR&SDAT),TIME=5,COND=(9,LT)

We even at times make a COBOL program generate a specific COND to flag what step we want to run.

//IF1 IF RC = 1 THEN
// ENDIF

above does the JCL decision.

With the COBOL program having this:
000022 LINKAGE SECTION.
000023 01 GL-FLAG.
000024 05 WHAT-EVER PIC XX.
000025 05 THE-POINT PIC X(03).
000026 PROCEDURE DIVISION USING GL-FLAG.
000027 ******************************************************************
000028 * DRIVER MODULE *
000029 ******************************************************************
000030 A000-LOCK-AND-LOAD.
000031 IF THE-POINT = 'HBO'
000032 MOVE 1 TO RETURN-CODE.
000033 IF THE-POINT = 'GAP'
000034 MOVE 2 TO RETURN-CODE.
000035 IF THE-POINT = 'ISI'
000036 MOVE 3 TO RETURN-CODE.
000037 STOP RUN.
000038 A000-EXIT. EXIT.

And //SET1 SET GFL=GAP
does the pointer as to what is wanted out of a very long jcl to run.

Paul

[mfjin]

Kolusu,

Doesnt (o,le) mean

" Do not execute this step if the previous step returns an rc of less than or equal to 0?" This means if the previous step returns an rc of 12 or 16 this step will get executed. But Raaj I guess does not want these steps to be executed.

[Cogito-Ergo-Sum]

When condition is false, the step will be executed. If it evaluates to true, the step will be bypassed.
_________________
ALL opinions are welcome.

Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes.

[mfjin]

c-e-s,

That is precisely what I say. If the previous step returns an rc of 12.
condition will be set to false ( as 12 is not less than or equal to 0) and the subsequent step gets executed. But Raaj does not want this step to run at all. But the step gets executed if the previous step returns an rc that is greater than 0.


I hope I have made sense.

[kolusu]

mfjin,

Check this link which clears all your queries

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B631/16.5.7?SHELF=&DT=20030423085347&CASE=

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

[Jeba]

mfjin,

You may want to see the following link too

http://www.mvsforums.com/helpboards/viewtopic.php?t=66&highlight=cond
_________________
Thanks,
Jeba
(Known is a drop Unknown is an ocean)

[mfjin]

got it mates...thanks a lot.


same pinch jeba...didnt know there were people who thought exactly like me.