机房重构——存储过程当媒人_SQL Server_数据库_程序员俱乐部

以下是本人亲眼所见的机房重构帅小伙(简称重构)，借助存储过程媒人(简称存储)与数据库大美女(简称：库)交往的经历，和大家分享一下。

那是一个风和日丽的白天，重构帅小伙独自一人走在处处飘香的初夏的校园中，他一直在思考，如何与库美女更容易的交往呢?以前重构去找库美女的时候总是需要先打一个电话(链接一个表)，再问问库美女在哪里(再链接一个表)，然后才能去找库美女(向两个表中存入数据);重构绞尽脑汁终于想出了一个办法， 他通过手机中的GPS(存储过程)直接定位库美女的位置，然后突然给库美女一个惊喜，这样一来二去，他俩终于最后走在了一起。

一、存储媒人优点：

1.存储过程的能力大大增强了SQL语言的功能和灵活性。

2.可保证数据的安全性和完整性。

3. 在运行存储过程前，数据库已对其进行了语法和句法分析，并给出了优化执行方案。

4.可以降低网络的通信量。

5.使体现企业规则的运算程序放入数据库服务器中集中控制，当企业规则发生变化时在服务器中改变存储过程即可，无须修改任何应用程序。

二、存储媒人缺点：

1.调试麻烦。

2.移植问题。

3.重新编译问题。

4.大量使用维护麻烦。

三、示例：

以下是重构注册中的存储过程：基本原理是先将涉及的表中的所有字段写出来(方便D层调用)，再将每个表独立出来并将字段也写出来，最后通过判断是否需要同时向三个表中存入信息，要么不存入，要么存入。

class="dp-sql">
<span style="font-family:SimSun;font-size:24px;">-- ============================================= 
-- Author:        <马康> 
-- Create date: <2015-4-26> 
-- Description:    <存储过程+事务实现学生注册卡号，涉及到Card_Info、Student_Info、ReCharge_Info表> 
-- ============================================= 
ALTER procedure [dbo].[PROC_AddCard] 
@CardID char(10),@Cash char(10),@Status char(10),@Creator char(10),@StudentID char(10), 
@StudentName char(10),@Sex char(10),@Department char(10),@Grade char(10),@IClass char(10),@OnDate char(10), 
@OnTime char(10),@Explain char(10),@AddCash char(10),@IDate char(10),@Time char(10) 
AS 
BEGIN 
declare @Err1 int,@Err2 int,@Err3 int 
begin transaction 
INSERT into Card_Info(CardID,Cash,Status,Creator)VALUES(@CardID,@Cash,@Status,@Creator) 
set @Err1=@@ERROR 
INSERT into Student_Info(StudentID,CardID,StudentName,Sex,Department,Grade,IClass,OnDate,OnTime,Explain,Status,Creator)VALUES(@StudentID,@CardID,@StudentName,@Sex,@Department,@Grade,@IClass,@OnDate,@OnTime,@Explain,@Status,@Creator) 
set @Err2=@@ERROR 
INSERT into ReCharge_Info(CardID,StudentID,AddCash,IDate,Time,Creator,Status)VALUES(@CardID,@StudentID,@AddCash,@IDate,@Time,@Creator,@Status) 
set @Err3=@@ERROR 
if @Err1=0 and @Err2=0 and @Err3=0 
    COMMIT TRANSACTION 
else 
    ROLLBACK TRANSACTION 
end</span> 

注意：1.第一行中的ALTER是修改，如果你要是创建的话，应该改成：CREATE。

2.如果表中有自增的标识字段，不需要在这里填写。

3.主要是程序实体层中的属性需要与表中的属性统一。

下面是我D层中修改的一些代码：

<span style="font-family:SimSun;font-size:24px;">        Dim sql As String = "PROC_AddCard"  '存储过程名 
        Dim sqlparams As SqlParameter() = {New SqlParameter("@StudentID", student.StudentID), 
                                           New SqlParameter("@StudentName", student.StudentName), 
                                           New SqlParameter("@Sex", student.Sex), 
                                           New SqlParameter("@Department", student.Department), 
                                           New SqlParameter("@Grade", student.Grade), 
                                           New SqlParameter("@IClass", student.IClass), 
                                           New SqlParameter("@OnDate", student.OnDate), 
                                           New SqlParameter("@OnTime", student.OnTime), 
                                           New SqlParameter("@Explain", student.Explain), 
                                           New SqlParameter("@Status", student.Status), 
                                           New SqlParameter("@Creator", student.Creator), 
                                           New SqlParameter("@CardID", card.CardID), 
                                           New SqlParameter("@Cash", card.Cash), 
                                           New SqlParameter("@AddCash", ReCharge.AddCash), 
                                           New SqlParameter("@IDate", ReCharge.IDate), 
                                           New SqlParameter("@Time", ReCharge.Time)}</span> 

四、总结：

最近学习了存储过程，给我做机房收费系统带来了很大的方便，也让我进一步了解到了SQL Server的强大，更加增加了自己求知的欲望与坚强的走下去的信心，希望笔者的这些正能量能够传递给所有的读者。

博文出处：http://blog.csdn.net/makang456/article/details/45362379#comments