CREATE OR REPLACE FUNCTION IS_NUMBER(STR IN VARCHAR2) RETURN VARCHAR2 IS
DUMMY NUMBER;
BEGIN
DUMMY := TO_NUMBER(STR);
RETURN ('TRUE');
Exception WHEN OTHERS THEN
RETURN ('FALSE');
END;
/