Fixes are available
Rational Developer for System z Fix Pack 4 (9.5.1.4) for 9.5.1.
Rational Developer for System z Fix Pack 5 (9.5.1.5) for 9.5.1.
Rational Developer for System z Fix Pack 5 (9.5.1.6) for 9.5.1.
Rational Developer for z Systems Fix Pack 7 (9.5.1.7) for 9.5.1.
Rational Developer for z Systems Fix Pack 8 (9.5.1.8) for 9.5.1.
Rational Developer for z Systems Fix Pack 9 (9.5.1.9) for 9.5.1.
Rational Developer for z Systems Fix Pack 10 (9.5.1.10) for 9.5.1.
Rational Developer for z Systems Fix Pack 11 (9.5.1.11) for 9.5.1.
Rational Developer for z Systems Fix Pack 12 (9.5.1.12) for 9.5.1.
APAR status
Closed as program error.
Error description
IBM Rational Developer for z Systems 9.5.1.1 real-time syntax check does not report an error in truncation on a PIC literal that is set to a length of 32, but the value has an actual length of 33. IBM Enterprise COBOL for z/OS 5.2.0 compiler does report the error with the same code. The error from the compiler listing shows: Error: 000269C 10 SQLSTATE PIC X(5). 000000083 5C 000270 * 000271 01 PIC X(32) VALUE 32 ==000271==> IGYGR1056-E "VALUE" literal "'*** END WORKING STORAGE NA125 ***'" exceeded the length specified in the "PICTURE" definition. The literal was truncated to the "PICTURE" definition length. 000272 '*** END WORKING STORAGE NA125 ***'. IBM Rational Developer for z Systems shows: 000271 01 PIC X(32) VALUE 32 000272 '*** END WORKING STORAGE NA125 ***'. Note: The product documentation states a limitation on real-time syntax check omissions. "Limitations: Real-time syntax checking is not a substitute for compiling. Real-time syntax checking can catch most high-level syntax errors, but for full error checking, it is best to compile your source code."
Local fix
Use the compiler listing for full analysis.
Problem summary
Real-time syntax check does not warn about data truncation when length of value in VALUE clause exceeds length of data element.
Problem conclusion
Modified COBOL parser to warn when length of value in VALUE clause exceeds length of data element. The problem listed in this APAR has been resolved with IBM Rational Developer for z Systems V9.5.1.4 Fix Pack which is available from the Recommended Fixes support download page: http://www-1.ibm.com/support/docview.wss?rs=2294&uid=swg27006335
Temporary fix
Comments
APAR Information
APAR number
PI73026
Reported component name
DEV FOR Z SYS
Reported component ID
5724T0700
Reported release
950
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2016-11-30
Closed date
2017-02-23
Last modified date
2017-02-23
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
DEV FOR Z SYS
Fixed component ID
5724T0700
Applicable component levels
R951 PSY
UP
Document Information
Modified date:
19 October 2021