游标的使用示例(2)

发布网友发布时间：2022-04-08 06:47

共2个回答

懂视网时间：2022-04-08 11:08

mycur cursor for ---申明游标mycur select name from t_stu open mycur ---打开游标 ---操作内容 close mycur ---关闭游标 deallocate mycur ---释放资源

上边的一个Demo只是告诉大家游标的一些基本指令，其实没啥用，要在函数中，存储过程中使用游标才真的有用类，接下来，请看Demo2：

-->这个函数主要实现的功能是，传入表名，将该表的所有的列，拼成字符串返回回来。

create function [dbo].[getCols]
( @table_name AS varchar(50) 
)
RETURNS varchar(2000)
AS
BEGIN
 DECLARE @colname VARCHAR(50)
 DECLARE @typename VARCHAR(50)
 DECLARE @result varchar(2000) 
 set @result = ‘‘
 DECLARE mycur CURSOR FOR ---定义游标
 select c.name as columnname,ty.name as typename
 from sys.columns c 
 inner join sys.tables t on t.object_id=c.object_id
 inner join sys.types ty on ty.system_type_id=c.system_type_id
 where t.name = @table_name and ty.name !=‘sysname‘ ---传入参数@table_name
 order by t.name,c.column_id

 OPEN mycur ---打开游标
 FETCH NEXT FROM mycur into ----获取下一条数据
 @colname,@typename  ----将获取的数据保存到变量中
 
 WHILE @@FETCH_STATUS = 0  ----返回上次执行Fetch命令的状态，0：成功 -1：失败 -2：被提取的行不存在
 BEGIN
  if @result = null or @result = ‘‘
  begin
  SET @result = @colname
  end
  else
  begin
  SET @result = @result + ‘,‘ + @colname 
  end
 FETCH NEXT FROM mycur into ---获取下一条数据
  @colname,@typename 
 END
 CLOSE mycur ---关闭游标
 DEALLOCATE mycur ----释放资源
 RETURN @result
END

游标的使用实例(Sqlserver版本)

标签：

热心网友时间：2022-04-08 08:16

CREATE proc [dbo].[As_Proc_GetPlanDetail]
(
@ids varchar(max)--
)
as
create table #temp
(
dept varchar(100),
sorttitle varchar(200),
title varchar(200),
spec varchar(50),
model varchar(50),
budget decimal(18,2),
amount int,
sgamount int,
htamount int,
ysamount int,
fenfamount int
)
declare @did varchar(32)
declare @sorttitle varchar(200)
declare @title varchar(200)
declare @spec varchar(50)
declare @model varchar(50)
declare @budget decimal(18,2)
declare @amount int
declare @sgamount int
declare @htamount int
declare @ysamount int--验收数量
declare @fenfamount int--分发数量
declare cursor1 cursor for
select rowid,dbo.clip(ypdept,':',1) from As_year_plan where Charindex(rowid,@ids,0)>0
union
select rowid,dbo.clip(department,':',1) from As_assets_requisition where Charindex(rowid,@ids,0)>0 -----------------------------------------------控制计划
declare @rowid varchar(32)
declare @dept varchar(100)
open cursor1
fetch next from cursor1 into @rowid,@dept
while@@fetch_status=0
begin
declare cursor2 cursor for select a.rowid, b.sorttitle,a.title,a.spec,a.model,a.budget,a.amount from As_assts_planDetai a left join As_assetsSort b on a.sortId=b.rowid whereplanID=@rowid
open cursor2
fetch next from cursor2 into @did, @sorttitle, @title,@spec, @model ,@budget ,@amount
while @@fetch_status=0
begin
select @sgamount= isnull(sum(a.amount),0) from As_assets_buyDetail a inner join As_assets_buy b on a.buyId=b.rowid wherea.planId=@didand b.state=1
--print @did
select @htamount= isnull(sum(a.amount),0) from As_contract_detail a inner join As_stock_contract b on a.contId=b.rowid where b.state=1 and a.bydetId in(
select c.rowid from As_assets_buyDetail c inner join As_assets_buy d on c.buyId=d.rowid wherec.planId=@didand d.state=1)
---验收数量
select @ysamount=count(1) from As_AssetsInfo a inner join As_contract_detail b on a. contractId=b.rowid where b.bydetId in(select rowid from As_assets_buyDetail whereplanId=@did)
--分发数量
select @fenfamount=count(1) from As_AssetsInfo a inner join As_contract_detail b on a. contractId=b.rowid where b.bydetId in(select rowid from As_assets_buyDetail whereplanId=@did) and a.drawState=1
insert into #temp(dept, sorttitle, title , spec, model , budget ,amount,sgamount,htamount, ysamount,fenfamount) values(@dept,@sorttitle, @title , @spec, @model , @budget ,@amount,@sgamount,@htamount,@ysamount,@fenfamount)
fetch next from cursor2 into @did, @sorttitle, @title,@spec, @model ,@budget ,@amount
end
close cursor2 --关闭游标
deallocate cursor2
fetch next from cursor1 into @rowid,@dept
end
close cursor1 --关闭游标
deallocate cursor1 --释放游标
--查询临时表
select * from #temp
详细说明
RS.OPEN SQL,CONN,A,B
参数A为设定游标的类型，其取值为： 0 仅向前游标，只能向前浏览记录，不支持分页、Recordset、BookMark
1 键集游标，其他用户对记录所做的修改将反映到记录集中，但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark
2动态游标功能最强，但耗资源也最多。用户对记录所做的修改，增加或删除记录都将反映到记录集中。支持全功能浏览。
3静态游标，只是数据的一个快照，用户对记录所做的修改，增加或删除记录都不会反映到记录集中。支持向前或向后移动
参数B为记录集的锁定类型，其取值为：
1 锁定类型，默认的，只读，不能作任何修改
2 当编辑时立即锁定记录，最安全的方式
3 只有在调用Update方法时才锁定记录集，而在此前的其他操作仍可对当前记录进行更改、插入和删除等
4 当编辑时记录不会被锁定，而更改、插入和删除是在批处理方式下完成的
打开数据记录集方法其实不止一种，但是我们用的最多的就是
rs.open sql,1,1的方法，可是后面的数字参数很多人不解其意，下面我们来介绍一下。
其实open方法后面有多个参数
CursorType LockType CommandType
比如 rs.open sql,1,1
也可以写成
rs.cursorType = 1
rs.LockType = 1
rs.open sql
其中CursorType代表从一个表或者一个SQL查询结果返回的记录。
这个参数有四个值分别是：
adOpenForwardOnly 表示只允许在记录集内的记录间往前移动。这个是缺省值。
adOpenKeyset 反映由其它用户所做的对记录的改变或者删除动作，但并不反映由其它用户做作的添加新记录的动作。
adOpenDynamic 反映由其它用户所做的对记录的改变或者删除动作，包括添加的新记录
adOpenStatic 不反映其它用户对记录所做的修改，添加，删除动作。
这四个值VBSCRIPT预定义位
adOpenForwardOnly = 0
adOpenKeyset = 1
adOpenDynamic = 2
adOpenStatic = 3
lockType 表示当打开记录集时，数据提供者用于锁定数据库的类型：
adLockReadOnly 数据不能改变，这是缺省值！
adLockPessimistic 数据提供者在开始编辑数据的时候锁定记录
adLockOptimistic 仅当调用update方法时，数据提供者锁定记录
adLockBatchOptimistic 用于批处理修改
他们的常量值定义分别是：
adLockReadOnly = 1
adLockPessimistic = 2
adLockOptimistic = 3
adLockBatchOptimistic = 4
rs.open sql,conn,1,1 读取记录 select
rs.open sql,conn,1,3 只更新记录最好 update
rs.open sql,conn,2,3 插入和删除最好 insert delete