Rob, If you could provide more detail on what you are trying to accomplish, we can probably provide several solutions.
Lizette -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Klan, Rob (RET-DAY) Sent: Tuesday, August 27, 2013 6:30 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX and CLISTs to generate code to delete empty GDG bases The answer "LISTCAT LEVEL('hlq') GDG NAME" does supply GDG names However question was for "empty GDG" which I assume to mean no generations. Changing to "LISTCAT LEVEL('hlq'') VOLUME' will return the associations or NULL if no generations exists. Such as GDG BASE ------ MY.GDG.BASE.A ASSOCIATIONS--------(NULL) GDG BASE ------ MY.GDG.BASE.B ASSOCIATIONS NONVSAM--MY.GDG.BASE.B.G0001V00 Maybe other better ways to list, but I am IDCAMS fan. Rob -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of R.S. Sent: Tuesday, August 27, 2013 8:39 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX and CLISTs to generate code to delete empty GDG bases W dniu 2013-08-27 14:14, Rob JACKSON pisze: > > > I have received a request for expertise coding REXX and CLISTs to generate code to delete empty GDG bases. > > CONTROL ASIS /* this CLIST deletes some GDG bases */ /* only empty GDG base will be deleted */ DEL HLQ.ANY.NAME DEL HLQ.ANO.THER.NAME DEL ... DEL ... /* this is the end */ Hint: you can find GDG bases using the following: LISTCAT LEVEL(HLQ) GDG NAME -- Radoslaw Skorupka Lodz, Poland ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
