create or replace procedure pro1(v_in_empno in number)
is
--定义一个记录数据类型
type my_emp_record is record(
     v_ename emp.ename%type,
     v_sal emp.sal%type,
     v_job emp.job%type
);
--定义一个变量,变量类型为my_emp_record
v_emp_record my_emp_record;
begin
select ename,sal,job into v_emp_record from emp where empno=v_in_empno;
dbms_output.put_line(‘名字:‘||v_emp_record.v_ename||‘ 工资‘||v_emp_record.v_sal);
end;