Oracle+PlSql存储过程

('Oracle存储过程目录Oracle存储过程...............................................................................................................................1Oracle存储过程基础知识...............................................................................................................1Oracle存储过程的基本语法...........................................................................................................2关于Oracle存储过程的若干问题备忘...........................................................................................41.在Oracle中，数据表别名不能加as。..........................................................................42.在存储过程中，select某一字段时，后面必须紧跟into，如果select整个记录，利用游标的话就另当别论了。...................................................................................................53.在利用select...into...语法时，必须先确保数据库中有该条记录，否则会报出"nodatafound"异常。...................................................................................................................54.在存储过程中，别名不能和字段名称相同，否则虽然编译可以通过，但在运行阶段会报错..................................................................................................................................55.在存储过程中，关于出现null的问题...........................................................................56.Hibernate调用Oracle存储过程......................................................................................6用Java调用Oracle存储过程总结..................................................................................................6一、无返回值的存储过程...............................................................................................6二、有返回值的存储过程（非列表）...........................................................................8三、返回列表..................................................................................................................9在存储过程中做简单动态查询.....................................................................................................11一、本地动态SQL.........................................................................................................12二、使用DBMS_SQL包.................................................................................................13Oracle存储过程调用Java方法.....................................................................................................16Oracle高效分页存储过程实例.....................................................................................................17Oracle存储过程基础知识商业规则和业务逻辑可以通过程序存储在Oracle中，这个程序就是存储过程。存储过程是SQL,PL/SQL,Java语句的组合，它使你能将执行商业规则的代码从你的应用程序中移动到数据库。这样的结果就是，代码存储一次但是能够被多个程序使用。要创建一个过程对象（proceduralobject），必须有CREATEPROCEDURE系统权限。如果这个过程对象需要被其他的用户schema使用，那么你必须有CREATEANYPROCEDURE权限。执行procedure的时候，可能需要excute权限。或者EXCUTEANYPROCEDURE权限。如果单独赋予权限，如下例所示：grantexecuteonMY_PROCEDUREtoJelly调用一个存储过程的例子：executeMY_PROCEDURE(\'ONEPARAMETER\');存储过程(PROCEDURE)和函数(FUNCTION)的区别。function有返回值，并且可以直接在Query中引用function和或者使用function的返回值。本质上没有区别,都是PL/SQL程序,都可以有返回值。最根本的区别是：存储过程是命令,而函数是表达式的一部分。比如：selectmax(NAME)FROM但是不能execmax(NAME)如果此时max是函数。PACKAGE是function，procedure，variables和sql语句的组合。package允许多个procedure使用同一个变量和游标。创建procedure的语法：CREATE[ORREPLACE]PROCEDURE[schema.]procedure[(argument[INOUTINOUT][NOCOPY]datatype[,argument[INOUTINOUT][NOCOPY]datatype]...)][authid{current_userdefiner}]{isas}{pl/sql_subprogram_bodylanguage{javaname\'String\'c[name,name]librarylib_name}]Sql代码：CREATEPROCEDUREsam.credit(acc_noINNUMBER,amountINNUMBER)ASBEGINUPDATEaccountsSETbalance=balance+amountWHEREaccount_id=acc_no;END;可以使用createorreplaceprocedure语句，这个语句的用处在于，你之前赋予的excute权限都将被保留。IN,OUT,INOUT用来修饰参数。IN表示这个变量必须被调用者赋值然后传入到PROCEDURE进行处理。OUT表示PRCEDURE通过这个变量将值传回给调用者。INOUT则是这两种的组合。authid代表两种权限：定义者权限（difinerright默认），执行者权限（invokerright）。定义者权限说明这个procedure中涉及的表，视图等对象所需要的权限只要定义者拥有权限的话就可以访问。执行者权限则需要调用这个procedure的用户拥有相关表和对象的权限。Oracle存储过程的基本语法1.基本结构CREATEORREPLACEPROCEDURE存储过程名字(参数1INNUMBER,参数2INNUMBER)IS变量1INTEGER:=0;变量2DATE;BEGINEND存储过程名字2.SELECTINTOSTATEMENT将select查询的结果存入到变量中，可以同时将多个列存储多个变量中，必须有一条记录，否则抛出异常(如果没有记录抛出NO_DATA_FOUND)例子：BEGINSELECTcol1,col2into变量1,变量2FROMtypestructwherexxx;EXCEPTIONWHENNO_DATA_FOUNDTHENxxxx;END;...3.IF判断IFV_TEST=1THENBEGINdosomethingEND;ENDIF;4.while循环WHILEV_TEST=1LOOPBEGINXXXXEND;ENDLOOP;5.变量赋值V_TEST:=123;6.用forin使用cursor...ISCURSORcurISSELECTFROMxxx;BEGINFORcur_resultincurLOOPBEGINV_SUM:=cur_result.列名1+cur_result.列名2END;ENDLOOP;END;7.带参数的cursorCURSORC_USER(C_IDNUMBER)ISSELECTNAMEFROMUSERWHERETYPEID=C_ID;OPENC_USER(变量值);LOOPFETCHC_USERINTOV_NAME;EXITFETCHC_USER%NOTFOUND;dosomethingENDLOOP;CLOSEC_USER;8.用pl/sqldeveloperdebug连接数据库后建立一个TestWINDOW在窗口输入调用SP的代码,F9开始debug,CTRL+N单步调试9.Pl/Sql中执行存储过程在sqlplus中：declare--必要的变量声明，视你的过程而定beginexecuteyourprocudure(parameter1,parameter2,...);end/在SQL/PLUS中调用存储过程，显示结果：SQL>setserveoutputon--打开输出SQL>varinfo1number;--输出1SQL>varinfo2number;--输出2SQL>declarevar1varchar2(20);--输入1var2varchar2(20);--输入2var3varchar2(20);--输入2BEGINpro(var1,var2,var3,:info1,:info2);END;/SQL>printinfo1;SQL>printinfo2;注：在EXECUTEIMMEDIATESTR语句是SQLPLUS中动态执行语句，它在执行中会自动提交，类似于DP中FORMS_DDL语句，在此语句中str是不能换行的,只能通过连接字符""，或着在在换行时加上"-"连接字符。关于Oracle存储过程的若干问题备忘1.在Oracle中，数据表别名不能加as。如：selecta.appnamefromappinfoa;--正确selecta.appnamefromappinfoasa;--错误也许，是怕和Oracle中的存储过程中的关键字as冲突的问题吧2.在存储过程中，select某一字段时，后面必须紧跟into，如果select整个记录，利用游标的话就另当别论了。selectaf.keynodeintoknfromAPPFOUNDATIONafwhereaf.appid=aidandaf.foundationid=fid;--有into，正确编译selectaf.keynodefromAPPFOUNDATIONafwhereaf.appid=aidandaf.foundationid=fid;--没有into，编译报错，提示：CompilationError:PLS-00428:anINTOclauseisexpectedinthisSELECTstatement3.在利用select...into...语法时，必须先确保数据库中有该条记录，否则会报出"nodatafound"异常。可以在该语法之前，先利用selectcount()from查看数据库中是否存在该记录，如果存在，再利用select...into...4.在存储过程中，别名不能和字段名称相同，否则虽然编译可以通过，但在运行阶段会报错selectkeynodeintoknfromAPPFOUNDATIONwhereappid=aidandfoundationid=fid;--正确运行selectaf.keynodeintoknfromAPPFOUNDATIONafwhereaf.appid=appidandaf.foundationid=foundationid;--运行阶段报错，提示：ORA-01422:exactfetchreturnsmorethanrequestednumberofrows5.在存储过程中，关于出现null的问题假设有一个表A，定义如下：createtableA(idvarchar2(50)primarykeynotnull,vcountnumber(8)notnull,bidvarchar2(50)notnull--外键);如果在存储过程中，使用如下语句：selectsum(vcount)intofcountfromAwherebid=\'xxxxxx\';如果A表中不存在bid="xxxxxx"的记录，则fcount=null(即使fcount定义时设置了默认值，如：fcountnumber(8):=0依然无效，fcount还是会变成null)，这样以后使用fcount时就可能有问题，所以在这里最好先判断一下：iffcountisnullthenfcount:=0;endif;这样就一切ok了。6.Hibernate调用Oracle存储过程this.pnumberManager.getHibernateTemplate().execute(newHibernateCallback()...{publicObjectdoInHibernate(Sessionsession)throwsHibernateException,SQLException...{CallableStatementcs=session.connection().prepareCall("{callmodifyapppnumber_remain(?)}");cs.setString(1,foundationid);cs.execute();returnnull;}});用Java调用Oracle存储过程总结一、无返回值的存储过程测试表:--CreatetablecreatetableTESTTB(IDVARCHAR2(30),NAMEVARCHAR2(30))tablespaceBOMpctfree10initrans1maxtrans255storage(initial64Kminextents1maxextentsunlimited);例:存储过程为(当然了，这就先要求要建张表TESTTB,里面两个字段（I_ID，I_NAME）。)：CREATEORREPLACEPROCEDURETESTA(PARA1INVARCHAR2,PARA2INVARCHAR2)ASBEGININSERTINTOBOM.TESTTB(ID,NAME)VALUES(PARA1,PARA2);ENDTESTA;在Java里调用时就用下面的代码：packagecom.yiming.procedure.test;importjava.sql.CallableStatement;importjava.sql.Connection;importjava.sql.DriverManager;importjava.sql.ResultSet;importjava.sql.SQLException;importjava.sql.Statement;publicclassTestProcedureDemo1{publicTestProcedureDemo1(){}publicstaticvoidmain(String[]args){Stringdriver="Oracle.jdbc.driver.OracleDriver";StringstrUrl="jdbc:Oracle:thin:@10.20.30.30:1521:vasms";Statementstmt=null;ResultSetrs=null;Connectionconn=null;CallableStatementproc=null;try{Class.forName(driver);conn=DriverManager.getConnection(strUrl,"bom","bom");proc=conn.prepareCall("{callBOM.TESTA(?,?)}");proc.setString(1,"100");proc.setString(2,"TestOne");proc.execute();}catch(SQLExceptionex2){ex2.printStackTrace();}catch(Exceptionex2){ex2.printStackTrace();}finally{try{if(rs!=null){rs.close();if(stmt!=null){stmt.close();}if(conn!=null){conn.close();}}}catch(SQLExceptionex1){}}}}二、有返回值的存储过程（非列表）例：存储过程为：CREATEORREPLACEPROCEDURETESTB(PARA1INVARCHAR2,PARA2OUTVARCHAR2)ASBEGINSELECTNAMEINTOPARA2FROMTESTTBWHEREID=PARA1;ENDTESTB;在Java里调用时就用下面的代码：packagecom.yiming.procedure.test;importjava.sql.CallableStatement;importjava.sql.Connection;importjava.sql.DriverManager;importjava.sql.ResultSet;importjava.sql.SQLException;importjava.sql.Statement;importjava.sql.Types;publicclassTestProcedureDemo2{publicstaticvoidmain(String[]args){Stringdriver="Oracle.jdbc.driver.OracleDriver";StringstrUrl="jdbc:Oracle:thin:@10.20.30.30:1521:vasms";Statementstmt=null;ResultSetrs=null;Connectionconn=null;CallableStatementproc=null;try{Class.forName(driver);conn=DriverManager.getConnection(strUrl,"bom","bom");proc=conn.prepareCall("{callBOM.TESTB(?,?)}");proc.setString(1,"100");proc.registerOutParameter(2,Types.VARCHAR);proc.execute();StringtestPrint=proc.getString(2);System.out.println("=testPrint=is="+testPrint);}catch(SQLExceptionex2){ex2.printStackTrace();}catch(Exceptionex2){ex2.printStackTrace();}finally{try{if(rs!=null){rs.close();if(stmt!=null){stmt.close();}if(conn!=null){conn.close();}}}catch(SQLExceptionex1){}}}}注意，这里的proc.getString(2)中的数值2并非任意的，而是和存储过程中的out列对应的，如果out是在第一个位置，那就是proc.getString(1)，如果是第三个位置，就是proc.getString(3)，当然也可以同时有多个返回值，那就是再多加几个out参数了。三、返回列表由于Oracle存储过程没有返回值，它的所有返回值都是通过out参数来替代的，列表同样也不例外，但由于是集合，所以不能用一般的参数，必须要用pagkage了.所以要分两部分，1.建一个程序包。如下：CREATEORREPLACEPACKAGETESTPACKAGEASTYPETEST_CURSORISREFCURSOR;endTESTPACKAGE;2.建立存储过程，存储过程为：CREATEORREPLACEPROCEDURETESTC(P_CURSORoutTESTPACKAGE.TEST_CURSOR)ISBEGINOPENP_CURSORFORSELECTFROMBOM.TESTTB;ENDTESTC;可以看到，它是把游标（可以理解为一个指针），作为一个out参数来返回值的。在Java里调用时就用下面的代码：在这里要注意，在执行前一定要先把Oracle的驱动包放到class路径里，否则会报错的。packagecom.yiming.procedure.test;importjava.sql.CallableStatement;importjava.sql.Connection;importjava.sql.DriverManager;importjava.sql.ResultSet;importjava.sql.SQLException;importjava.sql.Statement;publicclassTestProcedureDemo3{publicstaticvoidmain(String[]args){Stringdriver="Oracle.jdbc.driver.OracleDriver";StringstrUrl="jdbc:Oracle:thin:@10.20.30.30:1521:vasms";Statementstmt=null;ResultSetrs=null;Connectionconn=null;CallableStatementproc=null;try{Class.forName(driver);conn=DriverManager.getConnection(strUrl,"bom","bom");proc=conn.prepareCall("{callbom.testc(?)}");proc.registerOutParameter(1,Oracle.jdbc.OracleTypes.CURSOR);proc.execute();rs=(ResultSet)proc.getObject(1);while(rs.next()){System.out.println(""+rs.getString(1)+""+rs.getString(2)+"");}}catch(SQLExceptionex2){ex2.printStackTrace();}catch(Exceptionex2){ex2.printStackTrace();}finally{try{if(rs!=null){rs.close();if(stmt!=null){stmt.close();}if(conn!=null){conn.close();}}}catch(SQLExceptionex1){}}}}在存储过程中做简单动态查询在存储过程中做简单动态查询代码,例如:CREATEORREPLACEprocedureZXM_SB_GZ_GET(p_tableinvarchar2,p_nameinvarchar2,p_valueinvarchar2,outparaoutlntxdba.zxm_pag_cs_power.c_type)asbegindeclarewherevaluevarchar2(200);beginwherevalue:=selectfromp_tablewherep_name=p_value;openoutparaforwherevalue;end;end;一般的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是使用EXECUTEIMMEDIATE语句来实现的。1、本地动态SQL执行DDL语句：需求：根据用户输入的表名及字段名等参数动态建表。createorreplaceprocedureproc_test(table_nameinvarchar2,--表名field1invarchar2,--字段名datatype1invarchar2,--字段类型field2invarchar2,--字段名datatype2invarchar2--字段类型)asstr_sqlvarchar2(500);beginstr_sql:=’createtable’table_name’(’field1’’datatype1’,’field2’’datatype2’)’;executeimmediatestr_sql;--动态执行DDL语句exceptionwhenothersthennull;end;以上是编译通过的存储过程代码。下面执行存储过程动态建表。SQL>executeproc_test(’dinya_test’,’id’,’number(8)notnull’,’name’,’varchar2(100)’);PL/SQLproceduresuccessfullycompletedSQL>descdinya_test;NameTypeNullableDefaultComments----------------------------------------IDNUMBER(8)NAMEVARCHAR2(100)YSQL>到这里，就实现了我们的需求，使用本地动态SQL根据用户输入的表名及字段名、字段类型等参数来实现动态执行DDL语句。2、本地动态SQL执行DML语句。需求：将用户输入的值插入到上例中建好的dinya_test表中。createorreplaceprocedureproc_insert(idinnumber,--输入序号nameinvarchar2--输入姓名)asstr_sqlvarchar2(500);beginstr_sql:=’insertintodinya_testvalues(:1,:2)’;executeimmediatestr_sqlusingid,name;--动态执行插入操作exceptionwhenothersthennull;end;执行存储过程，插入数据到测试表中。SQL>executeproc_insert(1,’dinya’);PL/SQLproceduresuccessfullycompletedSQL>selectfromdinya_test;IDNAME1dinya在上例中，本地动态SQL执行DML语句时使用了using子句，按顺序将输入的值绑定到变量，如果需要输出参数，可以在执行动态SQL的时候，使用RETURNINGINTO子句，如：declarep_idnumber:=1;v_countnumber;beginv_string:=’selectcount()fromtable_nameawherea.id=:id’;executeimmediatev_stringintov_countusingp_id;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包根据用户输入的表名、字段名及字段类型建表。createorreplaceprocedureproc_dbms_sql(table_nameinvarchar2,--表名field_name1invarchar2,--字段名datatype1invarchar2,--字段类型field_name2invarchar2,--字段名datatype2invarchar2--字段类型)asv_cursornumber;--定义光标v_stringvarchar2(200);--定义字符串变量v_rownumber;--行数beginv_cursor:=dbms_sql.open_cursor;--为处理打开光标v_string:=’createtable’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);--执行语句dbms_sql.close_cursor(v_cursor);--关闭光标exceptionwhenothersthendbms_sql.close_cursor(v_cursor);--关闭光标raise;end;以上过程编译通过后，执行过程创建表结构：SQL>executeproc_dbms_sql(’dinya_test2’,’id’,’number(8)notnull’,’name’,’varchar2(100)’);PL/SQLproceduresuccessfullycompletedSQL>descdinya_test2;NameTypeNullableDefaultComments----------------------------------------IDNUMBER(8)NAMEVARCHAR2(100)YSQL>2、使用DBMS_SQL包执行DML语句需求：使用DBMS_SQL包根据用户输入的值更新表中相对应的记录。查看表中已有记录：SQL>selectfromdinya_test2;IDNAME1Oracle2CSDN3ERPSQL>建存储过程，并编译通过：createorreplaceprocedureproc_dbms_sql_update(idnumber,namevarchar2)asv_cursornumber;--定义光标v_stringvarchar2(200);--字符串变量v_rownumber;--行数beginv_cursor:=dbms_sql.open_cursor;--为处理打开光标v_string:=’updatedinya_test2aseta.name=:p_namewherea.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);--执行动态ＳＱＬdbms_sql.close_cursor(v_cursor);--关闭光标exceptionwhenothersthendbms_sql.close_cursor(v_cursor);--关闭光标raise;end;执行过程，根据用户输入的参数更新表中的数据：SQL>executeproc_dbms_sql_update(2,’csdn_dinya’);PL/SQLproceduresuccessfullycompletedSQL>selectfromdinya_test2;IDNAME1Oracle2csdn_dinya3ERPSQL>执行过程后将第二条的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,’:p_name’,name)），分析后不需要执行DBMS_SQL.Bind_Variable，直接将输入的变量加到字符串中即可。另外，DDL是在调用DBMS_SQL.PARSE时执行的，所以DBMS_SQL.EXECUTE也可以不用，即在上例中的v_row:=dbms_sql.execute(v_cursor)部分可以不要。Oracle存储过程调用Java方法存储过程中调用Java程序段软件环境：1、操作系统：Windows2000Server2、数据库：Oracle8iR2(8.1.7)forNT企业版3、安装路径：C:\\ORACLE实现方法：1、创建一个文件为Test.javapublicclassTest{publicstaticvoidmain(Stringargs[]){System.out.println("HELLOTHISiSAJavaPROCEDURE");}}2、javacTest.java3、javaTest4、SQL>connsystem/managerSQL>grantcreateanydirectorytoscott;SQL>connscott/tigerSQL>createorreplacedirectorytest_diras\'d:\\\';目录已创建。SQL>createorreplacejavaclassusingbfile(test_dir,\'TEST.CLASS\')2/Java已创建。SQL>selectobject_name,object_type,STATUSfromuser_objects;SQL>createorreplaceproceduretest_javaaslanguagejavaname\'TEST.main(java.lang.String[])\';/过程已创建。SQL>setserveroutputonsize5000SQL>calldbms_java.set_output(5000);调用完成。SQL>executetest_java;HELLOTHISiSAJavaPROCEDUREPL/SQL过程已成功完成。SQL>calltest_java();HELLOTHISiSAJavaPROCEDURE调用完成。Oracle8I9I都测试通过。Oracle高效分页存储过程实例createorreplacepackagep_pageis--Author:PHARAOHS--Created:2006-4-3014:14:14--Purpose:分页过程TYPEtype_curISREFCURSOR;--定义游标变量用于返回记录集PROCEDUREPagination(Pindexinnumber,--分页索引Psqlinvarchar2,--产生dataset的sql语句Psizeinnumber,--页面大小Pcountoutnumber,--返回分页总数v_curouttype_cur--返回当前页数据记录);procedurePageRecordsCount(Psqlcountinvarchar2,--产生dataset的sql语句Prcountoutnumber--返回记录总数);endp_page;/createorreplacepackagebodyp_pageisPROCEDUREPagination(Pindexinnumber,Psqlinvarchar2,Psizeinnumber,Pcountoutnumber,v_curouttype_cur)ASv_sqlVARCHAR2(1000);v_countnumber;v_Plownumber;v_Pheinumber;Begin------------------------------------------------------------取分页总数v_sql:=\'selectcount()from(\'Psql\')\';executeimmediatev_sqlintov_count;Pcount:=ceil(v_count/Psize);------------------------------------------------------------显示任意页内容v_Phei:=PindexPsize+Psize;v_Plow:=v_Phei-Psize+1;--Psql:=\'selectrownumrn,t.fromzzdat\';--要求必须包含rownum字段v_sql:=\'selectfrom(\'Psql\')wherernbetween\'v_Plow\'and\'v_Phei;openv_curforv_sql;EndPagination;--procedurePageRecordsCount(Psqlcountinvarchar2,Prcountoutnumber)asv_sqlvarchar2(1000);v_prcountnumber;beginv_sql:=\'selectcount()from(\'Psqlcount\')\';executeimmediatev_sqlintov_prcount;Prcount:=v_prcount;--返回记录总数endPageRecordsCount;--endp_page;/',)