Are you using the INFDS position 378 to 379 to find out what line the user was 
on when they pressed enter?

D DsplyCustDDs    DS
D  curRrn               378    379I 0


C                   Eval      CsrRrn = curRrn



HTH,

Charles Wilt
--
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Marvin Radding
> Sent: Tuesday, August 09, 2005 1:21 PM
> To: RPG programming on the AS400 / iSeries
> Subject: RE: Subfile Record positioning
> 
> 
> 1. Yes, CSRRRN is the field that is declared in the display file with
> the SFLCSRRN keyword.
> 
> 2. Yes, I have the SFLRCDNBR keyword on another field.
> 
> 3. I have to be able to position both the folded and the unfolded
> subfiles to the subfile record after any action.  The PO's 
> have hundreds
> of lines and the user's are beginning to arm themselves with 
> pitchforks
> and the torches in preparation to storm the castle.
> 
> Right now no positioning takes place in either mode.  The 
> cursor always
> returns to the first subfile record regardless of where the 
> last record
> processed was.
> 
> Marvin
> 
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Scott Klement
> Sent: Tuesday, August 09, 2005 9:40 AM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Subfile Record positioning
> 
> 
> > The problem is this, when I position the unfolded screen on the 4th
> > record and press enter, the redisplay is back at the 1st 
> record.  The
> > CSRRRN shows 4 just after I press enter but even though I 
> set the RRN
> to
> > 4 before the redisplay, it still shows the first record.  I need to
> > redisplay the 4th record.  This will also happen when a Fkey is
> pressed.
> 
> I assume that when you say "CSRRRN" you're referring to a 
> field that you
> 
> have declared in the display file with the SFLCSRRRN keyword?
> 
> Are you sending a field with the SFLRCDNBR(CURSOR) keyword to set the
> new 
> value where the subfile starts displaying?
> 
> You wrote a whole bunch of stuff about subfile folding. Does it work
> when 
> you disable folding?  If not, I don't understand what that has to do
> with 
> the question?
> -- 
> This is the RPG programming on the AS400 / 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 AS400 / 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.
> 
> 


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.