Forum

Also zum Recallen der Cluster kannst Du einen normalen IKJEFT01 oder IKJEFT1B nehmen:

//   EXEC PGM=IKJEFT1B    
//SYSPRINT DD SYSOUT=*    
//SYSTSPRT DD SYSOUT=*    
//SYSTSIN DD *
 HRECALL (‚hlq.DSNDBC.database.tablespace1.*.*‘)
 HRECALL (‚hlq.DSNDBC.database.tablespace2.*.*‘)
//*

Durch die Wildcards kannst Du alle Partitions auf einmal zurückholen und erwischt sowohl die I001 und J001 ohne dass du den Katalog lesen musst.

Ein SELECT-Statement, das dieses SYSTSIN erzeugt könnte z.B. lauten

für die Tablespaces:

SELECT ‚ HRECALL (“hlq.DSNDBC.‘    
CONCAT STRIP(BQUALIFIER) CONCAT ‚.‘ CONCAT STRIP(BNAME) CONCAT ‚.*.*“)‘
FROM SYSIBM.SYSPACKDEP  
WHERE DNAME = ‚package-name‘
AND BTYPE = ‚R‘  
AND BQUALIFIER ^= ‚DSNDB06‘  

und für Indices:

SELECT ‚ HRECALL (“hlq.DSNDBC.‘    
CONCAT STRIP(B.DBNAME) CONCAT ‚.‘ CONCAT STRIP(B.INDEXSPACE) CONCAT ‚.*.*“)‘
FROM SYSIBM.SYSPACKDEP A JOIN SYSIBM.SYSINDEXES B    

ON A.BNAME = B.TBNAME AND    
 A.BQUALIFIER = B.TBCREATOR  
WHERE A.DNAME = ‚package-name‘  
AND A.BTYPE = ‚T‘
AND B.DBNAME ^= ‚DSNDB06‘

natürlich kannst Du die beiden Queries mit UNION ALL zusammenfassen