Oracle 10g存储过程学习一

--1、创建存储过程(无参数)

create or replace procedure out_time
is
begin
dbms_output.put_line(systimestamp);
end;
--调用存储过程
exec out_time;
call out_time();

--结果
24-11月-10 08.59.35.500000000 上午 +08:00

--2、创建存储过程(有参数，且显示指定为输入参数，如果不指定参数模式，默认为输入参数)

create or replace procedure update_comtype_name
(param_name in communitytype.name%type)
is
begin
--修改名称
update communitytype
set communitytype.english_name = param_name
where communitytype.community_type_id = 'ebook';
commit;
--异常处理
exception
when no_data_found then
dbms_output.put_line('没有找到资源库');
end;

--调用存储过程
call update_comtype_name('电子图书');

--结果
--调用前

--3 ebook 电子图书 电子图书

--调用后

--3 ebook 电子图书 电子图书1

--3、创建存储过程(有参数，且显示指定为输出参数，同时赋默认值)

create or replace procedure update_comtype_name
(param_id in communitytype.community_type_id%type,new_name out communitytype.name%type)
is
begin
--查询修改后的值
select communitytype.english_name into new_name
from communitytype
where communitytype.community_type_id = param_id;
--输出
dbms_output.put_line(new_name);
end;
--调用存储过程(在pl/sql中打开commond窗口)
var new_name varchar2(500);
exec update_comtype_name('ebook',:new_name);

--结果

--PL/SQL procedure successfully completed
--new_name
---------
--电子图书

--4、修改后再查询修改后的值

create or replace procedure update_comtype_name
(
param_id in communitytype.community_type_id%type,
param_eng_name in communitytype.english_name%type,
new_name out communitytype.name%type
)
is
begin
--修改名称
update communitytype
set communitytype.english_name = param_eng_name
where communitytype.community_type_id = param_id;
commit;
--查询修改后的值
select communitytype.english_name into new_name
from communitytype
where communitytype.community_type_id = param_id;
--输出
dbms_output.put_line(new_name);
end;

--调用存储过程(在pl/sql中打开commond窗口)
var new_name varchar2(500);
exec update_comtype_name('ebook','电子图书修改',:new_name);

--结果
--SQL> var new_name varchar2(500);
--SQL> exec update_comtype_name('ebook','电子图书修改',:new_name);

--PL/SQL procedure successfully completed
--new_name
-----------
--电子图书修改

--5、删除过程

drop procedure update_comtype_name;

--6、创建存储过程时，将参数同时设置为输入和输出

create or replace procedure compute
(num1 in out number,num2 in out number)
is
--在利用输入参数时，需要定义临时变量将运算结果保存起来
v1 number;
v2 number;
begin
v1:=num1/num2;
v2:=mod(num1,num2);
--最后返回结果时，将临时参数的值赋给输入参数(即输出参数)
num1:=v1;
num2:=v2;
end;

SQL> var n1 number;
SQL> var n2 number;
SQL> exec :n1 :=100

PL/SQL procedure successfully completed
n1
---------
100

SQL> exec :n2:=30

PL/SQL procedure successfully completed
n2
---------
30

SQL> exec compute(:n1,:n2);

PL/SQL procedure successfully completed
n1
---------
3.33333333333333
n2
---------
10