Oracle存储过程

先来一个简单的例子,有个感性认识.

主要是查询,打印,插入.

以下是转载

1.基本结构 
CREATE OR REPLACE PROCEDURE 存储过程名字
(
    参数1 IN NUMBER,
    参数2 IN NUMBER
) IS
变量1 INTEGER :=0;
变量2 DATE;
BEGIN

END 存储过程名字

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.IF 判断
  IF V_TEST=1 THEN
    BEGIN 
       do something
    END;
  END IF;

4.while 循环
  WHILE V_TEST=1 LOOP
  BEGIN
 XXXX
  END;
  END LOOP;

5.变量赋值
  V_TEST := 123;

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;

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;

8.用pl/sql developer debug
  连接数据库后建立一个Test WINDOW
  在窗口输入调用SP的代码,F9开始debug,CTRL+N单步调试

1 create or replace procedure  NoParPro
2 as   ;
3 begin
4  ;
5  exception     //存储过程异常
6      ;
7 end ;
8 

 1 create or replace procedure queryempname(sfindno emp.empno%type) as
 2        sName emp.ename% type;
 3        sjob emp.job% type;
 4 begin
 5        ....
 7 exception
          ....
14 end ;
15 

 1 create or replace procedure runbyparmeters  (isal in emp.sal% type, 
                            sname out varchar,sjob in out varchar )
 2  as icount number ;
 3  begin
 4       select count(*) into icount from emp where sal>isal and job= sjob;
 5       if icount=1 then
 6         ....
 9       else
10         ....
12       end if ;
13   exception
14       when too_many_rows then
15       DBMS_OUTPUT.PUT_LINE('返回值多于1行' );
16       when others then
17       DBMS_OUTPUT.PUT_LINE('在RUNBYPARMETERS过程中出错！' );
18  end ;
19 

 1 declare
 2        realsal emp.sal% type;
 3        realname varchar(40 );
 4        realjob varchar(40 );
 5  begin   //存储过程调用开始
 6        realsal:=1100 ;
 7        realname:='' ;
 8        realjob:='CLERK' ;
 9        runbyparmeters(realsal,realname,realjob);     －－ 必须按顺序
10        DBMS_OUTPUT.PUT_LINE(REALNAME||'   '|| REALJOB);
11  END ;  //过程调用结束
12 

 1 declare
 2       realsal emp.sal% type;
 3       realname varchar(40 );
 4       realjob varchar(40 );
 5 begin    //过程调用开始
 6       realsal:=1100 ;
 7       realname:='' ;
 8       realjob:='CLERK' ;
 9       runbyparmeters(sname=>realname,isal=>realsal,sjob=>realjob);  －－ 指定值对应变量顺序可变
10       DBMS_OUTPUT.PUT_LINE(REALNAME||'   '|| REALJOB);
11 END ;  //过程调用结束
12