|
midrange.com
That's because *In40 was turned on for record one somehow. When you load
the initial subfile, make sure that *In40 is off whenever a write is done.
Then whenever, you turn *IN40 on, you've got to turn it back off by
chaining to the record.
Michael Schutte
Work 614-492-7419
email michael_schutte@xxxxxxxxxxxx
"Luqman"
<luqman@pearlsoft
.com.pk> To
Sent by: rpg400-l@xxxxxxxxxxxx
rpg400-l-bounces@ cc
midrange.com
Subject
Re: How to Position Cursor to
04/13/2006 04:54 particular Field of
AM ParticularRowinSubfile ?
Please respond to
RPG programming
on the AS400 /
iSeries
<rpg400-l@midrang
e.com>
Hi,
Whenver Field Position Cursor Indicator is ON, the cursor moves to 1st Row
of that Column, even I set the SFLRCDNBR=5.
My code is as under:-
> A R SUBFILE1 SFL
> A S1SEL 1A B 10 1
> A 40 DSPATR(PC)
Dow (Not exitkey)
exfmt ctl
5 chain SUBFILE1
eval in40 = *on
update SUBFILE1
eval SFLRCDNBR = 5
iter
enddo
Any idea please ?
Best Regards,
Luqman
"Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxxxxxxxxx>
wrote in message
news:ADDB0108F0E23646BCE2C8F029B406E10B9FC0E0@xxxxxxxxxxxxxxxxxxxxxxx
> Make sure program is doing the following:
> 1) DSPATR(PC) keyword is on the sub-file record with indicator.
> 2) Turn on the indicator and update the subfile record that you want the
> cursor to move to.
> Example:
> DDS:
> A R SUBFILE1 SFL
> A S1SEL 1A B 10 1
> A 40 DSPATR(PC)
>
> RPG should do the following to position the cursor:
> eval in40 = *on
> 5 chain SUBFILE1
> update SUBFILE1
> eval SFLRCDNBR = 5
>
>
> -- Note: If you DDS has CSRLOC keyword, the row and col must set to
> zeros for DSPATR(PC) to take effect. This is because CSRLOC override
> DSPATR(PC).
>
>
>
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On
Behalf Of Luqman
> Sent: Monday, April 10, 2006 6:52 AM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: How to Position Cursor to particular Field of Particular Row
> inSubfile ?
>
> How do I set my cursor to Column No. 3 of Row No. 5 ?
>
> I can set the Row No. 5 with SFLRCDNBR=5 but it goes to Column No. 1 of
> that row, how can I set the Column No. 3 ?
>
> I tried using Position Cursor of Column No. 3 and set the Indicator but
> after putting the Indicator *On, it goes to Row No. 1, Column No. 3.
>
> Any idea please ?
>
> Best Regards,
>
> Luqman
>
>
>
> --
> 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.
>
>
--
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 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.
