Thanks for the suggestions. Yes, I definitely, and easily, could do this with a REXX however.... :-(
-----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of scott Ford Sent: Saturday, February 18, 2017 8:15 AM To: [email protected] Subject: Re: JCL IF Condition - I'm Missing Something Gil, Yeah, I hear you, it should be simpler to perform tasks. On Sat, Feb 18, 2017 at 11:12 AM Paul Gilmartin < [email protected]> wrote: > On Fri, 17 Feb 2017 21:44:01 -0500, scott Ford wrote: > > > > > >Heres what I did: > > > > > >//BUILDLIB JOB SYSTEMS,MSGLEVEL=(1,1),MSGCLASS=X,CLASS=A,PRTY=8, > > >// NOTIFY=&SYSUID,REGION=4096K > > >//*------------------------------------------* > > >//* BUILD IDF-TSS PRODUCT LIBRARIES * > > >//*------------------------------------------* > > >//MYLIBS JCLLIB ORDER=IDF.PRODCTL.JCLLIB > > >//MYSETS INCLUDE MEMBER=JCLSETS > > >//*-------------------------------------------------------* > > >//* REXX INITIAL STEP TO SET RC FOR IDF * > > >//*-------------------------------------------------------* > > >//STEP1 EXEC PGM=IRXJCL,PARM='SETRC BUILD,COPY' > > >//SYSEXEC DD DSN=IDF.PRODCLST.LIBRARY,DISP=SHR > > >//SYSTSPRT DD SYSOUT=* > > >//REXXLOG DD SYSOUT=* > > >//SYSPRINT DD SYSOUT=* > > >//SYSTSIN DD DUMMY > > >//IF1 IF (STEP1.RC = 4) THEN > > >//MYBUILD INCLUDE MEMBER=LIBUILD > > >//ENDIF1 ENDIF > > >//IF1 IF (STEP2.RC = 0) THEN > > >//MYCPY INCLUDE MEMBER=CPYLIBS > > >//ENDIF1 ENDIF > > > > > Yes, but be aware that: > > > > o ENQues for data set names mentioned in either MYBUILD or MYCPY > > will be issued, regardless that only one of those steps will be executed. > > > > o JES3 setup adds constraints. For example if the same data set is > > mentioned with DISP=(,CATLG) in both MYBUILD and MYCPY JES3 > > setup will report a conflict because it assumes all steps will be > > executed regardless of IF or COND. > > > > I hate JCL! > > > > -- gil > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to [email protected] with the message: INFO IBM-MAIN > > -- Scott Ford IDMWORKS z/OS Development ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ______________________________________________________________________ CONFIDENTIALITY NOTICE: This email from the State of California is for the sole use of the intended recipient and may contain confidential and privileged information. Any unauthorized review or use, including disclosure or distribution, is prohibited. If you are not the intended recipient, please contact the sender and destroy all copies of this email. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
