APAR status
Closed as program error.
Error description
User has an application that is being migrated from VisualAge Ge nerator to Rational Business Developer 7.5.1.5 The application has an EGL MOVE ALL statement from a dataTable of size 7 to an array of max size 20. After the move the value of sysVar.arrayindex is expected to be set to 7, but instead it is set to 20. This is a deviation from VisualAge Generator behavior.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: * **************************************************************** * PROBLEM DESCRIPTION: * **************************************************************** * RECOMMENDATION: * **************************************************************** The PPR code that creates the equivalent statements for a move for all/move for count was creating incorrect code to set the arrayindex. The code was always using the target number of occurs. The code should have used the starting index and added the number of values moved (count).
Problem conclusion
This has been fixed. Since this is a problem in the generated code, the EGL code must be regenerated into Java/Cobol for this problem to be fixed for the customer.
Temporary fix
Comments
APAR Information
APAR number
PM16447
Reported component name
RATL BUS DEV
Reported component ID
5724S5000
Reported release
751
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2010-06-14
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
RATL BUS DEV
Fixed component ID
5724S5000
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