一般的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语句：
需求：根据用户输入的表名及字段名等参数动态建表。
1
create or replace procedure proc_test
2(
3table_name in varchar2, --表名
4field1 in varchar2, --字段名
5datatype1 in varchar2, --字段类型
6field2 in varchar2, --字段名
7datatype2 in varchar2 --字段类型
8) as
9str_sql varchar2(500);
10begin
11str_sql:=’create table ’||table_name||’(’||field1||’ ’||datatype1||’,’||field2||’ ’||datatype2||’)’;
12execute immediate str_sql; --动态执行DDL语句
13exception
14when others then
15null;
16end ;
17
以上是编译通过的存储过程代码。下面执行存储过程动态建表。create or replace procedure proc_test2
(3
table_name in varchar2, --表名4
field1 in varchar2, --字段名5
datatype1 in varchar2, --字段类型6
field2 in varchar2, --字段名7
datatype2 in varchar2 --字段类型8
) as 9
str_sql varchar2(500);10
begin 11
str_sql:=’create table ’||table_name||’(’||field1||’ ’||datatype1||’,’||field2||’ ’||datatype2||’)’;12
execute immediate str_sql; --动态执行DDL语句13
exception 14
when others then 15
null;16
end ;17
1SQL> execute proc_test(’dinya_test’,’id’,’number(8) not null’,’name’,’varchar2(100)’);
2
3PL/SQL procedure successfully completed
4
5SQL> desc dinya_test;
6Name Type Nullable Default Comments
7---- ------------- -------- ------- --------
8ID NUMBER(8)
9
10NAME VARCHAR2(100) Y
11
12SQL>
13
到这里，就实现了我们的需求，使用本地动态SQL根据用户输入的表名及字段名、字段类型等参数来实现动态执行DDL语句。SQL> execute proc_test(’dinya_test’,’id’,’number(8) not null’,’name’,’varchar2(100)’);2
3
PL/SQL procedure successfully completed4
5
SQL> desc dinya_test;6
Name Type Nullable Default Comments 7
---- ------------- -------- ------- -------- 8
ID NUMBER(8)9
10
NAME VARCHAR2(100) Y11
12
SQL>13
2、本地动态SQL执行DML语句。
需求：将用户输入的值插入到上例中建好的dinya_test表中。
1create or replace procedure proc_insert
2(
3id in number, --输入序号
4name in varchar2 --输入姓名
5) as
6str_sql varchar2(500);
7begin
8str_sql:=’insert into dinya_test values(:1,:2)’;
9execute immediate str_sql using id,name; --动态执行插入操作
10exception
11when others then
12null;
13end ;
执行存储过程，插入数据到测试表中。create or replace procedure proc_insert2
(3
id in number, --输入序号4
name in varchar2 --输入姓名5
) as 6
str_sql varchar2(500);7
begin 8
str_sql:=’insert into dinya_test values(:1,:2)’;9
execute immediate str_sql using id,name; --动态执行插入操作10
exception 11
when others then 12
null;13
end ;1SQL> execute proc_insert(1,’dinya’);
2PL/SQL procedure successfully completed
3SQL> select * from dinya_test;
4ID NAME
51 dinya
6
在上例中，本地动态SQL执行DML语句时使用了using子句，按顺序将输入的值绑定到变量，如果需要输出参数，可以在执行动态SQL的时候，使用RETURNING INTO 子句，如：SQL> execute proc_insert(1,’dinya’);2
PL/SQL procedure successfully completed3
SQL> select * from dinya_test;4
ID NAME5
1 dinya6
1declare
2p_id number:=1;
3v_count number;
4begin
5v_string:=’select count(*) from table_name a where a.id=:id’;
6execute immediate v_string into v_count using p_id;
7end ;
更多的关于动态SQL中关于返回值及为输出输入绑定变量执行参数模式的问题，请读者自行做测试。declare2
p_id number:=1;3
v_count number;4
begin 5
v_string:=’select count(*) from table_name a where a.id=:id’;6
execute immediate v_string into v_count using p_id; 7
end ;二、使用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包根据用户输入的表名、字段名及字段类型建表。
1create or replace procedure proc_dbms_sql
2(
3table_name in varchar2, --表名
4field_name1 in varchar2, --字段名
5datatype1 in varchar2, --字段类型
6field_name2 in varchar2, --字段名
7datatype2 in varchar2 --字段类型
8)as
9v_cursor number; --定义光标
10v_string varchar2(200); --定义字符串变量
11v_row number; --行数
12begin
13v_cursor:=dbms_sql.open_cursor; --为处理打开光标
14v_string:=’create table ’||table_name||’(’||field_name1||’ ’||datatype1||’,’||field_name2||’ ’||datatype2||’)’;
15dbms_sql.parse(v_cursor,v_string,dbms_sql.native); --分析语句
16v_row:=dbms_sql.execute(v_cursor); --执行语句
17dbms_sql.close_cursor(v_cursor); --关闭光标
18exception
19when others then
20dbms_sql.close_cursor(v_cursor); --关闭光标
21raise;
22end;
23
以上过程编译通过后，执行过程创建表结构：create or replace procedure proc_dbms_sql2
(3
table_name in varchar2, --表名4
field_name1 in varchar2, --字段名5
datatype1 in varchar2, --字段类型6
field_name2 in varchar2, --字段名7
datatype2 in varchar2 --字段类型8
)as9
v_cursor number; --定义光标10
v_string varchar2(200); --定义字符串变量11
v_row number; --行数12
begin13
v_cursor:=dbms_sql.open_cursor; --为处理打开光标14
v_string:=’create table ’||table_name||’(’||field_name1||’ ’||datatype1||’,’||field_name2||’ ’||datatype2||’)’;15
dbms_sql.parse(v_cursor,v_string,dbms_sql.native); --分析语句16
v_row:=dbms_sql.execute(v_cursor); --执行语句17
dbms_sql.close_cursor(v_cursor); --关闭光标18
exception19
when others then20
dbms_sql.close_cursor(v_cursor); --关闭光标21
raise;22
end;23
1SQL> execute proc_dbms_sql(’dinya_test2’,’id’,’number(8) not null’,’name’,’varchar2(100)’);
2
3PL/SQL procedure successfully completed
4
5SQL> desc dinya_test2;
6Name Type Nullable Default Comments
7---- ------------- -------- ------- --------
8ID NUMBER(8)
9NAME VARCHAR2(100) Y
10
11SQL>
12
2、使用DBMS_SQL包执行DML语句SQL> execute proc_dbms_sql(’dinya_test2’,’id’,’number(8) not null’,’name’,’varchar2(100)’);2
3
PL/SQL procedure successfully completed4
5
SQL> desc dinya_test2;6
Name Type Nullable Default Comments 7
---- ------------- -------- ------- -------- 8
ID NUMBER(8) 9
NAME VARCHAR2(100) Y 10
11
SQL>12
需求：使用DBMS_SQL包根据用户输入的值更新表中相对应的记录。
查看表中已有记录：
1SQL> select * from dinya_test2;
2ID NAME
31 Oracle
42 CSDN
53 ERP
6SQL>
7
建存储过程，并编译通过：SQL> select * from dinya_test2;2
ID NAME3
1 Oracle4
2 CSDN5
3 ERP6
SQL>7
1create or replace procedure proc_dbms_sql_update
2(
3id number,
4name varchar2
5)as
6v_cursor number; --定义光标
7v_string varchar2(200); --字符串变量
8v_row number; --行数
9begin
10v_cursor:=dbms_sql.open_cursor; --为处理打开光标
11v_string:=’update dinya_test2 a set a.name=:p_name where a.id=:p_id’;
12dbms_sql.parse(v_cursor,v_string,dbms_sql.native); --分析语句
13dbms_sql.bind_variable(v_cursor,’:p_name’,name); --绑定变量
14dbms_sql.bind_variable(v_cursor,’:p_id’,id); --绑定变量
15v_row:=dbms_sql.execute(v_cursor); --执行动态ＳＱＬ
16dbms_sql.close_cursor(v_cursor); --关闭光标
17exception
18when others then
19dbms_sql.close_cursor(v_cursor); --关闭光标
20raise;
21end;
22
执行过程，根据用户输入的参数更新表中的数据：create or replace procedure proc_dbms_sql_update2
(3
id number,4
name varchar25
)as6
v_cursor number; --定义光标7
v_string varchar2(200); --字符串变量8
v_row number; --行数9
begin10
v_cursor:=dbms_sql.open_cursor; --为处理打开光标11
v_string:=’update dinya_test2 a set a.name=:p_name where a.id=:p_id’;12
dbms_sql.parse(v_cursor,v_string,dbms_sql.native); --分析语句13
dbms_sql.bind_variable(v_cursor,’:p_name’,name); --绑定变量14
dbms_sql.bind_variable(v_cursor,’:p_id’,id); --绑定变量15
v_row:=dbms_sql.execute(v_cursor); --执行动态ＳＱＬ16
dbms_sql.close_cursor(v_cursor); --关闭光标17
exception18
when others then19
dbms_sql.close_cursor(v_cursor); --关闭光标20
raise;21
end;22
1SQL> execute proc_dbms_sql_update(2,’csdn_dinya’);
2
3PL/SQL procedure successfully completed
4
5SQL> select * from dinya_test2;
6ID NAME
71 Oracle
82 csdn_dinya
93 ERP
10SQL>
执行过程后将第二条的name字段的数据更新为新值csdn_dinya。这样就完成了使用dbms_sql包来执行DML语句的功能。SQL> execute proc_dbms_sql_update(2,’csdn_dinya’);2
3
PL/SQL procedure successfully completed4
5
SQL> select * from dinya_test2;6
ID NAME7
1 Oracle8
2 csdn_dinya9
3 ERP10
SQL>使用DBMS_SQL中，如果要执行的动态语句不是查询语句，使用DBMS_SQL.Execute或DBMS_SQL.Variable_Value来执行，如果要执行动态语句是查询语句，则要使用DBMS_SQL.define_column定义输出变量，然后使用DBMS_SQL.Execute, DBMS_SQL.Fetch_Rows, DBMS_SQL.Column_Value及DBMS_SQL.Variable_Value来执行查询并得到结果。
总结说明：
在Oracle开发过程中，我们可以使用动态SQL来执行DDL语句、DML语句、事务控制语句及系统控制语句。但是需要注意的是，PL/SQL块中使用动态SQL执行DDL语句的时候与别的不同，在DDL中使用绑定变量是非法的（bind_variable(v_cursor,’:p_name’,name)），分析后不需要执行DBMS_SQL.Bind_Variable，直接将输入的变量加到字符串中即可。另外，DDL是在调用DBMS_SQL.PARSE时执行的，所以DBMS_SQL.EXECUTE也可以不用，即在上例中的v_row:=dbms_sql.execute(v_cursor)部分可以不要。