Foxtable(狐表)用户栏目专家坐堂 → [求助]关联表的子表,同步表时特别慢


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

主题:[求助]关联表的子表,同步表时特别慢

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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
[求助]关联表的子表,同步表时特别慢  发帖心情 Post By:2021/5/13 13:22:00 [显示全部帖子]

主表就是下单的,子表就是生产的记录,刷新子表时特别慢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:华晨生产计划.zip


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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
  发帖心情 Post By:2021/5/13 13:32:00 [显示全部帖子]

还有新版本的交叉统计,不能直接显示小计了

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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
  发帖心情 Post By:2021/5/13 14:00:00 [显示全部帖子]

004226


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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
  发帖心情 Post By:2021/5/13 15:11:00 [显示全部帖子]

请老师帮忙,我不知道该怎么设计代码,要关联到  登记日期,客户,花号,色位,面料,下单米数,打印机台  ,都相同才能统计


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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
  发帖心情 Post By:2021/5/13 15:30:00 [显示全部帖子]

If e.DataCol.Name = "总米数" Then
    Dim pr As DataRow
    pr = 
DataTables("华晨生产计划").Find("(登记日期 = '" & e.DataRow("登记日期") & "',客户 = '" & e.DataRow("客户") & "' ,花号 = '" & e.DataRow("花号") & "')")
    If
 pr IsNot Nothing 
Then
        pr(
"总米数")= pr("总米数") + e.NewValue - e.OldValue
    End
 
If
End
 If

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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
  发帖心情 Post By:2021/5/13 15:52:00 [显示全部帖子]

Select Case e.DataCol.name
    Case "登记日期","客户","花号","色位","面料","米数","打印机台"
    Dim Filter As String = "[登记日期] = '" & e.DataRow("登记日期") & "' and [客户] = '" & e.DataRow("客户") & "' and [花号] = '" & e.DataRow("花号") & "' and [色位] = '" & e.DataRow("色位") & "' and [面料] = '" & e.DataRow("面料") & "' and [下单米数] = '" & e.DataRow("米数") & "' and [打印机台] = '" & e.DataRow("打印机台") & "'"
    e.DataRow("打印总数") = DataTables("打印明细").Compute("Sum(打印米数)", Filter)
    e.DataRow("墨水总量") = DataTables("打印明细").Compute("Sum(墨水用量)", Filter)
End Select

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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
  发帖心情 Post By:2021/5/13 16:04:00 [显示全部帖子]

If e.DataCol.Name = "登记日期" OrElse e.DataCol.Name = "客户" OrElse e.DataCol.Name = "花号" OrElse e.DataCol.Name = "色位" OrElse e.DataCol.Name = "面料" OrElse e.DataCol.Name = "米数" OrElse e.DataCol.Name = "打印机台" Then
    Dim Filter As String = "[登记日期] = '" & e.DataRow("登记日期") & "' and [客户] = '" & e.DataRow("客户") & "' and [花号] = '" & e.DataRow("花号") & "' and [色位] = '" & e.DataRow("色位") & "' and [面料] = '" & e.DataRow("面料") & "' and [下单米数] = '" & e.DataRow("米数") & "' and [打印机台] = '" & e.DataRow("打印机台") & "'"
    e.DataRow("打印总数") = DataTables("打印明细").Compute("Sum(打印米数)", Filter)
    e.DataRow("墨水总量") = DataTables("打印明细").Compute("Sum(墨水用量)", Filter)
End If

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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
  发帖心情 Post By:2021/5/13 16:16:00 [显示全部帖子]

If e.DataCol.Name = "登记日期" OrElse e.DataCol.Name = "客户" OrElse e.DataCol.Name = "花号" OrElse e.DataCol.Name = "色位" OrElse e.DataCol.Name = "面料" OrElse e.DataCol.Name = "米数" OrElse e.DataCol.Name = "打印机台" Then
    Dim Filter As String = "[登记日期] = #" & e.DataRow("登记日期") & "# and [客户] = '" & e.DataRow("客户") & "' and [花号] = '" & e.DataRow("花号") & "' and [色位] = '" & e.DataRow("色位") & "' and [面料] = '" & e.DataRow("面料") & "' and [下单米数] = '" & e.DataRow("米数") & "' and [打印机台] = '" & e.DataRow("打印机台") & "'"
    e.DataRow("打印总数") = DataTables("打印明细").Compute("Sum(打印米数)", Filter)
    e.DataRow("墨水总量") = DataTables("打印明细").Compute("Sum(墨水用量)", Filter)
End If

这个测试了没有反应,也不报错,列 打印总数和 墨水总量 没有统计出来

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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
  发帖心情 Post By:2021/5/13 17:16:00 [显示全部帖子]

不行,没有反应

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


加好友 发短信
等级:幼狐 帖子:98 积分:860 威望:0 精华:0 注册:2020/5/28 10:53:00
  发帖心情 Post By:2021/5/13 17:46:00 [显示全部帖子]

可是这两表是关联表啊,不应该是一样的吗,关联的内容也是那些列,而且打印明细上增加的行都是在  华晨生产记录.打印明细 这个子表上增加的

 回到顶部
总数 12 1 2 下一页