PM96793: Reading data from a database returns incorrect date values

Rational Business Developer Fix Pack 2 (8.5.1.2) for 8.5.1

APAR status

• Closed as program error.

Error description

• Environment: windows 7
  Product name: IBM? Rational? Business Developer
  
  Program Version    :  8.5.1
  Description.
  Reading data from a database returns incorrect date values.
  Steps to reproduce:
  a)  A cursor on a table fetches the first row of a database date
  field which is then in turn correctly returned with its
  associated null value.
  b) The next data read of the following row then once again
  correctly returns its associated value which is a 'real' date.
  c)  Subsequent iterations through the table appears to
  thereafter retain this date value so the next rows which contain
  null dates are incorrectly return with the same date of (b)
  d)  An example of a conditional statement which is not
  evaluating correctly in this scenario:
          if (testrec.deliveryEndDate != ' ')
            writestdout('delivery_date not blank - Row = ' +
  testrec.DELIVMTRUNBLOCK);
            continue while1;
          else
           writestdout('delivery_date IS blank - Row = ' +
  testrec.DELIVMTRUNBLOCK);
          end
       end
  
  This behavior is observed with both the generated Java
  application and via the EGL debugger.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  If the user use 'get next' to read the data into a same SQL
  record. When the date field is null but the date field in
  the previous row is not null, the field is not set to null
  but set to the value of the previous row.
  

Problem conclusion

• The problem is resolved.
  

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

  RATL BUS DEV

• Fixed component ID

  5724S5000

Applicable component levels

• R850 PSN

     UP