Sample definition job

Sample Z Abend Investigator CICS program and transaction definition job shows a sample batch job that can be used to define all of the above mentioned programs and transaction to CICS®. Replace data set names shown with xxx prefix with the correct names for your installation and list-name with the appropriate CICS® startup SIT GRPLIST name. The group name FA has been chosen for this example, but can be changed if you desire.

Figure 1. Sample Z Abend Investigator CICS program and transaction definition job

//HFZCICS JOB  ...
//HFZCICS EXEC PGM=DFHCSDUP,REGION=1024K,
//             PARM='CSD(READWRITE),PAGESIZE(60),NOCOMPAT'
//STEPLIB  DD DISP=SHR,DSN=xxx.SDFHLOAD
//DFHCSD   DD DISP=SHR,DSN=xxx.DFHCSD
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
  DEF PROGRAM(HFZPLT) GROUP(FA) EXECKEY(CICS)
      CEDF(NO) DATALOCATION(ANY)
      CONCURRENCY(QUASIRENT)
  DEF PROGRAM(HFZPLTD) GROUP(FA) EXECKEY(CICS)
      CEDF(NO) DATALOCATION(ANY)
      CONCURRENCY(QUASIRENT)
  DEF PROGRAM(HFZPLTS) GROUP(FA) EXECKEY(CICS)
      CEDF(NO) DATALOCATION(ANY)
      CONCURRENCY(QUASIRENT)
  DEF PROGRAM(HFZXCX53) GROUP(FA)
      CEDF(NO) DATALOCATION(ANY)
      CONCURRENCY(QUASIRENT)
  DEF PROGRAM(HFZXCCEE) GROUP(FA)
      CEDF(NO) DATALOCATION(ANY)
      CONCURRENCY(QUASIRENT)
  DEF PROGRAM(HFZXFA) GROUP(FA) EXECKEY(CICS)
      CEDF(NO) DATALOCATION(ANY)
      CONCURRENCY(QUASIRENT)
  DEF PROGRAM(HFZVPCLE) GROUP(FA)
      CONCURRENCY(QUASIRENT)
  DEF TRANSACTION(CFA) GROUP(FA)
      PROGRAM(HFZXFA) TASKDATALOC(ANY)
      SHUTDOWN(ENABLED)
  DEF MAPSET(HFZXMAP) GROUP(FA)
  ADD G(FA) L(list-name)
/*

The above sample job is provided as member HFZSCICS in data set HFZ.SHFZSAM1.

In order for Z Abend Investigator to be invoked under CICS®, it is necessary to add HFZ.SHFZAUTH to the DFHRPL concatenation.

CICS® tracing must be active for Z Abend Investigator to display CICS® trace information.

The ABCODE keyword must be used on an EXEC CICS® ABEND statement in order for Z Abend Investigator to be invoked. For example:

EXEC CICS ABEND ABCODE('abcd') END-EXEC

If the NODUMP keyword is used on an EXEC CICS® ABEND statement, then Z Abend Investigator only performs analysis if invoked via the HFZXCCEE exit.