create or replace function isnumeric(p_string in varchar2)
return char
is
n_value number;
e_not_a_number exception;
PRAGMA EXCEPTION_INIT(e_not_a_number, -6502);
begin
n_value := p_string;
return 'Y';
exception
when e_not_a_number then
return 'N';
end;
/
SQL> @isnumeric
Function created.
SQL> select isnumeric('1234'), isnumeric('123D') from dual;
ISNUMERIC('1234')
--------------------------------------------------------------------------------ISNUMERIC('123D')
--------------------------------------------------------------------------------Y
N
SQL>
--
Regards,
Stephane Faroult
Oriole Software
--
Please see the official ORACLE-L FAQ: http://www.orafaq.net
--
Author: Stephane Faroult
INET: [EMAIL PROTECTED]
Fat City Network Services -- 858-538-5051 http://www.fatcity.com
San Diego, California -- Mailing list and web hosting services
---------------------------------------------------------------------
To REMOVE yourself from this mailing list, send an E-Mail message
to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in
the message BODY, include a line containing: UNSUB ORACLE-L
(or the name of mailing list you want to be removed from). You may
also send the HELP command for other information (like subscribing).
