Is there any TSO command to find the latest version of a GDG?
For Eg: If the base GDG is A000.TEST.TEMP and the versions of the GDG are
A000.TEST.TEMP.G0000.V00
A000.TEST.TEMP.G0000.V01
A000.TEST.TEMP.G0000.V02
A000.TEST.TEMP.G0000.V03
A000.TEST.TEMP.G0000.V04
A000.TEST.TEMP.G0000.V05
By using a TSO command I should be able to get the following Dataset name A000.TEST.TEMP.G0000.V05
Thanks Superk,
The command TSO LISTCAT(GDG-BASE) lists all the GDG versions. To get the latest version alone I couldn't find any TSO command. But still we can achieve that by coding in REXX
I ran TSO LISTCAT LVL(GDG.BASE) for a GDG base but that had many record, may be 20000. It is showingt all the GDGs screen by screen followed by three * i.e. *** and that means i will have to press <enter> everytime to see the next screen.
I dont want to see all the screens as the number will ne many. Please suggest me a commant on *** to come out of this screen cycle.
Joined: 26 Apr 2004 Posts: 3265 Location: Charlotte,NC USA
1. Run the LISTCAT in batch, so all the output goes to SYSOUT instead of your terminal.
2. Write a CLIST or REXX exec that uses the OUTTRAP function to capture and store the output from the LISTCAT command instead of displaying it on the terminal.
3. (Not yet tested) You may be able to allocate SYSPRINT to somewhere else other than your terminal (i.e. SYSOUT or a dataset). This will definitely work if you call IDCAMS first:
