Foxtable(狐表)用户栏目专家坐堂 → [求教]多表窗口统计


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

主题:[求教]多表窗口统计

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


加好友 发短信
等级:幼狐 帖子:109 积分:1074 威望:0 精华:0 注册:2019/1/16 22:56:00
[求教]多表窗口统计  发帖心情 Post By:2019/4/24 23:17:00 [只看该作者]

在学习文档和论坛中查找了一些多表统计的事例及知识,但对于多表统计还是不清楚,本人所做的统计系统中,就差这两个统计表了,因时间及工作需求关系,特意编写了一些数据,发上来实例,请版主帮写下代码,工作接上后再细细研究这些知识点,万分感谢,希望统计后的结果能达到图上的要求,若不能全实现,请求多实现即可。

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

图片点击可在新窗口打开查看此主题相关图片如下:月汇.png
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/24 23:35:00 [只看该作者]

没看懂你的计算统计逻辑。请举例说明:比如 输入什么值后,点击按钮,得到什么结果。结果由哪些数据通过什么逻辑运算得到。

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


加好友 发短信
等级:幼狐 帖子:109 积分:1074 威望:0 精华:0 注册:2019/1/16 22:56:00
  发帖心情 Post By:2019/4/25 1:07:00 [只看该作者]

非常抱歉,之前有点急,没想到这些,这样的:先说图一(销售对账)
在 [数据统计] 窗体中的 [销售对账] 页上,在 [销售客户名称] 后面选择要对账的客户,例如:四川建设集团有限公司:中梁大理壹号院(一标段)工程-将军洞旁,然后在 [对账时段] 后面两个 [文本框] 中输入时段,例如,20190301,20190331后,点击 [统计] 按钮,在下面临时表中,统计出如图一的数据,
图一中,
1、年月日为其销售的具体日期,FT统计后,可并为如20190303的样式;
2、浇筑标号为此客户买的类如产品规格(称为标号)的东西,即为明细根表中的销售标号列内容,下的数值即为,什么标号,在哪一天里的总销量;
3、砼量日合计,即为该客户在当天里总的销售了多少量的砼,不分标号;
4、泵送费下面的,第一列,有勾的为,此客户在泵送明细表中,当天有使用泵车,相对的签方即为泵送明细表中,此客户对应天,所对应的砼方量_签单列之和,金额即为结算销售列之和;
5、补运费-补方=明细根表里的工地补助-补方,补运费-金额=明细根表里的工地补助-补运额,超时费-超时=明细根表里的工地补助-超时量,超时费-金额=明细根表里的工地补助-补超额,其他费用=明细根表里的工地补助-工补其,这五项均为一天内对应项的和;
6、还有就是每个标号都有单价,标号单价能否显示在标号的上方。
版主,我这样的表述,不知道说清楚没,您看下。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/25 10:44:00 [只看该作者]

参考代码,理解代码后自己扩展

 

Dim xm = "中建五局土木工程有限公司:大理市中心城区综合管廊ppp项目-"
Dim g As New CrossTableBuilder("统计表1", DataTables("明细根表"))
g.HGroups.AddDef("销售审核_结算日期")
g.HGroups.AddDef("销售名称")
g.VGroups.AddDef("销售标号")
g.Totals.AddDef("销量", "销量")
g.HorizontalTotal = True
g.filter = "销售名称='" & xm & "'"
Dim dt1 As fxDataSource
dt1 = g.BuildDataSource

Dim g1 As New GroupTableBuilder("统计表2", DataTables("泵送明细"))
g1.Groups.AddDef("销售结算日期")
g1.Groups.AddDef("销售工地名称")
g1.Totals.AddDef("砼方量_签单")
g1.Totals.AddDef("结算_销售")
g1.filter = "销售工地名称='" &  xm & "'"
Dim dt2 As fxDataSource
dt2 = g1.BuildDataSource

Dim nms1 As String() = {"销售审核_结算日期","销售名称"} '指定连接列
Dim nms2 As String() = {"销售结算日期","销售工地名称"} '指定连接列
dt1.Combine(nms1,dt2,nms2) '将销售统计数据组合到进货统计数据
dt1.Show("统计表1") '显示统计结果


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/25 10:44:00 [只看该作者]


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


加好友 发短信
等级:幼狐 帖子:109 积分:1074 威望:0 精华:0 注册:2019/1/16 22:56:00
  发帖心情 Post By:2019/4/25 12:06:00 [只看该作者]

非常感谢甜版,我理解下,感谢

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


加好友 发短信
等级:幼狐 帖子:109 积分:1074 威望:0 精华:0 注册:2019/1/16 22:56:00
  发帖心情 Post By:2019/4/25 17:10:00 [只看该作者]

哈哈哈,感谢甜版的指导,我研究成功了,
图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20190425170826.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:109 积分:1074 威望:0 精华:0 注册:2019/1/16 22:56:00
  发帖心情 Post By:2019/4/25 17:26:00 [只看该作者]

现在还有后的三个问题,解决就完美了,
1、能否在表中得出各种标号的金额,比如:C15*20180705,共销售309方,单价是380,这种标号在这个结算日期段内的金额就是309*380=117420;
2,表中合计列数据为:一天内的总的销售量,在后面能否加入一列为一天内的销售金额,比如11行(20190320)销售金额列单元格显示为30*380+48*390+36*410=44880:
3、工地补助_下面列中的0值能否不显示;

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/4/25 17:41:00 [只看该作者]

1、3:生成统计表后遍历所有行,给单元格赋值


 回到顶部