ORACLEÓÃLIMITʵÏÖÀàËÆ·ÖÒ³

Á·Ï°ÁËORACLEÀàËƵķÖÒ³,Ä¿µÄ:ORACLEµÄLIMITʹÓÃ
declare
type name_arrary_type is varray(20) of varchar2(10);
name_arrary  name_arrary_type;
rowss int:=&ÊäÈëÒ³¼Ç¼Êý;
dpno int:=&ÊäÈ벿ÃźÅ;
v_count int:=0;
cursor  emp_cursor(dpno int) is select ename from emp where deptno=dpno;
begin
open emp_cursor(dpno);
loop
fetch emp_cursor bulk collect into name_arrary limit rowss;
dbms_output.put_line('²¿ÃÅ'||dpno||'Ô±¹¤:');
for i in 1..(emp_cursor%rowcount-v_count) loop
dbms_output.put_line(i||'    '||name_arrary(i)||'  ');
end loop;
dbms_output.put_line('µ±Ç°Ò³Êý:'||(v_count/rowss+1));
dbms_output.new_line;
v_count :=emp_cursor%rowcount;
exit when emp_cursor%notfound;
end loop;
dbms_output.put_line('ÿҳ['||rowss||']Ìõ¼Ç¼,×ÜÒ³Êý:['||ceil(emp_cursor%rowcount/rowss)||']');
close emp_cursor;
end;
ÔËÐнá¹û:
²¿ÃÅ20Ô±¹¤:
1    SMITH 
2    JONES 
3    SCOTT 
4    ADAMS 
µ±Ç°Ò³Êý:1
²¿ÃÅ20Ô±¹¤:
1    FORD  
2    YA_PING 
µ±Ç°Ò³Êý:2
ÿҳ[4]Ìõ¼Ç¼,×ÜÒ³Êý:[2]