¿ªÔÆÌåÓý

ctrl + shift + ? for shortcuts
© 2025 Groups.io
  1. H390-MVS
  2. Messages
Single Messages Topics Expanded Polls

Re: Get names of all generations of a GDG

 

¿ªÔÆÌåÓý

You can use the HISTORY parameter in LISTCAT command? ( IDCAMS program).... also...


LISTC? ?ent("dataset-name-gdg" )? ?HISTORY?

and then.... find? a unique string "NONVSAM"? in a list .....

Example.

listc ent(RAC0.A001D.PRINT.SMF) history

GDG BASE ------ RAC0.A001D.PRINT.SMF ? ?


NONVSAM ---- RAC0.A001D.PRINT.SMF.G0001V00 ? ?<== first generation? ? ? ? ? ? ? ? ?
? IN-CAT --- CATALOG.MVSPROD.USER02 ? ? ? ? ? ? ? ? ? ? ? ? ?
? HISTORY ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? DATASET-OWNER-----(NULL) ? ? CREATION--------2020.253 ? ?
? ? RELEASE----------------2 ? ? EXPIRATION------0000.000 ? ?
? ? ACCOUNT-INFO-----------------------------------(NULL) ? ?
? ? STATUS------------ACTIVE ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? SMSDATA ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? STORAGECLASS ---STANDARD ? ? MANAGEMENTCLASS-----PERM ? ?
? ? DATACLASS ------DCPADRAO ? ? LBACKUP ---0000.000.0000 ? ?
?



-----------------------------------
Marco Antonio Ferreira
Proteus Information Security Services
Mainframe Security Consultant
(:+55 21 98530-5086
(:+55 11 98362-2153

¡°Esta mensagem ¨¦ destinada exclusivamente para a(s) pessoa(s) a quem ¨¦ dirigida, podendo conter informa??o confidencial e legalmente protegida. Se voc¨º n?o for destinat¨¢rio desta mensagem, desde j¨¢ fica notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de qualquer forma, utilizar a informa??o contida nesta mensagem. Caso voc¨º tenha recebido esta mensagem por engano, pedimos por favor que responda esse e-mail informando o acontecido e posteriormente, apague-a.¡±

¡°This message is intended only for the person to whom it is addressed and may contain confidential and legally protected information. If you are not the addressee of this message, from now on you are already notified to abstain to disclose, copy, distribute, examine or, in any way, use the information contained in this message. If you have received this message in error, please answer this e-mail stating what happened and subsequently delete it.¡±


De: [email protected] <[email protected]> em nome de Doug Wegscheid via groups.io <dwegscheid@...>
Enviado: quarta-feira, 9 de setembro de 2020 09:33
Para: [email protected] <[email protected]>
Assunto: [H390-MVS] Get names of all generations of a GDG
?

I need to list out the names of all existing generations of a GDG in order to construct a job to process them all individually. This would be an automated process, not constructing the jobstream by hand.

I can use IDCAMS to do it, but I get a lot of extra cruft in there. I can also adapt the logic in GDGCOPY to do this, which would require dusting off some weak assembler skills.

Is there a way to do this on MVS 3.8 that I have missed?
Join [email protected] to automatically receive all group messages.