读书人

请问一个存储过程得用游标好像进入死

发布时间: 2013-03-19 17:22:05 作者: rapoo

请教一个存储过程得用游标,好像进入死循环了,谢谢
CREATE PROCEDURE [dbo].[p_zdbk_crf5]

(
@xm VARCHAR(10)='客房',
@crcjfsj VARCHAR(8)='12:00:00', --次日加收半天费时间
@czy VARCHAR(10)='服务器',
@ccgcfhz INT OUTPUT, --存储过程返回值
@ccgcfhzms NVARCHAR(100) OUTPUT --存储过程返回值描述
)

AS

DECLARE @zdid VARCHAR(20)
DECLARE @gkid VARCHAR(20)
DECLARE @bh VARCHAR(10)
DECLARE @mc VARCHAR(10)
DECLARE @jrsj DATETIME
DECLARE @dzl DECIMAL
DECLARE @dze DECIMAL
DECLARE @cjffwxmid VARCHAR(10)
DECLARE @ycjfsj DATETIME
DECLARE @jffs VARCHAR(10)
SET @jffs=''
IF @dzl<>0 OR @dze<>0
SET @jffs='FPKDSZK'

--取超时宾客
DECLARE curZdbk CURSOR FOR
SELECT zdid,gkid,xm,bh,mc,jrsj,dzl,dze,cjffwxmid,ycjfsj FROM zdbkbdfwxm WHERE crcjf=1 AND crcjfsj=@crcjfsj --AND xm=@xm
OPEN curZdbk
FETCH NEXT FROM curZdbk
INTO @zdid,@gkid,@xm,@bh,@mc,@jrsj,@dzl,@dze,@cjffwxmid,@ycjfsj
WHILE (@@FETCH_STATUS=0)

BEGIN

DECLARE @yyrq DATETIME
SET @yyrq=CAST(CONVERT( VARCHAR(12) , GETDATE(), 102 ) AS DATETIME)
DECLARE @xfsj DATETIME
SET @xfsj=CAST(CONVERT( VARCHAR(12) , GETDATE(), 102 )+' '+@crcjfsj AS DATETIME)
DECLARE @yjtzjssj DATETIME
SET @yjtzjssj=DATEADD( DAY, 1 , CAST(CONVERT(VARCHAR(12) , GETDATE(), 102 )+' 12:00:00' AS DATETIME))
DECLARE @fl VARCHAR(10)
DECLARE @zl VARCHAR(10)
DECLARE @xmmc VARCHAR(30)
DECLARE @dw VARCHAR(2)
DECLARE @dj DECIMAL
DECLARE @sl DECIMAL
SET @sl=0.5
DECLARE @xj DECIMAL
DECLARE @ys DECIMAL
DECLARE @yxdz BIT
DECLARE @jzdz BIT
DECLARE @zdjr BIT
DECLARE @zdjs BIT
DECLARE @sc DECIMAL
DECLARE @tzjssl DECIMAL
DECLARE @djcpbm BIT
DECLARE @tcxm BIT
DECLARE @jsfw BIT
DECLARE @cpddy BIT
DECLARE @fjfw BIT
DECLARE @kgxm BIT
DECLARE @zsxm BIT
--取超时宾客加收费项目
SELECT @fl=fwxmfl,@zl=zl,@xmmc=xmmc,@dw=dw,@dj=dj,@yxdz=yxdz,@jzdz=jzdz,@zdjr=zdjr,@zdjs=zdjs,@sc=sc,@tzjssl=tzjssl,@djcpbm=djcpbm,@tcxm=tcxm,@jsfw=jsfw,@cpddy=cpddy,@fjfw=fjfw,@kgxm=kgxm,@zsxm=zsxm FROM g_sy_fwxm WHERE fwxmid=@cjffwxmid


IF @jffs='' AND @jzdz=1
SET @jffs='JZDZ'
IF @jffs='' AND @zsxm=1
SET @jffs='赠送'
SET @xj=@dj*@sl
SET @ys=@xj
IF @dze<>0
SET @dze=@dze*@sl
SET @ys=@xj-@dze
IF @dzl<>0
SET @ys=@xj*@dzl
SET @dze=@xj-@ys
IF @xmmc IS NOT NULL
--写入消费明细
DECLARE @xfmxid varchar(20)
SET @xfmxid=SUBSTRING(CONVERT(VARCHAR, GETDATE(), 126),3,2)+SUBSTRING(CONVERT(VARCHAR, GETDATE(),126),6,18)
INSERT INTO g_sy_xfmx (xfmxid,zdid,gkid,xm,bh,mc,fl,zl,xmmc,dw,dj0,dj,sl,xj,dzl,dze,ys,czy,yxdz,jzdz,zdjr,zdjs,sc,tzjssl,xfrq,xfsj,yjtzjssj,ksjs,ksjssj,ksjsczy,djcpbm,jffs,tcxm,fjfw) VALUES (@xfmxid,@zdid,@gkid,@xm,@bh,@mc,@fl,@zl,@xmmc,@dw,@dj,@dj,@sl,@xj,0,0,@ys,@czy,@yxdz,@jzdz,@zdjr,@zdjs,@sc,@tzjssl,@yyrq,@xfsj,@yjtzjssj,1,@xfsj,@czy,@djcpbm,@jffs,@tcxm,@fjfw)
IF @@ERROR<>0
BEGIN
SET @ccgcfhz=0
SET @ccgcfhzms='未成功写入半天房费消费明细'
END
--更新宾客已重计费时间
UPDATE g_sy_xfjs SET ycjfsj=getdate()
IF @@ERROR<>0
BEGIN
SET @ccgcfhz=0
SET @ccgcfhzms='未成功更新宾客已重计费时间'
END

END

CLOSE curZdbk
DEALLOCATE curZdbk

SET @ccgcfhz=1
SET @ccgcfhzms=''
GO

[解决办法]
只用了一个游标,怎么会死循环,太多了,看着费劲。
[解决办法]
你的值如果只传一个怎么会死循环?把一些次要部分先注释然后自己调试一下看看。没数据怎么帮你调试
[解决办法]
profiler使用TSQL_SPs 跟踪一下看看卡在哪里了

[解决办法]
cursor用法,你少了一句。

open c1
fetch ...
while @@fetch_status=0
begin
/**你的code**/
-- 加以下这句
fetch next from c1 into ......end

close c1
deallocate c1
[解决办法]
并且中间你有2个if ...如果下面两个set都属于if管控,需加上begin...end
[解决办法]
没有缩进,看着费劲,用sql格式下
[解决办法]
游标少东西。

读书人网 >SQL Server

热点推荐