AW: Rounding Question

Hi Mike,

try the following:
OutPut = %Trim(Output) + ', ' + %Char(%DecH(NIBT.Balance: 7: 0));

Mit freundlichen Gru?en / Best regards

Birgitta

"Shoot for the moon, even if you miss, you'll land among the stars."
(Les Brown)

-----Ursprungliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]Im Auftrag von Mike Wills
Gesendet: Mittwoch, 18. Januar 2006 20:07
An: RPG programming on the AS400 / iSeries
Betreff: Rounding Question


Hey, I want to round to the whole dollar. But I am not doing any calculation
on the field, so the EVAL(H) won't work for me. Or will it?
This is the line I need to modify: "output = %trim(output) + ',' + %char(
NIBT.balance)". Any good ideas short of writing a subprocedure? The
NIBT.balance is the dollar amount. This dumps to a CSV file.

--
Mike Wills
koldark@xxxxxxxxx
http://mikewills.name
Want Gmail? Email koldark+gmail@xxxxxxxxx to get on my waiting list.

"There are 10 types of people in the world: those who understand binary, and
those who don't." -Unknown
--
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.