--判断一个字符是否为数字 --是返回1 --否返回0 create or replace function isnumeric (param in varchar2) return number as result number; begin result:=to_number(param); return(1); exception when others then return(0); end; /
create function get_number(p_char in varchar2) return number as num number:=1; begin for i in 1..length(p_char) loop num:=num-substr(p_char,i,1); end loop; return 1;--is ok exception when others then return 0;--is not ok end; /
--是返回1
--否返回0
create or replace function isnumeric
(param in varchar2)
return number
as
result number;
begin
result:=to_number(param);
return(1);
exception
when others then
return(0);
end;
/
return number
as
num number:=1;
begin
for i in 1..length(p_char) loop
num:=num-substr(p_char,i,1);
end loop;
return 1;--is ok
exception
when others then
return 0;--is not ok
end;
/