1. 在PL/SQL运行DDL语句
begin execute immediate 'set role all'; end;
2. 给动态语句传值(USING 子句)
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子句)
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 比以前可能用到的更容易并且更高效.
当意图执行动态语句时,适当地处理异常更加重要.应该关注于捕获所有可能的异常.15:40 | 添加评论 | 固定链接 | 写入日志 | SQLoracle中insert into select的用法
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语句是不确定的,如根据用户输入的参数的不同而执行不同的操作。编译程序对动态语句部分不进行处理,只是在程序运行时动态地创建语句、对语句进行语法分析并执行该语句。
一、本地动态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;
在上例中,本地动态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>