PH49827: INSPECT STATEMENT WITH TALLYING PHRASE RESULTS IN INCORRECT VALUE WHEN SECOND ALL PHRASE IS LONGER THAN THE FIRST ALL PHRASE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The INSPECT statement with a TALLYING phrase results in an
  incorrect value when the second ALL phrase is longer than the
  first ALL phrase.
  

Local fix

• BYPASS/CIRCUMVENTION:
  none
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL compiling          *
  *                 programs that contain INSPECT TALLYING       *
  *                 statements that have two tally strings,      *
  *                 with the second string being longer than     *
  *                 the first                                    *
  ****************************************************************
  * PROBLEM DESCRIPTION: If matches of the first string are      *
  *                      found in the last few positions of the  *
  *                      string being searched, they won't be    *
  *                      counted                                 *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF                       *
  ****************************************************************
  When tallying with two search strings, the generated
  instructions will stop searching when there are fewer
  unsearched characters than the length of the second string. If
  the first string is shorter, any remaining occurrences of the
  first string will be missed.
  

Problem conclusion

• The compiler was fixed to search until the number of unsearched
  characters is shorter than both search strings, not just the
  second.
  

Temporary fix

Comments

APAR Information

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

  PH48281

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

Modules/Macros

• IGY8RWTU IGYCASMB IGYCCBE  IGYCCCRT IGYCCICS IGYCCSRV IGYCDGEN
  IGYCDIAG IGYCDMAP IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3 IGYCEN$4
  IGYCEN$5 IGYCEN$8 IGYCEN$D IGYCEN$R IGYCFGEN IGYCFREE IGYCINIT
  IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5 IGYCJA$8
  IGYCJA$D IGYCJA$R IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2
  IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOPI  IGYCOPT  IGYCOSCN IGYCPGEN
  IGYCRCTL IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT  IGYCSCAN IGYCSIMD
  IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5 IGYCUE$8
  IGYCUE$D IGYCUE$R IGYCXREF IGYDRV   IGYEQCWI IGYMSGE  IGYMSGK
  IGYMSGT  IGYQCBE  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R630 PSY UI82565

     UP22/10/01 P F209

• R631 PSY UI82566

     UP22/10/01 P F209

• R632 PSY UI82567

     UP22/10/01 P F209

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.