APAR status
Closed as program error.
Error description
Rational Business Developer V7.5.1.5: The following ompiler errors are received for COBOL generated for EGL SQL REPLACE statements where the SQLRecord used on the REPLACE is passed in as a parameter to the function. 003117 IF EZECRS-EZELFP-XSSTOREREC-50-CLOS OR ==003117==> IGYPS0023-E The COBOL word starting in column 15 contained more than 30 characters. The word was truncated to 30 characters. ==003117==> IGYPS2121-S "EZECRS-EZELFP-XSSTOREREC-50-CL" was not defined as a data-name. The statement was discarded. ==003117==> IGYPS2048-S An invalid abbreviated relation condition was found. The statement was discarded. ==003117==> IGYPS2096-S An incomplete condition was found in a conditional expression. The operand(s) was(were) discarded. 003118 EZECRS-EZELFP-XSSTOREREC-50-SETI OR ==003118==> IGYPS0023-E The COBOL word starting in column 12 contained more than 30 characters. The word was truncated to 30 characters. ==003118==> IGYPS2121-S "EZECRS-EZELFP-XSSTOREREC-50-SE" was not defined as a data-name. The statement was discarded. 003119 EZECRS-EZELFP-XSSTOREREC-50-SIWH ==003119==> IGYPS0023-E The COBOL word starting in column 12 contained more than 30 characters. The word was truncated to 30 characters. ==003119==> IGYPS2121-S "EZECRS-EZELFP-XSSTOREREC-50-SI" was not defined as a data-name. The statement was discarded.
Local fix
A temp fix is available from support. Alternatively, to workaround this issue, declare the SQLRecord in the program, library or function instead of passing it in as a parameter.
Problem summary
**************************************************************** * USERS AFFECTED: * **************************************************************** * PROBLEM DESCRIPTION: * **************************************************************** * RECOMMENDATION: * **************************************************************** When an SQLRecord is passed as a parameter to a function and used in a REPLACE statement, a COBOL compile error occurs.
Problem conclusion
Corrected the record name used to generate the REPLACE code.
Temporary fix
Comments
APAR Information
APAR number
PM19905
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
2010-08-04
Closed date
2010-10-13
Last modified date
2010-10-13
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:
13 October 2010