Page 1 of 1

Key Pad Data Entry

Posted: Sun Mar 22, 2009 3:20 pm
by Ralph Forehand
I have two simple fields, FieldA and FielldB using only 12 lines each.

I want to enter data line by line in FieldA with each data entry using the Keypad "Enter" Key to advance the cursor to the next line.

When I've made 12 entries into FieldA, I want the cursor to advance to line one FieldB.

Any help appreciated.

Posted: Sun Mar 22, 2009 5:33 pm
by Mark Smith
in the script of fld A

Code: Select all

on enterInField
   if the number of lines in me >= 12 then
      select before fld "B"
   else
      pass enterInField
   end if
end enterInfield
Though you might want to trap returnInField, as well, so something like

Code: Select all

on enterInField
  checkReturns
end enterInField

on returnInField
  checkReturns
end returnInField

on checkReturns
   if the number of lines in me >= 12 then
      select before fld "B"
   else
     put cr after me   
   end if
end checkReturns
Best,

Mark

Posted: Sun Mar 22, 2009 6:32 pm
by Ralph Forehand
Mark,

GAWD :!: :!: That was neat.

Another YEA for Revolution's simplicity.

Actually I don't need to trap the returns but thanks for your thoughtfulness.:D

THANK YOU Very Much and TAKE CARE,
Ralph

RE

Posted: Tue Mar 31, 2009 12:53 pm
by sashu100
on enterInField
if the number of lines in me >= 12 then
select before fld "B"
else
pass enterInField
end if
end enterInfield

use this code to advance keyword to next line