IBM Support

PI73026: 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

Subscribe

You can track all active APARs for this component.

 

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

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSTRMM","label":"IBM Developer for z\/OS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"950","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
19 October 2021