On Fri, 24 Feb 2012 15:48:57 -0800, Frank Swarbrick wrote:

>I'm not clear on what you are doing here.  Are you saying this is somehow a 
>replacement for this?

//REUSE   EXEC PGM=IEFBR14
//MYFILE  DD DSN=MY.FILE,SPACE=(0,0),DISP=(MOD,DELETE)
//MYPGM   EXEC PGM=MYPGM
//MYFILE  DD DSN=MY.FILE,SPACE=(CYL,(100,10),RLSE),DISP=(NEW,CATLG)

Yes, provided you're willing/intending to reuse the data set if it exists
rather than deleting and reallocating.

How would this look using your method?

//MYPGM   EXEC PGM=MYPGM
//ALLOC   DD DSN=MY.FILE,SPACE=(CYL,(100,10)),DISP=(MOD,CATLG)  /* UNIT= or 
SMS? */
//MYFILE  DD DISP=OLD,DSN=*.ALLOC,VOL=REF=*.ALLOC

(From memory; not lately tested.)

(I don't know how to deal with the RLSE option.)

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to