IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

VSAM file space used - REXX


IBM Mainframe Forums -> CLIST & REXX
Post new topic   This topic is locked: you cannot edit posts or make replies.
View previous topic :: View next topic  
Author Message
ranandha

New User


Joined: 05 May 2006
Posts: 2

PostPosted: Wed Dec 06, 2006 1:34 pm
Reply with quote

Using REXX can I find the VSAM file attributes space allocation and space used?
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Wed Dec 06, 2006 10:23 pm
Reply with quote

Are LISTCAT and/or LISTDSI not giving you what you need?
Back to top
View user's profile Send private message
ranandha

New User


Joined: 05 May 2006
Posts: 2

PostPosted: Thu Dec 07, 2006 2:32 pm
Reply with quote

LISTCAT and LISTDSI does not give the exact VSAM space used...
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Thu Dec 07, 2006 10:20 pm
Reply with quote

you can get all information from LISTCAT
and then you have to calculate the allocated
tracks, used tracks and percent. here is an
example from my vsam dataset rexx.

ATRK = ARBA/CISZ/CICA*TRKS
UTRK = URBA/CISZ/CICA*TRKS
UPER = UTRK/ATRK*100

ATRK = FORMAT(ATRK,,0)
UTRK = FORMAT(UTRK,,0)
UPER = FORMAT(UPER,,0)

Allocation
Allocated Tracks: 19125
Allocated Extents: 3

Utilization
Used Tracks: 18810
Used Percent: 98
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 121
Location: India

PostPosted: Fri Mar 08, 2019 9:35 pm
Reply with quote

Hi Mickeydusaor,

Can you explain from where you will get this information?

ATRK = ARBA/CISZ/CICA*TRKS
UTRK = URBA/CISZ/CICA*TRKS
UPER = UTRK/ATRK*100

ATRK = FORMAT(ATRK,,0)
UTRK = FORMAT(UTRK,,0)
UPER = FORMAT(UPER,,0)

Here is the LISTC information about my dataset
Code:

CLUSTER ------- TTTT.TEST.VSAM                                           
     IN-CAT --- USER.TEST.CATALOG                                           
     HISTORY                                                                   
       DATASET-OWNER-----(NULL)     CREATION--------2019.047                   
       RELEASE----------------2     EXPIRATION------0000.000                   
     SMSDATA                                                                   
       STORAGECLASS ---STANDARD     MANAGEMENTCLASS--TESTSTD                   
       DATACLASS ------EXTENDED     LBACKUP ---0000.000.0000                   
       CA-RECLAIM---------(YES)                                                 
       EATTR-------------(NULL)                                                 
       BWO STATUS------00000000     BWO TIMESTAMP---00000 00:00:00.0           
       BWO---------------(NULL)                                                 
     RLSDATA                                                                   
       LOG ----------------(NULL)   RECOVERY REQUIRED --(NO)     FRLOG ---------
       VSAM QUIESCED -------(NO)    RLS IN USE ---------(NO)     LOGREPLICATE---
       LOGSTREAMID-----------------------------(NULL)                           
       RECOVERY TIMESTAMP LOCAL-----X'0000000000000000'                         
       RECOVERY TIMESTAMP GMT-------X'0000000000000000'                         
       DATABASE -----------------(NULL)                                         
    ENCRYPTIONDATA                                                             
      DATA SET ENCRYPTION-----(NO)                                             
    PROTECTION-PSWD-----(NULL)     RACF----------------(NO)                   
    ASSOCIATIONS                                                               
      DATA-----TTTT.TEST.VSAM.DATA                                       
      INDEX----TTTT.TEST.VSAM.INDEX                                     
  DATA ------- TTTT.TEST.VSAM.DATA                                       
    IN-CAT --- USER.TEST.CATALOG                                           
    HISTORY                                                                   
      DATASET-OWNER-----(NULL)     CREATION--------2019.047                   
      RELEASE----------------2     EXPIRATION------0000.000                   
      ACCOUNT-INFO-----------------------------------(NULL)                   
    PROTECTION-PSWD-----(NULL)     RACF----------------(NO)                   
    ASSOCIATIONS                                                               
      CLUSTER--TTTT.TEST.VSAM                                           
    ATTRIBUTES                                                                 
      KEYLEN----------------18     AVGLRECL--------------52     BUFSPACE-------
      RKP--------------------0     MAXLRECL-------------200     EXCPEXIT-------
      STRIPE-COUNT-----------1                                                 
     ACT-DIC-TOKEN----X'4000000B01F001F101F205000703080108FE05FE0DFE0EFE0AFE00
     SHROPTNS(2,3)      SPEED     UNIQUE           NOERASE     INDEXED       N
     NONSPANNED    COMP-FORMT     EXTENDED        EXT-ADDR                   
   STATISTICS                                                                 
     REC-TOTAL--------------0     SPLITS-CI--------------0     EXCPS----------
     REC-DELETED------------0     SPLITS-CA--------------0     EXTENTS--------
     REC-INSERTED-----------0     FREESPACE-%CI---------20     SYSTEM-TIMESTAM
     REC-UPDATED------------0     FREESPACE-%CA---------20          X'00000000
     REC-RETRIEVED----------0     FREESPC--------804372480                   
     USER-DATA-SIZE------------------------------887401880     COMP-USER-DATA-
   ALLOCATION                                                                 
     SPACE-TYPE------CYLINDER     HI-A-RBA-------804372480                   
     SPACE-PRI------------142     HI-U-RBA---------------0                   
     SPACE-SEC-------------71                                                 
   VOLUME                                                                     
     VOLSER------------T0T112     PHYREC-SIZE---------4096     HI-A-RBA-------
     DEVTYPE------X'3010200F'     PHYRECS/TRK-----------12     HI-U-RBA-------
     VOLFLAG------------PRIME     TRACKS/CA-------------15                   
     EXTENTS:                                                                 
     LOW-CCHH-----X'16F40000'     LOW-RBA----------------0     TRACKS---------
     HIGH-CCHH----X'1B36000E'     HIGH-RBA-------804372479                   
   VOLUME                                                                     
     VOLSER-----------------*     PHYREC-SIZE------------0     HI-A-RBA-------
     DEVTYPE------X'3010200F'     PHYRECS/TRK------------0     HI-U-RBA-------
     VOLFLAG--------CANDIDATE     TRACKS/CA--------------0                   
   VOLUME                                                                     
     VOLSER-----------------*     PHYREC-SIZE------------0     HI-A-RBA-------
     DEVTYPE------X'3010200F'     PHYRECS/TRK------------0     HI-U-RBA-------
     VOLFLAG--------CANDIDATE     TRACKS/CA--------------0                   
 INDEX ------ TTTT.TEST.VSAM.INDEX                                     
   IN-CAT --- USER.TEST.CATALOG                                           
   HISTORY                                                                   
     DATASET-OWNER-----(NULL)     CREATION--------2019.047                   
     RELEASE----------------2     EXPIRATION------0000.000                   
   PROTECTION-PSWD-----(NULL)     RACF----------------(NO)                   
   ASSOCIATIONS                                                               
     CLUSTER--TTTT.TEST.VSAM                                           
   ATTRIBUTES                                                                 
      KEYLEN----------------18     AVGLRECL---------------0     BUFSPACE-------
      RKP--------------------0     MAXLRECL------------2041     EXCPEXIT-------
      SHROPTNS(2,3)   RECOVERY     UNIQUE           NOERASE     NOWRITECHK     
      EXT-ADDR                                                                 
    STATISTICS                                                                 
      REC-TOTAL--------------3     SPLITS-CI--------------0     EXCPS----------
      REC-DELETED------------0     SPLITS-CA--------------0     EXTENTS--------
      REC-INSERTED-----------0     FREESPACE-%CI----------0     SYSTEM-TIMESTAM
      REC-UPDATED------------0     FREESPACE-%CA----------0          X'00000000
      REC-RETRIEVED----------0     FREESPC----------2359296                   
    ALLOCATION                                                                 
      SPACE-TYPE---------TRACK     HI-A-RBA---------2365440                   
      SPACE-PRI--------------7     HI-U-RBA---------------0                   
      SPACE-SEC--------------4                                                 
    VOLUME                                                                     
      VOLSER------------T0T112     PHYREC-SIZE---------2048     HI-A-RBA-------
      DEVTYPE------X'3010200F'     PHYRECS/TRK-----------21     HI-U-RBA-------
      VOLFLAG------------PRIME     TRACKS/CA--------------1                   
      EXTENTS:                                                                 
    LOW-CCHH-----X'00AB0000'     LOW-RBA----------------0     TRACKS---------
    HIGH-CCHH----X'00AE0009'     HIGH-RBA---------2365439                   
  VOLUME                                                                     
    VOLSER-----------------*     PHYREC-SIZE------------0     HI-A-RBA-------
    DEVTYPE------X'3010200F'     PHYRECS/TRK------------0     HI-U-RBA-------
    VOLFLAG--------CANDIDATE     TRACKS/CA--------------0                   
  VOLUME                                                                     
    VOLSER-----------------*     PHYREC-SIZE------------0     HI-A-RBA-------
    DEVTYPE------X'3010200F'     PHYRECS/TRK------------0     HI-U-RBA-------
    VOLFLAG--------CANDIDATE     TRACKS/CA--------------0                   



Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8697
Location: Dubuque, Iowa, USA

PostPosted: Fri Mar 08, 2019 11:14 pm
Reply with quote

Quote:
Here is the LISTC information about my dataset
Actually, this is a partial LISTC -- the right side data is all missing.

ARBA is HI-A-RBA in the LISTCAT output
URBA is HI-U-RBA in the LISTCAT output
CISZ is CISIZE in the LISTCAT output
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Sat Mar 09, 2019 2:58 am
Reply with quote

Topic locked as it is 13 YEARS old.

upendrasri, do not tailgate old topics. Start a new one, reference the old one and even quote parts of the old one but do not tailgate.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies. View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 3
No new posts FTP VB File from Mainframe retaining ... JCL & VSAM 8
No new posts Compile Several JCL JOB Through one r... CLIST & REXX 4
No new posts Extract the file name from another fi... DFSORT/ICETOOL 6
No new posts How to split large record length file... DFSORT/ICETOOL 10
Search our Forums:

Back to Top