|
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 mailing list archive is Copyright 1997-2025 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.