Tony Minor niggle - but shouldn't that be? :
DEVTYPE =CL8'MYDDNAME',OUTAREA IF (LTR,R15,R15,NZ) *** DD Not allocated *** ELSEIF (OC,OUTAREA,OUTAREA,Z) *** DD DUMMY SPECIFIED *** ENDIF , Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: [email protected] Web: www.rocketsoftware.com -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Tony Lubrano Sent: 12 February 2010 14:55 To: [email protected] Subject: Re: Determining if DUMMY allocation Charles, You can do a DEVTYPE macro to determine if the file is DUMMY or NULLFILE... the returned area is low-values: DEVTYPE =CL8'MYDDNAME',OUTAREA IF (LTR,R15,R15,NZ) *** DD Not allocated *** ENDIF , IF (OC,OUTAREA,OUTAREA,Z) *** DD DUMMY SPECIFIED *** ENDIF , OUTAREA DS D Tony Lubrano Product Author NEON Enterprise Software, LLC. p: 281 207 4922 f: 281 207 4973 [email protected] What is zPrime? Find out at www.zprime.com or just ask us! -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Charles Mills Sent: Friday, February 12, 2010 8:46 AM To: [email protected] Subject: Re: Determining if DUMMY allocation > look in the TIOT Where? Charles -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Shmuel Metz (Seymour J.) Sent: Thursday, February 11, 2010 9:03 PM To: [email protected] Subject: Re: Determining if DUMMY allocation In <013801caab27$c57da320$5078e9...@org>, on 02/11/2010 at 06:37 AM, Charles Mills <[email protected]> said: >Is there a way to determine if a DD statement has been allocated DUMMY, >short of SVC 99 info retrieval? Before OPEN, use DEVTYPE or look in the TIOT. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] 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 [email protected] 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 [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
