Not everyone licensed for DFSMSdss.

On Fri, Dec 23, 2022 at 10:55 AM David Cole <[email protected]> wrote:

> 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 <[email protected]> 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 [[email protected]] on
> >>> >>behalf of David Cole [[email protected]]
> >>> >>Sent: Wednesday, December 21, 2022 4:20 AM
> >>> >>To: [email protected]
> >>> >>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
> >>> >>[email protected] (personal)
> >>> >>[email protected] (business)
> >>> >>540-456-6518 (cell)
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>
-- 
Michael Babcock
OneMain Financial
z/OS Systems Programmer, Lead

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

Reply via email to