oracle存储过程 遍历字符串

不用循环不行么，一个sql就搞定啦

 select  c from
　　(with test as (select '21,32,43' c from dual)
　　select substr(t.ca,instr(t.ca, ',', 1, c.lv) + 1,instr(t.ca, ',', 1, c.lv + 1) - (instr(t.ca, ',', 1, c.lv) + 1)) AS c
　　from (select ',' || c || ',' AS ca,length(c || ',') - nvl(length(REPLACE(c, ',')),0) AS cnt FROM test) t,
　　(select LEVEL lv from dual CONNECT BY LEVEL <= 100) c where c.lv <= t.cnt )

'21,32,43'  --这个你换成你要查的字符串，数字字母什么都可以，只要逗号分隔就好

CREATE OR REPLACE
PROCEDURE pro_getnumber(
    p_str IN VARCHAR2)
AS
  v_str VARCHAR2(4000);
BEGIN
  v_str:=','||p_str||',';
  FOR i IN 1..length(v_str)
  LOOP
    IF(instr(v_str,',',1,i)!=0) THEN
      dbms_output.put_line( SUBSTR( v_str, instr(v_str,',',1,i)+1, 
      instr(v_str,',',1,i+1)-instr(v_str,',',1,i)-1 ) );
    END IF;
  END LOOP;
END;
/

declare
   L_str varchar2(4000) := '1,2,3,4,5,6,7,8';
begin
   for rec_num in
      (
      select regexp_substr(COLUMN1,'[^,]+',1,rownum) COLUMN1
         from
            (
            select L_str COLUMN1
               from dual
            )
         connect by rownum<=length(COLUMN1)-length(replace(COLUMN1,','))+1
      )
   loop
      DBMS_OUTPUT.put_line(rec_num.COLUMN1);
   end loop;
end;

substr(string,i,j),这个是截取字符串的函数，作用为截取字符串的第i个位置开始的长度为j的字符串，估计你会用到这个，判断如果是逗号则i自增1，不是逗号就转换成数字存储到数组。至于转换成数字，‘1’和1对应的ASCII码应该不一样吧，做一个增量使一一对应应该可以。

create or replace type type_split as table of varchar2(50); --创建一个　　type　　，如果为了使split函数具有通用性，请将其size 设大些。

--创建function
create or replace function split
(
p_list varchar2,
p_sep varchar2 := ','
) return type_split pipelined
is
l_idx pls_integer;
v_list varchar2(50) := p_list;
begin
loop
l_idx := instr(v_list,p_sep);
if l_idx > 0 then
pipe row(substr(v_list,1,l_idx-1));
v_list := substr(v_list,l_idx+length(p_sep));
else
pipe row(v_list);
exit;
end if;
end loop;
return;
end split;

使用：
select * from table(split('1,2,3,4,5,6,7,8'
,','));
然后就可以通过“，”来分割数字了