PI63293: SYNTAX ERRORS ARE NOT FLAGGED BY DB2 COPROCESOR WHEN DATA ITEMS FOLLOW AN SQL END-EXEC

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Data-items that follow an SQL END-EXEC are incorrectly treated
  as arguments instead of invalid syntax.  Integrated DB2
  Coprocessor will be corrected to catch invalid syntax.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V6.1 compiling     *
  *                 with the SQL compiler option and using EXEC  *
  *                 SQL statements followed immediately by a     *
  *                 data-name (without a statement).             *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: The compiler does not diagnose the      *
  *                      case of EXEC SQL ... END-EXEC           *
  *                      statement followed immediately by a     *
  *                      data-name reference.  The following     *
  *                      example should generate compiler        *
  *                      message IGYPS2072-S  MYVAR1 was         *
  *                      invalid. Skipped to the next verb,      *
  *                      period or procedure-name definition.    *
  *                                                              *
  *                      WORKING-STORAGE SECTION.                *
  *                      01 MYVAR1  PIC X.                       *
  *                      01 MYVAR2  PIC X(26).                   *
  *                      PROCEDURE DIVISION.                     *
  *                          EXEC SQL                            *
  *                            SELECT CURRENT  AS TIMESTAM       *
  *                               DUMMY INTO :MYVAR2             *
  *                               FROM SYSIBM.SYSDUMMY1          *
  *                          END-EXEC                            *
  *                          MYVAR1                              *
  *                          STOP RUN.                           *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  The IBM internal COBOL statements generated for an EXEC SQL
  statement end with a CALL statement.  The CALL statement was
  not followed by an END-CALL statement terminator.
  

Problem conclusion

• The compiler was modified to add an END-CALL statement
  terminator after every CALL statement in the internal COBOL
  generated by EXEC SQL statements
  

Temporary fix

Comments

APAR Information

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

  PI56178

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

Modules/Macros

•    IGYCRCTL
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R610 PSY UI38707

     UP16/06/17 P F606

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.