Re: Positioning cursor on a subfile record

Bill,
After you retrieve the record, you need to update it with a DSPATR(PC)
enabled for at least one field.


Jeff Young
Sr. Programmer Analyst

On Fri, Mar 13, 2015 at 9:29 AM, Bill Howie <blhowie66@xxxxxxxxx> wrote:

Hello all,

I'm having the darndest time getting this to work. I have a subfile

that

has several fields. The first is an output field. Our program logic
dictates that if the cursor is on a particular line in the subfile (at

this

output field) and F1 is pressed, logic occurs to do things with that
specific record. That all works fine. In some cases the user hitting

F1

on a particular record is an error. I'm generating an error message that
displays at the bottom of the screen and THAT all works fine. I'd like

to

position the cursor on the subfile row that the user hit F1 on in this
situation but no matter what I try it doesn't seem to work. I've got the
subfile set up with the SFLRCDNBR(CURSOR) keyword and also the

SFLCSRRRN()

keyword and I'm moving the field value that goes along with SFLCSRRRN to
the SFLRCDNBR field and updating the subfile. STILL doesn't work.

Does

it have to do with the fact that it's an output field I'm trying to
position it on? Because I've made it an input field and that's not
working either. Any suggestions? Thanks!

Bill
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (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 (AS/400 and iSeries) (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.