oracle 分页存储过程

oracle 分页存储过程

--建立一个包，用户创建一个游标类型
　　create or replace package pkg_query as
  　　type cur_query is ref cursor;
　　end pkg_query;
　　--创建存储过程
　　create OR REPLACE PROCEDURE prc_query
       　　(p_tableName        in  varchar2,   --表名
        　　p_strwhere         in  varchar2,   --查询条件 --*
        　　p_orderColumn      in  varchar2,   --排序的列 --*
        　　p_orderStyle       in  varchar2,   --排序方式 --*
        　　p_curPage          in out Number,  --当前页
        　　p_pageSize         in out Number,  --每页显示记录条数
        　　p_totalRecords     out Number,     --总记录数 --*
        　　p_totalPages       out Number,     --总页数
        　　v_cur              out pkg_query.cur_query)   --返回的结果集
　　IS
   　　v_sql VARchar2(1000) := '';      --sql语句
   　　v_startRecord Number(4);         --开始显示的记录条数
   　　v_endRecord Number(4);           --结束显示的记录条数
　　BEGIN
   　　--记录中总记录条数
   　　v_sql := 'select TO_NUMBER(count(*)) FROM ' || p_tableName || ' where 1=1';
   　　IF p_strwhere IS NOT NULL or p_strwhere <> '' THEN
       　　v_sql := v_sql || p_strwhere;
  　　 END IF;
   　　execute IMMEDIATE v_sql INTO p_totalRecords;
  
   　　--验证页面记录大小
   　　IF p_pageSize < 0 THEN
      　　 p_pageSize := 0;
   　　END IF;
  
  　　 --根据页大小计算总页数
   　　IF MOD(p_totalRecords,p_pageSize) = 0 THEN
    　　   p_totalPages := p_totalRecords / p_pageSize;
   　　ELSE
     　　  p_totalPages := p_totalRecords / p_pageSize + 1;
  　　 END IF;
  
   　　--验证页号
   　　IF p_curPage < 1 THEN
      　　 p_curPage := 1;
   　　END IF;
   　　IF p_curPage > p_totalPages THEN
     　　  p_curPage := p_totalPages;
  　　 END IF;
  
   　　--实现分页查询
   　　v_startRecord := (p_curPage - 1) * p_pageSize + 1;
   　　v_endRecord := p_curPage * p_pageSize;
  　　 v_sql := 'select * FROM (select A.*, rownum r FROM ' ||
           　　 '(select * FROM ’ || p_tableName;
  　　 IF p_strwhere IS NOT NULL or p_strwhere <> '' THEN
   　　    v_sql := v_sql ||' where 1=1' || p_strwhere;
  　　 END IF;
  　　 IF p_orderColumn IS NOT NULL or p_orderColumn <> '' THEN
  　　     v_sql := v_sql ||' ORDER BY ' || p_orderColumn ||'' || p_orderStyle;
 　　  END IF;
  　　 v_sql := v_sql || ') A where rownum <= ' || v_endRecord ||') B where r >=
’
  　　          || v_startRecord;
  　　 DBMS_OUTPUT.put_line(v_sql);
   　　OPEN v_cur FOR v_sql;
　　END prc_query;