SQL开发知识：oracle 存储过程、函数和触发器用法实例代码

create [or replace] procedure 过程名(参数列表)
as
PLSQL子程序体;

–给指定员工涨工资
create procedure addSal(empid in number)
as
psal emp.sal%type;
begin
select sal into psal from emp where empno=empid;
update emp set sal = sal * 1.1 where empno=empid;
dbms_output.put_line(empid || ‘涨工资前’ || psal || ‘涨工资后’ || (psal * 1.1));
end;

–方法一
begin
addSal(7369);
end;
–方法二
exec addSal(7369);

CREATE [OR REPLACE] FUNCTION 函数名 (参数列表)
RETURN 函数值类型
AS
PLSQL子程序体;

–查询指定员工的年收入
create function queryEmpSal(empid in number)
return number
as
psal emp.sal%type;
pcomm emp.comm%type;
begin
select sal,comm into psal,pcomm from emp where empno=empid;
return (psal*12) + nvl(pcomm,0);
end;

declare
psal number;
begin
psal:=queryEmpSal(7369);
dbms_output.put_line(psal);
end;

begin
dbms_output.put_line(queryEmpSal(7369));
end;

–包定义
create [or replace] package 包名 as
[公有数据类型定义]
[公有游标声明]
[公有变量、常量声明]
[公有子程序声明]
end 包名;

–包主体
create [or replace] package body 包名 as
[私有数据类型定义]
[私有变量、常量声明]
[私有子程序声明和定义]
[公有子程序定义]
begin
PL/SQL子程序体;
end 包名;

–创建mypackage包
create or replace package mypackage as
procedure total(num1 in number, num2 in number, num3 out number);
end mypackage;

–mypackage包体
create or replace package body mypackage as
–计算累加和的total过程
procedure total(num1 in number, num2 in number, num3 out number) as
tmp number := num1;
begin
if num2 < num1 then num3 := 0;
else num3 := tmp;
loop
exit when tmp > num2;
tmp := tmp + 1;
num3 := num3 + tmp;
end loop;
end if;
end total;

end mypackage;

declare
num1 number;
begin
mypackage.total(1, 5, num1);
dbms_output.put_line(num1);
end;