Re: Fwd: Identifying numeric string in a 4gl program

DEFINE numer CHAR(1), position SMALLINT, ..... MAIN .... .... LET numer="Y" FOR position=1 TO LENGTH(string) IF string[position,position] NOT MATCHES "[0123456789]" THEN LET numer="N" EXIT FOR END IF END FOR IF numer="N" THEN PROMPT "The string you gave is not numeric" FOR CHAR numer END IF Would be ... --- Hortencia Ake <hake@btl.net> escribi': > >Date: Wed, 20 Dec 2000 17:59:53 -0600 > >To: informix@iiug.org > >From: Hortencia Ake <hake@btl.net> > >Subject: Identifying numeric string in a 4gl > program > > > >hi everyone, > > > >can anyone assist on how to know when a string is a > pure numeric string in > a 4gl program. > >this is necessary so as to tell the user when > running the program that the > string entered is only numeric. > > > >thanks for your assistance > > > ----------------------------------------------------- > Click here for Free Video!! > http://www.gohip.com/free_video/ > ===== ______________________________________ Luis Carlos D'az Otero ALCANOS DE COLOMBIA S.A. E.S.P Carrera 9 # 7-25 Neiva (Huila (Colombia)) _________________________________________________________ Do You Yahoo!? Obtenga su direcci'n de correo-e gratis @yahoo.com en http://correo.espanol.yahoo.com