PI40800: MISCELLANEOUS BUG FIXES

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Miscellaneous bug fixes.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All Fault Analyzer Version 11 users.         *
  ****************************************************************
  * PROBLEM DESCRIPTION: 01. With the FA CICS LE exit (IDIXCCEE) *
  *                          and CICSDUMPTABLEEXCLUDE option,    *
  *                          a CICS SDUMP is not being taken     *
  *                          when specified on the CICS          *
  *                          transaction dump table entry.       *
  *                          APAR PI46127                        *
  *                      02. Field ENV_ABEND_REASON_CODE is not  *
  *                          populated correctly for a S04E      *
  *                          abend.                              *
  *                          APAR PI46128                        *
  *                      03. Event summary COBOL/5 event shown   *
  *                          as all "n/a".                       *
  *                          APAR PI46129                        *
  *                      04. Abendx37 does not recover space     *
  *                          APAR PI46130                        *
  *                      05. CICS LM domain summary not being    *
  *                          displayed for CICS 690 SDUMP        *
  *                          APAR PI46131                        *
  *                      06. First program name in ErrorHandler  *
  *                          option list ignored.                *
  *                          APAR PI46132                        *
  *                      07. Abend0c9 in FA Interactive          *
  *                          Reanalysis.                         *
  *                          APAR PI46133                        *
  *                      08. User gets unending loop in          *
  *                          function dfhs_tcpopl when           *
  *                          analyzing CICS SDUMP                *
  *                          APAR PI46134                        *
  *                      09. Parameters may not be reported for  *
  *                          Enterprise PL/I program.            *
  *                          APAR PI32179                        *
  *                      10. When RENT compiler option is in     *
  *                          effect, Enterprise PL/I STATIC and  *
  *                          EXTERNAL variables are sometimes    *
  *                          reported at the wrong address.      *
  *                          APAR PI46105                        *
  *                      11. IPVLANGP abends when processing a   *
  *                          COBOL program that has BLA base     *
  *                          locators.                           *
  *                          APAR PI46135                        *
  *                      12. Fault Analyzer rejects side file    *
  *                          for an assembler language program.  *
  *                          APAR PI46136                        *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  01. If FA skips analysis due to the CICSDUMPTABLEEXCLUDE option
      (message IDI0101I) the CICS transaction dump is suppressed.
      However this should not happen if the SYSDUMP option has
      also been specified on the transaction dump table entry.
  02. Special code for a S04E abend was not correctly setting
      field ABEND_REASON_CODE in the env structure.
  03. The event was not recognized as a COBOL event due to an
      unexpected stub routine.
  04. Space recovery calculations after abendx37 are not correct.
  05. An eyecatcher validity check is no longer valid for
      CICS 690.
  06. The ErrorHandler program name list was processed
      incorrectly.
  07. Divide by zero occurs processing a dynamic array.
  08. dfhs_tcpopl is finding surrogate TCTTEs in the SDUMP
      and is not handling them correctly.
  09. Internal names used for parameters not checked correctly
      sometimes resulting in parameter being ignored.
  10. When the PL/I error handler gets control, LE swaps the WSA
      address but does not swap back if an abend is issued.
  11. BLA base locators should not be processed.
  12. Side file instruction check fails because op codes in
      executable code have been changed to SVC145 (Debug Tool
      hook).
  

Problem conclusion

• 01. Prior to setting the transaction dump suppress flag the CICS
      transaction dump table entry is checked to see if the
      SYSDUMP option has also been specified and if so the
      transaction dump is not suppressed.
  02. ABEND_REASON_CODE is now correctly set.
  03. The event is now recognized as a COBOL event.
  04. Space recovery is calculations are corrected.
  05. The validity check has been modified for CICS 690
  06. The ErrorHandler program name list is now processed
      correctly.
  07. Code changed to prevent the divide by zero.
  08. dfhs_tcpopl has been changed to handle surrogate TCTTEs.
  09. Internal parameter name check corrected.
  10. LE swap back implemented.
  11. BLA processing no longer occurs.
  12. SVC145 instructions not checked.
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UI29958

Modules/Macros

• HADQB10J IDICAASM IDICAFAT IDICALOC IDICASUB
  IDICBDB2 IDICBIMS IDICCFND IDICOPYR IDICRXDX IDICRXEI IDICRXET
  IDICRXHC IDICSMF  IDICSPC  IDICSVCR IDICSV05 IDICSV06 IDICSV08
  IDICSV09 IDICSV10 IDICSV11 IDICSV12 IDICSV13 IDICSV14 IDICSV15
  IDICUXCS IDICUXWR IDIDA    IDIDASUB IDIHPMSG IDILANGP IDILANGX
  IDIMCICS IDINDEX  IDIPBRWS IDIPDDIR IDIPDSCU IDIPIPV  IDIPLTS
  IDISAREQ IDISCJST IDISDB2P IDISDB2S IDISFPEX IDISIFND IDISJL
  IDISJLD  IDISJLOG IDISLEEP IDISLKUP IDISLOG  IDISMAIN IDISREG
  IDISRFRD IDISSREQ IDISTIME IDISUPDI IDISVIEW IDIUTIL  IDIWDATA
  IDIXALOG IDIXASUB IDIXCCEE IDIXCEE  IDIXCM53 IDIXCM67 IDIXCM68
  IDIXCM69 IDIXDCTL IDIXDSAC IDIXDUMP IDIXFA   IDIXGSPC IDIXGSPS
  IDIXIPV  IDIXIPV2 IDIXOPT
  

Fix information

• Fixed component name

  FAULT ANALYZER

• Fixed component ID

  5655W4600

Applicable component levels

• RB10 PSY UI29958

     UP15/08/18 P F508

Fix is available

• Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.