show only browse

[Richard Kreiss]

With help for John and Ken, finally came up with the answer.

1. Capturing the auto processing table cycles.
2. Set global dummy field sn at @key9 to sn=@sn prior to the switchto "9"
3. When the 4th cycle is hit, issue a switchto [sn]
4. At end of auto processing table, issue a pushkey "[CRUP]" to move back
one record.

I found that the pushkey had to be at the end of the auto table to execute
properly.

Thanks to all who responded.

Richard


 
> > The intercept is
> > really
> > > down to only two "if" lines I think and they are fairly
> > simple once you
> > see the
> > > idea. You will basically be catching all regular keys, and
> > all SPECIAL
> > keys
> > > ([ENTER], {CRUP], [CDWN], etc.) Then, you can deal with
> > anything the user
> > > presses, and even press a few things *for* them.
> >
> > Already use @entsel to display the bottom prompts.
> 
> That is the start.  The crucial thing is *intercepting" all the key
strokes
> @entsel and passing them through to INPUT as you want them passsed... Or
> not.  Showing the prompts is nice, but it doesn't gain you any control.
> 
> It's this kind of thing I'm talking about. You'd have to find the whole
article...
> Here is a main part of the idea though...
> 
> 
> 199  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
-
>        . If:
> .
>        Then: gosub legend 'put up the standard filePro prompts .
> 200  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
-
>        . If:
> .
>        Then: KeyPressed=waitkey
> .
> 201  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
-
>        . If: @sk eq "SAVE"
> .
>        Then: goto wait
> .
> 202  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
-
>        . If: @sk eq "CRUP" or @sk eq "CDWN" or @sk eq "UTAB" or @sk eq
> "DTAB"  .
>        Then: pushkey ""{"["{@sk{"]"{"[ENTR]"{"";  goto brw .
> 203  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
-
>        . If:
> .
>        Then: '
> .
> 204  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
-
> grp_1  . If: KeyPressed eq "A" or KeyPressed eq "M" or KeyPressed eq "D"
> .
>        Then:
> .
> 
> 
> 
> You can deal with the main filePro prompts/@keys and others of your own
> 
> 
> John
> 
> 
> _______________________________________________
> Filepro-list mailing list
> Filepro-list at lists.celestial.com
> http://mailman.celestial.com/mailman/listinfo/filepro-list