Re: Positioning cursor to specific field...

[Robert Rogerson <rogersonra@xxxxxxxxx>]

Thanks everyone.  I actually used Craig's example and it worked great for
me.

Thanks for advise.

Rob

On Fri, Mar 26, 2010 at 10:51 AM, hotmail <craigjacobsen@xxxxxxxxxxx> wrote:

> Rob,
>
> Actually, if you use the same field names for RTNCSRLOC(&ROW &COL) and
> CSRLOC(ROW COL) You won't even have to move anything into ROW and COL.
> It will return and put out the same row and col.
> (I use this for all of my F4=Prompt fields, cursor always goes back to
> where
> it was last) If you have edit checks, you may want to z-add0 to both row
> and
> col for DSPATR(PC)
>
> Here is a sample:
> RTNCSRLOC(&RCD &FLD)
> RTNCSRLOC(*MOUSE &ROW &COL)
> CSRLOC(ROW        COL)
>  ROW            3S 0H
>  COL            3S 0H
>
> Hth,
>
> Craig
>
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Robert Rogerson
> Sent: Friday, March 26, 2010 10:12 AM
> To: RPG programming on the IBM i / System i
> Subject: Positioning cursor to specific field...
>
> I have checked the archives but I was unable to find the exact answer to my
> question.
>
> Simply, is there an alternative way to position the cursor to a specific
> field without using DSPATR(PC)?
>
> I have a display with multiple prompt fields.  In my prompt routine I get
> the field prompted on using RTNCSRLOC(&CURREC &CURFLD).  After the prompt
> routine completes I wish to position the cursor to the field that the user
> prompted on.  I'm trying to do this avoiding the use of another indicator.
>
> Is this possible?
>
> Thanks,
>
> Rob
> --
> This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe,
> or
> change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives at
> http://archive.midrange.com/rpg400-l.
>
>
> --
> This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.