发布时间 : 星期二 文章答案实验五：Oracle编程（一）更新完毕开始阅读
BEGIN
SELECT deptno INTO v_deptno FROM emp WHERE empno=p_empno;
SELECT avg(sal) INTO v_avgsal FROM emp
WHERE deptno=v_deptno;
RETURN v_avgsal;
EXCEPTION
WHEN NO_DATA_FOUND THEN RETURN -1;
END;
/
（10）编写一个PL/SQL块调用（9）中创建的函数。如果不存在该
部门，则显示“员工号不存在!”。
DECLARE
V_empno emp.empno%type;v_avgsal emp.sal%type; BEGIN
V_empno:=&x;
V_avgsal:= RET_AVGSAL_EMPNO(v_empno);
If v_avgsal=-1 then
DBMS_OUTPUT.PUT_LINE(‘员工号不存在！’);
Else
DBMS_OUTPUT.PUT_LINE(v_avgsal);
End if;
END; /
（11）创建一个存储过程，以一个整数为参数，输出工资最高的前
几个(参数值)员工的姓名。
CREATE OR REPLACE PROCEDURE max_n(p_n int) AS v_i int:=1; BEGIN
for v_emp in (SELECT * FROM emp ORDER BY sal desc) loop
DBMS_OUTPUT.PUT_LINE(v_emp.ename);
Exit when v_i=p_n;
v_i:=v_i+1;
end loop; END; /
（12）创建一个存储过程，以两个整数为参数，输出工资排序在两个参数之间的员工姓名。
CREATE OR REPLACE PROCEDURE min_max(p_m int,p_n int) AS
v_i int:=1; BEGIN
for v_emp in (SELECT * FROM emp where sal between p_m and p_n ORDER BY sal) loop
DBMS_OUTPUT.PUT_LINE(v_emp.ename||' '||v_emp.sal); end loop; END; /