在Oracle中执行动态SQL的几种方法



特别申明：本文用于自己学习备忘。

转自：http://blog.csdn.net/li_guang/article/details/3995794

在一般的sql操作中，sql语句基本上都是固定的，如：

SELECT t.empno,t.ename  FROM scott.emp t WHERE t.deptno = 20;

但有的时候，从应用的需要或程序的编写出发，都可能需要用到动态SQl，如：

当 from 后的表 不确定时，或者where 后的条件不确定时，都需要用到动态SQL。

一、使用动态游标实现

1、声明动态游标

TYPE i_cursor_type IS REF CURSOR;

2、声明游标变量

my_cursor i_cursor_type;

3、使用游标

n_deptno:=20;

dyn_select := 'select empno,ename from emp where deptno='||n_deptno;

OPEN my_cursor FOR dyn_select;

LOOP 

  FETCH my_cursor INTO n_empno,v_ename;

  EXIT WHEN my_cursor%NOTFOUND;

  --用n_empno,v_ename做其它处理

  --....

END LOOP;

CLOSE dl_cursor;

4、小结：动态游标可以胜任大多数动态SQL的需求了，使用简洁方便居家旅行之必备杀人放火之法宝。

二、使用 EXECUTE IMMEDIATE

最早大家都使用DBMS_SQL包，但是太太麻烦了，最终都放弃了。但是自从有了EXECUTE IMMEDIATE之后，但要注意以下几点：

EXECUTE IMMEDIATE代替了以前Oracle8i中DBMS_SQL package包.它解析并马上执行动态的SQL语句或非运行时创建的PL/SQL块.动态创建和执行SQL语句性能超前，EXECUTE IMMEDIATE的目标在于减小企业费用并获得较高的性能，较之以前它相当容易编码.尽管DBMS_SQL仍然可用，但是推荐使用EXECUTE IMMEDIATE,因为它获的收益在包之上。 

 使用技巧

1. EXECUTE IMMEDIATE将不会提交一个DML事务执行，应该显式提交

 如果通过EXECUTE IMMEDIATE处理DML命令，那么在完成以前需要显式提交或者作为EXECUTE IMMEDIATE自己的一部分. 如果通过EXECUTE IMMEDIATE处理DDL命令,它提交所有以前改变的数据

2. 不支持返回多行的查询,这种交互将用临时表来存储记录(参照例子如下)或者用REF cursors.

3. 当执行SQL语句时，不要用分号，当执行PL/SQL块时，在其尾部用分号.

4. 在Oracle手册中，未详细覆盖这些功能。下面的例子展示了所有用到Execute immediate的可能方面.希望能给你带来方便.

5. 对于Forms开发者,当在PL/SQL 8.0.6.3.版本中，Forms 6i不能使用此功能.

EXECUTE IMMEDIATE用法例子

1. 在PL/SQL运行DDL语句

 begin

  execute immediate 'set role all';

 end;

2. 给动态语句传值(USING 子句)

 declare

  l_depnam varchar2(20) := 'testing';

  l_loc    varchar2(10) := 'Dubai';

  begin

  execute immediate 'insert into dept values  (:1, :2, :3)'

    using 50, l_depnam, l_loc;

  commit;

 end;

3. 从动态语句检索值(INTO子句)

 declare

  l_cnt    varchar2(20);

 begin

  execute immediate 'select count(1) from emp'

    into l_cnt;

  dbms_output.put_line(l_cnt);

 end;

4. 动态调用例程.例程中用到的绑定变量参数必须指定参数类型.黓认为IN类型,其它类型必须显式指定

 declare

  l_routin   varchar2(100) := 'gen2161.get_rowcnt';

  l_tblnam   varchar2(20) := 'emp';

  l_cnt      number;

  l_status   varchar2(200);

 begin

  execute immediate 'begin ' || l_routin || '(:2, :3, :4); end;'

    using in l_tblnam, out l_cnt, in out l_status;

  if l_status != 'OK' then

     dbms_output.put_line('error');

  end if;

 end;

5. 将返回值传递到PL/SQL记录类型;同样也可用%rowtype变量

 declare

    type empdtlrec is record (empno  number(4),ename  varchar2(20),deptno  number(2));

    empdtl empdtlrec;

 begin

    execute immediate 'select empno, ename, deptno '||'from emp where empno = 7934'

    into empdtl;

 end;

 

6. 传递并检索值.INTO子句用在USING子句前

 declare

   l_dept    pls_integer := 20;

   l_nam     varchar2(20);

   l_loc     varchar2(20);

 begin

    execute immediate 'select dname, loc from dept where deptno = :1'

       into l_nam, l_loc

       using l_dept ;

 end;

7. 多行查询选项.对此选项用insert语句填充临时表，用临时表进行进一步的处理,也可以用REF cursors纠正此缺憾.

 

 declare

  l_sal   pls_integer := 2000;

 begin

  execute immediate 'insert into temp(empno, ename) ' ||

                   '          select empno, ename from emp ' ||

                   '          where  sal > :1'

    using l_sal;

  commit;

 end;

       对于处理动态语句,EXECUTE IMMEDIATE比以前可能用到的更容易并且更高效.当意图执行动态语句时，适当地处理异常更加重要.应该关注于捕获所有可能的异常.