PH48663: 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 IGYADXIT 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 IGYCJBLD IGYCJBLS IGYCJDM1 IGYCJDM2
  IGYCJDM3 IGYCJDM4 IGYCJDM5 IGYCJDM6 IGYCJDMB IGYCJDMR IGYCJGEN
  IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8
  IGYCMALL IGYCOPI  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 IGYISMKD IGYMSGE  IGYMSGK  IGYMSGT  IGYMSGXT
  IGYQC    IGYQCB   IGYQCBE  IGYQCBG  IGYQSPLT IGYWACPT IGYWALOC
  IGYWAPLY IGYWC    IGYWCL   IGYWCLG  IGYWDDEF IGYWDOPT IGYWIVP1
  IGYWIVP2 IGYWRECV IGYWRWD  IGYWSMPE IGYWUOPT IGYWZFS  IGYZQEN6
  IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R640 PSY UP

     A

• R641 PSY UP

     A

• R642 PSY UI82932

     UP22/10/28 P F210

• R64H PSY UP

     A

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.