RE: %Int

["Dave Boettcher" <DBoettch@xxxxxxxxxxxxxxxx>]

How about   
 %replace('0' : stringnumber : ' ')

just another idea.

Dave B

>>> cozzi@xxxxxxxxx 08/10/2004 9:00:52 AM >>>
That may fail too, you might try this:

PackedX = %int('0' + %TrimL(StringA))

Because, I believe '   0123' is value, but '0   123' is not.
Can't check it however at the moment.


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] 
On Behalf Of CarollaT@xxxxxxxxxxxxxx 
Sent: Monday, August 09, 2004 5:15 PM
To: rpg400-l@xxxxxxxxxxxx 
Subject: RE: %Int

I, too believe that, in principle, if blanks are considered zero, then
all
blanks should equal all zeroes... Okay, I'm off the soap box.  Here's
an
idea.  Why not just pre-pend a zero at the beginning of the field
being
converted?  For example, 

 

PackedX = %Int( '0' + StringA )

 

A leading zero will never change the value of a number, and if StringA
is
all blanks, then zero you shall receive.  

 

Will this work?

 

Tony Carolla

MedAmerica Billing Services, Inc.

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