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