Welcome 微信登录

首页 / 数据库 / MySQL / Oracle存储过程分页查询

以下是Oracle存储过程分页查询返回数据集的方法:CREATE OR REPLACE PROCEDURE PROC_GET_DATA_PAGING(P_TABLENAME    IN VARCHAR2, --表(视图)名
                                               P_STRWHERE   IN VARCHAR2, --查询条件
                                               P_ORDERCOLUMN  IN VARCHAR2, --排序的列
                                               P_CURPAGE      IN OUT NUMBER, --当前页
                                               P_PAGESIZE   IN OUT NUMBER, --每页显示记录条数
                                               P_TOTALRECORDS OUT NUMBER, --总记录数
                                               P_TOTALPAGES OUT NUMBER, --总页数
                                               V_CUR          OUT TYPES.CURSORTYPE) --返回的结果集
 IS
  V_SQL       VARCHAR2(4000) := ""; --SQL语句
  V_STARTRECORD NUMBER(10); --开始显示的记录条数
  V_ENDRECORD NUMBER(10); --结束显示的记录条数
  V_SHOWALL   INTEGER; --是否显示全部记录
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
    V_SHOWALL  := 1;
    P_PAGESIZE := 0;
  END IF;  IF V_SHOWALL IS NULL THEN
    --根据页大小计算总页数
    IF MOD(P_TOTALRECORDS, P_PAGESIZE) = 0 THEN
      P_TOTALPAGES := TRUNC(P_TOTALRECORDS / P_PAGESIZE, 0);
    ELSE
      P_TOTALPAGES := TRUNC(P_TOTALRECORDS / P_PAGESIZE, 0) + 1;
    END IF;
 
  ELSE
    P_TOTALPAGES := 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;
  END IF;
  IF V_SHOWALL IS NULL THEN
    V_SQL := V_SQL || ") A WHERE ROWNUM <= " || V_ENDRECORD ||
           ") B WHERE R >= " || V_STARTRECORD;
  ELSE
    V_SQL := V_SQL || ") A ) B ";
  END IF;  DBMS_OUTPUT.PUT_LINE(V_SQL);
  OPEN V_CUR FOR V_SQL;
END PROC_GET_DATA_PAGING;更多Oracle相关信息见Oracle 专题页面 http://www.linuxidc.com/topicnews.aspx?tid=12Oracle 存储过程刷新物化视图Oracle 创建临时表相关资讯      Oracle存储过程  Oracle分页查询 
  • Oracle存储过程拼接in语句 & 自定  (今 09:21)
  • Java调用Oracle存储过程返回多条结  (04月29日)
  • Oracle中的存储过程简单应用  (04月10日)
  • Oracle、MySQL和SQL Serve分页查询  (05月10日)
  • 【PL/SQL系列】Oracle存储过程使用  (04月23日)
  • Oracle存储过程及Java调用  (05/28/2015 20:29:33)
本文评论 查看全部评论 (0)
表情: 姓名: 字数


评论声明
  • 尊重网上道德,遵守中华人民共和国的各项有关法律法规
  • 承担一切因您的行为而直接或间接导致的民事或刑事法律责任
  • 本站管理