前奏：1：必要的概念： ORACLE 提供可以把 PL/SQL 程序存储在数据库中，并可以在任何地方来运行它oracle账号。这样就叫存储过 程或函数。 过程和函数统称为 PL/SQL 子程序，他们是被命名的 PL/SQL 块，均存储在数据库中，并 通过输入、输出参数或输入/输出参数与其调用者交换信息。过程和函数的唯一区别是函数总向调 用者返回数据，而过程则不返回数据。2：建立存储过程在 ORACLE SERVER 上建立存储过程,可以被多个应用程序调用,可以向存储过程传递参数,也可以向存储过程传回参数创建过程语法:CREATE [OR REPLACE] PROCEDURE Procedure_name[ (argment [ { IN | IN OUT }] Type,argment [ { IN | OUT | IN OUT } ] Type ][ AUTHID DEFINER | CURRENT_USER ]{ IS | AS }<类型.变量的说明> BEGIN<执行部分>EXCEPTION<可选的异常错误处理程序>END;3：例题：--定义一个存储过程，获取给定部门的工资总和（通过out参数），要求部门号和工资总和定义为参数create or replace procedure get_sal3(dept_id number , sum_salary out number)iscursor salary_cursor is select salaryfrom employees where department_id = dept_id;beginsum_salary := 0;for c in salary_cursor loop sum_salary := sum_salary + c.salary;end loop;dbms_output.put_line(sum_salary);end;select get_sal3(60,)--对给定部门的员工进行加薪操作，若其到公司的时间是在（？-95）期间，为其加薪5%--(95,98)加薪3%，（98，现在）加薪1%，得到以下返回结果：--此次加薪公司每个月额外付出多少成本（定义一个out型的输出参数）create or replace procedure get_money(dept_id number , temp_sal out number)isv_i number(4,2):=0;cursor salary_cursor is select employee_id , salary ,hire_datefrom employees where department_id = dept_id;begintemp_sal := 0;for c in salary_cursor loop if to_char(c.hire_date,'yyyy')<'1995' then v_i := 0.05; elsif to_char(c.hire_date,'yyyy')<'1998' then v_i := 0.03; else v_i := 0.01 ; end if; --更新工资 update employees set salary = salary * (1+v_i) where employee_id = c.employee_id; --计算付出的成本 temp_sal := temp_sal + c.salary*v_i;end loop;dbms_output.put_line(temp_sal);end;4：调用存储过程： declare v_temp number(10):=0;beginget_money(80,v_temp);end;
