以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于组合多个交叉统计结果  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=14071)
--  作者：lujing72
--  发布时间：2011/11/7 11:50:00
--  关于组合多个交叉统计结果

     制作了两个表：入库明细表和出库明细表，希望用交叉统计表的形式把出入库数据汇总在一起，但生成后只看到入库数据部分，出库数据部分却看不到，为什么？详见附件。

     望高手指点，谢谢！

   

 

                                            附件：

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.rar

               

 

[此贴子已经被作者于2011-11-7 12:00:40编辑过]
--  作者：狐狸爸爸
--  发布时间：2011/11/7 15:33:00
--  
可能是foxtable的bug，我检查一下，有消息再回复你。
--  作者：lujing72
--  发布时间：2011/11/7 15:48:00
--  

谢谢爸爸，等你消息！这个问题折磨我一天了！
--  作者：狐狸爸爸
--  发布时间：2011/11/7 15:53:00
--  
好的，我会尽快的
--  作者：lujing72
--  发布时间：2011/11/10 12:23:00
--  
顶上！！！！等待解决！！！！！！！！
--  作者：hhbb
--  发布时间：2011/11/10 13:15:00
--  
以下是引用lujing72在2011-11-10 12:23:00的发言：
顶上！！！！等待解决！！！！！！！！
不要心急!老大会解决的,给个应急的方法给你:
Dim g1 As New CrossTableBuilder("统计表1", DataTables("入库明细"))
g1.HGroups.AddDef("材料名称")
g1.HGroups.AddDef("型号规格")
g1.VGroups.AddDef("入库方式","入库_{0}")
g1.Totals.AddDef("数量", "入库_数量")
Dim t As Table = Tables("窗口1_Table1")
Dim s,s1 As String
t.DataSource = g1.BuildDataSource
For Each s  In DataTables("出库明细").GetUniqueValues("","出库方式")
    t.DataTable.DataCols.Add("出库_" & s, Gettype(Double))
    For Each r As Row In t.Rows
        s1="材料名称 = \'" & r("材料名称") & "\' and 型号规格 = \'"
        s1+= r("型号规格") & "\'and 出库方式 =\'" & s & "\'"
        r("出库_" & s) =DataTables("出库明细").Compute("sum(数量)",s1)
    Next
Next

[此贴子已经被作者于2011-11-10 13:18:05编辑过]
--  作者：lujing72
--  发布时间：2011/11/10 15:12:00
--  

感谢楼上的hhbb兄弟!

不过这样的话效率应该不能与用交叉统计来得高。
--  作者：狐狸爸爸
--  发布时间：2011/11/10 15:13:00
--  
呵呵，请临时解决一下，下次更新不会有这个问题的。