On Thu, 17 Jan 2019 09:49:30 +0000, Ward Able, Grant wrote:

>This seems simple and I may be having a senior moment, but I don’t seem to be 
>able to get this to work.
>I have a number of batch jobs that do ADRDSSU backups, then execute a variable 
>number of PROC statements to copy files. 
> TSOBATCH PGM=IKJEFT01 CC= 0000 
> BKDSN    PGM=ADRDSSU  CC= 0004 
>
>Each PROC causes a series of steps to execute:
> CLEARIT  PGM=IEBCOPY  CC= 0000 
> COPYS    PGM=IEBCOPY  CC= 0000 
> COPYQ    PGM=IEBCOPY  CC= 0000 
> CLEARIT  PGM=IEBCOPY  CC= 0000 
> COPYB    PGM=IEBCOPY  CC= 0000 
> CHKQMGR  PGM=IKJEFT01 CC= 0000
>
>Then the final step is to check the return codes and issue an alert for RC > 0
>//NOTIFY   IF (ABEND | RC > 0) THEN   
>//ALERT    EXEC PGM=CICCRE01          
>//SYSPRINT  DD SYSOUT=*               
>//NOTIFYX   ENDIF                     
>
>Mq question is this: how do I code the IF/THEN(/ELSE) to allow for RC=4 from 
>step BKDSN? I do not want an alert if this is the case, but any other step > 0 
>should give me an alert.
> 
(You seem to be saying that you *do* want the alert if BKDSN.RC == 0 but some
other step has RC<>0?)

This would seem to be simple.  Am I missing something?:
    //NOTIFY   IF (ABEND | ( RC > 0 & BKDSN.RC <> 4 ) ) THEN   
    //ALERT    EXEC PGM=CICCRE01          
    //SYSPRINT  DD SYSOUT=*               
    //NOTIFYX   ENDIF                     

(Why, why, why did the designers of IF-THEN-ELSE not include a check that
the label fields on THEN, ELSE, and ENDIF must match that on IF!?)

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to