PQ11880: COBOL READING VSAM IS SLOW WHEN RECORD IS NOT FOUND

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Poor performance occurs when a COBOL for MVS&VM program reads
  an indexed VSAM file and the requested record does not exist.
  The file status key is correct, but the speed suffers
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: IBM COBOL users encounter performance        *
  *                 problems when VSAM returns control to        *
  *                 LERAD routine. Also receive ABENDS0C4        *
  *                 in SYNAD routine during a VSAM I/O           *
  *                 error.                                       *
  ****************************************************************
  * PROBLEM DESCRIPTION: IBM COBOL LERAD and SYNAD routines need *
  *                      to be streamlined to reduce need for    *
  *                      temporary storage as this uses too many *
  *                      extra instructions. SYNAD routine was   *
  *                      missing a statement to restore one of   *
  *                      IGZEVIO's base registers which caused   *
  *                      ABENDS0C1 or ABENDS0C4.                 *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  IBM COBOL programs which rely on LERAD handling of failed READs
  to detect missing or incorrect accounts experience longer run
  times due to the LERAD routine requesting temporary storage
  which utilizes the Language Environment heap services. It was
  determined that temporary storage was not needed. Additionally,
  the SYNAD routine was missing one statement to restore a base
  register which had been altered by another module.
  

Problem conclusion

• IGZEVIO module changes to LERAD and SYNAD remove requests for
  temporary storage. Corrections to SYNAD routine to restore base
  register 5. In addition, the SYNAD routine was updated to set
  the secondary file status.
  

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:

  UQ19225 UQ19226 UQ19227 UQ19228 UQ19229 UQ19230 UQ19231 UQ19232
  PQ42620

Modules/Macros

•    IGZEVIO
  

Fix information

• Fixed component name

  LE COBOL LIB

• Fixed component ID

  568819802

Applicable component levels

• R52N PSY UQ19232

     UP98/07/02 P 9807

• R520 PSY UQ19231

     UP98/07/06 P F807

• R62N PSY UQ19229

     UP98/07/02 P 9807

• R620 PSY UQ19228

     UP98/07/06 P F807

• R710 PSY UQ19225

     UP98/07/06 P F807

• R810 PSY UQ19226

     UP98/07/06 P F807

• R82N PSY UQ19230

     UP98/07/02 P 9804

• R910 PSY UQ19227

     UP98/07/06 P F807

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.