自动表格插入

时间:2013-10-07 11:13:30

标签: tsql stored-procedures insert

我在使用存储过程将数据插入表时遇到问题。我必须使用这个程序,并且由其他程序员编写。

通过这个程序,我可以将订单插入数据库。我为程序提供了几个属性,一切都很好。在orders-table中有一个包含costumer ID的列。

当我在订单表中插入新行时,来自客户表的数据会覆盖发货地址。该程序不会做这样的事情。如果我在订单表中写一个手动插入,我的运送地址就被接受了。

是否可能存在隐藏程序,在插入新订单时会自动获取客户信息?

USE [EHS]
GO
/****** Object:  StoredProcedure [dbo].[SP_INTERNETAUFTRAGE]    Script Date: 10/07/2013 12:21:42 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

ALTER PROCEDURE [dbo].[SP_INTERNETAUFTRAGE]
@Akcija int = 1,
/*
Many more attributes
*/      
@p6 money = NULL,
@rezultat int = 0 OUTPUT

AS
BEGIN
SET NOCOUNT ON;
DECLARE @brojac int
SET @brojac = 0
DECLARE @TypName nvarchar(30)
DECLARE @firmC int
DECLARE @gespert bit
DECLARE @letzeAufNr int
DECLARE @letzeRechNr int
SET @gespert=0
SELECT @TypName = [Name], @letzeAufNr = letzteAufNr, @gespert = gesperrt FROM dbo.T_letzteAufNr WHERE Typ=@Typ AND Jahr=Year(GETDATE())

SET @firmC=(@Typ-1)/10
IF (@firmC=3)
BEGIN
    SET @firmC=4
END
IF (@Akcija=1)
   BEGIN
    IF (@gespert=0)
            BEGIN
                DECLARE @AufNrNew nvarchar(10)
                DECLARE @AufNrN int
                SET @AufNrNew =CAST(@Typ AS nvarchar(2)) + Right(CAST(Year(GETDATE()) AS nvarchar(4)), 2) + Right('0000' + CAST((@letzeAufNr + 1) as nvarchar(10)), 5) 
                SET @AufNrN = CAST(@AufNrNew AS int)

                PRINT @RechOrt

                INSERT INTO dbo.T_Internetaufträge (rows) VALUES 
                                       (values)

                INSERT INTO dbo.T_Internetaufträge_Historie (rows) VALUES 
                                       (values)

                UPDATE dbo.T_letzteAufNr SET letzteAufNr=(@letzeAufNr+1) WHERE Typ=@Typ AND Jahr=Year(GETDATE())
            -- UPDATE dbo.T_letzteAufNr SET gesperrt=0 WHERE Typ=@Typ AND Jahr=Year(GETDATE()) 


               UPDATE T_Kunden SET FirmaCust=FirmaCust |@firmC WHERE KuNr=@KuNr


                SET @rezultat=@AufNrN
                return @rezultat
    END ELSE BEGIN
            SET @rezultat=-3 /*GESPERT*/
            return -3
        END
   END ELSE BEGIN 
      PRINT 'UPDATE'
      UPDATE dbo.T_Internetaufträge SET rows=values /* many more */ WHERE AufNr = @AufNr
      INSERT INTO dbo.T_Internetaufträge_Historie (rows) VALUES 
                                       (values)
END
SET @rezultat = 0
 return 0
END

1 个答案:

答案 0 :(得分:0)

我终于在另一张桌子上找到了一个触发器。