MVS 3.8 was just *slightly* earlier than "IF / THEN" conditional JCL existed. :-)
Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS ITIL v3 Foundation Certified mailto:[email protected] Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html On Fri, 22 Dec 2023 22:28:27 +0000, Rahim Azizarab <[email protected]> wrote: >you can also experiment with this method. It works on Zos; but I have not >tried it on MVS3.8. >//FULTONMA JOB MSGLEVEL=(1,1) >//MYPROG PROC P=IEFBR14 >//PSTEP1 EXEC PGM=&P >// IF (RC LT 4) THEN >//PSTEP2 EXEC PGM=IEFBR14,PARM='Y' >// ELSE >//PSTEP2 EXEC PGM=IEFBR14,PARM='N' >// ENDIF >// PEND >//STEP1 EXEC PROC=MYPROG,P=IEFBR14 >//STEP2 EXEC PROC=MYPROG > > >regards; > >Rahim > > > > > > > > On Friday, December 22, 2023 at 10:04:29 AM CST, Bob Bridges > <[email protected]> wrote: > > I should know this - I've been using JCL for decades - but I find I'm > uncertain about something I haven't done in a while. I have a production job > here that will eventually be rewritten, but for now I'm just going to tell it > to execute only the first couple steps. I had in mind inserting "//" before > the part of the JCL that I want to skip. Very simple. > >But wait - does the JCL interpreter discard the rest of the job when it sees >that empty '//', or does it interpret the rest as the start of a new job? >(Since there's no subsequent JOB statement I'm not terribly worried about it, >but it's sloppy; maybe I should just use a COND parm on the JOB card.) This >info is probably in the JCL ref, but I don't immediately see it. > >--- >Bob Bridges, [email protected], cell 336 382-7313 > >/* "Poor Diogenes; if you knew how to get on with people you wouldn't have to >live like that." / "Poor Aristippos; if you knew how to live like this you >wouldn't have to get on with people." -a condensation of their respective >schools of thought a few centuries BC */ > >---------------------------------------------------------------------- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to [email protected] with the message: INFO IBM-MAIN > > >---------------------------------------------------------------------- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
