CA Tape Inquiry (TI) in batch mode in REXX program



All other tools like QACenter, Strobe, Endevor, Telon, APAS, Scheduler, Auditor, DATA-XPERT, CoolGen, Intertest, AdvantageGen, COBTEST etc.

CA Tape Inquiry (TI) in batch mode in REXX program

Postby rakeshp » Sun Jan 20, 2019 9:00 pm

The requirement is to extract the catalog information for some 100k files, out of which 30k are on tape. I have written a REXX program to trap the output of the DSLIST and LISTCAT for the files that are on DASD and then parse the output to extract the required information. This is working fine, but need help in doing the same for the tape files.

The shop has the tool "CA-1 TAPE INQUIRY" to see the catalog information. And it can be used by giving "TI" against the file name in option 3.4. But I am unable to use the same in the batch mode in REXX program.

Please suggest, how to extract the catalog information of tape files in batch mode through REXX program. Mainly I need the information of RECFM, LRECL, BLKSIZE, Creation Date, Last Used Date etc. I checked with system admins and they also don't have any way to get these information easily.

I did some google and went through the CA-1 manual and then tried the below, but it says command not found.
1. TSO TI ('PROD.DAJ010D.NMBA.VEND.DWNLD')
2. TSO TIQ ('PROD.DAJ010D.NMBA.VEND.DWNLD')
3. TSMTOSTQ ('PROD.DAJ010D.NMBA.VEND.DWNLD')

Below is the output of "TI" when used in 3.4


 -----------------------------   CA-1 TAPE INQUIRY  ----------------------------
                                                                               
 Data Set Name . . . : PROD.DAJ010D.NMBA.VEND.DWNLD                
                                                                               
 General Data                         Creation Information                      
  Volume Serial. . . : D46438          Date . . . . . . : 2012/07/30            
  Alternate Volume . :                 Time . . . . . . : 01:05:00              
  Media type   . . . : 3590-128X       Jobname  . . . . : DAJ010D              
  Record Format. . . : FB              Program  . . . . : IEBGENER              
  Record Length. . . : 94             Last Used Information                    
  Block Size   . . . : 32712           Date . . . . . . : 2012/07/30            
  Number of blocks . : 2120718         Time . . . . . . : 01:05:00              
  Percent utilized . :                 Jobname  . . . . : DAJ010D              
  Batch ID/Hook ID . :                Expiration Information                    
  Status   . . . . . : ACTIVE          Expire Date. . . : CATALOG              
                                                                               
 File  / Volume Set                   Vault Management Information              
  Base Volume. . . . : D46438          Outcode. . . . . :                      
  Sequence Number. . : 1               Slot   . . . . . : 0000000              
  Total Files in Set : 1               Outdate. . . . . :                      
 Secondary volumes:                                                            
 USER DATA: ..   .CONCATENATE FILES      ..15541840NM                          
 


Below is code snippet for listcat used in the REXX program, just for reference:

y = OUTTRAP("Lst.")                            
Address TSO "LISTCAT ENTRIES('"filename"') all"
y = OUTTRAP("OFF")                            
 
rakeshp
 
Posts: 2
Joined: Sun Jan 20, 2019 8:35 pm
Has thanked: 0 time
Been thanked: 0 time

Re: CA Tape Inquiry (TI) in batch mode in REXX program

 

Re: CA Tape Inquiry (TI) in batch mode in REXX program

Postby enrico-sorichetti » Mon Jan 21, 2019 12:44 am

read the CA Tape Inquiry manuals to see if it can be scripted using rexx
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2846
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 151 times

Re: CA Tape Inquiry (TI) in batch mode in REXX program

Postby Robert Sample » Mon Jan 21, 2019 8:10 am

CA-1 batch reporting is done using CA-EARL. https://docops.ca.com/ca-1-tms/14-0/en/ ... m-ca-1-tmc has information about it as well as sample programs to pull data from CA-1.
Robert Sample
Global moderator
 
Posts: 3570
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 256 times

Re: CA Tape Inquiry (TI) in batch mode in REXX program

Postby expat » Mon Jan 21, 2019 12:50 pm

The IBM Catalog Search Interface - which can easily be processed in REXX should give you everything that you need.

Worth a google IMHO.
expat
 
Posts: 456
Joined: Sat Jun 09, 2007 3:21 pm
Has thanked: 0 time
Been thanked: 8 times

Re: CA Tape Inquiry (TI) in batch mode in REXX program

Postby rakeshp » Mon Jan 21, 2019 6:28 pm

Thank you everyone for your responses. I will go through the CA1 manual again, then try the CA-Earl job and explore IBM Catalog Search Interface too.
I will post back if I need more guidance. Also if I am able to build the solution, will post the same too.
rakeshp
 
Posts: 2
Joined: Sun Jan 20, 2019 8:35 pm
Has thanked: 0 time
Been thanked: 0 time


Return to All Other Tools

 


  • Related topics
    Replies
    Views
    Last post