网络编程
位置:首页>> 网络编程>> 数据库>> sqlserver 存储过程带事务 拼接id 返回值

sqlserver 存储过程带事务 拼接id 返回值

 来源:asp之家 发布时间:2012-11-30 20:06:39 

标签:存储过程,事务

删除一条留言信息会级联删除回复信息,这时我们需要用到事务,如下SQL

代码如下:


ALTER PROCEDURE [dbo].[proc_tb_leaveword_delete]
(
    @leavewordID INT,
    @record TINYINT OUTPUT
)    
AS
BEGIN
    BEGIN TRY
        BEGIN TRANSACTION
            DELETE FROM tb_leavewordID WHERE leavewordID=@leavewordID
            DELETE FROM tb_reply WHERE leavewordID=@leavewordID
            SET @record=0 --成功
            COMMIT TRANSACTION
    END TRY
    BEGIN CATCH
        ROLLBACK TRANSACTION
        SET @record=-1 --失败
    END CATCH
    RETURN @record
END


删除一条新闻,一条新闻可能有多条留言,每条留言可能有回复信息,这时我们删除一条新闻的SQL如下

代码如下:


ALTER PROCEDURE [dbo].[proc_tb_news_delete]
(
    @newsID INT,
    @record TINYINT OUTPUT
)    
AS
BEGIN
    DECLARE @leavewordCount INT --留言个数
    DECLARE @delete_where VARCHAR(4000) --留言id字符,类似1,2,4,5,6
    SET @leavewordCount=(SELECT ISNULL(COUNT(1),0) FROM tb_leaveword WHERE newsID=@newsID)
    SET @delete_where=''
    IF(@leavewordCount=0) --此条新闻无留言时
        BEGIN TRY
            DELETE FROM tb_news WHERE newsID=@newsID
            SET @record=0 --成功
        END TRY
        BEGIN CATCH
            SET @record=-1 --失败
        END CATCH
    ELSE IF(@leavewordCount>0) --此条新闻有留言时
       ----获取删除条件(start)----
       DECLARE MY_CURSOR CURSOR
       FOR SELECT leavewordID FROM tb_news WHERE newsID=@newsID
       BEGIN
           DECLARE @leavewordID INT
           OPEN MY_CURSOR
           FETCH NEXT FROM MY_CURSOR INTO @leavewordID
           IF(@leavewordID IS NOT NULL)
               SET @delete_where=@delete_where+CAST(@leavewordID AS VARCHAR(10))+','
               WHILE(@@FETCH_STATUS<>-1)
                   BEGIN
                       SET @leavewordID=NULL
                       FETCH NEXT FROM MY_CURSOR INTO @leavewordID
                       IF(@leavewordID IS NOT NULL)
                           SET @delete_where=@delete_where+CAST(@leavewordID AS VARCHAR(10))+','
                   END
        END
        CLOSE MY_CURSOR
        DEALLOCATE MY_CURSOR
        SET @delete_where=SUBSTRING(@delete_where,1,LEN(@delete_where)-1)
        ----获取删除条件(end)----
        BEGIN
            BEGIN TRY
                BEGIN TRANSACTION
                    DELETE FROM tb_news WHERE newsID=@newsID
                    EXECUTE('DELETE FROM tb_leaveword WHERE leavewordID IN('+@delete_where+')')
                    EXECUTE('DELETE FROM tb_reply WHERE leavewordID IN('+@delete_where+')')
                    SET @record=0 --成功
                    COMMIT TRANSACTION
            END TRY
            BEGIN CATCH
                ROLLBACK TRANSACTION
                SET @record=-1 --失败
            END CATCH
        END
     RETURN @record
END


删除一新闻类型时,可能此类型下有多条新闻,此条新闻下又有多条留言,留言下又有多条回复,依次级联删除,如下存储过程

代码如下:


ALTER PROCEDURE [dbo].[proc_tb_news_type_delete]
(
    @typeID INT,
    @record TINYINT OUTPUT
)
AS
BEGIN
    DECLARE @newsCount INT --此类新闻下的新闻个数
    SET @newsCount=(SELECT ISNULL(COUNT(1),0) FROM tb_news WHERE typeID=@typeID)
    IF(@newsCount=0) --此类型下无新闻
        BEGIN TRY
            DELETE FROM tb_news_type WHERE typeID=@typeID
            SET @record=0 --成功
        END TRY
        BEGIN CATCH
            SET @record=-1 --失败
        END CATCH
    ELSE IF(@newsCount>0) --此类型下有新闻
        BEGIN TRY
            BEGIN TRANSACTION
                DECLARE MY_CURDOR CURSOR
                FOR SELECT newsID FROM tb_news WHERE typeID=@typeID
                BEGIN
                    DECLARE @newsID INT
                    OPEN MY_CURSOR
                    FETCH NEXT FROM MY_CURSOR INTO @newsID
                    IF(@newsID IS NOT NULL)
                        DELETE FROM tb_news_type WHERE typeID=@typeID
                        EXECUTE proc_tb_news_delete @newsID=@newsID --执行存储过程
                        WHILE(@@FETCH_STATUS<>-1)
                            BEGIN
                                SET @newsID=NULL
                                FETCH NEXT FROM MY_CURSOR INTO @newsID
                                IF(@newsID IS NOT NULL)
                                    DELETE FROM tb_news_type WHERE typeID=@typeID
                                    EXECUTE proc_tb_news_delete @newsID=@newsID --执行存储过程
                            END
                END
                CLOSE MY_CURSOR
                DEALLOCATE MY_CURSOR
                COMMIT TRANSACTION
        END TRY
        BEGIN CATCH
            ROLLBACK TRANSACTION
            SET @record=-1 --失败
        END CATCH
     RETURN @record
END


当删除多条新闻类型时,我们需要把拼接好的类型id,例如:1,2,4,5,12,34,穿入存储过程,分割字符的SQL语句如下所示:

代码如下:


DECLARE @A VARCHAR(5000)
DECLARE @i INT
SET @A='A,B,C,D,D,S,X,C,C,C,D,AAAA,DDDDDD,DEF,ERT,'
SET @i=CHARINDEX(',',@A)
WHILE @i>=1
BEGIN
    PRINT LEFT(@A,@i-1)
    SET @A=SUBSTRING(@A,@i+1,LEN(@A)-1)
    SET @i=CHARINDEX(',',@A)
END


删除多条新闻类型SQL如下:

代码如下:


ALTER PROCEDURE [dbo].[proc_tb_news_type_selects_delete]
(
    @typeID_list VARCHAR(500),
    @record TINYINT OUTPUT
)
AS
BEGIN
    BEGIN TRY
            BEGIN TRANSACTION
                DECLARE @index INT
                DECLARE @typeID INT
                SET @typeID_list=RTRIM(LTRIM(@typeID_list))
                SET @index=CHARINDEX(',',@typeID_list)
                WHILE @index>=1
                    BEGIN
                        SET @typeID=CAST(LEFT(@typeID_list,@index-1) AS INT)
                        EXECUTE proc_tb_news_type_delete @typeID=@typeID
                        SET @typeID_list=SUBSTRING(@typeID_list,@index+1,LEN(@typeID_list)-1)
                        SET @index=CHARINDEX(',',@typeID_list)
                    END
            COMMIT TRANSACTION
            SET @record=0 --成功
    END TRY
    BEGIN CATCH
        ROLLBACK TRANSACTION
        SET @record=-1 --失败
    END CATCH
    RETURN @record
END


作者:cnblogs xu_happy_you

0
投稿

猜你喜欢

  • 如何在ADO服务器端利用好缓存技术?请看下面示例,这是一个用来显示图书分类的例子程序:displayBooks.asp< %
  •     网页过渡是指当浏览者进入或离开网页时,页面呈现的不同的刷新效果,比如卷动、百叶窗等。这样你的网页看起来
  • 'subject 信息标题 'company 发布信息的公司名称 'cont
  • 相同记录行如何取最大值我想这个东西在作一些相关采购系统或成本报价系统应该很有用的吧取当前的最有效的价格.记录下来与大家分享!--测试数据&n
  •     以前的Dreamweaver中是没有图片处理功能的,即使你要处理也只能使用CSS中的相关滤镜进行一些效
  • 在这篇文章中,我将努力揭开Mobile Web开发的神秘面纱,换句话说,也就是为了移动设备上的用户体验可以被接受,代码得怎么设计。我将阐述“
  • Oracle 的正规表达式的实施是以各种 SQL 函数和一个 WHERE 子句操作符的形式出现的。如果您不熟悉正规表达式,那么这篇文章可以让
  • 此文主要讲述的是SQL Server连接中经常出现的3个常见错误,以及对这三个错误的详细分析,如果你其心存好奇的话,以下的文章将会揭开它的神
  • 确定数据库内有多少记录,或者确定有多少记录达到了某些标准,这些用ASP完成并非难事。如果你采用了正确的游标类型,你可以用RecordCoun
  • Truncate是SQL中的一个删除数据表内容的语句,用法是:TRUNCATE TABLE [Table Name]。下面是对Truncat
  • 不正确地调用Windows应用程序接口可能会产生一些意想不到的副作用,以及潜在地对一个应用程序的代码及数据段的破坏。正确地使用一个空的32位
  • 看看上一篇《javascript设计模式交流(一)Singleton Pattern》本文将讨论Prototype Pattern的js实现
  • 用Dreamweaver制作网页时,如果插入的图片、GIF动画、声音、视频或链接的网页是用中文命名的,在用IE浏览器浏览时可能显示不出来。以
  • 网页设计中的脏、乱、差,是我们在设计过程中常会遇到的问题。通常"脏"是由对色彩使用不当所产生的,而色彩使用不当产生的不好
  • 编者注:当讲到了性能优化和案例方面的东西,就要想到如何从开发人员的角度进行了理解,认识SQL是如何执行,以及如何学习高级的SQL,这篇文章对
  • 一个很棒的 blog 文章,是 PPK 两年前写的,文章中解释了 contains() 和 compareDocumentPosition(
  • 有时需要获取远程网站的某些信息,而服务器又限制了GET方式,只能通过POST数据提交,这个时候我们可以通过asp来实现模拟提交post数据,
  • SecureFile功能是oracle 11g中对大对象(LOB)存储格式的完全重新设计实现,原来的LOB存储格式现在通称为BASIXFIL
  • 概述我在教学和实际设计中的一些心得。就不长篇大论了!让大家省些时间,捞干的。尽量通俗易懂。想知道怎样设计标志,就要知道什么是标志?标志:外来
  • 一直以来,Web 字体背着单调的恶名,因为想在网页上显示一种字体,该字体文件本身必须存在于用户的电脑中,由于这个限制,加上 Web 用户可能
手机版 网络编程 asp之家 www.aspxhome.com