PI47968: PROGRAM RESTART FACILITY ISPF APPLICATION CAN CORRUPT ABEND RETRY TABLES WHEN ONE OF THE TABLES HAS MORE THAN EIGHT ENTRIES

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Here's a scenario that always produces a corrupted abend table:
  
  1. Create new IRTOPT dataset or remove IRT#ABND from an existing
  one
  
  2. Create new abend table named QATABLE:
  {noformat}S013   ANY       00:00:10         2
  S306   ANY       00:00:10         1
  U0044  ANY       00:00:20         3
  U0045  ANY       00:00:15         3
  U0046  00000000  00:00:15         3
  U0047  ANY       00:00:00         3
  U0048  ANY       00:01:30         1
  U0049  ANY       00:00:10         0
  U0050  ANY       00:00:15         3
  U0051  ANY       00:01:00         1
  U0053  ANY       00:00:20         3
  U0298  0000000A  00:00:30         3
  U1214  ANY       00:00:10         1
  U3303  ANY       00:00:30         0{noformat}
  3. Create new abend table named QA0439:
  {noformat}U0439  ANY       00:00:20         1
  U0456  ANY       00:00:10         2{noformat}
  4. Restart PRF, now QA0439 table has the following abends:
  {noformat}U0050  ANY       00:00:15         3
  U0051  ANY       00:01:00         1{noformat}
  
  After that, ISPF abends may happen when you work with QA0439
  table.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Program Restart Facility V2R2.      *
  ****************************************************************
  * PROBLEM DESCRIPTION: Program Restart Facility ISPF           *
  *                      application can corrupt Abend           *
  *                      Retry Tables when one of the            *
  *                      tables has more than eight entries.     *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  Program Restart Facility ISPF application can corrupt Abend
  Retry Tables when one of the tables has more than eight entries.
  

Problem conclusion

• Code has been added to correct this issue.
  

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:

  UI32306

Modules/Macros

•    IRTC09   IRTOPA2  IRTXISPF IRTZF008 IRTZF009
  IRTZJOBS IRTZOPAE IRTZPUTV
  

Fix information

• Fixed component name

  IMS PGM RESTART

• Fixed component ID

  5655E1400

Applicable component levels

• R220 PSY UI32306

     UP15/10/28 P F510

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.