ITPub博客

首页 > 数据库 > Oracle > oracle动态update

oracle动态update

原创 Oracle 作者:jy02254082 时间:2007-12-11 11:27:53 0 删除 编辑

create or replace procedure pro_qxq_test as
--QXQ功能
--CREATE:DAIBIN

v_bm varchar2(100);
v_qhzdm varchar2(100);
v_jlxzdm varchar2(100);
v_mlpzdm varchar2(100);
v_xzzdm varchar2(100);
v_dzzdm varchar2(100);

cursor c_zdm is
select bm, qhzdm, jlxzdm, mlpzdm, xzzdm, dzzdm from dzxszdlsyb;

begin
open c_zdm;
loop
fetch c_zdm
into v_bm, v_qhzdm, v_jlxzdm, v_mlpzdm, v_xzzdm, v_dzzdm;
exit when c_zdm%notfound;

execute immediate 'update ' || v_bm || ' t set ' || v_dzzdm ||
' = (select ' ||
'(select a2 from DT_C_XZQH where a1 = ' || v_qhzdm ||
')||(select dm from JLXXXB where mc = ' || v_jlxzdm ||
')|| ' || v_mlpzdm || '|| ' || v_xzzdm || ' from ' || v_bm ||
' b where t.rowid=b.rowid ) ';

commit;
dbms_output.put_line('成功更新表' || v_bm || '的字段');
end loop;

end;

[@more@]

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

上一篇: SQL取树状结构
请登录后发表评论 登录
全部评论
  • 博文量
    8
  • 访问量
    13452