--创建保存查询结果集的 cursor
create or replace package pkg_query as type cur_query is ref cursor; end pkg_query;
--插件存储过程
create or replace procedure Pagers(
v_cur out pkg_query.cur_query,--查询结果
numCount out number,--总记录数
page in number,--数据页数，从1开始
pageSize in number,--每页大小
tableName varchar2,--表名
strWhere varchar2,--where条件
Orderby varchar2
) is
strSql varchar2(2000);--获取数据的sql语句
pageCount number;--该条件下记录页数
startIndex number;--开始记录
endIndex number;--结束记录
begin
strSql:='select count(*) 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 Pagers;