Page 1 of 1

How to find the size of the PDS or PS using REXX?

Posted: Wed Feb 05, 2014 2:53 pm
by Jatin Singh
Hi,

Could anyone please advise me in finding the size of the PDS or PS using REXX? I need to know cylinders occupied by them.

Re: How to find the size of the PDS or PS using REXX?

Posted: Wed Feb 05, 2014 3:11 pm
by zprogrammer
Hi Jatin,

What do you mean by SIZE is it total bytes or Tracks or Cylinders?

Re: How to find the size of the PDS or PS using REXX?

Posted: Wed Feb 05, 2014 8:20 pm
by zprogrammer
Hi,

Try this

Code: Select all

/*REXX*/
ADDRESS ISPEXEC
X = LISTDSI("'"<pds or ps name>"'")
SAY 'DSNAME =    ' SYSDSNAME
SAY 'LRECL  =    ' SYSLRECL
SAY 'BLKSIZE =   ' SYSBLKSIZE
SAY ' USED       ' SYSUNITS '= ' SYSUSED
SAY ' ALLOCATED  ' SYSUNITS '= ' SYSALLOC

Re: How to find the size of the PDS or PS using REXX?

Posted: Wed Feb 05, 2014 8:24 pm
by zprogrammer
Also check this link which tells you what other information you could retrieve

http://publibz.boulder.ibm.com/cgi-bin/ ... T#FIRSTHIT