PH72855: COMPILER ERRONEOUSLY GENERATES IGYDS2273-S ON VALID SQL TYPE DATA DECLARATION.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• After application of service containing the fix for APAR
  PH71340, Enterprise COBOL for z/OS V6.5 may incorrectly issue
  message IGYDS2273-S for a valid SQL TYPE IS XML AS CLOB(1M) data
  declaration. This declaration is valid and does not require
  END-EXEC. The problem occurs only in a narrow combination of
  circumstances involving SQL TYPE declarations and subsequent SQL
  coprocessor warning processing.
  

Local fix

• No Local fix is available.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.4 compiling      *
  *                 programs with the SQL option, where the      *
  *                 program includes a data description entry    *
  *                 containing the SQL TYPE clause and where the *
  *                 next SQL-related code processed by the       *
  *                 compiler after that data description entry   *
  *                 happens to result in a warning from the Db2  *
  *                 co-processor (e.g., DSNH204I).               *
  ****************************************************************
  * PROBLEM DESCRIPTION: Incorrect compile-time message:         *
  *                                                              *
  *                      IGYDS2273-S An "SQL" statement was      *
  *                      found without a matching                *
  *                      "END-EXEC".  The "SQL" statement was    *
  *                      discarded.                              *
  ****************************************************************
  * RECOMMENDATION: Apply the IBM-provided PTF.                  *
  ****************************************************************
  The compiler was interpreting the Db2 co-processor warning under
  these conditions as an indication that an END-EXEC delimiter had
  not been found, even though an END-EXEC was not expected after
  an SQL TYPE clause.
  

Problem conclusion

• The compiler was updated to correctly interpret the warning from
  the Db2 co-processor in this case.
  

Temporary fix

Comments

APAR Information

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

  PH72833

• 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 IGYCJBLD IGYCJGEN IGYCLIBR IGYCLSTR IGYCLVL0
  IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOB2  IGYCOB2E
  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  IGYQCBE  IGYQSPLT IGYZQEN6
  IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R640 PSY UO08817

     UP26/08/29 P F608

• R641 PSY UO08818

     UP26/08/29 P F608

• R642 PSY UO08819

     UP26/08/29 P F608

• R64H PSY UO08820

     UP26/08/29 P F608

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.