Wanted DSN Information

RohithRaj · New User Joined: 06 Aug 2008 Posts: 13 Location: Hyderabad

Hi Everyone,
I would like to get the dataset information by running a job.
I want all the information that we get once we do 3.2 on a dataset.
so is there a jcl code that i can execute on a dataset and get that dataset information??

expat · Posted: Wed Aug 13, 2008 4:19 pm

Do a search for LISTDSI in REXX / ISPF and also take a look at the manuals to see exactly what components of data will be available.

superk · Posted: Wed Aug 13, 2008 4:24 pm

Expat, RohithRaj was already given that same advice in the previous topic:

www.ibmmainframes.com/viewtopic.php?t=33148&highlight=

I'd like to know why it's being asked again.

RohithRaj · New User Joined: 06 Aug 2008 Posts: 13 Location: Hyderabad

Hi I have the REXX code, but I am not getting the information that I need.
The code is here:
X = LISTDSI("'CPEP.CAPACITY.MONTHS'")
SAY 'FUNCTION CODE FROM LISTDSI IS: ' X
SAY 'THE DATA SET NAME IS: ' SYSDSNAME
SAY 'VOLUME SERIAL ID IS: ' SYSVOLUME
SAY 'DATA SET ORGANIZATION: ' SYSDSORG
SAY 'PRIMARY ALLOCATION IN SPACE UNITS: ' SYSPRIMARY
SAY 'SECONDARY ALLOCATION IN SPACE UNITS ' SYSSECONDS
SAY 'THE ALLOCATION IN SPACE UNITS IS: ' SYSALLOC
SAY 'TRACKS PER CYLINDER FOR THE UNIT IDENTIFIED ' SYSTRKSCYL
SAY 'USED SPACE IS ' SYSUSED
SAY 'NUMBER OF EXTENTS ALLOCATED IS ' SYSEXTENTS

I want to know if there is JCl code which I could submit like any job and get the output on spool.?
The above code is in REXX, and its not displaying the total allocated cyliders and used cylinders for a dataset that spans across multiple volumes.
Mu CPEP.CAPACITY.MONTHS file spans across 10 volumes and has
Allocated cyliders: 5600
Used: 5425
Volumes occupied is 4. (declared total volume to be used was 10).

Anuj Dhawan · Posted: Wed Aug 13, 2008 4:45 pm

Hi,

Does this suffice ..

expat · Posted: Wed Aug 13, 2008 4:59 pm

For multi volume I would use DCOLLECT data and REXX to interpret it.