答案实验五：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; /