以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  SQL Table在折叠表中增加记录无法自动汇总,计算错误。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173553)

--  作者:playmal
--  发布时间:2021/12/5 19:38:00
--  SQL Table在折叠表中增加记录无法自动汇总,计算错误。
在窗口中设置SQL Table,在新增一条记录以后,无法自动汇总,且计算错误。请问什么原因。
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20211205193227.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2021/12/6 7:16:57编辑过]

--  作者:playmal
--  发布时间:2021/12/5 19:39:00
--  
1.2.3和1.2.4是后面增加的两条记录,是用的Tables(“产品BOM清单_Table1”).addnew()指令增加的记录。
--  作者:playmal
--  发布时间:2021/12/5 19:40:00
--  
层级筛选树中也没有同步修正。
--  作者:foxtablefanse
--  发布时间:2021/12/5 19:54:00
--  
班长的框架?
--  作者:playmal
--  发布时间:2021/12/5 20:41:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20211205203842.png
图片点击可在新窗口打开查看

--  作者:playmal
--  发布时间:2021/12/5 20:41:00
--  
看起来全部被乘以2了。
--  作者:有点蓝
--  发布时间:2021/12/5 21:22:00
--  
需要手工刷新:http://www.foxtable.com/webhelp/topics/3725.htm

设置了汇总模式,汇总结果才会自动刷新:http://www.foxtable.com/webhelp/topics/3717.htm

--  作者:playmal
--  发布时间:2021/12/5 22:42:00
--  
汇总模式是用的代码。不是刷新的问题:
Dim t1 As Table=Tables("产品BOM清单_Table1")
t1.AllowEdit = True

Dim st As New LayerTreeSetting
st.PathCol = "级码"
st.Separator = "."
st.TreeCol  = "项目"
st.AggregateCols = {"数量","金额"}
st.UseStyle = True
st.TextCol = "项目"
st.ValueCol = "数量"
st.GridTree = True
st.Unique = False
Tables("产品BOM清单_Table1").ShowGridTree(st)

Dim trv As WinForm.LayersTree = e.Form.Controls("LayersTree1")
trv.BuildFilterTree(Tables("产品BOM清单_Table1"), st)

执行上述代码,结果就是错的

--  作者:playmal
--  发布时间:2021/12/5 22:43:00
--  
请注意:这是SQL Table,不是内部表
--  作者:playmal
--  发布时间:2021/12/5 22:44:00
--  
是窗口表