Someone

CREATE OR REPLACE FUNCTION f1(v1 IN varchar2) 
   RETURN number
IS
  N1  number;
BEGIN
  N1:= to_number(v1);

  RETURN 1;

EXCEPTION
  when others then
     RETURN 0;
END