Moving Cursor Automatically to Next Field

[Care-Bear!]

All,

I have tried multiple ideas on having the cursor jump to the next field without needing to push the TAB key. Here is the original DDS for the program:

A                                      CF03(03 'Exit')     
A                                      BLINK               
A                                  7  3'Lease . . .'                       
A            SLEASE1        3Y 0B  7 16EDTWRD('0   ')                                        
A                                      CHECK(RZ)                           
A                                  7 20'-'                                 
A            SLEASE2        3Y 0B  7 22EDTWRD('0   ')                      
A                                      CHECK(RZ)                           
A                                 26  2'F3=Exit'                           
A                                      COLOR(BLU)

Here is the screen:

                                      
Lease . . .  999 - 999

I have tried the FLDCSRPRG(SLEASE2) and changing BLINK to PUTOVR and OVRDTA but am still unable to get the cursor to move automatically after entering 3 numbers. Any help would be greatly appreciated.

Thanks,
Kari

[Brian Rusch]

Re: Moving Cursor Automatically to Next Field

When CHECK(RZ) or CHECK(RB) is specified, only the field exit or tab key can be used to exit the field. If you take off the CHECK keyword, then when the field is filled, the cursor will move to the next field. If the field is not filled, it will not be right adjusted when the user moves the cursor to the next field, but it will be right adjusted when the screen is redisplayed after the user presses a function key or the enter key.

[Care-Bear!]

Re: Moving Cursor Automatically to Next Field

Thank you! It works perfectly now, thank you for helping my blonde self out!