In jobs where I need to segment my processing, I will just stick a BR14 step as the first step. This avoids the "not evaluated yet" problem and allows me to control my segments.
For example, in my job I have three segments of processing: 1. FTP get a file, then check to make sure it is not empty 2. Process the file 3. Send out the reports. I use symbolics on the IF statements to control whether or not I want to run each segment - including the first - which only works because of my //STEP0 EXEC PGM=IEFBR14. If a step in one segment depends on a step in another segment having run, I use IF STEPXxx.run. It may not be the most glamorous logic programming, but it seems to be fairly straightforward most of the time when thought through. * Don * On Thu, Jun 10, 2010 at 8:30 AM, Robert Birdsall <bsqu...@umich.edu> wrote: > I understand why it would be necessary to have an effective COND=EVEN on > each step in an IF ABEND controlled sequence, but why on IF NOT ABEND? > In your IF ABEND...ELSE...ENDIF construct, the ELSE if treated as IF NOT > ABEND, forcing the COND=EVEN behaviour. > > Just for fun (and contrary to a previously posted doc excerpt), note that > the > following 'works' under z/OS 1.10 (I don't have 1.11 installed, yet). > > //TESTJOB JOB (0200),'BSquare',CLASS=X,MSGCLASS=X,NOTIFY=&SYSUID > //* > // IF FALSE THEN > // EXEC PGM=KLUGE,COND=ONLY > // ENDIF > //* > // IF (U0100 = U0140) THEN > //YES1 EXEC PGM=IEFBR14 > //NO1 EXEC PGM=IEFBR14 > // ELSE > //YES2 EXEC PGM=IEFBR14 > // ENDIF > > By works, I mean: > The unnamed step is _not_ executed (COND=ONLY on 1st step, no ABEND) > YES1 and NO1 are _not_ executed (U0100 <> U0140) > YES2 _is_ executed (U0100 <> U0140) > > If you comment out the IF FALSE...ENDIF lines: > YES1 _is_ executed (1st step, 'IF (U0100 = U0140)' not evaluated yet) > NO1 is _not_ executed (_now_ 'IF (U0100 = U0140)' has been evaluated) > YES2 _is_ executed (U0100 <> U0140) > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
