declare
type emp_table_type is table of employee%rowtype index by binary_integer;
emp_table emp_table_type;
emps employee%rowtype;
v_sql varchar2(1000);
v_name employee.name%type;
n_salary employee.salary%type;
type emp_cur_type is ref cursor;
emp_cur emp_cur_type;
begin
execute immediate v_sql bulk collect into emp_table using &要查询的员工编号1:;
for i in 1..emp_table.count loop
dbms_output.put_line(emp_table(i).name || '当前的工资是 ' || emp_table(i).salary || ',他负责的工作是 ' || emp_table(i).job);
end loop;
-- 使用Select返回游标变量的结果集(open...for...)
v_sql := 'select * from employee where empno=:empno';
open emp_cur for v_sql using &要查询的员工编号2:;
loop
fetch emp_cur into emps;
exit when emp_cur%notfound;
dbms_output.put_line(emps.name || '加入公司的时间是 ' || emps.hiredate);
end loop;
end;
/