 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
主子表最常见的大概就是用在进销存、MRP、ERP里面，比如一张销售订单，订单Order(ID,OrderDate)，订单明细OrderDetail(OrderID, ProductID, Num,Price)这个大概就是最简朴的主子表了，两个表通过ID与OrderID建立关联，这里主键ID是自增的INT类型，OrderID是表OrderDetail的外键。当然，键的选择方式很多，现在我们选择的是在sql里面最简朴的方式。 对于这样的表结构，我们最常见的问题就是保存的时候怎样处理键值的问题，因为两个表关联异常的紧密，我们进行保存的时候需要把它们放在一个事务里面，这时问题就会出现，Order表中的ID是自动增长型的字段。现在需要我们录入一张订单，包括在Order表中插入一条记录以及在OrderDetail表中插入若干条记录。因为Order表中的ID是自动增长型的字段，那么我们在记录正式插入到数据库之前无法事先得知它的取值，只有在更新后才能知道数据库为它分配的是什么值，然后再用这个ID作为OrderDetail表的OrderID的值，最后更新OderDetail表。但是，为了确保数据的一致性，Order与OrderDetail在更新时必须在事务保护下同时进行，即确保两表同时更行成功，这个就会有点困扰。 解决这类问题常见的主要有两类方式： 一种是微软在网上书店里使用的方式，使用了四个存储过程。改装一下，使之符合现在的例子 --存储过程一 CREATE PROCEDURE InsertOrder @Id INT = NULL OUTPUT, @OrderDate DATETIME = NULL, @ProductIDList NVARCHAR(4000) = NULL, @NumList NVARCHAR(4000) = NULL, @PriceList NVARCHAR(4000) = NULL AS SET NOCOUNT ON SET XACT_ABORT ON BEGIN TRANSACTION --插入主表 INSERT Orders(OrderDate) select @OrderDate SELECT @Id = @@IDENTITY -- 插入子表 IF @ProductIDList IS NOT NULL EXECUTE InsertOrderDetailsByList @Id, @ProductIdList, @numList, @PriceList COMMIT TRANSACTION RETURN 0 --存储过程二 CREATE PROCEDURE InsertOrderDetailsByList @Id INT, @ProductIDList NVARCHAR(4000) = NULL, @NumList NVARCHAR(4000) = NULL, @PriceList NVARCHAR(4000) = NULL AS SET NOCOUNT ON DECLARE @Length INT DECLARE @FirstProductIdWord NVARCHAR(4000) DECLARE @FirstNumWord NVARCHAR(4000) DECLARE @FirstPriceWord NVARCHAR(4000) DECLARE @ProductId INT DECLARE @Num INT DECLARE @Price MONEY SELECT @Length = DATALENGTH(@ProductIDList) WHILE @Length > 0 BEGIN EXECUTE @Length = PopFirstWord @@ProductIDList OUTPUT, @FirstProductIdWord OUTPUT EXECUTE PopFirstWord @NumList OUTPUT, @FirstNumWord OUTPUT EXECUTE PopFirstWord @PriceList OUTPUT, @FirstPriceWord OUTPUT IF @Length > 0 BEGIN SELECT @ProductId = CONVERT(INT, @FirstProductIdWord) SELECT @Num = CONVERT(INT, @FirstNumWord) SELECT @Price = CONVERT(MONEY, @FirstPriceWord) EXECUTE InsertOrderDetail @Id, @ProductId, @Price, @Num END END --存储过程三 CREATE PROCEDURE PopFirstWord @SourceString NVARCHAR(4000) = NULL OUTPUT, @FirstWord NVARCHAR(4000) = NULL OUTPUT AS SET NOCOUNT ON DECLARE @Oldword NVARCHAR(4000) DECLARE @Length INT DECLARE @CommaLocation INT SELECT @Oldword = @SourceString IF NOT @Oldword IS NULL BEGIN SELECT @CommaLocation = CHARINDEX(\\\',\\\',@Oldword) SELECT @Length = DATALENGTH(@Oldword) IF @CommaLocation = 0 BEGIN SELECT @FirstWord = @Oldword SELECT @SourceString = NULL RETURN @Length END SELECT @FirstWord = SUBSTRING(@Oldword, 1, @CommaLocation -1) SELECT @SourceString = SUBSTRING(@Oldword, @CommaLocation + 1, @Length - @CommaLocation) RETURN @Length - @CommaLocation END RETURN 0 ------------------------------------------------ --存储过程四 CREATE PROCEDURE InsertOrderDetail @OrderId INT = NULL, @ProductId INT = NULL, @Price MONEY = NULL, @Num INT = NULL AS SET NOCOUNT ON INSERT OrderDetail(OrderId,ProductId,Price,Num) SELECT @OrderId,@ProductId,@Price,@Num RETURN 0 插入时，传入的子表数据都是长度为4000的NVARCHAR类型，各个字段使用“，”分割，然后调用PopFirstWord分拆后分别调用InsertOrderDetail进行保存，因为在InsertOrder中进行了事务处理，数据的安全性也比较有保障，几个存储过程设计的精巧别致，很有意思，但是子表的几个数据大小不能超过4000字符，恐怕不大保险。 第二种方式是我比较常用的，为了方便，就不用存储过程了，这个例子用的是VB.NET。 ‘处理数据的类 Public class DbTools private Const _IDENTITY_SQL As String = "SELECT @@IDENTITY AS ID" private Const _ID_FOR_REPLACE As String = "_ID_FOR_REPLACE" ‘对主子表插入记录 Public Function InsFatherSonRec(ByVal main_sql As String, ByVal ParamArray arParam() As String) As Integer Dim conn As New SqlConnection(StrConn) Dim ID AS INTEGER conn.Open() Dim trans As SqlTransaction = conn.BeginTransaction Try \\\'主记录 myDBTools.SqlData.ExecuteNonQuery(trans, CommandType.Text, main_sql) \\\'返回新增ID号 ID = myDBTools.SqlData.ExecuteScalar(trans, CommandType.Text, _IDENTITY_SQL) \\\'从记录 If Not arParam Is Nothing Then For Each sql In arParam \\\'将刚获得的ID号代入 sql = sql.Replace(_ID_FOR_REPLACE, ID) myDBTools.SqlData.ExecuteNonQuery(trans, CommandType.Text, sql) Next End If trans.Commit() Catch e As Exception trans.Rollback() Finally conn.Close() End Try Return ID End Function End class 上面这段代码里有myDBTools，是对常见的数据库操作封装后的类，这个类对数据库进行直接的操作，有经验的.NET数据库程序员基本上都会有，一些闻名的例子程序一般也都提供。 上面的是通用部分，下面是对详细单据的操作 Publid class Order Public _OrderDate as date ‘主表记录 Public ChildDt as datatable ‘子表记录，结构与OrderDetail一致 Public function Save() as integer Dim str as string Dim i as integer Dim arParam() As String Dim str as string=”insert into Order(OrderDate) values(‘” & _OrderDate & “’)” If not Childdt is nothing then arParam = New String(ChildDT.Rows.Count - 1) {} for i=0 to Childdt.rows.count-1 arparam(i)= ”insert into OrderDetail(OrderID,ProductID,Num,Price) Values(_ID_FOR_REPLACE,” & drow(“ProductID) & “,” & drow(“Num”) & “,” drow(“price”) & “)” next i End if Return (new dbtools). InsFatherSonRec(str,arparam) End class 上面的两个例子为了方便解释，去掉了一些检验验证过程，有爱好的朋友可以参照网上书店的例子研究第一种方式，或者根据自己的需要对第二种方式进行修改。 返回类别: 教程 上一教程: SQL SERVER讲堂：锁的机制 下一教程: 将列更新从一个表传递到另一个表 您可以阅读与"小议主子表INT自增主键插入记录的方式"相关的教程: · 从数据表中取出第N条到第M条的记录的方式 · ACCESS处理重复记录的方式 · 一种基于记录集查找特定行的方式 · 有关重复记录的删除(SQL SERVER) · SELECT返回记录的顺序 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
