APAR status
Closed as program error.
Error description
A compile error occurs for the generated cobol program if the E GL source contains a move from fieldChar to another fieldChar with substring. TRAP_SUP has char(79) and USUARIO has char(8). T230019.TRA_SUP62 : 71 = P2300533_WRK.USUARIO; COBOL Listing: 008779 * EGL 181 T23054.T230019.TRA_SUP62:71 = c' ' + P2300 ... 008780 * EGL 181 533_WRK.USUARIO; 008781 SET EZEHAST-OUTPUT-SELECTED IN EZEMAP-TRA-SUP-7 ( 62 : 1 + 71 833 802 ==008781==? IGYPG3191-E A reference-modifier start value exceede d the number of characters in 'EZEHAST-AOUT'. A value equal to the number of characters in 'EZEHAST-AOUT' was assumed.
Local fix
Problem summary
The logic for assigning to a target form field variable, with a substring, was also trying to substring the TUI single byte flag field, which produced a compiler error.
Problem conclusion
Software updated. Fixtest available.
Temporary fix
Comments
APAR Information
APAR number
PM03160
Reported component name
RBD EGL FOR COB
Reported component ID
5724S5001
Reported release
750
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2009-12-09
Closed date
2010-04-14
Last modified date
2010-04-14
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
R750 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","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
14 April 2010