Fixes are available
APAR status
Closed as program error.
Error description
Environment: Windows Product name: IBM? Rational? Business Developer Program Version : 8.5.1 Description. Running a EGL Java generated application produces erroneous output with a simple statement. Example code: program GenSample type BasicProgram {} vk1 myRec; vk2 myRec; vk3 myRec; function main() vk1.a = 9; vk1.b = 9; vk1.c = 9; vk2 = vk1; vk3.a = vk2.a + 1; SysLib.writeStdout('vk3.a = vk2.a + 1; vk3.a = ' + vk3.a + ' vk2.a = ' + vk2.a); end end record myRec type basicRecord 3 a num(9); 3 b num(9); 3 c num(9); end Incorrect output is returned from the generated Java code (vk3.a = 1): vk3.a = vk2.a + 1; vk3.a = 1 vk2.a = 9 Whereas EGL debugger correctly returns: vk3.a = vk2.a + 1; vk3.a = 10 vk2.a = 9 The error then concerns only the Java generator as the EGL debugger and COBOL generated runtime return correct results in this scenario. NB: Also reproducible across the RBD v8.0.1.x stream.
Local fix
Problem summary
In RBD 8.5.1 and before, the generation for fieldAccess assignment is incorrect in statement like (vk1.a = vk2.a + 1).
Problem conclusion
In RBD 8.5.1.1, 9.0 and after, the generated Java for fieldAcess is correct.
Temporary fix
Comments
APAR Information
APAR number
PM87281
Reported component name
RATL BUS DEV
Reported component ID
5724S5000
Reported release
801
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2013-04-18
Closed date
2013-10-28
Last modified date
2013-10-28
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 PSY
UP
R900 PSY
UP
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSMQ79","label":"Rational Business Developer"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"8.0.1","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
06 January 2022