Oracle存储过程

Oracle存储过程
存储过程不仅可以简化客户端应用程序的开发和维护,而且还可以提高应用程序的运行性能。
语法格式如下:
create or replace PROCEDURE procedure_name
(argument1 in datatype1,argument2 out datatype2,argument3 in out datatype3)
is
可以在这里定义变量
begin

end;
执行存储过程的语法格式:
无参数的存储过程
===========================================
eg: create or replace procedure pro_outtime
IS
BEGIN
dbms_output.put_line(systimestamp);
END;
执行: exec pro_outtime;
============================================
只有输入参数的存储过程,in 可以省略。
============================================
eg: create or replace procedure pro_addemployee
(eno NUMBER,empname VARCHAR2,sal NUMBER,job VARCHAR2 default 'CLERK',dno NUMBER)
is
e_integrity EXCEPTION;
pragma exception_init(e_integrity,-2291);
begin
insert into emp(empno,ename,sal,job,deptno) values (eno,empname,sal,job,dno);
EXCEPTION
when dup_val_on_index then
raise_application_error(-20000,'雇员号不能重复');
when e_integrity then
raise_application_error(-20001,'部门号不存在');
end;
执行: exec pro_addemployee(2222,'tongjm',3456,'admin',10)
=============================================
带有out参数的存储过程
=============================================
eg: create or replace procedure proc_queryemployee
(eno number,empname out varchar2,empsal out number)
is
begin
select ename,sal into empname,empsal from emp where empno=eno;
end proc_queryemployee;
执行:SQL> var e varchar2(50);
SQL> var s number;
SQL> exec proc_queryemployee(7788,:e,:s)
=============================================
带有in out参数的存储过程
=============================================
eg: create or replace procedure proc_testinout(var1 in out number,var2 in out number) is
v1 number;
v2 number;
begin
v1:= var1/var2;
v2:=mod(var1,var2);
var1:=v1;
var2:=v2;
end proc_testinout;
执行: SQL> var n1 number;
SQL> var n2 number;
SQL> exec :n1:=15;
SQL> exec :n2:=10;
SQL> exec proc_testinout(:n1,:n2)
=============================================
为参数传递变量和数据
=============================================
位置传递: exec add_dept(50,'sales','new york');
exec add_dept(60);
exec add_dept(70,'admin');
名称传递: exec add_dept(dname=>'sales',dno=>50);
组合传递: exec add_dept(60,dname=>'sales');
==============================================
如何查看存储过程源代码
select text from user_source where name='存储过程名';
===============================================
删除存储过程
drop procedure 存储过程名;