PM31927: OC7 abend if column in table is NULL

APAR status

• Closed as program error.

Error description

• The egl program is accessing data from a db2 table in which one
  column is decimal and is nullable.
  When the value is not null, there is no problem.
  
  If the value is null, then no check is done before moving the
  value to the host variable. The source
  area is uninitialized and the move results in an 0C7 abend.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  The logic that moves same type fields from the EGL variable
  to the SQL host variables will take into account nullable
  indicators. This logic was not being invoked for their
  specific case, because they defined the EGL variables as
  type NUM. NUM is not supported on zSeries DB2, so the EGL
  sql host variable processor automatically detects that and
  converts it to type decimal instead. This caused a type
  mismatch on a comparision done in the logic, which prevented
  the proper template to get invoked, which would have taken
  into account the nullable indicators.
  

Problem conclusion

• The logic has been modified to do a logical comparison of
  types instead of a hard match.
  

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