declare  

  type type_ename is table of emp.ename%type;     

  type type_job is table of emp.job%type;  

  type type_sal is table of emp.sal%type;  

  var_ename type_ename:=type_ename();  

  var_job type_job:=type_job();  

  var_sal type_sal:=type_sal();  

begin  

  select ename,job,sal   

  bulk collect into var_ename,var_job,var_sal  

  from emp;  

  /*輸出雇員信息*/  

  for  v_index in var_ename.first .. var_ename.last loop  

      dbms_output.put_line('雇員名稱：'||var_ename(v_index)||' 職務(wù)：'||var_job(v_index)||' 工資：'||var_sal(v_index));  

  end loop;  

end;

declare  

       type emp_table_type is table of emp%rowtype index by binary_integer;  

       var_emp_table emp_table_type;  

    begin  

      select *  

      bulk collect into var_emp_table  

      from emp;  

      /*輸出雇員信息*/  

      for i in 1..var_emp_table.COUNT loop  

          dbms_output.put_line('雇員名稱：'||var_emp_table(i).ename||' 職務(wù)：'||var_emp_table(i).job||' 工資：'||var_emp_table(i).sal);  

      end loop;  

    end;