|
View previous topic :: View next topic
|
| Author |
Message |
Daniel Prosser
New User
Joined: 05 Nov 2010
Posts: 57
Location: Amsterdam
|
|
|
|
Hi,
I need to generate a list/report of the space allocated for a group of datasets.
I have 400 odd GDGs with various generations and I want to create a list of only the latest generation.
any bright ideas?
Dan
 |
|
| Back to top |
|
 |
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
| Do you have the means to generate the space report once you know the dataset names of the zero generation or is it the whole sheebang you want ? |
|
| Back to top |
|
|
Daniel Prosser
New User
Joined: 05 Nov 2010
Posts: 57
Location: Amsterdam
|
|
|
|
I need a report that specifies the dataset name & allocated space for ALL of the datasets.
HLQ.**.*(0)
I know the names it's just there is rather alot of them. |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
www.ibmmainframes.com/viewtopic.php?t=56457
The link above is a REXX utility to return the zero generation of a given GDG which may need a bit of tweaking as I believe it only operates on one GDG at a time, but can be easily changed to cope with more.
That will give you the zero generation of the GDG bases, so that just leaves the problem of the reporting function.
Do you have anything like FDRREPORT installed at your site ? |
|
| Back to top |
|
|
Daniel Prosser
New User
Joined: 05 Nov 2010
Posts: 57
Location: Amsterdam
|
|
|
|
That looks interesting, I'll have a little play and see what I can do.
The reporting doesn't need to be super pretty so I am sure I can make this work.
Thanks  |
|
| Back to top |
|
|
Pete Wilson
Active Member
Joined: 31 Dec 2009
Posts: 580
Location: London
|
|
|
|
The only problem with FDREPORT is you have to do a separate report for online and migrated datasets. Won't matter if you have all your (0) generations online though.
e.g.
//GDSLIST EXEC PGM=FDREPORT,REGION=128M
//SYSPRINT DD SYSOUT=0
//SYSOUT DD SYSOUT=0
//SYSUDUMP DD SYSOUT=0
//ABRMAP DD SYSOUT=*
//ABRSUM DD SYSOUT=*
//SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR
//SYSIN DD *
REPORT FIELD=(NAME,CAPBYTES,SIZE,GDGRELGN,GDGLIMIT,GDGFLAG)
XS XDSN=GDG.NAME%.*,GDGRELGN.EQ.(0)
SORT FIELD=(NAME)
SUMM FIELD=(CAPBYTES,SIZE)
PRINT SUM=Y,SORT=CO,DATATYPE=CATVTOC,RPTYPE=TABLE,
ENABLE=(FASTPATH,GDGONLY),RECORDSUMMARY=CLUSTER,
BYTEF=KILO,SUMBYTEF=MEGA
IDCAMS DCOLLECT might be an option.
Naviquest (ISMF in batch) is another option.
You can use ISMF option 1 panels directly but it can only do one dsname mask at a time. |
|
| Back to top |
|
|
|
|
