ORACLE 应用经验(3)-DBMS_SQL封装过程

　　DBMS_SQL封装过程中主要函数
　　1、OPEN_CURSOR：返回新游标的ID值
　　2、PARSE：解析要执行的语句
　　3、BIND_VARIABLE：将给定的数量与特定的变量相连接
　　4、DEFINE_COLOUMN：定义字段变量，其值对应于指定游标中某个位置元素的值
　　（仅用于SELECT语句）
　　5、EXECUTE：执行指定的游标
　　6、EXECUTE_AND_FETCH：执行指定的游标并取记录
　　7、FETCH_ROWS：从指定的游标中取出记录
　　8、COLUMN_VALUE：返回游标中指定位置的元素
　　9、IS_OPEN：当指定的游标状态为OPEN时返回真值
　　10、CLOSE_CURSOR：关闭指定的游标并释放内存
　　11、LAST_ERROR_POSITION：返回出错SQL语句的字节偏移量
　　12、LAST_ROW_ID：返回最后一条记录的ROWID
　　13、LAST_SQL_FUNCTION_CODE：返回语句的SQL FUNCTION CODE
　　
　　例：
　　CREATE OR REPLACE
　　procedure dml_sql (the_rq varchar2) as
　　The_c1 Integer;
　　The_result Integer;--dml_sql_result
　　M_jls number;
　　The_xh varchar2(2);
　　Begin
　　The_xh:=lpad(ltrim(the_rq),2,'0');
　　The_C1 :=Dbms_sql.open_cursor;
　　Dbms_sql.parse(the_C1,'select count(*) from user_indexes
　　where table_name =''ZDCHB'''the_xh,dbms_sql.v7);
　　Dbms_sql.define_column(the_c1,1,M_jls);
　　The_result:=Dbms_sql.execute(The_c1);
　　If dbms_sql.fetch_rows(cursor1) > 0 then
　　Dbms_sql.column_value(cursor1,1,M_jls);
　　End if;
　　Dbms_sql.close_cursor(The_C1);