- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 这个总价应该怎么实现呢？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=172397)
-- 发布时间：2021/10/11 9:33:00
-- 这个总价应该怎么实现呢？
此主题相关图片如下：11.png
商品的关联我明白，但是这个订单总价在狐表里要怎么表达呢？
-- 发布时间：2021/10/11 9:34:00
--
另起一个子表格，以单号关联吗？
-- 发布时间：2021/10/11 9:46:00
--
到datacolchanged事件处理
if e.datacol.name = "商品总价" then
e.datarow("订单总价") = e.datatable.compute("sum(商品总价)","订单编号=\'" & e.datarow("订单编号") & "\'")
end if
-- 发布时间：2021/10/11 10:11:00
--
超感谢
-- 发布时间：2021/10/11 10:41:00
--
If e.DataCol.Name = "日期" Then
If e.DataRow.IsNull("日期") Then
e.DataRow("编号") = Nothing
Else
Dim bh As String = Format(e.DataRow("日期"),"yyyyMMdd") \'取得编号的8位前缀
If e.DataRow("编号").StartsWith(bh) = False \'如果编号的前8位不符
Dim max As String
Dim idx As Integer
max = e.DataTable.Compute("Max(编号)","日期 = #" & e.DataRow("日期") & "# And [_Identify] <> " & e.DataRow("_Identify")) \'取得该天的最大编号
If max > "" Then \'如果存在最大编号
idx = CInt(max.Substring(9,3)) + 1 \'获得最大编号的后三位顺序号,并加1
Else
idx = 1 \'否则顺序号等于1
End If
e.DataRow("编号") = bh & "-" & Format(idx,"000")
End If
End If
End If
蓝大，按日期生成编号的代码是这个，如果我要达到我主贴所发的效果，那应该是加一个逻辑列，选择该商品是否为附属商品，列名取“附属商品”
这时候代码应该怎么修改呢？ 还是说有其他更好的方式？
-- 发布时间：2021/10/11 10:46:00
--
没看懂。“附属商品”和总价有什么关系？
-- 发布时间：2021/10/11 11:04:00
--
啊，抱歉，没描述清楚，因为订单总价是按订单编号来判断的。
那我在设置自动编号的时候是不是就应该加个逻辑列，判断是附属商品的话，则订单号保持一致。
-- 发布时间：2021/10/11 11:07:00
--
建议改为父子表的关系吧，订单主表（主单信息，明细汇总等）+订单明细表（商品明细），然后通过订单编号关联
-- 发布时间：2021/10/11 11:15:00
--
这样的话 在订单明细表里我一样是要手动输入编号吧。。
-- 发布时间：2021/10/11 11:21:00
--
不需要
方法1、通过关联表新增
2、在新增行事件获取父表当前行的编号填入