PH03358: THE COMPILER WAS INCORRECTLY GENERATING A CHECK FOR ONLY THE FIRST OF TWO ONE-BYTE LITERALS FOR INSPECT TALLYING STATEMENTS

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Part of the compiler was making an assumption
  that there was only one literal in the INSPECT statement, which
  meant that when there were 2 literals, the second one was
  ignored. When 3+ literals were present, the compiler called the
  runtime to handle the INSPECT, instead of using generated
  compiler code, so 3+ literals works fine.
  
  USERS AFFECTED: Users of Enterprise COBOL Vx.x compiling
  programs with INSPECT TALLYING statements
  where there were exactly two literals, each
  of length one byte, being tallied.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5.2 compiling     *
  *                 programs with INSPECT TALLYING statements    *
  *                 where there were exactly two literals, each  *
  *                 of length one byte, being tallied.           *
  ****************************************************************
  * PROBLEM DESCRIPTION: The program tallies only the first      *
  *                      literal.                                *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF                       *
  ****************************************************************
  The compiler was incorrectly generating a check for only the
  first of two one-byte literals for INSPECT TALLYING statements.
  

Problem conclusion

• The compiler was fixed to generate checks for both of the two
  one-byte literals for INSPECT TALLYING statements
  

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:

  PH03574 PH04956

Modules/Macros

• IGY8RWTU IGYCBE   IGYCCBE  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 IGYCLIBH IGYCLIBO IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1
  IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL 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 IGYECWI  IGYMSGE  IGYMSGK  IGYMSGT
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655W3200

Applicable component levels

• R520 PSY UI59047

     UP18/10/19 P F810

• R521 PSY UI59048

     UP18/10/20 P F810

• R522 PSY UI59049

     UP18/10/20 P F810

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.