Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
VSAM file space used - REXX

 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
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    Post subject: VSAM file space used - REXX
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

Moderator Team Head


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

PostPosted: Wed Dec 06, 2006 10:23 pm    Post subject: Re: VSAM file space used - REXX
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    Post subject: Re: VSAM file space used - REXX
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    Post subject:
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

New User


Joined: 28 Sep 2017
Posts: 75
Location: India

PostPosted: Fri Mar 08, 2019 9:35 pm    Post subject:
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: 8449
Location: Dubuque, Iowa, USA

PostPosted: Fri Mar 08, 2019 11:14 pm    Post subject: Reply to: VSAM file space used - REXX
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: 2180
Location: Hampshire, UK

PostPosted: Sat Mar 09, 2019 2:58 am    Post subject: Reply to: VSAM file space used - REXX
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.    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Mainframe to linux file count mismatch shreya19 All Other Mainframe Topics 4 Thu Jun 13, 2019 9:49 pm
No new posts Copy physical Tape files to a Mainfra... Dadi Krishna Teja JCL & VSAM 11 Thu May 16, 2019 10:25 pm
No new posts Different result between normal rexx ... UmeySan CLIST & REXX 2 Tue May 07, 2019 6:18 pm
No new posts SDSF REXX for DB2 command output vasanthz CLIST & REXX 2 Thu Apr 25, 2019 11:29 pm
No new posts How can I close a flat file in Ezytrieve dibyendumandal11111 CA Products 3 Wed Apr 17, 2019 2:19 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us