Display the DSNINDEX fields from Disk Datacom FILES DB in a readable format via SQL

Products

• Disk Backup and Restore - MVS
• DISK BACKUP AND RESTORE- ADD-ON OPTIO
• DISK BACKUP AND RESTORE

Issue/Introduction

Before or after Backup and Archive, how to display the DSNINDEX fields from a Disk Datacom FILES DB in a readable format via SQL ?

Environment

Release: Disk™ Backup and Restore

Resolution

Refer the JCL sample member DBQDSI that is delivered in the Disk™ Backup and Restore CCUWJCL library. It provides a sample SQL SELECT query that is executed by the DBSQLPR utility and displays the fields in a readable format. Copy the following sample query and include or exclude the fields in the query based on the requirement, e.g.: 

SELECT 
DSNDSNAM as Data_Set_Name, 
DSNVOLNO as VolSer, 
DSNARVOL as ArcVol, 
case when cast(substr(DSNARCDT,1,1) as integer without conversion) = 0 then 
' ' 
else 
Char(Date(substr(digits(cast(substr(DSNARCDT,1,1) as integer 
without conversion) + 1900),7,4) 
|| 
substr(digits(cast(substr(DSNARCDT,2,2) as smallint 
without conversion)),3,3)),ISO) 
||' '|| 
hex(substr(cast(DSNATIME as char(2) without conversion),1,1)) 
||':'|| 
hex(substr(cast(DSNATIME as char(2) without conversion),2,1)) 
end 
as Archive_Time

FROM CADISK.DSNINDEX_650 
WHERE DSNDSNAM like 'ABC.%' ;