请问一个“游标已存在”的问题

Question

请问大家一个比较奇怪的问题，我们公司使用的是金蝶K3软件，现在有几个帐套是新增科目的时候会提示“名为 'ID_List' 的游标已存在。”我跟踪了数据库，在科目的表中，有一触发器用到了这个游标，但是我检查了触发器，和不报错的数据库中的该触发器的内容是一样的，我把出错的数据库又移到了其他SQL服务器中，还是同样报错，请问，还有其他什么原因会使SQL报“游标已存在”的错误。

Answer 1

ALTER   TRIGGER t_Account_FullName ON t_Account
FOR INSERT, UPDATE
NOT FOR REPLICATION
AS
DECLARE @ID int, @ParentID int, @FullName varchar(255), @AccountID int, @Times Int
Set NoCount On
Declare ID_List Cursor For Select FAccountID From Inserted
Open ID_List 
Fetch ID_List Into @ID
While(@@fetch_status = 0)
Begin
Select @AccountID = FAccountID, @FullName = FName, @ParentID = FParentID From t_Account Where FAccountID = @ID
If @@rowcount = 0 
Begin
Close ID_List
Deallocate ID_List
Return
End
Set @Times = 0
While @ParentID  <> 0 And @AccountID <> @ParentID And @Times < 15
Begin
Select @AccountID = FAccountID, @FullName = isnull(FName,'')+'_'+@FullName, @ParentID = FParentID From t_Account Where FAccountID = @ParentID
Set @Times = @Times + 1
End
Update t_Account Set FFullName=@FullName Where FAccountID = @ID
Fetch ID_List into @ID
End
Close ID_List
Deallocate ID_List触发器应该是没有问题的，是金蝶K3软件中预设的。而且我把这个触发器中的ID_List替换成ID_Kingdee，结果错误的提示就变成了“名为 'ID_Kingdee' 的游标已存在。”奇怪啊。

Answer 2

有没有加这个：Deallocate XXXX  ?

Answer 3

--TRY
ALTER  TRIGGER t_Account_FullName ON t_Account 
FOR INSERT, UPDATE 
NOT FOR REPLICATION 
AS 
DECLARE @ID int, @ParentID int, @FullName varchar(255), @AccountID int, @Times Int 
Set NoCount On 
Close ID_List 
Deallocate ID_List 
Declare ID_List Cursor For Select FAccountID From Inserted 
Open ID_List 
Fetch ID_List Into @ID 
While(@@fetch_status = 0) 
Begin 
Select @AccountID = FAccountID, @FullName = FName, @ParentID = FParentID From t_Account Where FAccountID = @ID 
If @@rowcount = 0 
Begin 
Close ID_List 
Deallocate ID_List 
Return 
End 
Set @Times = 0 
While @ParentID  <> 0 And @AccountID <> @ParentID And @Times < 15 
Begin 
Select @AccountID = FAccountID, @FullName = isnull(FName,'')+'_'+@FullName, @ParentID = FParentID From t_Account Where FAccountID = @ParentID 
Set @Times = @Times + 1 
End 
Update t_Account Set FFullName=@FullName Where FAccountID = @ID 
Fetch ID_List into @ID 
End 
Close ID_List 
Deallocate ID_List 

Answer 4

本帖最后由 roy_88 于 2009-01-14 10:00:30 编辑