Oracle存储过程基础知识
商业规则和业务逻辑可以通过程序存储在Oracle中,这个程序就是存储过程。
存储过程是sql,PL/sql,Java语句的组合,它使你能将执行商业规则的代码从你的应用程序中移动到数据库。这样的结果就是,代码存储一次但是能够被多个程序使用。
要创建一个过程对象(procedural object),必须有 CREATE PROCEDURE 系统权限。如果这个过程对象需要被其他的用户schema 使用,那么你必须有 CREATE ANY PROCEDURE 权限。执行 procedure 的时候,可能需要excute权限。或者EXCUTE ANYPROCEDURE 权限。如果单独赋予权限,如下例所示:
grant execute on MY_PROCEDURE to Jelly
调用一个存储过程的例子:
execute MY_PROCEDURE( 'ONE PARAMETER');
存储过程(PROCEDURE)和函数(FUNCTION)的区别。
function有返回值,并且可以直接在Query中引用function和或者使用function的返回值。
本质上没有区别,都是 PL/sql 程序,都可以有返回值。最根本的区别是:存储过程是命令,而函数是表达式的一部分。比如:
select max(NAME)FROM
但是不能 exec max(NAME) 如果此时max是函数。
PACKAGE是function,procedure,variables 和sql 语句的组合。package允许多个procedure使用同一个变量和游标。
创建 procedure的语法:
CREATE [ OR REPLACE ] PROCEDURE [ schema.]procedure [(argument [IN | OUT | IN OUT ] [NO COPY] datatype [,argument [IN | OUT | IN OUT ] [NO COPY] datatype]... )] [ authid { current_user | definer }] { is | as } { pl/sql_subprogram_body | language {Javaname 'String' | c [ name,name] library lib_name }] |
CREATE PROCEDURE sam.credit (acc_no IN NUMBER,amount IN NUMBER) AS BEGIN UPDATE accounts SET balance = balance + amount WHERE account_id = acc_no; END; |
可以使用 create or replace procedure 语句, 这个语句的用处在于,你之前赋予的excute权限都将被保留。
IN,OUT,IN OUT用来修饰参数。
IN 表示这个变量必须被调用者赋值然后传入到PROCEDURE进行处理。
OUT 表示PRCEDURE 通过这个变量将值传回给调用者。
IN OUT 则是这两种的组合。
authid代表两种权限:
定义者权限(difiner right 默认),执行者权限(invoker right)。
定义者权限说明这个procedure中涉及的表,视图等对象所需要的权限只要定义者拥有权限的话就可以访问。
执行者权限则需要调用这个 procedure的用户拥有相关表和对象的权限。
Oracle存储过程的基本语法
1. 基本结构
CREATE OR REPLACE PROCEDURE 存储过程名字 END 存储过程名字 |
2. SELECTINTO STATEMENT
将select查询的结果存入到变量中,可以同时将多个列存储多个变量中,必须有一条
记录,否则抛出异常(如果没有记录抛出NO_DATA_FOUND)
例子:
BEGIN WHEN OTHERS THEN xxxx; |
3. IF 判断
IF V_TEST=1 THEN |
4. while 循环
WHILE V_TEST=1 LOOP |
5. 变量赋值
V_TEST := 123; |
6. 用for in 使用cursor
... |
7. 带参数的cursor
CURSOR C_USER(C_ID NUMBER) IS SELECT NAME FROM USER WHERE TYPEID=C_ID; |
8. 用pl/sql developer debug
连接数据库后建立一个Test WINDOW
在窗口输入调用SP的代码,F9开始debug,CTRL+N单步调试
9. Pl/sql中执行存储过程
在sql*plus中:
declare |
@H_271_301@在@H_271_301@sql/PLUS@H_271_301@中调用存储过程,显示结果:@H_271_301@
sql>declare var1 varchar2(20);--输入1 var2 varchar2(20);--输入2 var3 varchar2(20);--输入2 BEGIN pro(var1,var2,var3,:info1,:info2); END; / sql>print info1; sql>print info2; |
注:在EXECUTE IMMEDIATESTR语句是sqlPLUS中动态执行语句,它在执行中会自动提交,类似于DP中FORMS_DDL语句,在此语句中str是不能换行的,只能通过连接字符"||",或着在在换行时加上"-"连接字符。
关于Oracle存储过程的若干问题备忘
1. 在Oracle中,数据表别名不能加as。
如:
selecta.appnamefromappinfoa;--正确
selecta.appnamefromappinfoasa;--错误
也许,是怕和Oracle中的存储过程中的关键字as冲突的问题吧
2. 在存储过程中,select某一字段时,后面必须紧跟into,如果select整个记录,利用游标的话就另当别论了。
selectaf.keynodeintokn
fromAPPFOUNDATIONaf
whereaf.appid=aidandaf.foundationid=fid; --有into,正确编译
selectaf.keynode
fromAPPFOUNDATIONaf
whereaf.appid=aidandaf.foundationid=fid;--没有into,编译报错,提示:CompilationError:PLS-00428:anINTOclauseisexpectedinthisSELECTstatement
3. 在利用select...into...语法时,必须先确保数据库中有该条记录,否则会报出"no data found"异常。
可以在该语法之前,先利用select count(*) from 查看数据库中是否存在该记录,如果存在,再利用select...into...
4. 在存储过程中,别名不能和字段名称相同,否则虽然编译可以通过,但在运行阶段会报错
selectkeynodeintoknfromAPPFOUNDATIONwhereappid=aidandfoundationid=fid;
--正确运行
selectaf.keynodeintoknfromAPPFOUNDATIONafwhereaf.appid=appidandaf.foundationid=foundationid;
--运行阶段报错,提示:
ORA-01422:exactfetchreturnsmorethanrequestednumberofrows
5. 在存储过程中,关于出现null的问题
假设有一个表A,定义如下:
createtableA( |
如果在存储过程中,使用如下语句:
selectsum(vcount)intofcountfromAwherebid='xxxxxx';
如果A表中不存在bid="xxxxxx"的记录,则fcount=null(即使fcount定义时设置了默认值,如:fcountnumber(8):=0依然无效,fcount还是会变成null),这样以后使用fcount时就可能有问题,所以在这里最好先判断一下:
iffcountisnullthen
fcount:=0;
endif;
这样就一切ok了。
6. Hibernate调用Oracle存储过程
this.pnumberManager.getHibernateTemplate().execute( newHibernateCallback() ...{ publicObject doInHibernate(Session session) throwsHibernateException,sqlException ...{ CallableStatement cs = session .connection() .prepareCall("{call modifyapppnumber_remain(?)}"); cs.setString(1,foundationid); cs.execute(); return null; } }); |
一、无返回值的存储过程
测试表:
-- Create table create table TESTTB ( ID VARCHAR2(30), NAME VARCHAR2(30) ) tablespace BOM pctfree 10 initrans 1 maxtrans 255 storage ( initial 64K minextents 1 maxextents unlimited ); |
例: 存储过程为(当然了,这就先要求要建张表TESTTB,里面两个字段(I_ID,I_NAME)。
):
CREATE OR REPLACE PROCEDURE TESTA(PARA1 IN VARCHAR2,PARA2 IN VARCHAR2) AS BEGIN INSERT INTO BOM.TESTTB(ID,NAME) VALUES (PARA1,PARA2); END TESTA; |
package com.yiming.procedure.test;
import java.sql.CallableStatement; import java.sql.Connection; import java.sql.DriverManager; import java.sql.ResultSet; import java.sql.Statement;
public class TestProcedureDemo1 { public TestProcedureDemo1() { }
public static void main(String[] args) { String driver = "Oracle.jdbc.driver.OracleDriver"; String strUrl = "jdbc:Oracle:thin:@10.20.30.30:1521:vasms"; Statement stmt = null; ResultSet rs = null; Connection conn = null; CallableStatement proc = null; try { Class.forName(driver); conn = DriverManager.getConnection(strUrl,"bom","bom"); proc = conn.prepareCall("{ call BOM.TESTA(?,?) }"); proc.setString(1,"100"); proc.setString(2,"TestOne"); proc.execute(); } catch (sqlException ex2) { ex2.printStackTrace(); } catch (Exception ex2) { ex2.printStackTrace(); } finally { try { if (rs != null) { rs.close(); if (stmt != null) { stmt.close(); } if (conn != null) { conn.close(); } } } catch (sqlException ex1) { } } } } |
二、有返回值的存储过程(非列表)
例:存储过程为:
CREATE OR REPLACE PROCEDURE TESTB(PARA1 IN VARCHAR2,PARA2 OUT VARCHAR2) AS BEGIN SELECT NAME INTO PARA2 FROM TESTTB WHERE ID = PARA1; END TESTB; |
package com.yiming.procedure.test;
import java.sql.CallableStatement; import java.sql.Connection; import java.sql.DriverManager; import java.sql.ResultSet; import java.sql.Statement; import java.sql.Types;
public class TestProcedureDemo2 { public static void main(String[] args) { String driver = "Oracle.jdbc.driver.OracleDriver"; String strUrl = "jdbc:Oracle:thin:@10.20.30.30:1521:vasms"; Statement stmt = null; ResultSet rs = null; Connection conn = null; CallableStatement proc = null; try { Class.forName(driver); conn = DriverManager.getConnection(strUrl,"bom"); proc = conn.prepareCall("{ call BOM.TESTB(?,"100"); proc.registerOutParameter(2,Types.VARCHAR);// 2是存储过程输出参数的位置 proc.execute(); String testPrint = proc.getString(2); System.out.println("=testPrint=is=" + testPrint); } catch (sqlException ex2) { ex2.printStackTrace(); } catch (Exception ex2) { ex2.printStackTrace(); } finally { try { if (rs != null) { rs.close(); if (stmt != null) { stmt.close(); } if (conn != null) { conn.close(); } } } catch (sqlException ex1) { } } } } |
注意,这里的proc.getString(2)中的数值2并非任意的,而是和存储过程中的out列对应的,如果out是在第一个位置,那就是proc.getString(1),如果是第三个位置,就是proc.getString(3),当然也可以同时有多个返回值,那就是再多加几个out参数了。
三、返回列表
由于Oracle存储过程没有返回值,它的所有返回值都是通过out参数来替代的,列表同样也不例外,但由于是集合,所以不能用一般的参数,必须要用pagkage了.所以要分两部分,
1.建一个程序包。如下:
CREATE OR REPLACE PACKAGE TESTPACKAGE AS TYPE TEST_CURSOR IS REF CURSOR; end TESTPACKAGE; |
2.建立存储过程,存储过程为:
CREATE OR REPLACE PROCEDURE TESTC(P_CURSOR out TESTPACKAGE.TEST_CURSOR) IS BEGIN OPEN P_CURSOR FOR SELECT * FROM BOM.TESTTB; END TESTC; |
可以看到,它是把游标(可以理解为一个指针),作为一个out 参数来返回值的。
在这里要注意,在执行前一定要先把Oracle的驱动包放到class路径里,否则会报错的。
package com.yiming.procedure.test;
import java.sql.CallableStatement; import java.sql.Connection; import java.sql.DriverManager; import java.sql.ResultSet; import java.sql.Statement;
public class TestProcedureDemo3 { public static void main(String[] args) { String driver = "Oracle.jdbc.driver.OracleDriver"; String strUrl = "jdbc:Oracle:thin:@10.20.30.30:1521:vasms"; Statement stmt = null; ResultSet rs = null; Connection conn = null; CallableStatement proc = null; try { Class.forName(driver); conn = DriverManager.getConnection(strUrl,"bom"); proc = conn.prepareCall("{ call bom.testc(?) }"); proc.registerOutParameter(1,Oracle.jdbc.OracleTypes.CURSOR); proc.execute(); rs = (ResultSet) proc.getObject(1);
while (rs.next()) { System.out.println("<tr><td>" + rs.getString(1) + "</td><td>" + rs.getString(2) + "</td></tr>"); } } catch (sqlException ex2) { ex2.printStackTrace(); } catch (Exception ex2) { ex2.printStackTrace(); } finally { try { if (rs != null) { rs.close(); if (stmt != null) { stmt.close(); } if (conn != null) { conn.close(); } } } catch (sqlException ex1) { } } } } |
|
一般的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语句:
需求:根据用户输入的表名及字段名等参数动态建表。
create or replace procedure proc_test |
以上是编译通过的存储过程代码。下面执行存储过程动态建表。
sql> execute proc_test(’dinya_test’,’id’,’number(8) not null’,’name’,’varchar2(100)’); |
到这里,就实现了我们的需求,使用本地动态sql根据用户输入的表名及字段名、字段类型等参数来实现动态执行DDL语句。
2、 本地动态sql执行DML语句。
需求:将用户输入的值插入到上例中建好的dinya_test表中。
create or replace procedure proc_insert |
执行存储过程,插入数据到测试表中。
sql> execute proc_insert(1,’dinya’); |
在上例中,本地动态sql执行DML语句时使用了using子句,按顺序将输入的值绑定到变量,如果需要输出参数,可以在执行动态sql的时候,使用RETURNING INTO 子句,如:
declare |
二、使用DBMS_SQL包
A、先将要执行的sql语句或一个语句块放到一个字符串变量中。
B、使用DBMS_sql包的parse过程来分析该字符串。
C、使用DBMS_sql包的bind_variable过程来绑定变量。
1、使用DBMS_sql包执行DDL语句
需求:使用DBMS_sql包根据用户输入的表名、字段名及字段类型建表。
create or replace procedure proc_dbms_sql |
以上过程编译通过后,执行过程创建表结构:
sql> execute proc_dbms_sql(’dinya_test2’,’varchar2(100)’); |
2、 使用DBMS_sql包执行DML语句
需求:使用DBMS_sql包根据用户输入的值更新表中相对应的记录。
查看表中已有记录:
建存储过程,并编译通过:
create or replace procedure proc_dbms_sql_update |
执行过程,根据用户输入的参数更新表中的数据:
sql> execute proc_dbms_sql_update(2,’csdn_dinya’); |
执行过程后将第二条的name字段的数据更新为新值csdn_dinya。这样就完成了使用dbms_sql包来执行DML语句的功能。
使用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,name)),分析后不需要执行DBMS_sql.Bind_Variable,直接将输入的变量加到字符串中即可。另外,DDL是在调用DBMS_sql.PARSE时执行的,所以DBMS_sql.EXECUTE也可以不用,即在上例中的v_row:=dbms_sql.execute(v_cursor)部分可以不要。
存储过程中调用Java程序段
软件环境:
1、操作系统:Windows2000Server
2、数据库:Oracle8iR2(8.1.7)forNT企业版
3、安装路径:C:\ORACLE
实现方法:
1、创建一个文件为Test.java
public classTest { public static voidmain(String args[]) { System.out.println("HELLO THIS iS A Java PROCEDURE"); } } |
2、javacTest.java
3、javaTest
4、sql>connsystem/manager
sql>grantcreateanydirectorytoscott;
sql>connscott/tiger
sql>createorreplacedirectorytest_diras'd:\';
目录已创建。
sql>createorreplacejavaclassusingbfile(test_dir,'TEST.CLASS')
2/
Java已创建。
sql>selectobject_name,object_type,STATUSfromuser_objects;
sql>createorreplaceproceduretest_java
aslanguagejava
name'TEST.main(java.lang.String[])';
/
过程已创建。
sql>setserveroutputonsize5000
sql>calldbms_java.set_output(5000);
调用完成。
sql>executetest_java;
HELLOTHISiSAJavaPROCEDURE
PL/sql过程已成功完成。
sql>calltest_java();
HELLOTHISiSAJavaPROCEDURE
调用完成。
Oracle 8I9I都测试通过。
create or replace package p_page is -- Author : PHARAOHS -- Created : 2006-4-30 14:14:14 -- Purpose : 分页过程 TYPE type_cur IS REF CURSOR; --定义游标变量用于返回记录集 PROCEDURE Pagination( Pindex in number,--分页索引 Psql in varchar2,--产生dataset的sql语句 Psize in number,--页面大小 Pcount out number,--返回分页总数 v_cur out type_cur --返回当前页数据记录 ); procedure PageRecordsCount( Psqlcount in varchar2,--产生dataset的sql语句 Prcount out number --返回记录总数 ); end p_page; / create or replace package body p_page is PROCEDURE Pagination( Pindex in number,Psql in varchar2,Psize in number,Pcount out number,v_cur out type_cur ) AS v_sql VARCHAR2(1000); v_count number; v_Plow number; v_Phei number; Begin ------------------------------------------------------------取分页总数 v_sql := 'select count(*) from (' || Psql || ')'; execute immediate v_sql into v_count; Pcount := ceil(v_count/Psize); ------------------------------------------------------------显示任意页内容 v_Phei := Pindex * Psize + Psize; v_Plow := v_Phei - Psize + 1; --Psql := 'select rownum rn,t.* from zzda t' ; --要求必须包含rownum字段 v_sql := 'select * from (' || Psql || ') where rn between ' || v_Plow || ' and ' || v_Phei ; open v_cur for v_sql; End Pagination; --************************************************************************************** procedure PageRecordsCount( Psqlcount in varchar2,Prcount out number ) as v_sql varchar2(1000); v_prcount number; begin v_sql := 'select count(*) from (' || Psqlcount || ')'; execute immediate v_sql into v_prcount; Prcount := v_prcount; --返回记录总数 end PageRecordsCount; --************************************************************************************** end p_page; / |