If '//STEP000 EXEC PGM=IEFBR14' is commented out, then 'STEPA030' will execute with CC=00 instead of NXEQ'd.* *
On 13/07/2019 20:11, Seymour J Metz wrote: > I've been programming in assembler since 1960 and I find CON= to be > understandable but highly counterintuitive. > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > ________________________________________ > From: IBM Mainframe Discussion List <[email protected]> on behalf of > Paul Gilmartin <[email protected]> > Sent: Friday, July 12, 2019 3:41 PM > To: [email protected] > Subject: Re: JCL COND Parameter > > On Fri, 12 Jul 2019 18:50:00 +0000, Edgington, Jerry wrote: > >> Condition code testing in JCL, has always seemed backward logic to me. >> > I suspect it's intuitive to an Assembler programmer accustomed to > branching *around* a section of code. > >> But, as I understand it, maybe, the reason STEPA030 didn't run was because >> STEP000 had RC=0 and STEPA030 didn't specify a STEP name. >> >> COND=(7,GT) means all steps prior to the condition code testing would have >> to (7,GT). >> > Use IF. It's more intuitive nowadays. > >> -----Original Message----- >> From: Tony Sambataro >> Sent: Friday, July 12, 2019 2:34 PM >> >> the jcl below should execute as far a cond code handling. I believe the two >> steps with COND= coded should both execute. But in my test only the one with >> a step name coded runs. Would appreciate other opinions. >> >> //STEP000 EXEC PGM=IEFBR14 >> //STEP010 EXEC PGM=IDCAMS >> //SYSPRINT DD SYSOUT=X >> //SYSIN DD * >> SET MAXCC=16 >> //STEPA030 EXEC PGM=IEFBR14,COND=(7,GT) >> //STEPA040 EXEC PGM=IEFBR14,COND=(7,GT,STEP010) >> >> STEP000 IEFBR14 ------------------ R0000 >> STEP010 IDCAMS ------------------ R0016 >> STEPA030 IEFBR14 ------------------ NXEQ >> STEPA040 IEFBR14 ------------------ R0000 > -- gil > > ---------------------------------------------------------------------- > 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
