PH23946: PERFORMANCE IMPROVEMENT FOR INSPECT STATEMENT FOR AMODE64

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Performance improvement for INSPECT statement for AMODE 64
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V6.3               *
  *                 release running AMODE 64 COBOL programs      *
  *                 that use INSPECT statements with             *
  *                 BEFORE or AFTER phrase.                      *
  ****************************************************************
  * PROBLEM DESCRIPTION: If the delimiter in the BEFORE or       *
  *                      AFTER phrase has more than one          *
  *                      character, and the first character is   *
  *                      repeated contiguously in the item       *
  *                      being inspected, performance may be     *
  *                      slower than other common inspect        *
  *                      scenarios.                              *
  *                      (Refer to Problem Summary below for an  *
  *                      example of the INSPECT statement.)      *
  ****************************************************************
  * RECOMMENDATION: Apply the PTF provided.                      *
  ****************************************************************
  The string comparison method used to check BEFORE and AFTER
  delimiter is not optimized for repeat characters in the
  inspected data item (i.e. ITEM1 in the sample below). The code
  fragment below shows an example of such case. The repeated "A"
  in ITEM1 causes the COBOL library routine to do unnecessary
  checking during string comparison.
  -----------------------------------------------------
  01 ITEM1 PIC X(80) VALUE
     "THIS IS AAAAAAAAAAAAAAAAAAAAAAAAAATEST".
  01 TALLY1 PIC 9(8).
  INSPECT ITEM1 TALLYING TALLY1 FOR
          CHARACTERS BEFORE 'ABCD'.
  -----------------------------------------------------
  
  COB0603T/K
  

Problem conclusion

• BEFORE and AFTER processing of the COBOL library INSPECT routine
  for AMODE 64 has been enhanced to the handle the use case
  described in Problem Summary.
  

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:

Modules/Macros

• CELQSG04 CELQV004 IGZQAPI  IGZQCDA  IGZQINPL
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7B0 PSY UI69632

     UP20/05/27 P F005

• R7C0 PSY UI69635

     UP20/05/27 P F005

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.