Before or after Backup and Archive, how to display the DSNINDEX fields from a Disk Datacom FILES DB in a readable format via SQL ?
Release: Disk™ Backup and Restore
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.%' ;