输入员工编号返回三个参数例子

输入员工编号返回入职多少年，多少个月，多少日。

CREATE OR REPLACE PACKAGE test123

IS

type t_rec is record(

years number(7,2),

months number(7,2),

days number(7,2));

end test123;

create or replace procedure for_test(eno in number, test_record out test123.t_rec ) is

begin

SELECT  TRUNC((SYSDATE-HIREDATE)/365) ,

 TRUNC(MOD((SYSDATE-HIREDATE),365)/30),

 TRUNC((MOD((SYSDATE-HIREDATE),365)/30 - TRUNC(MOD((SYSDATE-HIREDATE),365)/30)) * 30)

 INTO test_record

 FROM EMP WHERE EMPNO=eno;

dbms_output.put_line('入职'||test_record.years||'年'||test_record.months||'月'||test_record.days ||'日');

end;