CREATE OR REPLACE FUNCTION Is_Number (
str_ VARCHAR2 ) RETURN VARCHAR2
IS
num_ NUMBER;
BEGIN
num_ := to_number(str_);
RETURN 'Y';
EXCEPTION
WHEN OTHERS THEN
RETURN 'N';
END Is_Number;
CREATE OR REPLACE FUNCTION SAFE_TO_NUMBER(
P IN VARCHAR2 )
RETURN NUMBER
is v number;
BEGIN
v := to_number(p);
RETURN v;
EXCEPTION
WHEN OTHERS THEN
RETURN 0;
END SAFE_TO_NUMBER;
