oracle动态sql执行提交,oracle execute immediate动态sql组合执行comment小记

create or replace procedure proc_auto_comment

as

v_number pls_integer;

v_repl_string varchar2(100);

v_sql varchar2(4000);

v_sqlerrm varchar2(1000);

begin

v_number:=2;

for i in 1..v_number loop

--因为动态sql如果出错代码会一直hang在哪儿,为了快速诊断是什么原因,添加异常

begin

execute immediate 'create table T_COMMENT_'||to_char(i)||'

(

A INTEGER,

B INTEGER

)';

exception when others then

v_sqlerrm:=sqlerrm;

dbms_output.put_line(v_sqlerrm);

exit;

end;

v_repl_string:='T_COMMENT_'||to_char(i);

begin

--暂时发现合并多个comment子句如用execute immediate会报无效字符,先分开编写吧

v_sql:='comment on column '||v_repl_string||'.A is '||''''||'这是a'||''''||';'||chr(10)||chr(13)||  'comment on column '||v_repl_string||'.B is '||''''||'这是b'||''''||';';

execute immediate   v_sql;

exception when others then

v_sqlerrm:=sqlerrm;

dbms_output.put_line(v_sqlerrm);

exit;

end;

end loop;

end;

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/9240380/viewspace-751203/，如需转载，请注明出处，否则将追究法律责任。