一般的PL/SQL程序設(shè)計(jì)中，在DML和事務(wù)控制的語句中可以直接使用SQL，但是DDL語句及系統(tǒng)控制語句卻不能在PL/SQL中直接使用，要想實(shí)現(xiàn)在PL/SQL中使用DDL語句及系統(tǒng)控制語句，可以通過使用動(dòng)態(tài)SQL來實(shí)現(xiàn)。

　　首先我們應(yīng)該了解什么是動(dòng)態(tài)SQL，在Oracle數(shù)據(jù)庫開發(fā)PL/SQL塊中我們使用的SQL分為：靜態(tài)SQL語句和動(dòng)態(tài)SQL語句。所謂靜態(tài)SQL指在PL/SQL塊中使用的SQL語句在編譯時(shí)是明確的，執(zhí)行的是確定對(duì)象。而動(dòng)態(tài)SQL是指在PL/SQL塊編譯時(shí)SQL語句是不確定的，如根據(jù)用戶輸入的參數(shù)的不同而執(zhí)行不同的操作。編譯程序?qū)?dòng)態(tài)語句部分不進(jìn)行處理，只是在程序運(yùn)行時(shí)動(dòng)態(tài)地創(chuàng)建語句、對(duì)語句進(jìn)行語法分析并執(zhí)行該語句。

　　Oracle中動(dòng)態(tài)SQL可以通過本地動(dòng)態(tài)SQL來執(zhí)行，也可以通過DBMS_SQL包來執(zhí)行。下面就這兩種情況分別進(jìn)行說明：

　　一、本地動(dòng)態(tài)SQL

　　本地動(dòng)態(tài)SQL是使用EXECUTE IMMEDIATE語句來實(shí)現(xiàn)的。

　　1、本地動(dòng)態(tài)SQL執(zhí)行DDL語句：

　　需求：根據(jù)用戶輸入的表名及字段名等參數(shù)動(dòng)態(tài)建表。

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;   --動(dòng)態(tài)執(zhí)行DDL語句
    exception when others then 
            null;
end; 

 　　以上是編譯通過的存儲(chǔ)過程代碼。下面執(zhí)行存儲(chǔ)過程動(dòng)態(tài)建表。

 SQL> execute proc_test('dinya_test','id','number(8) not null','name','varchar2(100)');

       PL/SQL procedure successfully completed

  SQL> desc dinya_test;
       Name Type          Nullable Default Comments 
       ---- ------------- -------- ------- --------   
       ID   NUMBER(8)

       NAME VARCHAR2(100) Y

  SQL> 

  　　到這里，就實(shí)現(xiàn)了我們的需求，使用本地動(dòng)態(tài)SQL根據(jù)用戶輸入的表名及字段名、字段類型等參數(shù)來實(shí)現(xiàn)動(dòng)態(tài)執(zhí)行DDL語句。

 　　2、本地動(dòng)態(tài)SQL執(zhí)行DML語句。

　　需求：將用戶輸入的值插入到上例中建好的dinya_test表中。

create or replace procedure proc_insert
(
    id in number,                                 --輸入序號(hào)
    name in varchar2                              --輸入姓名
) as 
    str_sql varchar2(500);
begin 
    str_sql:='insert into dinya_test values(:1,:2)';
    execute immediate str_sql using id,name;      --動(dòng)態(tài)執(zhí)行插入操作
    exception when others then 
            null;
end; 

　　執(zhí)行存儲(chǔ)過程，插入數(shù)據(jù)到測(cè)試表中。

  SQL> execute proc_insert(1,'dinya');
       PL/SQL procedure successfully completed
  SQL> select * from dinya_test;
        ID      NAME
        1       dinya 

　　在上例中，本地動(dòng)態(tài)SQL執(zhí)行DML語句時(shí)使用了using子句，按順序?qū)⑤斎氲闹到壎ǖ阶兞浚绻枰敵鰠?shù)，可以在執(zhí)行動(dòng)態(tài)SQL的時(shí)候，使用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 returning into v_count using p_id;  
end;

    　二、使用DBMS_SQL包

　　使用DBMS_SQL包實(shí)現(xiàn)動(dòng)態(tài)SQL的步驟如下：
    A、先將要執(zhí)行的SQL語句或一個(gè)語句塊放到一個(gè)字符串變量中。
    B、使用DBMS_SQL包的parse過程來分析該字符串。
    C、使用DBMS_SQL包的bind_variable過程來綁定變量。
    D、使用DBMS_SQL包的execute函數(shù)來執(zhí)行語句。

　　1、使用DBMS_SQL包執(zhí)行DDL語句

　　需求：使用DBMS_SQL包根據(jù)用戶輸入的表名、字段名及字段類型建表。

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;              --定義光標(biāo)
    v_string varchar2(200);       --定義字符串變量
    v_row number;                 --行數(shù)
begin
    v_cursor:=dbms_sql.open_cursor;      --為處理打開光標(biāo)
    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);   --執(zhí)行語句,動(dòng)態(tài)SQL執(zhí)行DDL時(shí)可以不寫
    dbms_sql.close_cursor(v_cursor);     --關(guān)閉光標(biāo)
    exception when others then
            dbms_sql.close_cursor(v_cursor);  --關(guān)閉光標(biāo)
            raise;
end; 

 　　以上過程編譯通過后，執(zhí)行過程創(chuàng)建表結(jié)構(gòu)：

SQL> execute proc_dbms_sql('dinya_test2','id','number(8) not null','name','varchar2(100)');

           PL/SQL procedure successfully completed

SQL> desc dinya_test2;
           Name Type          Nullable Default Comments 
           ---- ------------- -------- ------- -------- 
           ID   NUMBER(8)                               
          NAME VARCHAR2(100) Y                         

SQL> 

  　 2、使用DBMS_SQL包執(zhí)行DML語句

　　需求：使用DBMS_SQL包根據(jù)用戶輸入的值更新表中相對(duì)應(yīng)的記錄。

　　查看表中已有記錄：

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

 　　建存儲(chǔ)過程，并編譯通過：

create or replace procedure proc_dbms_sql_update
(
    id number,
    name varchar2
)as
    v_cursor number;            --定義光標(biāo)
    v_string varchar2(200);   --字符串變量
    v_row number;               --行數(shù)
begin
    v_cursor:=dbms_sql.open_cursor;    --為處理打開光標(biāo)
    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);　　　　　       --執(zhí)行動(dòng)態(tài)SQL
    dbms_sql.close_cursor(v_cursor);                                --關(guān)閉光標(biāo)
    exception when others then
            dbms_sql.close_cursor(v_cursor);                        --關(guān)閉光標(biāo)
            raise;
end; 

 　　執(zhí)行過程，根據(jù)用戶輸入的參數(shù)更新表中的數(shù)據(jù)：

SQL> execute proc_dbms_sql_update(2,'csdn_dinya');

        PL/SQL procedure successfully completed

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

  　　執(zhí)行過程后將第二條的name字段的數(shù)據(jù)更新為新值csdn_dinya。這樣就完成了使用dbms_sql包來執(zhí)行DML語句的功能。

 　　使用DBMS_SQL中，如果要執(zhí)行的動(dòng)態(tài)語句不是查詢語句，使用DBMS_SQL.Execute或DBMS_SQL.Variable_Value來執(zhí)行，如果要執(zhí)行動(dòng)態(tài)語句是查詢語句，則要使用DBMS_SQL.define_column定義輸出變量，然后使用DBMS_SQL.Execute, DBMS_SQL.Fetch_Rows, DBMS_SQL.Column_Value及DBMS_SQL.Variable_Value來執(zhí)行查詢并得到結(jié)果。
　　
        總結(jié)說明：

　　在Oracle開發(fā)過程中，我們可以使用動(dòng)態(tài)SQL來執(zhí)行DDL語句、DML語句、事務(wù)控制語句及系統(tǒng)控制語句。但是需要注意的是，PL/SQL塊中使用動(dòng)態(tài)SQL執(zhí)行DDL語句的時(shí)候與別的不同，在DDL中使用綁定變量是非法的（bind_variable(v_cursor,':p_name',name)），分析后不需要執(zhí)行DBMS_SQL.Bind_Variable，直接將輸入的變量加到字符串中即可。另外，DDL是在調(diào)用DBMS_SQL.PARSE時(shí)執(zhí)行的，所以DBMS_SQL.EXECUTE也可以不用，即在上例中的v_row:=dbms_sql.execute(v_cursor)部分可以不要。


        轉(zhuǎn):http://dev.yesky.com/187/2029687.shtml