-----------------------------------<snip>------------------------------
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.
---------------------------------<unsnip>-------------------------------
That might work, as long as you have a mechanism for manipulating the
keys in the directory also. The last used block in the directory has a
key of X'FFFFFFFFFFFFFFFF'.
Rick
----------------------------------------------------------------------
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