Thanks Duane
that was it
Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill
"Christen, Duane"
<Duane.Christen@P
AETEC.com> To
Sent by: RPG programming on the IBM i /
rpg400-l-bounces@ System i <rpg400-l@xxxxxxxxxxxx>
midrange.com cc
Subject
02/10/2011 10:06 RE: Using %dec to validate a field
AM contains only numeric characters
Please respond to
RPG programming
on the IBM i /
System i
<rpg400-l@midrang
e.com>
Alan;
Monitor;
X = %Dec(%Trim(charField) : 13 : 0);
On-Error;
// Non decimal data in charField
EndMon;
You may or may not need/want the %Trim.
Duane Christen
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Alan Shore
Sent: Thursday, February 10, 2011 8:34 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Using %dec to validate a field contains only numeric characters
Morning all
my brain is still stuck in neutral even though I've had a large number of
cups of coffee
I am sure that I have done this before, but I cannot locate it
I have a 13 character field that can contain a number of any length with
leading and/or trailing blanks
I am pretty sure that I have used %dec to validate that the field contains
numeric data and will give an error if a blank is somewhere other than
trailing or leading
Does any one know what I am talking about?
Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill
--
This is the RPG programming on the IBM i / System i (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 IBM i / System i (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
