--創(chuàng)建保存查詢結(jié)果集的 cursor
create or replace package pkg_query as type cur_query is ref cursor; end pkg_query;
--插件存儲(chǔ)過程
create or replace procedure Pagers(
v_cur out pkg_query.cur_query,--查詢結(jié)果
numCount out number,--總記錄數(shù)
page in number,--數(shù)據(jù)頁數(shù)，從1開始
pageSize in number,--每頁大小
tableName varchar2,--表名
strWhere varchar2,--where條件
Orderby varchar2
) is
strSql varchar2(2000);--獲取數(shù)據(jù)的sql語句
pageCount number;--該條件下記錄頁數(shù)
startIndex number;--開始記錄
endIndex number;--結(jié)束記錄
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;
--計(jì)算數(shù)據(jù)記錄開始和結(jié)束
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;