Dave -

Try:

 POS       DIV  256       ROW     30 
           MVR            COL     30            




Terry Richardson
Vermont Information Processing, Inc.
terry@xxxxxxxxxx



David Prowak <Prowak@xxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
09/24/2004 02:37 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
rpg400-l@xxxxxxxxxxxx
cc

Subject
still can't get INFDS working.. ##@%%#%@% Suspected SPAM:






Hi,

I'm working on a RPG II program and trying to use the INFDS to
determine the line & col #s.  In my INFDS I have:
I        B      370  3710 POS

When I check the value of POS when the cursor was on line #11 and col
#57, I see:
0B390000

I understand that 0B39 represents the line # and then the col #
consecutively, but
how do I determine the line # in my program?  I tried:
C       POS     DIV  256   LINE# 40

but LINE# then is = '   3'.

What am I doing wrong?

TIA,
Dave
--
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-Ups:
Replies:

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.