Oracle知识整理__第三章 常用系统存储过程

第三章 常用系统存储过程
3.1 oracle 存储过程的基本语法
3.1.1 基本结构 
CREATE OR REPLACE PROCEDURE 存储过程名字
(
    参数1 IN NUMBER,
    参数2 IN NUMBER
) IS
变量1 INTEGER :=0;
变量2 DATE;
BEGIN 
END 存储过程名字
3.1.2 SELECT INTO STATEMENT
将select查询的结果存入到变量中，可以同时将多个列存储多个变量中，必须有一条记录，否则抛出异常(如果没有记录抛出NO_DATA_FOUND)
  例子：
  BEGIN
  SELECT col1,col2 into 变量1,变量2 FROM typestruct where xxx;
  EXCEPTION
  WHEN NO_DATA_FOUND THEN
      xxxx;
  END;
  ...3.1.3 IF 判断
  IF V_TEST=1 THEN
    BEGIN 
       do something
    END;
  END IF;3.1.4 while 循环
  WHILE V_TEST=1 LOOP
  BEGIN
 XXXX
  END;
  END LOOP;3.1.5 变量赋值
  V_TEST := 123;3.1.6 用for in 使用cursor
  ...
  IS
  CURSOR cur IS SELECT * FROM xxx;
  BEGIN
 FOR cur_result in cur LOOP
  BEGIN
   V_SUM :=cur_result.列名1+cur_result.列名2
  END;
 END LOOP;
  END;3.1.7 带参数的cursor
  CURSOR C_USER(C_ID NUMBER) IS SELECT NAME FROM USER WHERE TYPEID=C_ID;
  OPEN C_USER(变量值);
  LOOP
 FETCH C_USER INTO V_NAME;
 EXIT FETCH C_USER%NOTFOUND;
    do something
  END LOOP;
  CLOSE C_USER;
3.2 过程返回记录集：
CREATE OR REPLACE PACKAGE pkg_test
　　AS
　　TYPE myrctype IS REF CURSOR;
　
　　PROCEDURE get (p_id NUMBER, p_rc OUT myrctype);
　　END pkg_test;
　　/
　　
　　CREATE OR REPLACE PACKAGE BODY pkg_test
　　AS
　　PROCEDURE get (p_id NUMBER, p_rc OUT myrctype)
　　IS
　　sqlstr　 VARCHAR2 (500);
　　BEGIN
　　IF p_id = 0 THEN
　　OPEN p_rc FOR
　　SELECT ID, NAME, sex, address, postcode, birthday
　　FROM student;
　　ELSE
　　sqlstr :=
　　'select id,name,sex,address,postcode,birthday
　　from student where id=:w_id';
　　OPEN p_rc FOR sqlstr USING p_id;
　　END IF;
　　END get;
　　END pkg_test;
　　/3.3 函数返回记录集:
建立带ref cursor定义的包和包体及函数：
　　CREATE OR REPLACE
　　package pkg_test as
　　/* 定义ref cursor类型
　　不加return类型，为弱类型，允许动态sql查询，
　　否则为强类型，无法使用动态sql查询;
　　*/
　　type myrctype is ref cursor;
　
　　--函数申明
　　function get(intID number) return myrctype;
　　end pkg_test;
　　/　　CREATE OR REPLACE
　　package body pkg_test as
　　--函数体
　　function get(intID number) return myrctype is
　　rc myrctype;　--定义ref cursor变量
　　sqlstr varchar2(500);
　　begin
　　if intID=0 then
　　--静态测试，直接用select语句直接返回结果
　　open rc for select id,name,sex,address,postcode,birthday from student;
　　else
　　--动态sql赋值，用:w_id来申明该变量从外部获得
　　sqlstr := 'select id,name,sex,address,postcode,birthday from
　　student where id=:w_id';
　　--动态测试，用sqlstr字符串返回结果，用using关键词传递参数
　　open rc for sqlstr using intid;
　　end if;
　
　　return rc;
　　end get;
　
　　end pkg_test;oracle存储过程的常用语法create or replace procedure sp_test   
(   
aa in varchar,   
bb in number default 0   
) is  
v_pos varchar(50);   
v_num number;   
begin  
  ---字符串查找和替换   
 select SUBSTR(PARAMETER, 1, INSTR(PARAMETER,branchId)-2) ||   
           SUBSTR(PARAMETER, INSTR(PARAMETER,branchId)+length(branchId)) into v_pos from dual;   
    
 ---循环的使用          
 loop   
    if bb is null then ---if 判断   
       exit;   ---退出循环   
    end if;   
    if v_num >= bb then  
       exit;   
    end if;   
    v_num := v_num +1;   
  end loop;   
              
    ---输出信息   
    dbms_output.put_line('aaaaa');   
  
    ..   
     
  commit;   
  exception   
      when NO_DATA_FOUND then  --没有记录的异常   
          dbms_output.put_line('ddddd');   
    when others then  
    begin  
    --输出错误信息   
      dbms_output.put_line(sqlerrm);   
      rollback;   
         
      ---抛出异常   
      raise;   
    end;     
end sp_test;  
3.4 创建表：
CREATE TABLE "QJFUND"."TEST1" 
   (    "TESTID" VARCHAR2(80 BYTE), 
    "NAME" VARCHAR2(20 BYTE), 
    "PASSWORD" VARCHAR2(20 BYTE)
   )3.5 创建存储过程：
(a)无返回值的存储过程：
create or replace PROCEDURE TESTA(PARA1 IN VARCHAR2) AS   --PARA1为输入参数
BEGIN
   update Test1 set testid = para1;
END TESTA;(b)有返回值的存储过程：
create or replace PACKAGE pkg_test --本例中包名为pkg_test 
AS
    TYPE myrctype IS REF CURSOR;
    PROCEDURE get (p_id NUMBER, p_rc OUT myrctype); --存储过程名为get，有一输入参数NUMBER，一输出参数myrctypeEND pkg_test;
/   --该斜线不可省略，否则有错
create or replace PACKAGE BODY pkg_test
AS
    PROCEDURE get (p_id NUMBER, p_rc OUT myrctype)
    IS
       sqlstr   VARCHAR2 (500);
    BEGIN
       IF p_id = 0 THEN
          OPEN p_rc FOR
             SELECT *
               FROM test1;
       ELSE
          sqlstr :=
             'select name,password
            from test1';
          OPEN p_rc FOR sqlstr;-- USING p_id
       END IF;
    END get;
END pkg_test;
/ --该斜线不可省略，否则有错
3.6 Java调用：Session oracleSession = HibernateSessionFactory.getSession(); //Hibernate Session
        Connection conn = oracleSession.connection(); //获取Oracle Connection
        try {
            CallableStatement proc = conn.prepareCall("{ call TESTA(?) }"); //调用无返回值的存储过程TESTA
            proc.setString(1, "ss"); //设置存储过程中定义的参数，参数从1开始
            oracleSession.beginTransaction();
            proc.execute(); //运行存储过程
            oracleSession.getTransaction().commit();            proc = conn.prepareCall("{ call pkg_test.get(?,?) }"); //调用返回列表的存储过程
            proc.setInt(1, 1); //设置存储过程的参数，从1开始
            proc.registerOutParameter(2, oracle.jdbc.OracleTypes.CURSOR); 
            oracleSession.beginTransaction(); 
            proc.execute(); //执行存储过程
          oracleSession.getTransaction().commit();
            ResultSet rs = (ResultSet) proc.getObject(2); //获取返回值，该处的2与存储过程定义时的输出参数位置对应。
            StringBuilder result = new StringBuilder();
            result.append("<table>");
            while (rs.next()) {
                result.append("<tr><td>" + rs.getString(1) + "</td><td>"
                                + rs.getString(2) + "</td></tr>");
            }    // rs.getString(1)对应查询结果的第一列
            result.append("</table>");
            request.setAttribute("result", result.toString());        } catch (Exception e) {
            e.printStackTrace();
        }