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块时,在其尾部用分号.

 

FOR I IN 0 .. 999 LOOP
    
    V_TABLENAME := 'YTEXP.T_EXP_WAYBILL_' || TO_CHAR(I, 'fm000');
 
      V_SQL := 'UPDATE YTRPT.T_RPT_WAYBILL_OVERDUE O
                        SET O.BILL_SOURCE_ORG_CODE = (SELECT W.MAT_ORG_CODE FROM ' || V_TABLENAME || ' W WHERE O.WAYBILL_NO = W.WAYBILL_NO),
                            O.MAT_EXPIRE_TIME      = (SELECT W.MAT_EXPIRE_TIME FROM ' || V_TABLENAME || ' W WHERE O.WAYBILL_NO = W.WAYBILL_NO)
                        WHERE O.RPT_DATE = TO_DATE(''  '|| TO_CHAR(START_TIME,'YYYY-MM-DD')  ||'  '',''YYYY-MM-DD'' )
                        AND O.BILL_SOURCE_ORG_CODE IS NULL ';
                        
                        
     EXECUTE IMMEDIATE V_SQL;
     commit;
    
  END LOOP;

 

 

 

EXECUTE IMMEDIATE -- 用法例子 
1. 在PL/SQL运行DDL语句

Sql代码 

begin 
   execute immediate 'set role all'; 
end;

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

declare 
   l_depnam varchar2(20) := 'testing'; 
   l_loc     varchar2(10) := 'D?i'; 
   begin 
   execute immediate 'insert into dept vals   (:1, :2, :3)' 
     using 50, l_depnam, l_loc; 
   commit; 
end;

 

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

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类型,其它类型必须显式指定 
Sql代码  

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变量 
Sql代码   

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子句前 
Sql代码   

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纠正此缺憾. 
Sql代码   

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 比以前可能用到的更容易并且更高效. 
当意图执行动态语句时,适当地处理异常更加重要.应该关注于捕获所有可能的异常.15:40 | 添加评论 | 固定链接 | 写入日志 | SQLoracle中insert into select的用法
/* Formatted on 2008/06/02 15:37 (Formatter Plus v4.8.7) */
INSERT INTO t_work
            (f_recid, f_jobid, f_ruleid, f_jobtype, f_operid, f_opername,
             f_btime, f_assigntime, f_downtime, f_worktimes, f_finishtime)
   SELECT SYS_GUID () AS f_recid, f_jobid, f_ruleid, f_jobtype, f_operid,
          f_opername, f_btime, f_assigntime,f_downtime,
          DECODE (f_downtime, null,1, f_downtime + 1) as f_worktimes,
          TO_CHAR (SYSDATE, 'yyyy-MM-dd hh:mm:ss') AS finishtime
     FROM t_bfer
    WHERE f_jobid = '21'
说明将t_bfer中的一条记录添加到t_work表中。
其中b_bfer中没有的列有f_recid和t_finishtime;
f_worktimes需要加1。
SYS_GUID()的意思是生成一个32位的永不重复的字符串。
DECODE(f_downtime, null,1, f_downtime + 1)的意思是如果f_downtime为空(null)得到的值为1,否则为f_downtime+1。
TO_CHAR(SYSDATE, 'yyyy-MM-dd hh:mm:ss')为格式化时间格式;在表t_work中f_finishtime的数据类型为varchar2.
15:22 | 添加评论 | 固定链接 | 写入日志 | SQLPL/SQL开发中动态SQL的使用方法
原文来自:http://blog.chinaunix.net/u/19673/showart_272022.html

一般的PL/SQL程序设计中,在DML和事务控制的语句中可以直接使用SQL,但是DDL语句及系统控制语句却不能在PL/SQL中直接使用,要想实现在PL/SQL中使用DDL语句及系统控制语句,可以通过使用动态SQL来实现。
   首先我们应该了解什么是动态SQL,在Oracle数据库开发PL/SQL块中我们使用的SQL分为:静态SQL语句和动态SQL语句。所谓静态SQL 指在PL/SQL块中使用的SQL语句在编译时是明确的,执行的是确定对象。而动态SQL是指在PL/SQL块编译时SQL语句是不确定的,如根据用户输 入的参数的不同而执行不同的操作。编译程序对动态语句部分不进行处理,只是在程序运行时动态地创建语句、对语句进行语法分析并执行该语句。
  Oracle中动态SQL可以通过本地动态SQL来执行,也可以通过DBMS_SQL包来执行。下面就这两种情况分别进行说明:
  一、本地动态SQL
  本地动态SQL是使用EXECUTE IMMEDIATE语句来实现的。
  1、本地动态SQL执行DDL语句:
  需求:根据用户输入的表名及字段名等参数动态建表。

create or replace procedure proc_test
(
table_name in varchar2, --表名
field1 in varchar2, --字段名
datatype1 in varchar2, --字段类型
field2 in varchar2, --字段名
datatype2 in varchar2 --字段类型
) as
str_sql varchar2(500);
begin
str_sql:=’create table ’||table_name||’(’||field1||’ ’||datatype1||’,’||field2||’ ’||datatype2||’)’;
execute immediate str_sql; --动态执行DDL语句
exception
when others then
null;
end ;

  以上是编译通过的存储过程代码。下面执行存储过程动态建表。

SQL> execute proc_test(’dinya_test’,’id’,’number(8) not null’,’name’,’varchar2(100)’);
PL/SQL procedure s?ssfully completed
SQL> desc dinya_test;
Name Type Nullable Default Comments 
---- ------------- -------- ------- -------- 
ID NUMBER(8)
NAME VARCHAR2(100) Y
SQL>

  到这里,就实现了我们的需求,使用本地动态SQL根据用户输入的表名及字段名、字段类型等参数来实现动态执行DDL语句。
  2、本地动态SQL执行DML语句。
  需求:将用户输入的值插入到上例中建好的dinya_test表中。

create or replace procedure proc_insert
(
id in number, --输入序号
name in varchar2 --输入姓名
) as
str_sql varchar2(500);
begin
str_sql:=’insert into dinya_test vals(:1,:2)’;
execute immediate str_sql using id,name; --动态执行插入操作
exception
when others then
null;
end ;

  执行存储过程,插入数据到测试表中。

SQL> execute proc_insert(1,’dinya’);
PL/SQL procedure s?ssfully completed
SQL> select * from dinya_test;
ID NAME
1 dinya

  在上例中,本地动态SQL执行DML语句时使用了using子句,按顺序将输入的值绑定到变量,如果需要输出参数,可以在执行动态SQL的时候,使用RETURNING INTO 子句,如:

declare
p_id number:=1;
v_count number;
begin
v_string:=’select count(*) from table_name a where a.id=:id’;
execute immediate v_string into v_count using p_id; 
end ;

  更多的关于动态SQL中关于返回值及为输出输入绑定变量执行参数模式的问题,请读者自行做测试。
  二、使用DBMS_SQL包
   使用DBMS_SQL包实现动态SQL的步骤如下:A、先将要执行的SQL语句或一个语句块放到一个字符串变量中。B、使用DBMS_SQL包的 parse过程来分析该字符串。C、使用DBMS_SQL包的bind_variable过程来绑定变量。D、使用DBMS_SQL包的execute函 数来执行语句。
  1、使用DBMS_SQL包执行DDL语句
  需求:使用DBMS_SQL包根据用户输入的表名、字段名及字段类型建表。

create or replace procedure proc_dbms_sql
(
table_name in varchar2, --表名
field_name1 in varchar2, --字段名
datatype1 in varchar2, --字段类型
field_name2 in varchar2, --字段名
datatype2 in varchar2 --字段类型
)as
v_cursor number; --定义光标
v_string varchar2(200); --定义字符串变量
v_row number; --行数
begin
v_cursor:=dbms_sql.open_cursor; --为处理打开光标
v_string:=’create table ’||table_name||’(’||field_name1||’ ’||datatype1||’,’||field_name2||’ ’||datatype2||’)’;
dbms_sql.parse(v_cursor,v_string,dbms_sql.native); --分析语句
v_row:=dbms_sql.execute(v_cursor); --执行语句
dbms_sql.close_cursor(v_cursor); --关闭光标
exception
when others then
dbms_sql.close_cursor(v_cursor); --关闭光标
raise;
end;

  以上过程编译通过后,执行过程创建表结构:

SQL> execute proc_dbms_sql(’dinya_test2’,’id’,’number(8) not null’,’name’,’varchar2(100)’);
PL/SQL procedure s?ssfully completed
SQL> desc dinya_test2;
Name Type Nullable Default Comments 
---- ------------- -------- ------- -------- 
ID NUMBER(8) 
NAME VARCHAR2(100) Y 
SQL>

  2、使用DBMS_SQL包执行DML语句
  需求:使用DBMS_SQL包根据用户输入的值更新表中相对应的记录。
  查看表中已有记录:

SQL> select * from dinya_test2;
ID NAME
1 Oracle
2 CSDN
3 ERP
SQL>

  建存储过程,并编译通过:

create or replace procedure proc_dbms_sql_update
(
id number,
name varchar2
)as
v_cursor number; --定义光标
v_string varchar2(200); --字符串变量
v_row number; --行数
begin
v_cursor:=dbms_sql.open_cursor; --为处理打开光标
v_string:=’update dinya_test2 a set a.name=:p_name where a.id=:p_id’;
dbms_sql.parse(v_cursor,v_string,dbms_sql.native); --分析语句
dbms_sql.bind_variable(v_cursor,’:p_name’,name); --绑定变量
dbms_sql.bind_variable(v_cursor,’:p_id’,id); --绑定变量
v_row:=dbms_sql.execute(v_cursor);           --执行动态SQL
dbms_sql.close_cursor(v_cursor); --关闭光标
exception
when others then
dbms_sql.close_cursor(v_cursor); --关闭光标
raise;
end;

  执行过程,根据用户输入的参数更新表中的数据:

SQL> execute proc_dbms_sql_update(2,’csdn_dinya’);
PL/SQL procedure s?ssfully completed
SQL> select * from dinya_test2;
ID NAME
1 Oracle
2 csdn_dinya
3 ERP
SQL>

  执行过程后将第二条的name字段的数据更新为新值csdn_dinya。这样就完成了使用dbms_sql包来执行DML语句的功能。
   使用DBMS_SQL中,如果要执行的动态语句不是查询语句,使用DBMS_SQL.Execute或 DBMS_SQL.Variable_Val来执行,如果要执行动态语句是查询语句,则要使用DBMS_SQL.define_column定义输出变 量,然后使用DBMS_SQL.Execute, DBMS_SQL.Fetch_Rows, DBMS_SQL.Column_Val及DBMS_SQL.Variable_Val来执行查询并得到结果。

 

 

 

PLSQL中 EXECUTE IMMEDIATE语句
  
    先说说绑定变量
   ":"称绑定变量指示符,解释如下:
   它是用户放入查询中的占位符,它会告诉Oracle" 现在生成一个方案框架,实际执
   行语句的时候,会提供应该使用的实际值"。
   例子如下:
   select * from emp where dep='sale'; //不使用绑定变量
   select * from emp where dep=:sale //使用绑定变量
   一般在 procedure or function 中使用,可以优化共享池的使用。
    两句的区别很明显,后者多一个占位符,这个以冒号开始的变量可以灵活地执行不
   同条件的where语句,这是动态SQL语句。
  1、 语法:
  
    EXECUTE IMMEDIATE dynamic_string
    [INTO {define_variable[,define_variable]…| record}]
    [USING [IN | OUT | IN OUT] bind_argument[,[IN | OUT \ IN OUT] bind_argumnet]…]
    [{RETURNING | RETURN} INTO bing_argument[,bind_argument]…];
  2、 用法
    处理DDL操作(CREATE,ALTER,DROP)
    CREATE OR REPLACE PROCEDURE drop_table(table_name VARCHAR2)
    IS
     Sql_statemet VARCHAR2(100);
    BEGIN
     Sql_statement:=’DROP TABLE’ || table_name;
     EXECUTE IMMEDIATE sql_statement;
    END;
    /
    建立过程drop_table后,调用如下:
    SQL> exec drop_table(‘worker’)
    处理DCL操作(GRANT REVOKE)
    SQL> conn system/manager
    CREATE OR REPLACE PROCEDURE grant_sys_priv(priv VARCHAR2,username VARCHAR2)
    IS
     Sql_stat VARCHAR2(100);
    BEGIN
     Sql_stat:=’GRANT “ || priv|| ’ TO ’|| username;
    EXECUTE IMMEDIATE sql_stat;
    END;
    /
    调用
    SQL> exec grant_sys_priv(‘CREATE SESSION’,’SCOTT’)
    处理DML操作(INSERT UPDATE DELETE)
    如果DML语句带有占位符,那么在E I语句中则要带USING子句
    如果DML语句带有RETURNING子句,那么E I语句中要带有RETURNINGINTO子句
    例子,处理单行查询:
    DECLARE
     sql_stat VARCHAR2(100);
     emp_record tbl%ROWTYPE;
    BEGIN
     sql-stat:='SELECT * FROM tbl WHERE tblno=:no';
     EXECUTE IMMEDIATE sql_stat INTO emp_record USING &1;
     dbms_output.put_line(emp_record.ename||emp_record.sal);
    END;

posted @ 2014-03-25 10:20  龙猫爸爸  阅读(2568)  评论(0编辑  收藏  举报