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

I realize that 0B39 represents the decimal value that I want, but how
do I get the line # using a RPG II program?  (Remember, the value
returned from the INFDS is NOT 0B39 but rather 0B390000.)

Help....



On Fri, 24 Sep 2004 13:58:39 -0500, Lim Hock-Chai
<lim.hock-chai@xxxxxxxx> wrote:
> Two bytes binary of OB39 = decimal value of 2873.
> 
> If you divide 2873 by 256, you should get 11.22265625, which is the correct 
> line # (11).
> 
> I'm not sure why your DIV result in a value of 3.
> 
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of David Prowak
> 
> 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.
> 
>