RE: Subfile Cursor Position

[Zylka Marc <Zylka.Marc@xxxxxxxxx>]

Reddy,

  You need to save the current cursor position before the window is
displayed.
This would be your field in keyword SFLCSRRRN.

  If they use F12, restore the cursor position by setting the field defined
in SFLRCDNBR to the number you saved above.  

  This is how the screen specification may look:

A                                      SFLCSRRRN(&CURPOS) <-current position
< snip >
A            CURSPOS        4S 0H      SFLRCDNBR(CURSOR)  <- position to
field
A            CURPOS         5S 0H                         

  In RPG/IV:

- save after subfile control EXFMT:
C       eval    #SaveCursorP = CurPos

- restore after F12, before EXFMT:
C       eval      CursPos = #SaveCursorP        

Marc Zylka 


> RReddy@medicalartspress.com 01/15/01 01:27PM >>>
>
> Got a simple question....
>
> How would i control the cursor position in a subfile???.
>
> For example...
>
>Lets say i am at third page of the subfile & i have selected 5th record in
>that page by entering "1" at the option field. I display a window subfile
>on the same screen. If i cancel the window subfile.. i want my cursor to be
>at the fifth record only. Right now the cursor is moving to first record of
>the third page.
>
>Please note i have tried to use SFLCSRRRN, CSRLOC... they don't seem to
>work. Appreciate if you guys can give me an example that works.
>
>Any Ideas.
>
>Thanks.
>Reddy
>

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---