A fix is available
APAR status
Closed as program error.
Error description
The following error is issued when the following code segment is run through the COBOL coprocessor using SQL option: EXEC SQL INSERT INTO SYSIBM.JOB_JCL (ROWNUM,STMT) VALUES (3,'XXSTEP05 EXEC PGM=IDCAMS') END-EXEC. IGYPS0226-E DSNH104I DSNHPARS LINE 188 COL 224 ILLEGAL SYMBOL "EXEC". SOME SYMBOLS THAT MIGHT BE LEGAL ARE: MICROSECONDS MICROSECOND SECONDS SECOND MINUTES MINUTE HOURS 191 IGYPS0007-E An alphanumeric literal was not properly continued. The end of the literal was assumed on the last source line.
Local fix
Use DB2 precompiler.
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 5.2 who use the * * SQL option and have embedded SQL statements * * in their program that contain characters * * that are SQL separators but not COBOL * * separators. * * * **************************************************************** * PROBLEM DESCRIPTION: The user may encounter a compile-time * * error (IGYPS0226-E). * * * **************************************************************** * RECOMMENDATION: Apply provided service. * * * **************************************************************** The COBOL compiler was tokenizing SQL statements according to COBOL language rules instead of SQL language rules, which are slightly different.
Problem conclusion
The compiler was updated to properly process SQL language separators in embedded SQL statements.
Temporary fix
Comments
APAR Information
APAR number
PI40824
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
520
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2015-05-11
Closed date
2015-05-21
Last modified date
2015-06-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYCCBE
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R520 PSY UI27877
UP15/05/28 P F505
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.
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"520","Edition":"","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"520","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
01 June 2015