zOs/JCL/CMNXXLOA

//A540769L JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M                                     00030000
//S1       EXEC PGM=DSNUTILB,PARM='DBOF,A540769L.LOAD'                  00020001
//SYSMAP   DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSERR   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL  DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
EXEC SQL
     DECLARE COST CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_DETCOST_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR COST
 INTO TABLE  CMNXXX.DSN_DETCOST_TABLE

EXEC SQL
     DECLARE FILTER CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_FILTER_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR FILTER
 INTO TABLE  CMNXXX.DSN_FILTER_TABLE

EXEC SQL
     DECLARE FUNC CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_FUNCTION_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR FUNC
 INTO TABLE  CMNXXX.DSN_FUNCTION_TABLE

EXEC SQL
     DECLARE PGRA CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_PGRANGE_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR PGRA
 INTO TABLE  CMNXXX.DSN_PGRANGE_TABLE

EXEC SQL
     DECLARE GROU CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_PGROUP_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR GROU
 INTO TABLE  CMNXXX.DSN_PGROUP_TABLE

EXEC SQL
     DECLARE PRED  CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_PREDICAT_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR PRED
 INTO TABLE  CMNXXX.DSN_PREDICAT_TABLE

EXEC SQL
     DECLARE TASK  CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_PTASK_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR TASK
 INTO TABLE  CMNXXX.DSN_PTASK_TABLE

EXEC SQL
     DECLARE SKEY  CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_SORTKEY_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR SKEY
 INTO TABLE  CMNXXX.DSN_SORTKEY_TABLE

EXEC SQL
     DECLARE SORT  CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_SORT_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR SORT
 INTO TABLE  CMNXXX.DSN_SORT_TABLE

EXEC SQL
     DECLARE CACH  CURSOR FOR
         SELECT STMT_ID         -- IGNOREFIELDS DOES NOT HELP
              , STMT_TOKEN      -- FOR INCURSOR AND ROWID|
              , COLLID
              , PROGRAM_NAME
              , INV_DROPALT
              , INV_REVOKE
              , INV_LRU
              , INV_RUNSTATS
              , CACHED_TS
              , USERS
              , COPIES
              , LINES
              , PRIMAUTH
              , CURSQLID
              , BIND_QUALIFIER
              , BIND_ISO
              , BIND_CDATA
              , BIND_DYNRL
              , BIND_DEGRE
              , BIND_SQLRL
              , BIND_CHOLD
              , STAT_TS
              , STAT_EXEC
              , STAT_GPAG
              , STAT_SYNR
              , STAT_WRIT
              , STAT_EROW
              , STAT_PROW
              , STAT_SORT
              , STAT_INDX
              , STAT_RSCN
              , STAT_PGRP
              , STAT_ELAP
              , STAT_CPU
              , STAT_SUS_SYNIO
              , STAT_SUS_LOCK
              , STAT_SUS_SWIT
              , STAT_SUS_GLCK
              , STAT_SUS_OTHR
              , STAT_SUS_OTHW
              , STAT_RIDLIMT
              , STAT_RIDSTOR
              , EXPLAIN_TS
              , SCHEMA
              , STMT_TEXT
         FROM CMNBATCH.DSN_STATEMENT_CACHE_TABLE
         WHERE EXPLAIN_TS   > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR CACH
 INTO TABLE  CMNXXX.DSN_STATEMENT_CACHE_TABLE

EXEC SQL
     DECLARE STAT  CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_STATEMNT_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR STAT
 INTO TABLE  CMNXXX.DSN_STATEMNT_TABLE

EXEC SQL
     DECLARE STRU  CURSOR FOR
         SELECT *
         FROM CMNBATCH.DSN_STRUCT_TABLE
         WHERE EXPLAIN_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR STRU
 INTO TABLE  CMNXXX.DSN_STRUCT_TABLE

EXEC SQL
     DECLARE PLAN CURSOR FOR
         SELECT *
         FROM CMNBATCH.PLAN_TABLE
         WHERE BIND_TIME > '2011-07-01-00.00.00'
         WITH UR
ENDEXEC
LOAD DATA LOG NO RESUME YES
 SORTDEVT DISK SORTNUM 50
 WORKDDN(TSYUTS,TSOUTS)
 INCURSOR PLAN
 INTO TABLE  CMNXXX.PLAN_TABLE

LISTDEF LST INCLUDE TABLESPACE DB2PLAN.CMNXXX*
LISTDEF LSP INCLUDE TABLESPACE DB2PLAN.CMNXXX* PARTLEVEL
COPY LIST LSP COPYDDN(TCOPYD) SHRLEVEL REFERENCE
LISTDEF LSB INCLUDE LIST LST  BASE
RUNSTATS TABLESPACE LIST LSB
    INDEX(ALL KEYCARD) UPDATE ALL
    SHRLEVEL CHANGE
LISTDEF LSL INCLUDE LIST LST LOB
RUNSTATS TABLESPACE LIST LSL
    INDEX(ALL        ) UPDATE ALL
    SHRLEVEL CHANGE