sql存储过程和事务的应用

    在去年，学习数据库的时候就学过存储过程了。一直都只知道一些理论，却不知道如何去使用。时隔一年，终于找到如何使用存储过程了。

    在机房收费系统中，有些操作，需要多次执行sql语句，多次执行完成才算是完成这个事件流。但是如果其中有一个环节出了错误，那么没出错误的那些操作是不是就多余了。

   执行存储过程，就是执行多句SQl语句。而事务，是为了控制这些语句 要么都做，要么 都不做。

在机房收费系统中，执行sql语句的时候。

 

    一般的sql语句使用方法：定义一个字符串，用于存放sql语句。之后指明commandtype=commandType.text  如果有参数的情况下，需要提供参数。

    使用存储过程的方法：写好存储过程，在vs中直接调用，指明commandtype=CommandType.StoredProcedure   如果有参数的情况下，需要提供参数。使用存储过程，避免了在vs中写 字符串。

 

接下来看一个实例。题：设置基本数据，首先需要取消之前使用的基本数据，然后再插入新的基本数据。

   首先，把使用的存储过程预先写入数据库。

Create procedure [dbo].[SetBasicData]
@rate char(16),@steptime char(16),@leasttime char(16),@mincash char(16),@cardtype char(16),@Heaf char(16)

as

begin tran
update T_Basic set cardtype='不使用' where cardtype=@cardtype
insert into T_Basic values(@rate,@steptime,@leasttime,@mincash,@cardtype,@Heaf,default,default)
if	@@ROWCOUNT<>2    --检查以上两条sql语句是否正确执行
	rollback tran	--没有正确执行，回滚
else
commit tran		--正确执行，提交事务

 

写完之后，可以在下面的位置 找到写好的存储过程。

 

在这里，就省略U层和B层了。只对比一下D层的代码就可以了。

 

1、没有使用存储过程的D层代码

''' 

    ''' 插入新的基本数据
    ''' 
    ''' 新的基本数据实体
    ''' 操作人的姓名
    ''' 返回true表示插入成功，返回false表示失败
    ''' 
    Public Function SetBasicInfo(basic As Entity.BasicInfoEntity, head As String) As Boolean Implements IDAL.IBasic.SetBasicInfo
        Dim strSQL As String
        strSQL = "Update BasicData_Info set status='不使用' where status=@status Insert into BasicData_Info(Rate,stepTime,leasttime,preparetime,mincash,head,status) values(@Rate,@stepTime,@leastTime,@prepareTime,@minCash,@head,@status)"

        Dim helper As New SqlHelper
        Dim sqlparameter As SqlParameter() = {New SqlParameter("@Rate", basic.Rate),
                                             New SqlParameter("@stepTime", basic.StepTime),
                                             New SqlParameter("@leastTime", basic.LeastTime),
                                             New SqlParameter("@minCash", basic.MinCash),
                                             New SqlParameter("@head", head),
                                              New SqlParameter("@status", basic.Status)}
        Dim flag As Boolean
        flag = helper.UpdDelAlter(strSQL, CommandType.Text, sqlparameter)

        Return flag
    End Function

2、使用存储过程的D层代码

''' 

    ''' 设置基本数据
    ''' 
    ''' 基本数据实体
    ''' 返回true表示插入成功，返回false表示失败
    ''' 
    Public Function SetBasicData(basic As Entity.BasicEntity) As Boolean Implements IDAL.IBasic.SetBasicData
        Dim strSQL As String = "SetBasicData"      '存储过程名
        Dim sqlparams As SqlParameter() = {New SqlParameter("@rate", basic.Rate),   
                                           New SqlParameter("@steptime", basic.StepTime),
                                           New SqlParameter("@leasttime", basic.LeastTime),
                                           New SqlParameter("@mincash", basic.MinCash),
                                           New SqlParameter("@cardtype", basic.CardType),
                                           New SqlParameter("@Heaf", basic.Heaf)}   '传入参数

        Dim helper As New SqlHelper
        Dim flag As Boolean
        flag = helper.UpdDelAlter(strSQL, CommandType.StoredProcedure, sqlparams)

        Return flag
    End Function

     对比上面的两种方法。

     第一种方法：如果插入的基本数据设定有错，那么执行该操作之后，该系统中基本数据就被修改为‘不使用’的状态。出现错误。

     第二种方法，省去了写sql语句的麻烦。而且 如果数据库有变动，不需要修改代码。可以直接在sql server中 修改存储过程，也方便调试。

     总结：使用存储过成可以提高数据的执行速度。当对数据库进行复杂操作时(如对多个表进行Update,Insert,Query,Delete时），可将此复杂操作用存储过程封装起来与数据库提供的事务处理结合一起使用。可以极大的提高数据库的使用效率，减少程序的执行时间，这一点在较大数据量的数据库的操作中是非常重要的。在代码上看，SQL语句和程序代码语句的分离，可以提高程序代码的可读性

        如果有更加优化的方法，欢迎指出！