一次like多个的函数实现
create or replace function func_multi_like(p_src varchar2, p_str varchar2)
return number
is
v_result number default 0;
v_str varchar2(200);
v_posistion number;
v_sub_str varchar2(200); --截取的STR
v_tmp_str varchar2(200); --截取后剩下的str
begin
--全角半角转换
v_str := REPLACE(p_str,',',',');
v_str := trim(v_str);
v_posistion:= instr(v_str,',');
--判断有没有逗号?
if v_posistion > 0 then
--有逗号 截取str
v_sub_str := trim(substr(v_str,0,v_posistion));
--截取后剩下的str
v_tmp_str := trim(substr(v_str,v_posistion+1 ,LENGTH(v_str)-v_posistion));
--找不到逗号时,退出
while v_posistion <> 0 loop
--重置
v_posistion := 0;
--如果截取下来的不仅仅是逗号,则进截取数据判断。
--如果有一个匹配成功,则result>0
if LENGTH(v_sub_str)>1 and instr(p_src,trim(substr(v_sub_str,0,LENGTH(v_sub_str)-1)))> 0
then
v_result:= instr(p_src,trim(substr(v_sub_str,0,LENGTH(v_sub_str)-1)));
exit;
end if;
v_posistion:= instr(v_tmp_str,',');
v_sub_str := trim(substr(v_tmp_str,0,v_posistion));
v_tmp_str := trim(substr(v_tmp_str,v_posistion+1,LENGTH(v_tmp_str)-v_posistion));
end loop;
if instr(p_src,trim(v_tmp_str))> 0
then v_result:= instr(p_src,trim(v_tmp_str));
end if;
else
--没有逗号,直接匹配
v_result:= instr(p_src,v_str) ;
end if;
return v_result; --返回0,则匹配失败,返回大于0则匹配成功。
end;
这里需要注意的是此函数替代的是like关键字,如果是等于的话直接用in就好了.