/*
定義一個存儲過程，以員工編號爲參數，返回該員工的工作年限。
*/
create or replace procedure e_year(
e_empno in emp.empno%type,
e_year out number
)
as
begin
select floor(months_between(sysdate, hiredate)/12) into e_year from emp where empno = e_empno;
end;
declare
v_empno emp.empno%type;
v_year number;
begin
v_empno := &員工編號;
e_year(v_empno,v_year);
dbms_output.put_line('員工的工作年限是：'|| v_year ||'年');
end;