InsertOnSubmit = 无法使用已在使用的键添加实体

Question

我正在尝试使用 Linq 将记录插入到表中，但遇到了可怕的 Cannot add an entity with a key that has been in use 错误

'If the same data exists for the same patient in a record less that 21 days old then drop it
Dim RecordLookup As Integer = 0
RecordLookup = (From rc In CDEvodb.RISKCHANGEs _
    Where rc.NHI = tmpNHI And _
    rc.RECDATE > Date.Now.AddDays(-21) And _
    rc.BPSYS = Convert.ToDecimal(Drow.Item("BPSYS")) And _
    rc.CHOL = Convert.ToDecimal(Drow.Item("CHOL")) And _
    rc.HDL = Convert.ToDecimal(Drow.Item("HDL"))).Count()
If (RecordLookup = 0) Then
Dim riskchange As New RISKCHANGE
    riskchange.NHI = Drow.Item("NHI")
    riskchange.RECDATE = Date.Now.Date()
    riskchange.RISK = CalculatedRisk
    riskchange.BPSYS = Drow.Item("BPSYS")
    riskchange.CHOL = Drow.Item("CHOL")
    riskchange.HDL = Drow.Item("HDL")

    Try
        CDEvodb.RISKCHANGEs.InsertOnSubmit(riskchange)
    Catch ex As Exception
        myLogging.OutputError("<" & DateTime.Now.ToString & "> " & "Error - creating risk change record in dataset for patient " & Drow.Item("NHI").ToString() & " - " & ex.Message)
    End Try

End If

基本上，我在表中查找不到 21 天的匹配记录（不包括身份字段）。如果找不到，我会创建一个行的实例并设置为插入它。

SubmitChanges 函数被调用了几行。

Drow 是来自先前使用 SQLClient 连接填充的 Dataset 的 DataRow（原因是我还没有完全转换到 Linq，现在只是在做新功能）。

提前干杯。

---

这是表的创建脚本：

USE [CDEvolution]

去

/****** 对象：表 [dbo].[RISKCHANGES] 脚本日期：05/13/2009 14:40:15 ******/

设置 ANSI_NULLS 为开

去

设置 QUOTED_IDENTIFIER 开启

去

设置 ANSI_PADDING 为开

去

创建表 [dbo].[RISKCHANGES](

[NHI] [varchar](7) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,

[RECDATE] [datetime] NOT NULL,

[RISK] [numeric](15, 0) NOT NULL,

[BPSYS] [numeric](15, 0) NOT NULL,

[CHOL] [numeric](15, 1) NOT NULL,

[HDL] [numeric](15, 1) NOT NULL,

[POSTED] [varchar](50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,

[IDENTITY] [uniqueidentifier] NOT NULL CONSTRAINT [DF_RISKCHANGES_IDENTITY]  

默认 (newid()),

CONSTRAINT [PK_RISKCHANGES] 主键集群

(

[IDENTITY] ASC

)WITH (PAD_INDEX = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]

) 开启 [主要]

去

设置 ANSI_PADDING 关闭

Answer 1

如果您更新 DBML，请将 (IsDbGenerated="true") 添加到 PK 成员：

    <Column Name="[IDENTITY]" Member="IDENTITY" Type="System.Guid" 
            DbType="UniqueIdentifier NOT NULL" IsPrimaryKey="true" 
            CanBeNull="false" IsDbGenerated="true"/>

它将让 SQL 分配默认值 (newid())。

否则它将发送未初始化的 guid ('00000000-0000-0000-0000-000000000000')，据我所知，这基本上是导致问题的原因。

您的其他选择可能是扩展部分类并在 OnCreated() 事件中初始化 GUID（不使用列的 newid() 默认值，但确实解决了问题：

    partial class RISKCHANGE
    {
        partial void OnCreated()
        {
            _IDENTITY = Guid.NewGuid();
        }
    }

请注意，对于现有实体（由查询填充），在处理 OnLoaded() 时，此值将被正确的值覆盖。

Answer 2

你的主键是什么？你还有其他的键/约束吗？它可能是导致问题的原因之一。我建议扩大匹配记录的搜索范围，或更改您的约束条件。

Answer 3

嘿，凯文，快速提问，可能很愚蠢，但只是为了获得更好的想法......

您在新的 riskchange 对象上设置的任何属性是主键属性吗？

另外，在调用 SubmitChanges() 之前你还做了什么？

干杯

编辑：

感谢凯文。这条线是怎么回事？：

[IDENTITY] [uniqueidentifier] NOT NULL CONSTRAINT [DF_RISKCHANGES_IDENTITY]

你对PK有什么限制...？为什么看起来不像：

[IDENTITY] [int] IDENTITY(1,1) NOT NULL

?

编辑 嘿凯文。我认为问题在于您没有将 PK 设置为身份说明符，因此它不会自动增加 P​​K。

要解决此问题，请通过更改此行重新创建表：

[IDENTITY] [uniqueidentifier] NOT NULL CONSTRAINT [DF_RISKCHANGES_IDENTITY]

到这里：

[IDENTITY] [int] IDENTITY(1,1) NOT NULL

或者，如果您使用 Mangement Studio，只需进入该表的设计。转到该字段的属性，然后在属性窗口（通常出现在下面）中将“身份规范”（Is Identity）设置为“是”。

别忘了更新您的 LINQ 2 SQL DBML