APAR status
Closed as program error.
Error description
Environment: - OS (name, language, version or SP): Microsoft Windows XP SP2 - Product name (Build ID or version/patch level): IBM Rational Business Developer v7.1 Reproducible Y/N: Y Description of problem: After migration from 4GL to EGL, RCP application will fail to ru n with the error: com.ibm.javart.FatalException: EGL1227E The OpenUI field argumen ts are not valid. EGL0002I The error occurred in the MyProg program processing the main function. This is caused by an openUI statement of a ConsoleForm containin g a field like myField ConsoleField[1] Steps to reproduce: 1) create a form like package test; record MyDialog type ConsoleForm{formSize =[24, 80]} * ConsoleField{position =[2, 5], value = 'Title: '}; myField ConsoleField{ name = 'myFieldName', position =[2, 20], fieldLen = 20}; xfirm ConsoleField[1] { position = [3,49], fieldLen = 4, dataType = 'decimal(3,0)', highlight=[REVERSE], name='xfirm ' }; theFields Dictionary {field1=myField,field2=xfirm}; end 2) create a program like program MyProg type BasicProgram{} function main() frm MyDialog {name='mydialog'}; displayFormByName('mydialog'); value decimal(3,0); openUI activeForm.theFields.field2 bind value end; SysLib.writeStdout(value); end end 3) Run it as RCP: the error is raised 4) Modify the consoleForm from xfirm ConsoleField[1] ... to xfirm ConsoleField ... 5) Run it as RCP: it works
Local fix
Problem summary
I4GL can not handle record array whose size is 1 properly.
Problem conclusion
Install fix or upgrade to next RBD version.
Temporary fix
Comments
APAR Information
APAR number
PK77784
Reported component name
RATL BUS DEV
Reported component ID
5724S5000
Reported release
710
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2008-12-19
Closed date
2009-03-20
Last modified date
2009-03-20
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
R710 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.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
20 March 2009