Foxtable(狐表) → 用户栏目 → 专家坐堂 → 版主请进，请教同一个出库单号，不同合同号的问题


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

主题：版主请进，请教同一个出库单号，不同合同号的问题
帅哥哟，离线，有人找我吗？
szoriental
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		版主请进，请教同一个出库单号，不同合同号的问题  发帖心情 Post By：2014/11/21 12:11:00 [显示全部帖子]

有一个表，内容如下：

出库单号     合同号     规格     数量     单价     合计

123           456       4*10   1000      1       1000

123           456       4*10   1000      1       1000

123           456       5*10    1000     2       2000

123           789       4*10   1000      1.2     1200

123           789       4*10   1000      1.2     1200

 

怎么做到同一个出库存单号下，按不同的合同号合计起来,如：

出库单号     合同号     规格     数量     单价     合计

123           456       4*10   2000      1       2000

123           456       5*10    1000     2       2000

123           789       4*10   2000      1.2     2400

 

 

[此贴子已经被作者于2014-11-22 8:36:32编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
szoriental
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		  发帖心情 Post By：2014/11/21 12:51:00 [显示全部帖子]

自己顶，别沉了

 回到顶部
帅哥哟，离线，有人找我吗？
szoriental
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		  发帖心情 Post By：2014/11/21 13:31:00 [显示全部帖子]

以下是引用e-png在2014-11-21 13:14:00的发言：
用汇总统计即可。单价稍微处理一下。。。 

能不能详细说一下？
 回到顶部
帅哥哟，离线，有人找我吗？
szoriental
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		  发帖心情 Post By：2014/11/21 14:49:00 [显示全部帖子]

以下是引用有点甜在2014-11-21 14:17:00的发言：

 你这个，直接分组统计就行了。

 

http://www.foxtable.com/help/topics/0158.htm

 

 

[此贴子已经被作者于2014-11-21 14:17:21编辑过]

分组统计不是临时表吗？

 

我是想在窗口，设置一个“按钮”选择不同出库单号，然后显示这个出库单号下的所有订单的规格和数量（同一个订单下的相同规格的数量加在一起），然后单价（不同订单对应不同的单价）和合金额；
 回到顶部
帅哥哟，离线，有人找我吗？
szoriental
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		  发帖心情 Post By：2014/11/21 15:01:00 [显示全部帖子]

以下是引用有点甜在2014-11-21 14:51:00的发言：

 你可以拷贝分组统计的代码，放到按钮里面，就行啊。

 

 具体问题，如果不会做，你就上传一个对应的例子上来。

有道理，先试一下，不行再请教，谢谢了
 回到顶部
帅哥哟，离线，有人找我吗？
szoriental
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		  发帖心情 Post By：2014/11/21 15:30:00 [显示全部帖子]

以下是引用有点甜在2014-11-21 14:51:00的发言：

 你可以拷贝分组统计的代码，放到按钮里面，就行啊。

 

 具体问题，如果不会做，你就上传一个对应的例子上来。

在按钮加ENTER事件：

Dim g As New GroupTableBuilder("统计表1", DataTables("出库清单"))
g.Groups.AddDef("出库单号")
g.Groups.AddDef("订单号")
g.Groups.AddDef("规格")
g.Groups.AddDef("单价")
g.Totals.AddDef("出库数量")
g.Totals.AddDef("合计")
g.Build()
MainTable = Tables("统计表1")

 

但预览时提示窗口指定的所有者表不存在，无法打开窗口，怎么办？

[此贴子已经被作者于2014-11-21 15:31:08编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
szoriental
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		  发帖心情 Post By：2014/11/21 16:15:00 [显示全部帖子]

以下是引用有点甜在2014-11-21 15:32:00的发言：

 1、设计好窗口的属性->所有者表

 

 2、Click事件，代码这样写

 

Dim g As New GroupTableBuilder("统计表1", DataTables("出库清单"))
g.Groups.AddDef("出库单号")
g.Groups.AddDef("订单号")
g.Groups.AddDef("规格")
g.Groups.AddDef("单价")
g.Totals.AddDef("出库数量")
g.Totals.AddDef("合计")
e.Form.Controls("Table1").Table.DataSource = g.BuildDataSource

 

然后在这个基础上只显示指定的出库单号的内容，代码怎么写？

比如说，我加一个ComboBox,当我选不同的出库单号时，TABLE1表只显示这个指定的出库单号下的内容?我这样写代码：

ENTER事件：

Dim g As New GroupTableBuilder("统计表1", DataTables("出库清单"))
g.Groups.AddDef("出库单号")
g.Groups.AddDef("订单号")
g.Groups.AddDef("规格")
g.Groups.AddDef("单价")
g.Totals.AddDef("出库数量")
g.Totals.AddDef("合计")
e.Form.Controls("Table1").Table.DataSource = g.BuildDataSource


Dim dh As WinForm.ComboBox = e.Form.Controls("按出库单号")
dh.ComboList = DataTables("出库单").GetComboListString("出库单号")

 

在SELECT事件写代码：

Dim dh As WinForm.ComboBox = e.Form.Controls("按出库单号")
Tables("Table1").Filter = "出库单号 = '" & dh.text & "'"

 

预览提示没有数据表Table1,然后运行错误，FOX死了，
Object reference not set to an instance of an object

 
 回到顶部
帅哥哟，离线，有人找我吗？
szoriental
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		  发帖心情 Post By：2014/11/21 16:29:00 [显示全部帖子]

以下是引用有点甜在2014-11-21 16:23:00的发言：

select 事件

 

 

Dim g As New GroupTableBuilder("统计表1", DataTables("出库清单"))
g.Groups.AddDef("出库单号")
g.Groups.AddDef("订单号")
g.Groups.AddDef("规格")
g.Groups.AddDef("单价")
g.Totals.AddDef("出库数量")
g.Totals.AddDef("合计")

Dim dh As WinForm.ComboBox = e.Form.Controls("按出库单号")
g.Filter = "出库单号 = '" & dh.text & "'"
e.Form.Controls("Table1").Table.DataSource = g.BuildDataSource

Perfect!!!

 
 回到顶部
帅哥哟，离线，有人找我吗？
szoriental
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		  发帖心情 Post By：2014/11/21 16:53:00 [显示全部帖子]

以下是引用有点甜在2014-11-21 16:23:00的发言：

select 事件

 

 

Dim g As New GroupTableBuilder("统计表1", DataTables("出库清单"))
g.Groups.AddDef("出库单号")
g.Groups.AddDef("订单号")
g.Groups.AddDef("规格")
g.Groups.AddDef("单价")
g.Totals.AddDef("出库数量")
g.Totals.AddDef("合计")

Dim dh As WinForm.ComboBox = e.Form.Controls("按出库单号")
g.Filter = "出库单号 = '" & dh.text & "'"
e.Form.Controls("Table1").Table.DataSource = g.BuildDataSource

再请教：在这个基础上，对“出库数量”和“合计”这两列做一个合计，代码怎么加？
 回到顶部
帅哥哟，离线，有人找我吗？
szoriental
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：154 积分：1258 威望：0 精华：0 注册：2012/8/26 17:30:00 		  发帖心情 Post By：2014/11/21 21:17:00 [显示全部帖子]

以下是引用有点甜在2014-11-21 16:56:00的发言：

Dim t As Table = e.Form.Controls("Table1").Table
Dim g As New GroupTableBuilder("统计表1", DataTables("出库清单"))
g.Groups.AddDef("出库单号")
g.Groups.AddDef("订单号")
g.Groups.AddDef("规格")
g.Groups.AddDef("单价")
g.Totals.AddDef("出库数量")
g.Totals.AddDef("合计")
Dim dh As WinForm.ComboBox = e.Form.Controls("按出库单号")
g.Filter = "出库单号 = '" & dh.text & "'"
t.DataSource = g.BuildDataSource

t.Cols("出库数量").GrandTotal = True '指定要合计的列
t.Cols("合计").GrandTotal = True
t.GrandTotal = True '显示合计模式

如果设置一个“导出”按钮，用EXCEL模板，请问一下EXCEL模板中对应的<表>的名称是什么？用TABLE1提示说表不存在；

[此贴子已经被作者于2014-11-21 21:17:41编辑过]
 回到顶部
总数 13 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04993 秒, 5 次数据查询