APAR status
Closed as program error.
Error description
In the the egl source file the following sql statement is coded: select SUBSTR(' ', 1, 7 - LENGTH( TRIM(LEADING '0' FROM SUBSTR(DIGITS( COL1 ), 1, 5)) CONCAT ',' CONCAT SUBSTR(DIGITS( COL1 ), 6, 2))) CONCAT TRIM(LEADING '0' FROM SUBSTR(DIGITS( COL1 ), 1, 5)) CONCAT ',' concat SUBSTR(DIGITS( COL1), 6, 2) from DBANERJE.T89385 T1 the generated cobol is not formatted correctly. In the returned host variable an extra blank is introduced.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: * **************************************************************** * PROBLEM DESCRIPTION: * **************************************************************** * RECOMMENDATION: * **************************************************************** The SQL I/O analyzer was adding a space after a comma in parts of the SQL statement, to split up long SQL statements in order to fit in a COBOL line. It wasn't taking into account if the comma was located inside of a quoted value, which erroneously caused the extra space to be added. The solution was to ensure this extra space addition, only be done outside of quoted strings.
Problem conclusion
Software updated. Fixtest available.
Temporary fix
Comments
APAR Information
APAR number
PM31736
Reported component name
RBD EGL FOR COB
Reported component ID
5724S5001
Reported release
751
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2011-02-01
Closed date
2011-05-06
Last modified date
2011-05-06
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Fix information
Fixed component name
RBD EGL FOR COB
Fixed component ID
5724S5001
Applicable component levels
R751 PSN
UP
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSMQ79","label":"Rational Business Developer"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7.5.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
06 May 2011