相关文章推荐
兴奋的蘑菇  ·  python之json.loads()报错V ...·  1 周前    · 
八块腹肌的柠檬  ·  sql ...·  10 月前    · 
儒雅的书包  ·  c++ - How to ...·  1 年前    · 

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

在一般的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比以前可能用到的更容易并且更高效.当意图执行动态语句时,适当地处理异常更加重要.应该关注于捕获所有可能的异常.

Oracle 动态SQL
Oracle 动态SQL有两种写法:用 DBMS_SQL 或 execute immediate,建议使用后者。试验步骤如下:


1. DDL 和 DML

Sql代码
  • /*** DDL ***/
  • begin
  • EXECUTE IMMEDIATE 'drop table temp_1';
  • EXECUTE IMMEDIATE 'create table temp_1(name varchar2(8))';
  • /*** DML ***/
  • declare
  • v_1 varchar2(8);
  • v_2 varchar2(10);
  • str varchar2(50);
  • begin
  • v_1:= '测试人员';
  • v_2:= '北京';
  • str := 'INSERT INTO test (name ,address) VALUES (:1, :2)';
  • EXECUTE IMMEDIATE str USING v_1, v_2;
  • commit;
  • c_1:= '测试人员';
  • str:= 'select * from test where name=:c WHERE ROWNUM=1';
  • execute immediate str into r_1 using c_1;
  • DBMS_OUTPUT.PUT_LINE(R_1. NAME||R_1.ADDRESS);
  • end ;
  • CREATE OR REPLACE package body pkg_test as
  • --函数体
  • function get(intID number) return myrctype is
  • rc myrctype; --定义ref cursor变量
  • sqlstr varchar2(500);
  • begin
  • if intID=0 then
  • --静态测试,直接用select语句直接返回结果
  • open rc for select id, name,sex,address,postcode,birthday from
  • student;
  • --动态sql赋值,用:w_id来申明该变量从外部获得
  • sqlstr := ' select id, name,sex,address,postcode,birthday from student
  • where id=:w_id';
  • --动态测试,用sqlstr字符串返回结果,用using关键词传递参数
  • open rc for sqlstr using intid;
  • end if;
  • return rc;
  • end get;
  • end pkg_test;
  • Declare @code varchar(11)

    Set @code=@scode + ‘%’

    Select @avg=avg(result) from LearnResult_baijiali

    Where scode like @code

    Return @avg

    执行用户自定义函数

    select 用户名。函数名 as 字段别名

    select dbo.AvgResult(‘s0002’) as result

    用户自定义函数返回值可放到局部变量中,用set ,select,exec赋值

    declare @avg1 real ,@avg2 real ,@avg3 real

    select @avg1= dbo.AvgResult(‘s0002’)

    set @avg2= dbo.AvgResult(‘s0002’)

    exec @avg3= dbo.AvgResult ‘s0002’

    select @avg1 as avg1 ,@avg2 as avg2 ,@avg3 as avg3

    create function code(@scode varchar(10))

    returns varchar(10)

    begin

    declare @ccode varchar(10)

    set @scode = @scode + ‘%’

    select @ccode=ccode from cmessage

    where ccode like @scode

    return @ccode

    select name from class where ccode = dbo.code(‘c001’)

    2、表格值函数

    a、 内联表格值函数

    create function 函数名(参数)

    returns table

    [with {Encryption | Schemabinding }]

    return(一条SQL语句)

    create function tabcmess(@code varchar(10))

    returns table

    return(select ccode,scode from cmessage where ccode like @ccode)

    b、 多句表格值函数

    create function 函数名(参数)

    returns 表格变量名table (表格变量定义)

    [with {Encryption | Schemabinding }]

    begin

    SQL语句

    多句表格值函数包含多条SQL语句,至少有一条在表格变量中填上数据值

    表格变量格式

    returns @变量名 table (column 定义| 约束定义 [,…])

    对表格变量中的行可执行select,insert,update,delete , 但select into 和 insert 语句的结果集是从存储过程插入。

    Create function tabcmessalot (@code varchar(10))

    Returns @ctable table(code varchar(10) null,cname varchar(100) null)

    Begin

    Insert @ctable

    Select ccode,explain from cmessage

    Where scode like @code

    return

    Select * from tabcmessalot(‘s0003’)