RE: Using %dec to validate a field contains only numeric characters

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