存储过程 --- 4 --- 分页存储初解

水深无声 2022-06-16 00:36 139阅读 0赞

\--创建表格：  
create table tb\_TestTable   --创建表      
(      
id int  primary key,      
userName varchar(20) not null,      
userPWD varchar(20) not null,      
userEmail varchar(40) null     
)  
\--查看表数据：     
select \* from tb\_TestTable;  
\--删除表：  
drop table tb\_TestTable;  
\--插入数据：  
begin  
     for  i in 1..100  
     loop  
          insert into tb\_TestTable(id,userName,userPWD,userEmail) values(i,'admin','admin888','lli0077@yahoo.com.cn');  
     end loop;  
     commit;  
end;

\--创建存储过程pro\_Page\_Test  
create or replace procedure pro\_Page\_Test  
(pageSize in int,--每页数据条数  
pageIndex in out int,--当前页数（页码）  
pageCount out int,--总的页数，因为需要显示页数，因此是个输出参数  
msg out varchar2) as  
pageCount1 int;--总数据数除以 pageSize 的余数  
pageCountRsp int;--共有数据条数  
num int;--数据代码数字  
id int;  
username varchar(20);  
userpwd varchar(20);  
useremail varchar(40);  
  CURSOR USER\_ID\_LIST IS--查询出来的可能是多条数据,然后对每条数据进行操作该怎么办,游标在这就有用了  
  select id,username,userpwd,useremail,num from (select id,username,userpwd,useremail,row\_number() over (order by id) as num from tb\_TestTable) where num between pageSize\*(pageIndex-1)+1 and pageSize\*pageIndex;  
begin  
  pageCount := 0;  
  pageCount1 := 0;  
  --查看总页数  
  select count(1) as pageCountRsp into pageCountRsp from tb\_TestTable;  
  pageCount := pageCountRsp/pageSize;  
  pageCount1 := pageCountRsp-pageSize\*pageCount;  
  if pageCount1 > 1 THEN  
    pageCount := pageCount+1;  
  end if;  
  --判断当然页数是否大于总页数，若大于总页数，则查询出最后一页的数据  
  if pageIndex > pageCount then  
    pageIndex := pageCount;  
  end if ;  
  pageCount1 := pageSize\*(pageIndex-1)+1;  
  --遍历查询出来的数据，返回数据  
  FOR REC IN USER\_ID\_LIST LOOP  
     select id,username,userpwd,useremail,num into id,username,userpwd,useremail,num from (select id,username,userpwd,useremail,row\_number() over (order by id) as num from tb\_TestTable) where num = pageCount1;  
     if num>0 then  
       msg := msg||'\['||id||','||username||','||userpwd||','||useremail||','||num||'\]';  
     end if;  
     --msg := msg||'\['||id||username||userpwd||useremail||num||'\]';  
     pageCount1 := pageCount1+1;  
  END LOOP;  
  --异常时返回的数据  
  EXCEPTION  
  WHEN OTHERS THEN  
    pageCount := 0;  
    msg  := '异常！';  
    ROLLBACK;  
END;

\--删除存储过程  
Drop PROCEDURE pro\_Page\_Test;

\--编写 PL/SQL块验证过程  
declare  
pageSize int;--每页数据条数  
pageIndex int;--当前页数（页码）  
pageCount int;--总的页数，因为需要显示页数，因此是个输出参数  
msg varchar2(20000);  
begin  
  pageSize := 30;  
  pageIndex := 5;  
  pro\_Page\_Test(pageSize,pageIndex,pageCount,msg);  
  dbms\_output.put\_line(pageIndex);  
  dbms\_output.put\_line(pageCount);  
  dbms\_output.put\_line(msg);  
end;

**希望对你有帮助，祝你有一个好心情，加油！这是学习过程中编写,**

**若有错误、不全、可优化的点，欢迎纠正与补充！**