IBM Support

PI50778: RDZ REAL-TIME SYNTAX CHECK GIVES INCORRECT WARNING "USE BINARY SUBSCRIPTS"

Subscribe

You can track all active APARs for this component.

APAR status

  • Closed as program error.

Error description

  • In Rational Developer for System z - RDz - v9.1.1.1,
    real-time syntax check gives incorrect warning "use binary
    subscripts".
    
    
    Steps to reproduce:
    
    1- create a local COBOL program like:
    
           IDENTIFICATION DIVISION.
           PROGRAM-ID. P17255B.
           AUTHOR. IBM.
    
           DATA DIVISION.
           WORKING-STORAGE SECTION.
           LOCAL-STORAGE SECTION.
    
             01 myArray.
               05 array.
                  10 arrayRow              occurs 20.
                     15 arrayCell           pic  x(26).
                  05                 binary.
                  10 arrayIdx2          pic s9(09).
                  10 arrayIdx3          binary.
    
    
           PROCEDURE DIVISION.
                 move 0 to arrayIdx2.
                 move "Test OK" to arrayCell in myArray(arrayIdx2).
                 display arrayRow(arrayIdx2).
                 goback.
    
    
    2- Run software analysis with COBOL Performance rules selected
    3- Observes the warning "use binary subscripts" on line 14
    
    There are no warnings if arrayIdx3 is used instead of arrayIdx2.
    There are also no warnings if arrayIdx2 is not used as array
    index: problem happens when the variable is used as array index.
    

Local fix

  • There is no known workaround at this time.
    

Problem summary

  • Real-time syntax check gives incorrect warning "use binary
    subscripts".
    
    
    Steps to reproduce:
    
    1- create a local COBOL program like:
    
           IDENTIFICATION DIVISION.
           PROGRAM-ID. P17255B.
           AUTHOR. IBM.
    
           DATA DIVISION.
           WORKING-STORAGE SECTION.
           LOCAL-STORAGE SECTION.
    
             01 myArray.
               05 array.
                  10 arrayRow              occurs 20.
                     15 arrayCell           pic  x(26).
                  05                 binary.
                  10 arrayIdx2          pic s9(09).
                  10 arrayIdx3          binary.
    
    
           PROCEDURE DIVISION.
                 move 0 to arrayIdx2.
                 move "Test OK" to arrayCell in myArray(arrayIdx2).
                 display arrayRow(arrayIdx2).
                 goback.
    
    
    2- Run software analysis with COBOL Performance rules selected
    3- Observes the warning "use binary subscripts" on line 14
    
    There are no warnings if arrayIdx3 is used instead of arrayIdx2.
    There are also no warnings if arrayIdx2 is not used as array
    index: problem happens when the variable is used as array index.
    

Problem conclusion

Temporary fix

Comments

APAR Information

  • APAR number

    PI50778

  • Reported component name

    RATL DEV FOR SY

  • Reported component ID

    5724T0700

  • Reported release

    910

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2015-10-19

  • Closed date

    2016-02-25

  • Last modified date

    2016-02-25

  • 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

Reference #: PI50778

Modified date: 25 February 2016