Oracle存储过程分页

--第一步
--首先建立一个包，用户创建一个游标类型
create or replace package pkg_query as 
   type cur_query is ref cursor;  
end pkg_query;  
--第二步
CREATE OR REPLACE PROCEDURE Pager (
page in number,--数据页数，从1开始
pageSize in number,--每页大小
tableName nvarchar2,--表名
strWhere nvarchar2,--where条件
orderby nvarchar2,--排序字段
numCount out number,--总记录数
v_cur out pkg_query.cur_query)
is
strSql varchar2(2000);--获取数据的sql语句
pageCount number;--该条件下记录页数
startIndex number;--开始记录
endIndex number;--结束记录
--分页获取数据
begin
  strSql:='select count(1) from '||tableName;
  if strWhere is not null or strWhere<>'' then
     strSql:=strSql||' where '||strWhere;
  end if;
  EXECUTE IMMEDIATE strSql INTO numCount;
  --计算数据记录开始和结束
  pageCount:=numCount/pageSize+1;
  startIndex:=(page-1)*pageSize+1;
  endIndex:=page*pageSize;

  strSql:='select rownum ro, t.* from '||tableName||' t';
  strSql:=strSql||' where rownum<='||endIndex;

  if strWhere is not null or strWhere<>'' then
     strSql:=strSql||' and '||strWhere;
  end if;

  if  Orderby is not null or Orderby<>'' then
     strSql:=strSql||' order by '||Orderby;
  end if;

  strSql:='select * from ('||strSql||') where ro >='||startIndex;
  DBMS_OUTPUT.put_line(strSql);

  OPEN v_cur FOR strSql;
end Pager;