Foxtable(狐表)用户栏目专家坐堂 → “_Identify”主键冲突


  共有2117人关注过本帖树形打印复制链接

主题:“_Identify”主键冲突

帅哥哟,离线,有人找我吗?
whx007
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:228 积分:2057 威望:0 精华:0 注册:2017/8/18 17:51:00
“_Identify”主键冲突  发帖心情 Post By:2018/7/23 16:52:00 [只看该作者]

今天打开项目订单表出现以下问题:

 

.NET Framework 版本:2.0.50727.8762
Foxtable 版本:2018.7.9.1
错误所在事件:
详细错误信息:
列“_Identify”被约束为是唯一的。值“14433”已存在。

 

在窗口表和实体表都提示相同问题,我查看了只要未付款列的值大于0的行,都提示主键重复。之前没有这个问题存在,请问怎么解决。紧急!



 回到顶部
帅哥哟,离线,有人找我吗?
whx007
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:228 积分:2057 威望:0 精华:0 注册:2017/8/18 17:51:00
  发帖心情 Post By:2018/7/23 17:21:00 [只看该作者]

If e.Table.Current IsNot Nothing Then
    Dim Filter As String = "订单号 = '" & e.Table.Current("订单号") & "'"
    If DataTables("销售明细表").Find(Filter) Is Nothing Or DataTables("订单付款明细表").Find(Filter) Is Nothing Then  '如果对应的订单明细和付款明细都没有加载过
        DataTables("销售明细表").AppendLoad(Filter) '则追载此订单的订单明细
        DataTables("订单付款明细表").AppendLoad(Filter) '则追载此订单的订单付款明细
    End If
End If
刚检查是订单表的CurrentChanged引起的,怎么改代码是对的

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/23 17:26:00 [只看该作者]

改成这样

 

If e.Table.Current IsNot Nothing Then
    Dim Filter As String = "订单号 = '" & e.Table.Current("订单号") & "'"
    If DataTables("销售明细表").Find(Filter) Is Nothing
        DataTables("销售明细表").AppendLoad(Filter) '则追载此订单的订单明细
    End If
    If DataTables("订单付款明细表").Find(Filter) Is Nothing Then  '如果对应的订单明细和付款明细都没有加载过
        DataTables("订单付款明细表").AppendLoad(Filter) '则追载此订单的订单付款明细
    End If
End If


 回到顶部
帅哥哟,离线,有人找我吗?
whx007
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:228 积分:2057 威望:0 精华:0 注册:2017/8/18 17:51:00
  发帖心情 Post By:2018/7/23 17:42:00 [只看该作者]

好的,谢谢

 回到顶部