I just have to ask this one question. How difficult is it to get the number of directory blocks from a PDS in a _____ program (where the blank can be filled in with COBOL, PL/1, REXX, etc., but not HLASM/ASM) and then open the data set with RECFM=U and then write an initial directory block followed by n empty blocks?
With that question asked, if it is not so difficult, wouldn't that allow you to clear a PDS right rapidly? The only access you would have to have for the data set is update, because you aren't deleting it or [re-]allocating it. Regards, Steve Thompson ---------------------------------------------------------------------- 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