oracle 分页

 
 create or replace procedure fenyeuser(
PAGEINDEX number,
PAGESIZE  number,
TOTALPAGE   out number,
PAGERESULTSET  out sys_refcursor
  )
 is 
   rowss  number(5);
  begin
   select count(0) into rowss from users;
  TOTALPAGE:=ceil(rowss/ PAGESIZE);
   open PAGERESULTSET for select a.id,a.name from (select e.*,rownum r from users e) a where a.r>(PAGEINDEX-1)*PAGESIZE and a.r<PAGESIZE*PAGEINDEX+1;
   
    end;
    
    declare 
   page number(10):=&请输入页码;
  pagesize number(10):=&请输入页码条数;
  page_yb sys_refcursor;
  rowss number(10);
  user_id users.id%type;
  uname users.name%type;
    begin
     fenyeuser(page,pagesize,rowss,page_yb);
     loop
   fetch page_yb into user_id,uname;
   exit when page_yb%notfound;
  dbms_output.put_line(user_id||'--'||uname); 
  end loop;
      end;