动态SQL

　　在PL/SQL中可以动态的执行DML语句与事务控制语句。但是无法执行DDL语句与系统控制语句, 若是要执行DDL与系统控制语句，可以通过动态SQL的使用来实现。 Oracle中动态SQL的实现有两种方式，一种是通过本地动态SQL来执行，一种是通过调用DBMS_SQL包来执行。 1：本地动态SQL(是通过调用execute immediate 'SQLString') 　实例： create or replace procedure ExecuteSql(p_Table IN VARCHAR2) is v_SQLString VARCHAR2(100); begin v_SQLString := 'DROP TABLE ' || p_Table; execute immediate v_SQLString; end ExecuteSql; 最后调用ExecuteSql('p_Talbe_name'); 2:调用DBMS_SQL包 在DBMS_SQL包中 function open_cursor: 打开一个动态游标，并返回一个整数； procedure close_cursor(c in out integer); 关闭一个动态游标，参数为open_cursor所打开的游标。 procedure parse(c in integer, statement in varchar2, language_flag in integer):对动态游标所提供的sql语句进行解析,参数C表示游标,statement为sql语句,language-flag为解析sql语句所用oracle版本,一般有V6,V7跟native(在不明白所连database版本时,使用native); procedure define_column(c in integer, position in integer, column any datatype, [column_size in integer]):定义动态游标所能得到的对应值,其中c为动态游标,positon为对应动态sql中的位置(从1开始),column为该值所对应的变量,可以为任何类型,column_size只有在column为定义长度的类型中使用如VARCHAR2,CHAR等(该过程有很多种情况,此处只对一般使用到的类型进行表述); function execute(c in integer):执行游标,并返回处理一个整型,代表处理结果(对insert,delete,update才有意义,而对select语句而言可以忽略); function fetch_rows(c in integer):对游标进行循环取数据,并返回一个整数,为0时表示已经取到游标末端; procedure column_value(c in integer, position in integer, value):将所取得的游标数据赋值到相应的变量,c为游标,position为位置,value则为对应的变量; procedure bind_variable(c in integer, name in varchar2, value):定义动态sql语句(DML)中所对应字段的值,c为游标,name为字段名称,value为字段的值; 实例应用： procedure define_column(c in integer, position in integer, column any datatype, [column_size in integer]):定义动态游标所能得到的对应值,其中c为动态游标,positon为对应动态sql中的位置(从1开始),column为该值所对应的变量,可以为任何类型,column_size只有在column为定义长度的类型中使用如VARCHAR2,CHAR等(该过程有很多种情况,此处只对一般使用到的类型进行表述); function execute(c in integer):执行游标,并返回处理一个整型,代表处理结果(对insert,delete,update才有意义,而对select语句而言可以忽略); function fetch_rows(c in integer):对游标进行循环取数据,并返回一个整数,为0时表示已经取到游标末端; procedure column_value(c in integer, position in integer, value):将所取得的游标数据赋值到相应的变量,c为游标,position为位置,value则为对应的变量; procedure bind_variable(c in integer, name in varchar2, value):定义动态sql语句(DML)中所对应字段的值,c为游标,name为字段名称,value为字段的值; 实例: create or replace procedure dynamicSql(p_Table IN VARCHAR2) is v_SQLString VARCHAR2(100); v_Cursor BINARY_INTEGER; v_ReturnCode BINARY_INTEGER; begin v_SQLString := 'DROP TABLE ' || p_Table; v_Cursor := DBMS_SQL.open_cursor; DBMS_SQL.parse(v_Cursor, v_SQLString, DBMS_SQL.native); v_ReturnCode := DBMS_SQL.execute(v_Cursor); DBMS_SQL.close_cursor(v_Cursor); end dynamicSql;