定義ジョブの例

Z Abend Investigator CICS プログラムとトランザクションの定義ジョブの例は、上記のすべてのプログラムおよびトランザクションを CICS® に定義する場合に使用できる、サンプル・バッチ・ジョブを示しています。xxx 接頭部を含むデータ・セット名を、ご使用のシステムに適した名前に置き換え、list-name を適切な CICS® 始動 SIT GRPLIST 名に置き換えてください。この例ではグループ名 FA が選択されていますが、必要に応じて変更できます。

図 1. Z Abend Investigator CICS プログラムとトランザクションの定義ジョブの例

//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)
/*

上図に示すサンプル・ジョブは、メンバー HFZSCICS としてデータ・セット HFZ.SHFZSAM1 に提供されます。

Z Abend Investigator を CICS® で起動するには、HFZ.SHFZAUTH を DFHRPL 連結に追加する必要があります。

CICS® CICS® トレース情報を表示するには、Z Abend Investigator のトレースがアクティブである必要があります。

Z Abend Investigator を起動するには、EXEC CICS® ABEND ステートメントに ABCODE キーワードを使用する必要があります。例:

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

CICS® ABEND ステートメントに NODUMP キーワードが指定されると、Z Abend Investigator は HFZXCCEE 出口から起動された場合のみ分析を実行します。