/* forall批 */
-- 未使用批
declare
type mylist is varray(20) of number;
depts mylist := mylist(10, 30, 70);
begin
for i in depts.first .. depts.last loop
delete from emp where deptno = depts(i);
end loop;
end;
-- 使用forall批
declare
type mylist is varray(20) of number;
depts mylist := mylist(10, 30, 70);
begin
forall i in depts.first ...depts.last
delete from emp where deptno = depts(i);
end;
-- 使用bulk collect
declare
type v_tab is table of emp%rowtype;
v_emp v_tab;
begin
select * bulk collect
into v_emp
from emp where sal>8900;
for i in 1 .. v_emp.count loop
dbms_output.put_line('第' || to_char(i) || '个员工名称:' || v_emp(i).ename);
end loop;
end;