IBM Support

PI39800: RATIONAL DEVELOPER FOR SYSTEM Z (RDZ) : COBOL PARSER PROVOKES AN INDEXOUTOFBOUNDSEXCEPTION ERROR

Subscribe

You can track all active APARs for this component.

APAR status

  • Closed as program error.

Error description

  • Rational Developer for System z - RDz - v9.1.1
    
    Description :
    This occurs in case of Cobol program with copybooks associated.
    On RDz 8.5.1.5, there was an error marker on "ROLLBACK", which
    was used in a main program as a variable as shown below :
    088890 CLOTURE.
    088900     IF    ROLL-A-FAIRE-BIS = 1
    088910*          MOVE 1 TO ROLL-A-FAIRE
    088920           SET ROLLBACK TO TRUE
    088930     END-IF
    The ROLLBACK variable is defined in the copybooks :
    * LE ROLLBACK 00300001
    * 0 PAS DE ROLLBACK A FAIRE 00310001
    * 1 ROLLBACK A FAIRE 00320001
    15 PRJ024-SIGNA-ROLLBACK PIC X. 00330001
    88 PRJ024-ROOLBACK-A-FAIRE VALUE '1'. 00340001
    This seems to be a bug in the RDz parser,
    since this file was compiled successfully by the Cobol compiler.
    But on RDz 9.1.1, there is no more error marker. The parser just
    silently fails and all syntax functions are disabled.
    The only way to get more information on this error on RDz 9.1.1
    was to go to the preferences, and in the Tracing page enable the
    FINEST trace on com.ibm.systemz.common.editor.
    It shows there is an IndexOutOfBoundsException in the parser :
    java.lang.IndexOutOfBoundsException: Index: 59631, Size: 24105
    
    This issue seems to happen on programs containing a
    "REPLACE" statement.
    
    Steps to have the error message :
    - In the preferences, put FINEST level in
    com.ibm.systemz.cobol.editor.core
    + com.ibm.systemz.cobol.editor.lpex
    + com.ibm.systemz.common.editor.
    - Open the program from the z/OS project perspective
    (tested with both Cobol and LPEX editors)
    - Await for the copybooks download
    - Got the red cross over the suitcase icon at the bottom right
    of
    the screen and "Tooling failed to initialize dur to syntax error
    -> when adding syntax check errors, they are not detected.
    

Local fix

  • No
    

Problem summary

  • COBOL parser incorrectly calculated offsets when processing
    REPLACE statements.
    

Problem conclusion

  • Fixed offset calculation for processing REPLACE statements in
    COBOL parser.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI39800

  • Reported component name

    RATL DEV FOR SY

  • Reported component ID

    5724T0700

  • Reported release

    911

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2015-04-24

  • Closed date

    2015-10-16

  • Last modified date

    2015-10-16

  • 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

    RATL DEV FOR SY

  • Fixed component ID

    5724T0700

Applicable component levels

  • R911 PSY

       UP



Document information

More support for: Rational Developer for System z

Software version: 9.1.1

Reference #: PI39800

Modified date: 16 October 2015