RE: Replace minus sign (FIX)

Ah yes, %abs - good thinking. Much cleaner than using %editc imo.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
Michael_Schutte@xxxxxxxxxxxx
Sent: Friday, October 31, 2008 10:00 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: Replace minus sign (FIX)

Forget that you need to wrap %Abs around the amount so that the negative
isn't outputted.

If Amount < 0;
strAmount = '(' + %Char(%Abs(Amount)) + ')';
Else;
strAmount = %Char(Amount);
EndIf;


Michael Schutte


rpg400-l-bounces@xxxxxxxxxxxx wrote on 10/31/2008 10:54:37 AM:

If Amount < 0;
strAmount = '(' + %Char(Amount) + ')';
Else;
strAmount = %Char(Amount);
EndIf;



Michael Schutte

rpg400-l-bounces@xxxxxxxxxxxx wrote on 10/31/2008 07:23:48 AM:

Hi all,,

Can i replace minus sign so i can display it inside bracket like in

MS

Excel.
Example -100 display as (100)

--
Salam,

ab.annas
--
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 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.