×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
If myString1 <> *all'0';
myString2 = %subst(myString1 :%check('0' :myString1));
Else;
myString2 = *blanks;
Endif;
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of KOskooie@xxxxxxxxxxx
Sent: Thursday, June 12, 2008 12:11 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Help to extract a numeric value from string
Hello list,
I have a field that is string of 22 positions with a value of
0000317982.
I need to trim the zeros on the left to have only the value of 317982
and move it to another string field.
I have tried to convert it to numeric but it gives me leading blanks "
317982000000000000".
Any help would be appreciated.
Regards,
Kamelia Oskooie
Semtech Corporation
--
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.
midrange.com
