ORACLE分页查询排序存储过程.docVIP

包头的定义 测试是利用ORACLE系统中的EMP表测试的 create or replace package test3 is -- Created : 2012/1/5 15:39:17 -- Purpose : -- Public type declarations type cursor_test is ref cursor; --v_parm 定义要匹配的列 --v_parmvalue 匹配的值 --v_count 匹配的总记录数 --ls 每页显示的行数 --cp 要查询第几页的数据 --cursor_result 查询结果集游标 --v_order 要排序的字段 procedure getRecord v_parm in varchar2,v_parmvalue in varchar2,v_count out number,ls in int,cp in int,cursor_result out cursor_test,v_order in varchar2 ; end test3; 包体定义 create or replace package body test3 is procedure getRecord v_parm in varchar2,v_parmvalue in varchar2,v_count out number,ls in int,cp in int, cursor_result out cursor_test,v_order in varchar2 is v_findfloor number : cp-1 *ls+1;--定义分页查询的起始行 v_findtop number : cp*ls; --定义分页查询的最大行 v_sql varchar2 1111 : ; --初始化查询的SQL语句 begin --查询匹配的记录数 execute immediate select count 1 from emp where ||v_parm|| like :a into v_count using %||v_parmvalue||%; --查询游标的SQL v_sql : v_sql||select b.* from select rownum rn, a.* from emp a where a. ||v_parm|| like :v_parmvale and rownum ||v_findtop|| b where b.rn ||v_findfloor||order by b.||v_order; --:v_parmvale 为占位符 open cursor_result for v_sql using % || v_parmvalue|| %; --利用USING为占未符赋值 end getRecord; end test3;public static void main String[] args throws ClassNotFoundException, SQLException ProcedurTest pt new ProcedurTest ； Connection con pt.getConnection ; CallableStatement cs con.prepareCall begin test3.getRecord ?,?,?,?,?,?,? ; end; ; cs.setString 1, ename ; cs.setString 2, ; cs.registerOutParameter 3, Types.INTEGER ; cs.setInt 4, 5 ; cs.setInt 5, 2 ; cs.registerOutParameter 6, OracleTypes.CURSOR ; cs.setString 7, ename ; cs.execute ; int a cs.getInt 3 ; System.out.println 匹配的记录数+a ; ResultSet rs ResultSet cs.getObject 6 ; while rs.next System.out.print 雇员编号：+rs.getInt empno + ; System.out.print 雇员名称：+rs.getString ename + ; System.out.println ; 结果显示： 匹配的记录数14 雇员编号：7698 雇员名称：BLAKE 雇员编号：7782 雇员名称：CLARK