ORACLE 存储过程IN关键字使用问题

今天做了一个业务存储过程，发现 存储过程中in的使用出现一个问题，先创建一个存储过程demo

---- 创建存储过程（对产品进行操作）----
create or replace procedure PROC_PROD_OPERATE
(
   searchIds in varchar2,
   execCount out integer
)
as
  strSql varchar2(1000);
begin
     for odr in(select * from DXC_GOODS where MID in(searchIds) )loop
       
         if odr.MID=10 or odr.MID=15 then
             dbms_output.put_line('跳过操作，产品ID：'|| odr.MID || ',Name:'|| odr.NAME);
             continue;
         elsif odr.MID=12 then
             dbms_output.put_line('插入操作，产品ID：'|| odr.MID || ',Name:'|| odr.NAME);
             --insetSql
         else
             dbms_output.put_line('修改操作，产品ID：'|| odr.MID || ',Name:'|| odr.NAME);
             --updateSql 
         end if;         
     end loop;
end;

  在调用这个存储过程的时候，如果参数searchIds只有一个数字，例如：1 可以正常执行，但是如果有多个数字的话，例如：1,2 或1,2,3 就会 报 ORA-01722: 无效数字 错误

 通过百度发现，存储过程把这个参数作为了一个整体来处理了，并不象普通的sql一样，把他作为一个数组来对待，是Oracle自动帮我们转行的

解决方法（亲测有效）

1）新建一个oracle变量 strsplit_type（普通的sql查询窗口既可以创建）

CREATE OR REPLACE TYPE strsplit_type IS TABLE OF VARCHAR2 (4000);

2）创建一个处理函数 strsplit

--创建oracle函数
CREATE OR REPLACE 
function strsplit(p_value varchar2,p_split varchar2 := ',')return strsplit_type
pipelined is
  v_idx       integer;
  v_str       varchar2(500);
  v_strs_last varchar2(4000) := p_value;
begin
  loop
    v_idx := instr(v_strs_last, p_split);
    exit when v_idx = 0;
    v_str       := substr(v_strs_last, 1, v_idx - 1);
    v_strs_last := substr(v_strs_last, v_idx + 1);
    pipe row(v_str);
  end loop;
  pipe row(v_strs_last);
  return;
end strsplit;

3）更改存储过程写法（将原先的 in (searchIds) 更改为： in (select * from table (strsplit(searchIds))) ）

---- 创建存储过程（对产品进行操作）----
create or replace procedure PROC_PROD_OPERATE
(
   searchIds in varchar2,
   execCount out integer
)
as
  strSql varchar2(1000);
begin
     for odr in(select * from DXC_GOODS where MID in(select * from table (strsplit(searchIds))) ) )loop
       
         if odr.MID=10 or odr.MID=15 then
             dbms_output.put_line('跳过操作，产品ID：'|| odr.MID || ',Name:'|| odr.NAME);
             continue;
         elsif odr.MID=12 then
             dbms_output.put_line('插入操作，产品ID：'|| odr.MID || ',Name:'|| odr.NAME);
             --insetSql
         else
             dbms_output.put_line('修改操作，产品ID：'|| odr.MID || ',Name:'|| odr.NAME);
             --updateSql 
         end if;         
     end loop;
end;

参考网站：

https://blog.51cto.com/fengcl/2065371