zOs/SQL/PDBGENTL

//A540769L  JOB (CP00,KE50),                                            00010001
//         MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
//         NOTIFY=A540769
//*MAIN CLASS=LOG
//S1       EXEC PGM=DSNUTILB,PARM='DBOC,A540769L.LOAD'                  00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL  DD DSN=DBOC.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
TEMPLATE DBU4GQGQ
     DSN('DBOC.DA540769.AGEN.P00000.D110511.REC')
     DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN DBU4GQGQ LOG NO REPLACE COPYDDN(TCOPYD)
 EBCDIC  CCSID(00500,00000,00000)
 SORTKEYS
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
 INTO TABLE
 "A540769".
 "TACCT_GENERAL"
 WHEN(00001:00002) = X'0008'
 NUMRECS                22781
 ( "ID"
  POSITION(  00003:00017) CHAR(00015)
 , "RZ"
  POSITION(  00018:00021) CHAR(00004)
 , "PARTSPLIT"
  POSITION(  00022:00023) SMALLINT
 , "OCCURRENCES"
  POSITION(  00024:00027) INTEGER
 , "SUBSYSTEM_ID"
  POSITION(  00028:00031) CHAR(00004)
 , "TIMESTAMP"
  POSITION(  00032:00057) TIMESTAMP EXTERNAL
 , "LUW_SEQNO"
  POSITION(  00058:00059) SMALLINT
 , "CONNECT_TYPE"
  POSITION(  00060:00067) CHAR(00008)
 , "CONNECT_ID"
  POSITION(  00068:00075) CHAR(00008)
 , "CORRNAME"
  POSITION(  00076:00083) CHAR(00008)
 , "CORRNUMBER"
  POSITION(  00084:00091) CHAR(00008)
 , "PLAN_NAME"
  POSITION(  00092:00099) CHAR(00008)
 , "CLASS2"
  POSITION(  00100:00100) CHAR(00001)
 , "CLASS3"
  POSITION(  00101:00101) CHAR(00001)
 , "CLASS1_ELAPSED"
  POSITION(  00102:00108) DECIMAL
 , "CLASS1_CPU_TOTAL"
  POSITION(  00109:00115) DECIMAL
 , "CLASS2_ELAPSED"
  POSITION(  00116:00122) DECIMAL
 , "CLASS2_CPU_TOTAL"
  POSITION(  00123:00129) DECIMAL
 , "CLASS5_ELAPSED"
  POSITION(  00130:00136) DECIMAL
 , "CLASS5_TCB"
  POSITION(  00137:00143) DECIMAL
 , "CLASS5_DESCRIBE"
  POSITION(  00144:00150) DECIMAL
 , "CLASS5_LOG_EXTRACT"
  POSITION(  00151:00157) DECIMAL
 , "LOCK_LATCH_SUSP"
  POSITION(  00158:00161) INTEGER
 , "CLASS3_LOCK_LATCH"
  POSITION(  00162:00168) DECIMAL
 , "SYNC_IO_SUSP"
  POSITION(  00169:00172) INTEGER
 , "CLASS3_SYNC_IO"
  POSITION(  00173:00179) DECIMAL
 , "DB_IO_SUSP"
  POSITION(  00180:00183) INTEGER
 , "CLASS3_DB_IO"
  POSITION(  00184:00190) DECIMAL
 , "LOG_WRT_IO_SUSP"
  POSITION(  00191:00194) INTEGER
 , "CLASS3_LOG_WRT_IO"
  POSITION(  00195:00201) DECIMAL
 , "OTHER_READ_SUSP"
  POSITION(  00202:00205) INTEGER
 , "CLASS3_OTHER_READ"
  POSITION(  00206:00212) DECIMAL
 , "OTHER_WRITE_SUSP"
  POSITION(  00213:00216) INTEGER
 , "CLASS3_OTHER_WRITE"
  POSITION(  00217:00223) DECIMAL
 , "SERV_TASK_SUSP"
  POSITION(  00224:00227) INTEGER
 , "CLASS3_SERV_TASK"
  POSITION(  00228:00234) DECIMAL
 , "UPD_COMMIT_SUSP"
  POSITION(  00235:00238) INTEGER
 , "CLASS3_UPD_COMMIT"
  POSITION(  00239:00245) DECIMAL
 , "OPEN_CLOSE_SUSP"
  POSITION(  00246:00249) INTEGER
 , "CLASS3_OPEN_CLOSE"
  POSITION(  00250:00256) DECIMAL
 , "SYSLOGR_REC_SUSP"
  POSITION(  00257:00260) INTEGER
 , "CLASS3_SYSLOGR_REC"
  POSITION(  00261:00267) DECIMAL
 , "EXT_DEL_DEF_SUSP"
  POSITION(  00268:00271) INTEGER
 , "CLASS3_EXT_DEL_DEF"
  POSITION(  00272:00278) DECIMAL
 , "OTHER_SERV_SUSP"
  POSITION(  00279:00282) INTEGER
 , "CLASS3_OTHER_SERV"
  POSITION(  00283:00289) DECIMAL
 , "ARCH_LOG_SUSP"
  POSITION(  00290:00293) INTEGER
 , "CLASS3_ARCH_LOG"
  POSITION(  00294:00300) DECIMAL
 , "ARCH_READS_SUSP"
  POSITION(  00301:00304) INTEGER
 , "CLASS3_ARCH_READS"
  POSITION(  00305:00311) DECIMAL
 , "DRAIN_LOCK_SUSP"
  POSITION(  00312:00315) INTEGER
 , "CLASS3_DRAIN_LOCK"
  POSITION(  00316:00322) DECIMAL
 , "CLAIM_REL_SUSP"
  POSITION(  00323:00326) INTEGER
 , "CLASS3_CLAIM_REL"
  POSITION(  00327:00333) DECIMAL
 , "PAGE_LATCH_SUSP"
  POSITION(  00334:00337) INTEGER
 , "CLASS3_PAGE_LATCH"
  POSITION(  00338:00344) DECIMAL
 , "SCHED_STPRC_SUSP"
  POSITION(  00345:00348) INTEGER
 , "CLASS3_SCHED_STPRC"
  POSITION(  00349:00355) DECIMAL
 , "SCHEDUL_UDF_SUSP"
  POSITION(  00356:00359) INTEGER
 , "CLASS3_SCHEDUL_UDF"
  POSITION(  00360:00366) DECIMAL
 , "NOTIFY_MSG_SUSP"
  POSITION(  00367:00370) INTEGER
 , "CLASS3_NOTIFY_MSG"
  POSITION(  00371:00377) DECIMAL
 , "GLOBAL_CONT_SUSP"
  POSITION(  00378:00381) INTEGER
 , "CLASS3_GLOBAL_CONT"
  POSITION(  00382:00388) DECIMAL
 , "COMMIT"
  POSITION(  00389:00392) INTEGER
 , "ROLLBACK"
  POSITION(  00393:00396) INTEGER
 , "INCREMENTAL_BIND"
  POSITION(  00397:00400) INTEGER
 , "PROGRAMS"
  POSITION(  00401:00404) INTEGER
 , "SELECT"
  POSITION(  00405:00408) INTEGER
 , "INSERT"
  POSITION(  00409:00412) INTEGER
 , "UPDATE"
  POSITION(  00413:00416) INTEGER
 , "DELETE"
  POSITION(  00417:00420) INTEGER
 , "DESCRIBE"
  POSITION(  00421:00424) INTEGER
 , "DESCRIBE_TABLE"
  POSITION(  00425:00428) INTEGER
 , "PREPARE"
  POSITION(  00429:00432) INTEGER
 , "OPEN"
  POSITION(  00433:00436) INTEGER
 , "FETCH"
  POSITION(  00437:00440) INTEGER
 , "CLOSE"
  POSITION(  00441:00444) INTEGER
 , "LOCK_TABLE"
  POSITION(  00445:00448) INTEGER
 , "TIMEOUT"
  POSITION(  00449:00452) INTEGER
 , "DEADLOCK"
  POSITION(  00453:00456) INTEGER
 , "SUSPEND_LOCK"
  POSITION(  00457:00460) INTEGER
 , "SUSPEND_IRLM_LATCH"
  POSITION(  00461:00464) INTEGER
 , "SUSPEND_OTHER"
  POSITION(  00465:00468) INTEGER
 , "LOCK_REQ"
  POSITION(  00469:00472) INTEGER
 , "UNLOCK_REQ"
  POSITION(  00473:00476) INTEGER
 , "QUERY_REQ"
  POSITION(  00477:00480) INTEGER
 , "CHANGE_REQ"
  POSITION(  00481:00484) INTEGER
 , "OTHER_REQ"
  POSITION(  00485:00488) INTEGER
 , "LOCK_ESC_SHARED"
  POSITION(  00489:00492) INTEGER
 , "LOCK_ESC_EXCLUSIVE"
  POSITION(  00493:00496) INTEGER
 , "MAX_LOCKS_HELD"
  POSITION(  00497:00500) INTEGER
 , "P_LOCK_LOCK"
  POSITION(  00501:00504) INTEGER
 , "P_LOCK_UNLOCK"
  POSITION(  00505:00508) INTEGER
 , "P_LOCK_CHANGE"
  POSITION(  00509:00512) INTEGER
 , "SYNC_XES_LOCK"
  POSITION(  00513:00516) INTEGER
 , "SYNC_XES_UNLOCK"
  POSITION(  00517:00520) INTEGER
 , "SYNC_XES_CHANGE"
  POSITION(  00521:00524) INTEGER
 , "SUSPEND_IRLM_CONT"
  POSITION(  00525:00528) INTEGER
 , "SUSPEND_XES_CONT"
  POSITION(  00529:00532) INTEGER
 , "SUSPEND_FALSE_CONT"
  POSITION(  00533:00536) INTEGER
 , "INCOMPAT_RET_LOCK"
  POSITION(  00537:00540) INTEGER
 , "NOTIFY_MSG_SENT"
  POSITION(  00541:00544) INTEGER
 , "RID_POOL_USED"
  POSITION(  00545:00548) INTEGER
 , "RID_POOL_FAIL_NOSG"
  POSITION(  00549:00552) INTEGER
 , "RID_POOL_FAIL_MXLT"
  POSITION(  00553:00556) INTEGER
 , "MAX_SQL_CASCAD_LVL"
  POSITION(  00557:00560) INTEGER
 , "STPROC_CALL"
  POSITION(  00561:00564) INTEGER
 , "STPROC_ABEND"
  POSITION(  00565:00568) INTEGER
 , "STPROC_TIMEOUT"
  POSITION(  00569:00572) INTEGER
 , "STPROC_REJECTED"
  POSITION(  00573:00576) INTEGER
 , "UDF_EXECUTED"
  POSITION(  00577:00580) INTEGER
 , "UDF_ABENDS"
  POSITION(  00581:00584) INTEGER
 , "UDF_TIMEOUTS"
  POSITION(  00585:00588) INTEGER
 , "UDF_REJECTED"
  POSITION(  00589:00592) INTEGER
 , "STATEMENT_TRIGGER"
  POSITION(  00593:00596) INTEGER
 , "ROW_TRIGGER"
  POSITION(  00597:00600) INTEGER
 , "TRIGGER_SQL_ERROR"
  POSITION(  00601:00604) INTEGER
 , "DRAIN_REQ"
  POSITION(  00605:00608) INTEGER
 , "DRAIN_FAILED"
  POSITION(  00609:00612) INTEGER
 , "CLAIM_REQ"
  POSITION(  00613:00616) INTEGER
 , "CLAIM_FAILED"
  POSITION(  00617:00620) INTEGER
 , "IFI_CALLS"
  POSITION(  00621:00624) INTEGER
 , "LOG_RECS_CAPTURED"
  POSITION(  00625:00628) INTEGER
 , "LOG_READS_PERFORM"
  POSITION(  00629:00632) INTEGER
 , "DATA_ROWS_RETURNED"
  POSITION(  00633:00636) INTEGER
 , "LOG_RECS_RETURNED"
  POSITION(  00637:00640) INTEGER
 , "DESCRIPT_RETURNED"
  POSITION(  00641:00644) INTEGER
 , "TABLES_RETURNED"
  POSITION(  00645:00648) INTEGER
 , "DESCRIBES_PERFORM"
  POSITION(  00649:00652) INTEGER
 , "REOPTIMIZATION"
  POSITION(  00653:00656) INTEGER
 , "PREP_STMT_MATCH"
  POSITION(  00657:00660) INTEGER
 , "PREP_STMT_NO_MATCH"
  POSITION(  00661:00664) INTEGER
 , "IMPLICIT_PREPARES"
  POSITION(  00665:00668) INTEGER
 , "PREP_FROM_CACHE"
  POSITION(  00669:00672) INTEGER
 , "CACHE_LIMIT_EXCEED"
  POSITION(  00673:00676) INTEGER
 , "PREP_STMT_PURGED"
  POSITION(  00677:00680) INTEGER
 , "DIRECT_ACCESS"
  POSITION(  00681:00684) INTEGER
 , "INDEX_USED"
  POSITION(  00685:00688) INTEGER
 , "TS_SCAN_USED"
  POSITION(  00689:00692) INTEGER
 , "LOG_RECS_WRITTEN"
  POSITION(  00693:00696) INTEGER
 , "BYTES_PER_LOG_REC"
  POSITION(  00697:00704) CHAR(00008)
 , "MAX_STOR_LOB_VALUE"
  POSITION(  00705:00708) INTEGER
 , "RLF_TYPE"
  POSITION(  00709:00712) INTEGER
 , "RLF_TABLE"
  POSITION(  00713:00714) CHAR(00002)
 , "LIMIT_IN_SU"
  POSITION(  00715:00718) INTEGER
 , "LIMIT_IN_CPU"
  POSITION(  00719:00722) INTEGER
 , "HIGHEST_USED_CPU"
  POSITION(  00723:00726) INTEGER
 , "SET_CURRENT_PREC"
  POSITION(  00727:00730) INTEGER
 , "FORCE_AT_COMMIT"
  POSITION(  00731:00734) INTEGER
 , "CLASS3_FORCE_AT_C"
  POSITION(  00735:00741) DECIMAL
 , "ASYNCH_IXL_REQU"
  POSITION(  00742:00745) INTEGER
 , "CLASS3_ASYNCH_IXL"
  POSITION(  00746:00752) DECIMAL
 , "SVPT_REQUESTS"
  POSITION(  00753:00756) INTEGER
 , "SVPT_RELEASE"
  POSITION(  00757:00760) INTEGER
 , "SVPT_ROLLBACK"
  POSITION(  00761:00764) INTEGER
 , "CLASS1_SU_CPU"
  POSITION(  00765:00772) DECIMAL
 , "CLASS2_SU_CPU"
  POSITION(  00773:00780) DECIMAL
 , "LLOCK_PARENT_SUSP"
  POSITION(  00781:00784) INTEGER
 , "CLASS3_LLOCK_PARNT"
  POSITION(  00785:00791) DECIMAL
 , "LLOCK_CHILD_SUSP"
  POSITION(  00792:00795) INTEGER
 , "CLASS3_LLOCK_CHILD"
  POSITION(  00796:00802) DECIMAL
 , "LLOCK_OTHER_SUSP"
  POSITION(  00803:00806) INTEGER
 , "CLASS3_LLOCK_OTHER"
  POSITION(  00807:00813) DECIMAL
 , "PLOCK_PSET_SUSP"
  POSITION(  00814:00817) INTEGER
 , "CLASS3_PLOCK_PSET"
  POSITION(  00818:00824) DECIMAL
 , "PLOCK_PAGE_SUSP"
  POSITION(  00825:00828) INTEGER
 , "CLASS3_PLOCK_PAGE"
  POSITION(  00829:00835) DECIMAL
 , "PLOCK_OTHER_SUSP"
  POSITION(  00836:00839) INTEGER
 , "CLASS3_PLOCK_OTHER"
  POSITION(  00840:00846) DECIMAL
 , "CLASS1_IIP_CPU"
  POSITION(  00847:00853) DECIMAL
 , "CLASS2_IIP_CPU"
  POSITION(  00854:00860) DECIMAL
 , "IIPCP_ELIGIBLE"
  POSITION(  00861:00867) DECIMAL
 , "CLASS1_SU_IIP_CPU"
  POSITION(  00868:00875) DECIMAL
 , "CLASS2_SU_IIP_CPU"
  POSITION(  00876:00883) DECIMAL
 , "SU_IIPCP_ELIGIBLE"
  POSITION(  00884:00891) DECIMAL
 , "GROUP_NAME"
  POSITION(  00893:00900) CHAR(00008)
                          NULLIF(00892)=X'FF'
 , "INSDATE"
  POSITION(  00901:00910) DATE EXTERNAL
 )