RE: Compiler debug or undocumented limitation?

A division is not an integer value (might end up as 1,5). The FOR loop
only works with integer values as starting and ending values. %DIV
returns an integer value.

But, then again, I might be wrong.

Cor 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx 
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of M. Lazarus
Sent: woensdag 20 december 2006 3:49
To: RPG400-L@xxxxxxxxxxxx
Subject: Compiler debug or undocumented limitation?

  This code will not compile, despite the manual saying that 
an expression is valid:

D A         S        1a     Dim( 100 )
D B         S        1a     Dim( 25 )
D Idx       S        5u0

  /Free
    FOR Idx = 1 TO %Elem( A ) / %Elem( B ) ;
    ENDFOR ;
    *INLR = *On ;
  /End-Free

  Changing this line from:

    FOR Idx = 1 TO %Elem( A ) / %Elem( B ) ;

  to:

    FOR Idx = 1 TO %Div( %Elem( A ): %Elem( B )) ;

  satisfies the compiler.  Adding parentheses to the first 
example doesn't help.  Can someone explain why the first one 
is invalid?


  -mark

-- 
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 e-mail and any attachment is for authorised use by the intended 
recipient(s) only. It may contain proprietary material, confidential 
information and/or be subject to legal privilege. It should not be copied, 
disclosed to, retained or used by, any other party. If you are not an intended 
recipient then please promptly delete this e-mail and any attachment and all 
copies and inform the sender. Thank you.