RE: still can't get INFDS working.. ##@%%#%@%

[CWilt@xxxxxxxxxxxx]

I'm curious as to how you are checking POS.

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

But as POS is only defined to be two bytes ( 370 and 371 ) shouldn't you
only see 0B39  ????

Charles


> -----Original Message-----
> From: David Prowak [mailto:Prowak@xxxxxxxxx]
> Sent: Friday, September 24, 2004 2:38 PM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: still can't get INFDS working.. ##@%%#%@%
> 
> 
> 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.
>