Hi Ituriel,
That's exactly what I was looking for!
Thank you,
Dave Cole
At 12/21/2022 07:43 AM, Ituriel do Neto wrote:
Hi,
ADRDSSU has a RELEASE primary command that can do it.
//S1 EXEC PGM=ADRDSSU
//* PARM='TYPRUN=NORUN'
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
RELEASE INCLUDE(HLQ.**) -
STORGRP(SGSMALL) ADMIN -
SELECTMULTI(ALL) /* EVEN IF MULTIVOL */
Best Regards
Ituriel do Nascimento Neto
z/OS System Programmer
Em quarta-feira, 21 de dezembro de 2022 07:59:39
BRT, David Cole <dbc...@colesoft.com> escreveu:
Hi Seymour,
WRT "OPEN/CLOSE", yeah. I don't either.
WRT "I know of no reason", It's been a long time since I wrote a
program to read a directory, but if I did that, then the reason would
be "to release space", of course.
In any case, writing a new program is not an option here. Also using
any 3rd party tool is not an option either.
Hmmmm. I wonder if IEBGENER can be tricked into reading a directory...
Dave Cole
At 12/21/2022 04:55 AM, Seymour J Metz wrote:
>Every release tool that I am aware of does an OPEN/CLOSE. I know of
>no reason why a program would need to read the directory in order to
>release space.
>Does ISPF create and delete a dummy member? If so, why is that required?
>--
>Shmuel (Seymour J.) Metz
>http://mason.gmu.edu/~smetz3
>________________________________________
>>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on
>>behalf of David Cole [dbc...@colesoft.com]
>>Sent: Wednesday, December 21, 2022 4:20 AM
>>To: IBM-MAIN@LISTSERV.UA.EDU
>>Subject: RLSE - A question about releasing
unused tracks in a DASDÂ dataset
>>Is there a way to release unused tracks in a classic z/OS PDS but
>>without having to open and close it?
>>Or if opening/closing is required, is there a way to do that for a
>>PDS without knowing (or discovering) what members are in it, and
>>without creating a new member?
>>Obviously, I could write something, but I don't want to.
>>And I cannot rely on the presence of any program or TSO command that
>>does not come standard on a z/OS system?
>>I don't think there is a way to do this, but I'd love for someone to
>>prove me wrong.
>>David Cole
>>dbc...@gmail.com (personal)
>>dbc...@colesoft.com (business)
>>540-456-6518 (cell)
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
