简单sqlserver 游标的使用

alter PROCEDURE TBB
    
AS
BEGIN
    
    declare @FVoucherID int
    declare @FNumber int
    
    set @FNumber=200300149
        ------------------------------------------表体--------------------------------------------------
        declare cursor_entry cursor for select FVoucherID from t_Voucher where FVoucherID in (select FVchInterID from ICPurchase where FDate>='2020-03-01 00:00:00.000' and FVchInterID is not null and FBillNo like '%-1'
                                            ) and FGroupID <> 13
        open cursor_entry -- 打开游标
        fetch next from cursor_entry into @FVoucherID
        while @@fetch_status=0 -- 提取成功，进行下一条数据的提取操作
            BEGIN
                    begin try
                        begin tran
                        PRINT '二次循环-------'
                    
                    update t_Voucher set FGroupID=13,FNumber=@FNumber where FVoucherID =@FVoucherID

                        --select MAX(FNumber) from t_Voucher where FGroupID=13
                        select @FNumber=MAX(FNumber) from t_Voucher where FGroupID=13
                        set @FNumber=@FNumber+1
                        print @FVoucherID
                        commit tran
                        
                    end try
                    begin catch
                        rollback tran
                    end catch    
            fetch next from cursor_entry into  @FVoucherID
            
            END
        close cursor_entry -- 关闭游标
        deallocate cursor_entry -- 释放游标

    
    
    
END
GO