包定义:
create or replace package MaterialManage is
TYPE T_CURSOR IS REF CURSOR ;
Procedure Per_QuickPage
(
TbName in varchar2 , -- 表名
FieldStr in varchar2 , -- 字段集
RowFilter in varchar2 , -- 过滤条件
SortStr in varchar2 , -- 排序集
RownumFieldStr in varchar2 , -- 分页条件
TotalCount out number , -- 总记录数
Cur_ReturnCur out T_CURSOR -- 返回的游标
);
end MaterialManage;
包主体:
create or replace package body MaterialManage is
Procedure Per_QuickPage
(
TbName in varchar2 , -- 表 名
FieldStr in varchar2 , -- 字段集
RowFilter in varchar2 , -- 过滤条件
SortStr in varchar2 , -- 排序集
MinRowNum in number , -- 分页小值
MaxRowNum in number , -- 分页大值
TotalCount out number , -- 总记录数
Cur_ReturnCur out T_CURSOR
)
is
v_SourceTb1 varchar2 ( 3000 ); -- 动态表名1
v_SourceTb2 varchar2 ( 3000 ); -- 动态表名2
v_SourceTb3 varchar2 ( 3000 ); -- 动态表名3
v_SourceTb4 varchar2 ( 3000 ); -- 动态表名4
v_TotalCount varchar2 ( 50 ); -- 总记录数
v_sql varchar2 ( 3000 ); -- 动态sql
begin
v_SourceTb1 : = ' (select ' || FieldStr || ' from ' || TbName || ' ) SourceTb1 ' ;
v_SourceTb2 : = ' (select * from ' || v_SourceTb1 || ' where ' || RowFilter || ' ' || SortStr || ' ) SourceTb2 ' ;
v_SourceTb3 : = ' (select rownum as Rowindex,SourceTb2.* from ' || v_SourceTb2 || ' where rownum<= ' || MaxRowNum || ' ) SourceTb3 ' ;
v_SourceTb4 : = ' (select * from ' || v_SourceTb1 || ' where ' || RowFilter || ' ) SourceTb4 ' ;
v_sql : = ' select count(*) as TotalCount from ' || v_SourceTb4;
execute immediate v_sql into v_TotalCount;
TotalCount : = v_TotalCount;
v_sql : = ' select * from ' || v_SourceTb3 || ' where RowIndex >= ' || MinRowNum;
open Cur_ReturnCur for v_sql;
end Per_QuickPage;
END MaterialManage;
create or replace package MaterialManage is
TYPE T_CURSOR IS REF CURSOR ;
Procedure Per_QuickPage
(
TbName in varchar2 , -- 表名
FieldStr in varchar2 , -- 字段集
RowFilter in varchar2 , -- 过滤条件
SortStr in varchar2 , -- 排序集
RownumFieldStr in varchar2 , -- 分页条件
TotalCount out number , -- 总记录数
Cur_ReturnCur out T_CURSOR -- 返回的游标
);
end MaterialManage;
包主体:
create or replace package body MaterialManage is
Procedure Per_QuickPage
(
TbName in varchar2 , -- 表 名
FieldStr in varchar2 , -- 字段集
RowFilter in varchar2 , -- 过滤条件
SortStr in varchar2 , -- 排序集
MinRowNum in number , -- 分页小值
MaxRowNum in number , -- 分页大值
TotalCount out number , -- 总记录数
Cur_ReturnCur out T_CURSOR
)
is
v_SourceTb1 varchar2 ( 3000 ); -- 动态表名1
v_SourceTb2 varchar2 ( 3000 ); -- 动态表名2
v_SourceTb3 varchar2 ( 3000 ); -- 动态表名3
v_SourceTb4 varchar2 ( 3000 ); -- 动态表名4
v_TotalCount varchar2 ( 50 ); -- 总记录数
v_sql varchar2 ( 3000 ); -- 动态sql
begin
v_SourceTb1 : = ' (select ' || FieldStr || ' from ' || TbName || ' ) SourceTb1 ' ;
v_SourceTb2 : = ' (select * from ' || v_SourceTb1 || ' where ' || RowFilter || ' ' || SortStr || ' ) SourceTb2 ' ;
v_SourceTb3 : = ' (select rownum as Rowindex,SourceTb2.* from ' || v_SourceTb2 || ' where rownum<= ' || MaxRowNum || ' ) SourceTb3 ' ;
v_SourceTb4 : = ' (select * from ' || v_SourceTb1 || ' where ' || RowFilter || ' ) SourceTb4 ' ;
v_sql : = ' select count(*) as TotalCount from ' || v_SourceTb4;
execute immediate v_sql into v_TotalCount;
TotalCount : = v_TotalCount;
v_sql : = ' select * from ' || v_SourceTb3 || ' where RowIndex >= ' || MinRowNum;
open Cur_ReturnCur for v_sql;
end Per_QuickPage;
END MaterialManage;
由于oracle有个rownum特性,所以分页的时候就是利用rownum来实现。如果大家还有什么更好的办法记得告诉我一声,多谢了,因为我测试了上面的分页方法效率并不是很高。
存储过程返回了两个参数:TotalCount :当前条件下的总记录数 Cur_ReturnCur :游标类型,就是所要读取的记录的集合
下面是ASP.NET中调用的代码:
/// <summary>
/// 调用存储过程实现快速分页
/// </summary>
/// <param name="TbName">表名称</param>
/// <param name="FieldStr">字段名称</param>
/// <param name="RowFilter">过滤条件</param>
/// <param name="SortStr">排序字段</param>
/// <param name="MinPageNum">分页小值</param>
/// <param name="MaxPageNum">分页大值</param>
/// <param name="TotalCount">总记录(需要返回)</param>
/// <returns>DataTable</returns>
public DataTable QuickPage( string TbName, string FieldStr, string RowFilter, string SortStr, int MinRowNum, int MaxRowNum, ref int RecordCount)
{
OracleConnection conn = new OracleConnection(ConfigurationSettings.AppSettings["OracleConnstr"].ToString());
OracleCommand cmd = new OracleCommand();
cmd.Connection = conn;
cmd.CommandText = "MaterialManage.Per_QuickPage";
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.Add("TbName",OracleType.VarChar,50); //表 名
cmd.Parameters["TbName"].Direction = ParameterDirection.Input;
cmd.Parameters["TbName"].Value = TbName;
cmd.Parameters.Add("FieldStr",OracleType.VarChar,3000); //字段集
cmd.Parameters["FieldStr"].Direction = ParameterDirection.Input;
cmd.Parameters["FieldStr"].Value = FieldStr;
cmd.Parameters.Add("RowFilter",OracleType.VarChar,3000); //过滤条件
cmd.Parameters["RowFilter"].Direction = ParameterDirection.Input;
cmd.Parameters["RowFilter"].Value = RowFilter;
cmd.Parameters.Add("SortStr",OracleType.VarChar,3000); //排序字段
cmd.Parameters["SortStr"].Direction = ParameterDirection.Input;
cmd.Parameters["SortStr"].Value = SortStr;
cmd.Parameters.Add("MinRowNum",OracleType.Number); //分页小值
cmd.Parameters["MinRowNum"].Direction = ParameterDirection.Input;
cmd.Parameters["MinRowNum"].Value = MinRowNum;
cmd.Parameters.Add("MaxRowNum",OracleType.Number); //分页大值
cmd.Parameters["MaxRowNum"].Direction = ParameterDirection.Input;
cmd.Parameters["MaxRowNum"].Value = MaxRowNum;
cmd.Parameters.Add("TotalCount",OracleType.Number); //页总记录数
cmd.Parameters["TotalCount"].Direction = ParameterDirection.Output;
cmd.Parameters["TotalCount"].Value = 0;
cmd.Parameters.Add("Cur_ReturnCur",OracleType.Cursor); //返回的游标
cmd.Parameters["Cur_ReturnCur"].Direction = ParameterDirection.Output;
DataSet Ds = new DataSet();
OracleDataAdapter adapter= new OracleDataAdapter(cmd);
adapter.Fill(Ds);
conn.Close();
//总记录数
RecordCount = int.Parse(cmd.Parameters["TotalCount"].Value.ToString());
return Ds.Tables[0];
}
存储过程返回了两个参数:TotalCount :当前条件下的总记录数 Cur_ReturnCur :游标类型,就是所要读取的记录的集合
下面是ASP.NET中调用的代码:
/// <summary>
/// 调用存储过程实现快速分页
/// </summary>
/// <param name="TbName">表名称</param>
/// <param name="FieldStr">字段名称</param>
/// <param name="RowFilter">过滤条件</param>
/// <param name="SortStr">排序字段</param>
/// <param name="MinPageNum">分页小值</param>
/// <param name="MaxPageNum">分页大值</param>
/// <param name="TotalCount">总记录(需要返回)</param>
/// <returns>DataTable</returns>
public DataTable QuickPage( string TbName, string FieldStr, string RowFilter, string SortStr, int MinRowNum, int MaxRowNum, ref int RecordCount)
{
OracleConnection conn = new OracleConnection(ConfigurationSettings.AppSettings["OracleConnstr"].ToString());
OracleCommand cmd = new OracleCommand();
cmd.Connection = conn;
cmd.CommandText = "MaterialManage.Per_QuickPage";
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.Add("TbName",OracleType.VarChar,50); //表 名
cmd.Parameters["TbName"].Direction = ParameterDirection.Input;
cmd.Parameters["TbName"].Value = TbName;
cmd.Parameters.Add("FieldStr",OracleType.VarChar,3000); //字段集
cmd.Parameters["FieldStr"].Direction = ParameterDirection.Input;
cmd.Parameters["FieldStr"].Value = FieldStr;
cmd.Parameters.Add("RowFilter",OracleType.VarChar,3000); //过滤条件
cmd.Parameters["RowFilter"].Direction = ParameterDirection.Input;
cmd.Parameters["RowFilter"].Value = RowFilter;
cmd.Parameters.Add("SortStr",OracleType.VarChar,3000); //排序字段
cmd.Parameters["SortStr"].Direction = ParameterDirection.Input;
cmd.Parameters["SortStr"].Value = SortStr;
cmd.Parameters.Add("MinRowNum",OracleType.Number); //分页小值
cmd.Parameters["MinRowNum"].Direction = ParameterDirection.Input;
cmd.Parameters["MinRowNum"].Value = MinRowNum;
cmd.Parameters.Add("MaxRowNum",OracleType.Number); //分页大值
cmd.Parameters["MaxRowNum"].Direction = ParameterDirection.Input;
cmd.Parameters["MaxRowNum"].Value = MaxRowNum;
cmd.Parameters.Add("TotalCount",OracleType.Number); //页总记录数
cmd.Parameters["TotalCount"].Direction = ParameterDirection.Output;
cmd.Parameters["TotalCount"].Value = 0;
cmd.Parameters.Add("Cur_ReturnCur",OracleType.Cursor); //返回的游标
cmd.Parameters["Cur_ReturnCur"].Direction = ParameterDirection.Output;
DataSet Ds = new DataSet();
OracleDataAdapter adapter= new OracleDataAdapter(cmd);
adapter.Fill(Ds);
conn.Close();
//总记录数
RecordCount = int.Parse(cmd.Parameters["TotalCount"].Value.ToString());
return Ds.Tables[0];
}
本文转自高海东博客园博客,原文链接:http://www.cnblogs.com/ghd258/archive/2006/03/25/358818.html,如需转载请自行联系原作者