zOs/JCL/QZT83

//QZT8300P JOB (CP00,KE50),'DB2 REO',                                   00010001
//         MSGCLASS=T,TIME=1440,                                        00020001
//         NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2                          00030001
//*MAIN CLASS=LOG                                                       00040001
//L1    EXEC PGM=DSNUTILB,                                              00050001
//             PARM=(DP4G,'LOA#DELIMITER')                              00060001
//DSSPRINT  DD SYSOUT=*                                                 00070001
//SYSPRINT  DD SYSOUT=*                                                 00080001
//SYSUDUMP  DD SYSOUT=*                                                 00090001
//UTPRINT   DD SYSOUT=*                                                 00100001
//SYSOUT    DD SYSOUT=*                                                 00110001
//SYSTEMPL  DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR                    00120001
//IN        DD DISP=SHR,SUBSYS=(CSM,'SYSTEM=RZ2'),                      00130001
//            DSN=A540769.TMP.LE.RZ2.TADM60A1.D15275.T211751            00140002
//SYSIN     DD *                                                        00150001
EXEC SQL                                                                00160001
   DELETE FROM  OA1P.TQZ060TIMEOUT            WHERE RZ = '?'            00170001
ENDEXEC                                                                 00180001
LOAD DATA RESUME YES INDDN IN LOG YES                                   00190001
       SHRLEVEL CHANGE                                                  00200001
       WORKDDN(TSYUTS,TSOUTS)                                           00210001
     FORMAT DELIMITED COLDEL ','                                        00220001
  INTO TABLE OA1P.TQZ060TIMEOUT                                         00230001
     (                                                                  00240001
        TIMESTAMP                                                       00241001
      , DBSYS                                                           00242001
      , SSID                                                            00243001
      , EVENT_TYPE                                                      00244001
      , VICTIM_PLAN                                                     00246001
      , VICTIM_CORR_ID                                                  00247001
      , VICTIM_CONN_ID                                                  00248001
      , HOLDER_PLAN                                                     00249001
      , HOLDER_CORR_ID                                                  00249101
      , HOLDER_CONN_ID                                                  00249201
      , REASON_CODE                                                     00249301
      , TYPE                                                            00249401
      , NAME                                                            00249501
     )                                                                  00260001