如图有这样一个需求:
需要根据serv_code=111得到对应的cmd_list中的值,并且,要将1000,1001,1002分别分割出来插入到另一个表中。
create table yyb_serv
(
SERV_CODE VARCHAR2(1024),
CMD_LIST VARCHAR2(100)
)
insert into yyb_serv values('111','1000,1001,1002');
create or replace procedure Test
is
--定义游标类型
type serv_cursor is ref cursor;
--定义一个游标变量
serv_cur serv_cursor ;
--定义临时变量
v_cmd_list yyb_serv.cmd_list%type;
temp varchar(2000);
result varchar2(32);
begin
---取出要分割的字段的值
open serv_cur for select cmd_list from yyb_serv where serv_code like '%111%';
--循环取出游标内容
loop
fetch serv_cur into v_cmd_list;
exit when serv_cur %notfound;
-----------------
temp:=v_cmd_list;
dbms_output.put_line('-------start----------');
--开始循环分割字段
while(length(temp)>0)
loop
--如果有逗号,以逗号进行分割
if INSTR(temp,',' ) > 0 then
result:= SUBSTR(temp ,1,INSTR(temp,',') - 1 );
--取到第n个逗号(也就是第n次循环)后面的剩余字符串
temp := SUBSTR(temp,INSTR(temp,',') + 1 , LENGTH(temp) - INSTR(temp,','));
--没有逗号,说明不需要分割
else
result:= temp;
temp:= '';
end if;
--输出当前的已分割出的结果
DBMS_OUTPUT.put_line(result);
end loop;
dbms_output.put_line('-------end----------');
-----------------
dbms_output.put_line('结束');
--结束游标循环
end loop;
close serv_cur;
end test;