APAR status
Closed as program error.
Error description
Rational Business Developer V7.5.1.4: During the conversion from EGL to COBOL, form fields of data type 'num' are converted to 'zone with sign', so the program cannot get the inputted values from these fields correctly. For example, for the following EGL form field definition: FLD10V01 num(2) { position=[20,40], fieldLen=2, cursor=yes, validationOrder=2, color=defaultColor, highlight=underline, intensity=normalIntensity, protect=noProtect, sign=none, align=right, fillCharacter=nullFill}; the following is generated in the COBOL (defined zone with sign) 05 FILLER REDEFINES EZEMAP-DATA-FLD10V01-3. 10 EZEMAP-FLD10V01-3. COPY ELAAHAS2 SUPPRESS. 15 FLD10V01-3 PIC S9(2). 15 FILLER PIC X(1). With this definition, the input data is not handled correctly. For example, if the input value for the field is 11, the program gets +11, which causes the program to display an error message.
Local fix
Problem summary
The temporary variable used to hold the num value was not having the sign set to human-readable.
Problem conclusion
Software updated. Fixtest available.
Temporary fix
Comments
APAR Information
APAR number
PM05028
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-01-12
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
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:
14 April 2010