zOs/JCL/DB2LIST2
//A540769S JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG SYSTEM=S01
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBTF,'A540769S.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBTF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS PREVIEW
LISTDEF TS#LIST
INCLUDE TABLESPACE MF01A1T.A150A PARTLEVEL
LISTDEF IX#LIST
INCLUDE INDEX OA1T.IMF150* PARTLEVEL
//STEP2 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBTF,'A540769S.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBTF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS PREVIEW
LISTDEF TS#LIST
INCLUDE TABLESPACE MF01A1T.A150A PARTLEVEL
LISTDEF IX#LIST
INCLUDE INDEXSPACES LIST TS#LIST