APAR status
Closed as program error.
Error description
The source sql stmt has a comment, and the generated cobol is in correct because of additional spaces around *. The source has: FOR select /*+ INDEX_DESC(T1 LEER_IDX9) */ 8251 EXEC SQL 8252 DECLARE EZECURSOR18 CURSOR Error at line 8253, column 29 in file //DD:SYSIN 8253 FOR select / * + INDEX_DESC(T1 LEER_IDX 9) * / CASE_NO + 8253 ............................1 8253 PCB-S-00400, Encountered the symbol '/' when expecting o ne of the following: + - * ( : id string ALL REPLACE sql_string literal CA SE DATE NULL ROWID CAST COALESCE COUNT DISTINCT EXTRACT INTER VAL NULLIF PRIOR TIME TIMESTAMP TRIM UNIQUE hint_comment AVG MAX MIN SUM STDDEV VARIANCE The symbol 'id was inserted before '/' to continue.
Local fix
Problem summary
A check for comment characters has been added to prevent inserting spaces between the individual / and *
Problem conclusion
Software updated. Fixtest available
Temporary fix
Comments
APAR Information
APAR number
PK80350
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
2009-02-10
Closed date
2009-03-20
Last modified date
2009-03-20
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:
20 March 2009