RE: %Sqrt

I was leaning towards #2 as well.  I signed off & back on & still got the 
error, thinking I was somehow running an old version. 

What I was doing is compiling this using RSE, received the message that it 
compiled w/no errors.  I decided to compile it using PDM, it is now 
working.  WTF????  I compared the compile options on RSE vs. PDM and the 
only difference I see is *Eventf, Optimization *Full and replace program 
*yes in the RSE.



Steve Jones



"Bob Cozzi" <cozzi@xxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
02/16/2006 01:25 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
RE: %Sqrt






One of two problems:
1) A compiler problem.
2) Your source does not match the compiled version of the program and thus
you're looking in the wrong place.

-Bob Cozzi
www.RPGxTools.com
RPG xTools - Enjoy programming again.


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] 
On
Behalf Of sjones@xxxxxxxxxxxxxx
Sent: Thursday, February 16, 2006 12:13 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: %Sqrt

I am having a problem using the %Sqrt bif.   When I run the program I get 
"attempt made to divide by zero" 

     D  Lfp            S              7  2 Inz(0)
     D  Lfps           S              9P 2 Inz(0)

     C                   Eval(h)   Lfps = %Sqrt(Lfp)

Lfp = 1.42 so I would expect Lfps = 1.19

I have tried replacing the %Sqrt(Lfp) with %Sqrt(1.42) & I still get the 
divide by zero.  This has to be something really obvious, but I cant find 
it.

Thanks in advance....

Steve Jones