Oracle 存储过程

查看存储过程：
desc user_procedures;
select text from user_source where name='MYPROC' order by line;

创建存储过程：
--参数默认为in，不能有长度。
create or replace procedure myproc(id in varchar2)
is
name varchar2(10);
begin
select dname into name from dept where deptno=id;
dbms_output.put_line(name);
end;
/

show errors

显示存储过程中的错误。
show errors procedure myproc;

执行存储过程：
declare
tid varchar2(10);
begin
tid:='10';
myproc(tid);
end;
/

或使用execute命令，用于只有输入，没有输出参数，且参数为常量的情况中。
execute myproc(10);

存储过程的输入、输出参数：
create or replace procedure myproc2(id varchar2,name out varchar2)
is
begin
select dname into name from dept where deptno=id;
end;
/

调用：
declare
tid varchar2(10);
tname varchar2(10);
begin
tid:=20;
myproc2(tid,tname);
dbms_output.put_line(tname);
end;
/
IN/OUT参数：
create or replace procedure p
(v_a in number, v_b number, v_ret out number, v_temp in out number)
is
--v_b number,不写默认是in
begin
if (v_a > v_b) then
v_ret := v_a;
else
v_ret := v_b;
end if;
v_temp := v_temp + 1;
end;

调用：
declare
v_ret number(4);
v_temp number(4):=10;
begin
p(100,200,v_ret,v_temp);
dbms_output.put_line(v_ret||','||v_temp);
end;
/

创建函数：
create or replace function sal_tax
(v_sal number)
return number
is
begin
if (v_sal < 2000) then
return 0.10;
elsif (v_sal <2750) then
return 0.15;
else
return 0.20;
end if;
end;
/

调用:
select lower(ename), sal_tax(sal) from emp;