DB2 and Language Environment

If the CEEEXTAN LE abnormal termination exit (IDIXCEE) 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 Fault Analyzer 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=*
//IDIREPRT DD SYSOUT=*
//IDIHIST  DD DISP=SHR,DSN=TEST.DB2.HIST
//IDILCOB  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
//*