APAR status
Closed as program error.
Error description
Rational Business Developer V7.5.1.5: The result of using AS DECIMAL with the truncateExtraDecimals=YES build descriptor option is wrong when running the EGL generated COBOL program on iSeries (System i). The results are correct running the program in the EGL debugger and the EGL generated COBOL program for zSeries (System z). For example: field 1char(10) = "123.567"; field2 num(10, 5); field2 = field1 as decimal(10, 5); the result for field2 on iSeries is 123.56699 instead of 123.56700.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: * **************************************************************** * PROBLEM DESCRIPTION: * **************************************************************** * RECOMMENDATION: * **************************************************************** The problem lies in the iSeries COBOL compiler's handling of the intrinsic function numval-c. It uses floating point and sometimes produces a close, but inexact answer. This causes EGL to produce an answer based on this inexact value. The problem has been resolved by a change in EGL's code generation. For iSeries only, assignments that used to use numval-c are now calling the EGL runtime instead and using its technique for determining the value of a text field as a number. This never uses floating point and produces the correct value in all cases.
Problem conclusion
Software updated. Fixtest available.
Temporary fix
Comments
APAR Information
APAR number
PM21505
Reported component name
RBD EGL FOR COB
Reported component ID
5724S5001
Reported release
751
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2010-08-30
Closed date
2010-10-13
Last modified date
2010-10-13
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
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSMQ79","label":"Rational Business Developer"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7.5.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
13 October 2010