动态SQL
create or replace procedure p_ptable is
begin
declare
str_sql varchar2(3000);
l_names province_py.pingying%type;
cursor c is select pingying from province_py order by pingying;
begin
open c;
loop
fetch c into l_names ;
exit when c%notfound;
str_sql:=' create table MOC_WWW_'||REPLACE(l_names,'NEW_','')||' as select * from new_com_www' ;
str_sql:=str_sql||' where py='''||l_names || '''';
execute immediate str_sql;
DBMS_OUTPUT.PUT_LINE(str_sql);
end loop;
close c;
end;
end;
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/8797129/viewspace-589366/ ，如需转载，请注明出处，否则将追究法律责任。
下一篇：
批量绑定
请登录后发表评论
登录
全部评论
