create or replace function check_data_ys(tname varchar2,wherestr varchar2) return number is
--检查表中是否有条件指定的数据
--tname是表名,wherestr是条件不包括where
--数据存在则返回值为1,否则为0
Result number;
sqlstr varchar2(500);
ren number;
begin
sqlstr:='select count(*) from '||tname||' where '||wherestr||' and rownum<2';
execute immediate sqlstr into ren;
if ren=0 then
Result:=0;
else
Result:=1;
end if;
return(Result);
end check_data_ys;
相关文章: