RE: quick question on string-appreciate ur help,Thanks in adv..

["Bob Cozzi" <cozzi@xxxxxxxxx>]

Do something like this:

C            '0'  CHECK   CEXPR       nPOS
C                 if      nPOS > 1
C                 eval    %subst(CEXPR:1:nPos-1) = *BLANKS
C                 ENDIF


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of murali dhar
Sent: Thursday, February 12, 2004 12:38 AM
To: RPG programming on the AS400 / iSeries
Subject: quick question on string-appreciate ur help,Thanks in adv..

Hi, 
I want to suppress the leading zero in CEXPR field of
my PF. It is the printable strike price(7 char) field
and my application  stores this field with leading
zeros. This is causing problems for client web when
they upload the data. So they want us to suppress the
leading zeros in the 7 char field. 
which string fucntion in RPG i can use ? 
if anyone know ,please share the knowledge, as I dont
ve much time to refer notes,however i will do it,your
help is more appreciated
--- 
Murali.

__________________________________
Do you Yahoo!?
Yahoo! Finance: Get your refund fast by filing online.
http://taxes.yahoo.com/filing.html
_______________________________________________
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.