Sample definition job
Figure 1 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.