create or replace function isnumber(myno varchar2)
return integer
is
v_string varchar2(20);
begin
     v_string := to_number(myno);
     return 1;
exception     
     when others then
     return 0;
end;SQL> select isnumber('2436246264')
  2  from dual;ISNUMBER('2436246264')
----------------------
                     1SQL> select isnumber('adf246246')
  2  from dual;ISNUMBER('ADF246246')
---------------------
                    0