To run a clist I add a step //CHECK EXEC PGM=IKJEFT01 //SYSTSIN DD * PR0C 0 Etc ....
Sent from my iPhone > On Mar 6, 2014, at 5:24 AM, Elardus Engelbrecht > <[email protected]> wrote: > > Micheal Butz wrote: > >> I have 2 files and would lime to see If one or both or none exist >> I am using IDCAMS if-else sequence With a command of print for this >> However I am always coming up with a cc of 0 in the jcl for this step > > Ok. I have followed this thread where CM Poncolet and Paul Gilmartin tried to > help you to relieve yourself from 'torture yourself'. > > May I suggest that you try something else to check whether a dataset (not > file) exists and whether it is empty or not? > > Crude, dirty, short and sweet CLIST to see whether your dataset exists or not: > > PROC 0 > IF &SYSDSN('.....JCL') = OK THEN + > DO > WRITE DATASET FOUND > SET &RC = 0 > END > ELSE + > DO > WRITE DATA SET NOT FOUND > SET &RC = 4 > END > > DFSORT to see whether a dataset is EMPTY or not: > > COUNT FROM(SYS1.EMPTY.YES.NO.PERHAPS) EMPTY gives RC=12 (or RC=04 if > specified) > > Of course there are many other ways to check your DSN and quantity of > records. I think you should see it in IBM-MAIN archives. > > Use your RC to selectively run your IDCAMS print step(s). > > HTH! > > Groete / Greetings > Elardus Engelbrecht > > ---------------------------------------------------------------------- > 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
