例 2.ヒストリー・ファイル異常終了インスタンスのリスト

この例は、昨日発生したヒストリー・ファイル MY.HIST1 に記録された異常終了インスタンスを、重複するかどうかにかかわらずすべてリストする IDIUTIL バッチ・ユーティリティー・ジョブを示しています。

//UTILJOB1 JOB  ...
//RUNUTIL  EXEC PGM=IDIUTIL
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD  *
FILES(MY.HIST1)
LISTHFDUP(ABEND_DATE = TODAY-1)
/*