DB2 and Language Environment

If the CEEEXTAN LE abnormal termination exit (HFZXCEE) has not been installed, then either TERMTHDACT(UATRACE), TERMTHDACT(UADUMP), TERMTHDACT(UAONLY), or TERMTHDACT(UAIMM) must be passed through to LE in order to have Z Abend Investigator invoked for the DB2® abend.

Below is a COBOL/DB2 example that illustrates how LE options can be passed:

//MYJOB    JOB
//STEP1    EXEC PGM=IKJEFT01
//DBRMLIB  DD DSN=TEST.DB2.DBRMLIB.DATA,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//HFZREPRT DD SYSOUT=*
//HFZHIST  DD DISP=SHR,DSN=TEST.DB2.HIST
//HFZLCOB  DD DISP=SHR,DSN=TEST.LISTING.DB2.COBOL
//SYSIN    DD *
//SYSTSIN  DD *
 DSN SYSTEM(DSN1)
 BIND PLAN(DSNTEST1) QUALIFIER(DSN8510) MEMBER(DACBD001) -
      ACT(REP) ISOLATION(CS)
 RUN  PROGRAM(DSNTIAD) PLAN(DSNTIA51)  -
      LIB('DSN510.RUNLIB.LOAD')
 RUN  PROGRAM(DACBD001) PLAN(DSNTEST1) -
      LIB('CTEST.DB2.LOAD') -
      PARMS('/TERMTHDACT(UADUMP) ')
 END
//*