Declare
tmp_char Varchar2(500) := 'aaa|bbb|ccc|ddd|';
tmp_sql Varchar(500);
tmp_str Varchar(50);
len_end Number(10);
len_begin Number(10) := 0;
Begin
dbms_output.put_line('tmp_char:' || tmp_char);
While instr(tmp_char,'|')>0
Loop
len_end := instr(tmp_char,'|') ;
tmp_str := substr(tmp_char,0,len_end-1);
tmp_sql := 'update xxx set aa=bb where cc like ('''||tmp_str||''')';
--Execute IMMEDIATE tmp_sql;
--Commit;
len_begin := len_end+1;
tmp_char := substr(tmp_char,len_begin);
dbms_output.put_line('tmp_str:' || tmp_str);
dbms_output.put_line('tmp_sql:' || tmp_sql);
dbms_output.put_line('tmp_char:' || tmp_char);
dbms_output.put_line('-------------------------------');
End Loop;
End;[@more@]
tmp_char Varchar2(500) := 'aaa|bbb|ccc|ddd|';
tmp_sql Varchar(500);
tmp_str Varchar(50);
len_end Number(10);
len_begin Number(10) := 0;
Begin
dbms_output.put_line('tmp_char:' || tmp_char);
While instr(tmp_char,'|')>0
Loop
len_end := instr(tmp_char,'|') ;
tmp_str := substr(tmp_char,0,len_end-1);
tmp_sql := 'update xxx set aa=bb where cc like ('''||tmp_str||''')';
--Execute IMMEDIATE tmp_sql;
--Commit;
len_begin := len_end+1;
tmp_char := substr(tmp_char,len_begin);
dbms_output.put_line('tmp_str:' || tmp_str);
dbms_output.put_line('tmp_sql:' || tmp_sql);
dbms_output.put_line('tmp_char:' || tmp_char);
dbms_output.put_line('-------------------------------');
End Loop;
End;[@more@]
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/18921899/viewspace-1016713/ ，如需转载，请注明出处，否则将追究法律责任。
上一篇：
动态选择表示例
下一篇：
动态游标的操作~~~
请登录后发表评论
登录
全部评论
