Check TMC for uncataloged tapes

book

Article ID: 130161

calendar_today

Updated On:

Products

CA 1 Tape Management CA 1 Tape Management - Copycat Utility CA 1 Tape Management - Add-On Options

Issue/Introduction



Is there a CA 1 report to list all uncataloged live (unexpired) tape data sets that exist in the TMC?

Environment

Release:
Component: 1

Resolution

Run TMSGRW using the following sample control statements to list all active Tape Data Sets, for which no catalog entry exists.
The control statements check the OSC bit, which represents the catalog status. For Volume Records the OSC bit is in FLAG4 and for DSNB records it is in FLAG1.
For this reason two WHEN statements are required, which use the NUMDSNB field to distinguish between TMC Volume and DSNB records.
NOTE: DSNB=YES is required to have the NUMDSNB field to contain the file sequence number and not the number of secondary data sets.

//TMSGRW.SYSIN DD * 
CONTROL-SECTION 
TITLE 'ACTIVE TAPES/DSNBS WITH OSC BIT OFF' 
ALTER DSNB=YES 
DEFINE ONE BI '0001' 
DEFINE SCRBIT HX '04' 
DEFINE OSCBIT HX '08' 

PROCESS-SECTION 
WHEN NUMDSNB LE ONE AND FLAG1 OFF SCRBIT AND FLAG4 OFF OSCBIT 
LIST 
WHEN NUMDSNB GT ONE AND FLAG1 OFF SCRBIT AND FLAG1 OFF OSCBIT 
LIST 

REPORT-SECTION 
PRINT VOLSER 
PRINT DSN 
PRINT NUMDSNB 'FILESEQ' 
PRINT CDATE 
PRINT EXPDT 
PRINT FLAG1 
PRINT FLAG4 
/* 


For details on the TMSGRW Utility please see TMSGRW Utility -- Produce Customized Reports on TMC and Audit Records