PH33458: IGYPS2061-S when using a condition-name the length of whose value is more than 255 bytes in a SET TO TRUE statement

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The COBOL 6.3 compiler, but not earlier versions, incorrectly
  generates the diagnostic
  
          IGYPS2061-S An error was found in the definition of
                  condition-name "?". The reference to this
                  condition-name was discarded.
  
  for a SET {condition-name} TO TRUE statement if the
  condition-name is defined as ALL {literal} and the conditional
  variable with which it is associated is of length 256 or
  greater:
  
          77  conditional-variable  pic x(256).
              88 condition-name     value all '0'.
          ...
              SET condition-name TO TRUE
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.3 compiling      *
  *                 programs containing a condition name (level  *
  *                 88 data item) with an ALL literal specified  *
  *                 in the VALUE clause and at least one         *
  *                 reference to the condition name in the       *
  *                 procedure division.                          *
  ****************************************************************
  * PROBLEM DESCRIPTION: Unexpected compiler error message:      *
  *                                                              *
  *                      IGYPS2061-S An error was found in       *
  *                      the definition of condition-name        *
  *                      "YYY-ZZZ". The reference to this        *
  *                      condition-name was discarded.           *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  The compiler had a bug in the scan phase whereby the processing
  of an ALL literal for a condition name could result in memory
  corruption in the compiler. The memory corruption could
  occasionally result in the compiler producing a spurious
  IGYPS2061-S error.
  

Problem conclusion

• The compiler was updated to correct the scan phase processing of
  ALL literals associated with a condition name so that
  spurious IGYPS2061-S errors are not produced.
  

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:

  UI73593 UI73594 UI73595

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  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
  IGYMSGXT IGYQCBE  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R630 PSY UI73593

     UP21/01/28 P F101

• R631 PSY UI73594

     UP21/01/28 P F101

• R632 PSY UI73595

     UP21/01/28 P F101

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.