Verifying the use of Fault Analyzer with PL/I

This section is applicable only if you have PL/I installed at your site.

AMODE 31

Depending on your version of PL/I, there are two separate AMODE 31 IVP jobs available:

If using Enterprise PL/I, edit and submit the sample job IDIVPPLE in data set IDI.SIDISAM1.
If not using Enterprise PL/I, edit and submit the sample job IDIVPPLI in data set IDI.SIDISAM1.

Refer to the instructions in the sample jobs for more information.

Each job compiles and executes a PL/I program, which abends and terminates the job step with a return code of 3000.

As a result of the TER(UADUMP) LE option, Fault Analyzer is invoked via the MVS™ change options/suppress dump exit IDIXDCAP.

The synopsis section of the Fault Analyzer report that is written to IDIREPRT should contain the following:

For the Japanese feature of Fault Analyzer, this section should be in Japanese if the Language(JPN) option is in effect.

For the Korean feature of Fault Analyzer, this section should be in Korean if the Language(KOR) option is in effect.

Note: Due to differences in version, release, or maintenance level of the compiler used, program offset information might differ from the sample below.

A system abend 0C9 occurred in module IDISPLI1 program IDISPLI1 at offset
X'286'.

A program-interruption code 0009 (Fixed-Point-Divide Exception) is associated
with this abend and indicates that:

  The divisor was zero in a signed binary division.

The cause of the failure was program IDISPLI1 in module IDISPLI1.  The PL/I
source code that immediately preceded the failure was:

  List
  Stmt #
  ------
  000011       Array1(1) = Array1(2) / Divisor;

Data field values at time of abend:

  List
  Stmt #
  ------
  000009  ARRAY1(1) FIXED BIN(31,0) AUTO = X'00000001'
  000009  ARRAY1(2) FIXED BIN(31,0) AUTO = X'00000003'
  000009  DIVISOR   FIXED BIN(31,0) AUTO = X'00000000'

A complete sample report from running this IVP is provided as member IDISRP02 in the IDI.SIDIDOC11 data set.

AMODE 64

To verify Fault Analyzer with AMODE 64 Enterprise PL/I, edit and submit the sample job IDIVPPL6 in data set IDI.SIDISAM1. Refer to the instructions in the sample job for more information.