求教这个问题怎么破？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

下载信息 [文件大小：下载次数： ]
点击浏览该文件:测试.table

3个表，商品信息，流水信息，付款明细，关联关系 ab bc 。

需求：统计出付款明细中用代金券付款的流水，算出所用代金券是否回本？公式：（销售额-进价） = 成本 - 代金券总额 = 是否亏损。

需求2：最后统计的结果表中，要求有门店名，导购名，日期，流水单号，商品名称，和亏损数额。

难点：商品名称只有在商品表中才有，商品表和流水表用各自的 item_no 商品编号关联，付款明细什么都没有。

难点2：一个流水单号，或许存在多个流水条目，例如流水编号001的流水中，可能存在1个或2个甚至多个商品，所以如果买了5个商品，001编号在流水表里会出现5次。

难点3：代金券的额度是10元一张。比如顾客有50元代金券，消费后，付款明细中会出现此流水单号例如001的5条额度为10的流水，总额50元。

终极难点：因为付款明细没有商品名称表，所以我先addTable()组合到一起，

如果按分组统计时要商品名称也显示，最终的统计结果是：例如流水001中的每个商品都和付款明细中的5条记录相结合，最终光这条流水就会有25条记录。

ps：如果不要商品名称我已经实现了，但老板必须要显示商品名称，没办法了，他以前用的软件的数据表就是这么设计的，我无法更改，只能求各位了！

注释： 1上传的实例中，流水表的进价没有和数量相乘，我在计算时相乘了。

2流水表里某个流水的子流水都没有这次消费总共金额是多少，而在付款明细中是有的（总额）。

3我的无商品名称的解决思路是按流水单号为单位统计，一切就正常，一加上商品名称，一条流水瞬间变N条了！！！

求大神帮帮啊！

以下是引用a2029460在2016/8/10 14:38:00的发言：

ps：如果不要商品名称我已经实现了，但老板必须要显示商品名称，没办法了，他以前用的软件的数据表就是这么设计的，我无法更改，只能求各位了！

生成的表格以后，动态加入一列，然后跨表引用商品名称就好啊

Dim dt As DataTable = DataTables("统计表")
dt.DataCols.Add("商品名称", Gettype(String))
For Each dr As DataRow In dt.DataRows
    Dim fdr As DataRow = DataTables("商品档案").Find("商品编号 = '" & dr("商品编号") & "'")
    If fdr IsNot Nothing Then
        dr("商品名称") = fdr("商品名称")
    End If
Next

可问题是，统计以后一个流水单就一条数据了，但实际一条流水有可能有多个商品啊，要以统计的表为左表的话，用你这个方法应该只能添加一个商品吧？此流水中其余商品的名称咋办啊？

因为商品是唯一的，而统计出的流水也变成一条了，一条对一条那就是一条啊，可是买了的商品万一有好几个咋办