PM34548: No index range checking done for static arrays in generated Cobol program

Rational Business Developer Fix Pack 2 (8.0.1.2) for 8.0.1

APAR status

• Closed as program error.

Error description

• If the EGL source contains a reference  to an array element and
  the array is a static array, then there is no range check is
  performed for out of bounds condition for Cobol Generation. This
  differs from Java generation where the range check is always
  done.
  
  Example program:
  
  package tester;
  
  record rec type basicrecord
      01 arr int[5];
  end
  //Put EGL Source File Contents Here'
  
  program quick type BasicProgram{}
  
      function main()
  
          i int;
  
          r rec;
          r.arr[0] = i;
  
      end
  
  end
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  The check indeces build option for COBOL generation was only
  supporting dynamic arrays and substrings. It was not
  checking static structured field arrays for indexes out of
  range.
  

Problem conclusion

• Code has been added to additionally check static structured
  field arrays.
  This code has been added to both 7517 and 8012, and fixtests
  are available for 7516 and 8011 systems.
  

Temporary fix

Comments

APAR Information

• 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