Input array and required fields in text forms

Still two more bugs discovered while recompiling Informix 4gl and forms:

When using input array, and filling one line, so the cursor is 
positioned in the first field on the next line, and press Esc, if there 
are required fields, we get an error message in aubit, saying "This 
field required an entered value".  While in Informix 4gl an empty row is 
accepted. This could also be classified as a bug with Informix 4gl, 
because the "required" clause seems to make no difference there. If I 
presss F2 to delete the current line with aubit it works ok. This is an 
acceptable workaround, I think.

However, if I enter 4 lines or more (!) in the input array, and hit ESC, 
the cursor is positioned at the first row, and erases whatever value was 
at the same column there before it displays the same message "This field 
requires an entered value". Pressing F2 now seems to delete the first 
line, but actually, the last (empty) line is still deleted. This makes 
the users a bit confused. Maybe this error is related to my previous 
error with back tab? I haven't been able to test the fix there yet.

I have attached a test program and a form which can be used to 
demonstrate this.
-- 

*Øyvind Gjerstad *
Systemkonsulent

M +47 909 41 485
[email protected] <mailto:[email protected]>

*____________________ _*


*PostNord AS *
T +47 09300
IT og Forretningsutvikling
Øran Vest
Postboks 100
6301 Åndalsnes
www.postnord.no <http://www.postnord.no>

------------------------------------------------------------------------------
Site24x7 APM Insight: Get Deep Visibility into Application Performance
APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month
Monitor end-to-end web transactions and take corrective actions now
Troubleshoot faster and improve end-user experience. Signup Now!
http://pubads.g.doubleclick.net/gampad/clk?id=267308311&iu=/4140

_______________________________________________
Aubit4gl-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss

main
  define i integer,
         la_foo array [5] of record
           fld1 char(2),
           fld2 char(10)
         end record

  for i = 1 to 5
    let la_foo[i].fld1 = null
  end for

  open form f_test from "foo"
  display form f_test

  input array la_foo from sa_dummy.*

  display array la_foo to sa_dummy.*

end main

database formonly
screen
{



       [f0] [f001          ]
       [f0] [f001          ]
       [f0] [f001          ]
       [f0] [f001          ]
       [f0] [f001          ]



}
END


ATTRIBUTES
  f0=FORMONLY.fld1 TYPE char, required;
  f001=FORMONLY.fld2 TYPE char;

INSTRUCTIONS
  DELIMITERS "[]"

  screen record sa_dummy[5]
    (formonly.fld1, formonly.fld2) 
END