input array and back tab (text ui)

Hi! I'm currently in the process of recompiling our Informix 4gl and 
forms with aubit (1.2.36) on Linux.

When testing one of the programs, we discovered a strange bug. If we 
have an input array, and on one of the fields (not the first field on 
the line), and press the "back tab" (Shift-tab) for going to the 
previous field, the line is also changed to the previous line, and the 
value in that field is substituted with the value from the line below.

A small example program is attached (one .4gl and one .per). You may 
want to change the database statement, I get error when compiling a form 
without database.

Are there any known workarounds for 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 decimal(10,2),
           fld2 decimal(10,2)
         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.*

end main

database tgprod
screen
{
----------------------------- test av desimalinput ---------------------------



     Oppgi et desimaltall: 

       [f000          ] [f001          ]
       [f000          ] [f001          ]
       [f000          ] [f001          ]
       [f000          ] [f001          ]
       [f000          ] [f001          ]



}
END


ATTRIBUTES
  f000=FORMONLY.fld1 TYPE DECIMAL(10,2);
  f001=FORMONLY.fld2 TYPE DECIMAL(10,2);

INSTRUCTIONS
  DELIMITERS "[]"

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