Rounding question

[Guy Werry]

Ph 7.33.D3, Ux 10.20

The rounding function is giving me fits.  Specifically, I have a value in a
FLOAT data item and was rounding it like this:
	round(inp_val,3,near)

So I'm trying to round to 3 decimals.  If I enter 0.0015, it rounds DOWN to
0.001!

I have tried various combinations of the "multiply by 1000, round it, divide
by 1000" rigamarole, with no success.

Is there a clean, neat solution to this?  Is there some way of telling the
stupid thing to round UP on that 5?  Note that the "UP" and "DOWN" options
don't give the results that I need.

[The frustration mirrored here is largely due to the fact that COBOL rounds
wonderfully and predictably and I've NEVER found another language that could
round its way out of a wet paper bag!]

Thanks,
Guy L. Werry
Senior Systems Analyst
Hudson Bay Mining & Smelting Co., Limited.