create or replace procedure P_QuerySplit(
sqlscript varchar2, --表名/SQL語句
pageSize integer, --每頁記錄數
pageIndex integer, --當前頁
totalCount out number, --總記錄數
totalPage out number, --總頁數
v_cur out sys_refcursor --返回遊標
) is
/**
*
*
*/
v_PageSize number;
v_PageIndex number;
v_SQL_Count varchar2(4000);
v_SQL varchar2(4000);
v_StartIndex number;
v_EndIndex number;
begin
v_PageSize:=pageSize;
if v_PageSize=0 then
v_PageSize:=1;
end if;
--統計記錄數量
v_SQL_Count := 'select count(*) from (' ? ? sqlscript ? ?') a ';
execute immediate v_SQL_Count into totalCount;
--計算總頁數
totalPage:=CEIL(totalCount/v_PageSize);
--驗證頁號 如果頁號大餘了最大頁數,返回最後一頁
v_PageIndex:=pageIndex;
if v_PageIndex>totalPage then
v_PageIndex:=totalPage;
end if;
--計算開始的Index和結束的Index
v_StartIndex:=(v_PageIndex-1)*v_PageSize 1;
v_EndIndex:=v_PageIndex*v_PageSize;
v_SQL:='SELECT /* FIRST_ROWS */* FROM (';
v_SQL:=v_SQL ? ?' SELECT A.*, ROWNUM RN ';
v_SQL:=v_SQL ? ?' FROM (' ? ?sqlscript ? ?') A ';
v_SQL:=v_SQL ? ?' WHERE ROWNUM <= ' ? ?v_EndIndex;
v_SQL:=v_SQL ? ?')WHERE RN >= ' ? ?v_StartIndex;
open v_cur for v_SQL;
end P_QuerySplit;
帶排序的分頁存儲過程
CREATE OR REPLACE PROCEDURE TABLEPAGE_SELECT(v_page_size int, --the size of a page of list
v_current_page int, --the current page of list
v_table_name varchar2, --the talbe name
v_order_field varchar2,--the order field
v_order_sequence varchar2,--the order sequence should by "_desc"or "_asc",_is blank.
--v_sql_select varchar2, --the select sql for procedure
--v_sql_count varchar2, --the count sql for procedure
--v_out_recordcount OUT int, --the num of return rows
p_cursor OUT refcursor_pkg.return_cursor) as
v_sql varchar2(3000); --the sql for select all rows of list
v_sql_count varchar2(3000); --the count sql for procedure
v_sql_order varchar2(2000); --the order of list
v_count int; -- the amount rows fo original list
v_endrownum int; --the end row num of the current page
v_startrownum int; --the start row num of the current page
BEGIN
----set the order of list
if v_order_field!='NO' then
v_sql_order :=' ORDER BY '|| v_order_field ||' '||v_order_sequence;
else
v_sql_order :='';
end if;
----catch the amount rows of list
v_sql_count:='SELECT COUNT(ROWNUM) FROM '||v_table_name;
execute immediate v_sql_count into v_count;
-- v_out_recordcount := v_count;
----set the value of start and end row
if v_order_sequence='desc' then
v_endrownum:=v_count-(v_current_page-1)*v_page_size;
v_startrownum:=v_endrownum - v_page_size + 1;
else
v_endrownum:= v_current_page * v_page_size;
v_startrownum := v_endrownum - v_page_size + 1;
end if;
----the sql for page slide
v_sql := 'SELECT * FROM (SELECT '||v_table_name||'.*, rownum rn FROM '||v_table_name||' WHERE rownum <= ' ||
to_char(v_endrownum) ||' '|| v_sql_order||') WHERE rn >= ' ||
to_char(v_startrownum)||' '||v_sql_order;
open p_cursor for v_sql;
END TABLEPAGE_SELECT;
Oracle分頁函數樣例——用於提高當前框架分頁性能
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.