Foxtable(狐表)用户栏目专家坐堂 → 这样的统计如何实现呀?


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

主题:这样的统计如何实现呀?

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


加好友 发短信
等级:童狐 帖子:272 积分:2421 威望:0 精华:0 注册:2013/4/13 10:03:00
这样的统计如何实现呀?  发帖心情 Post By:2013/8/14 12:48:00 [只看该作者]

Dim ColRelation1() As String
Dim ColRelation2() As String
Dim b As New SQLGroupTableBuilder("统计表1","工艺卡工序操作员表")
b.C
b.AddTable("工艺卡工序操作员表","ID","工艺卡工序表","_Identify")
b.AddTable("工艺卡工序操作员表","生产单号","工艺卡主表","生产单号")
b.AddTable("工艺卡主表","品种","品种表","品种编码")
b.AddTable("工艺卡工序表","工序编码","工序表","工序编码")
b.AddTable("工艺卡工序表","部门编码","部门表","部门编码")
ColRelation1=New String() {"质检人编码","所属年度"}
ColRelation2=New String() {"员工编码","所属年度"}
b.AddTable("工艺卡工序表",ColRelation1,"员工表",ColRelation2)
ColRelation1=New String() {"操作工编码","所属年度"}
ColRelation2=New String() {"员工编码","所属年度"}
b.AddTable("工艺卡工序操作员表",ColRelation1,"员工表",ColRelation2)
b.Groups.AddDef("{工艺卡工序操作员表}.生产单号") 
b.Groups.AddDef("投产日期",DateGroupEnum.None) 
b.Groups.AddDef("加工要求") 
b.Groups.AddDef("品种名称") 
b.Groups.AddDef("工序名称") 
b.Groups.AddDef("报工日期") 
b.Groups.AddDef("部门名称") 
b.Groups.AddDef("质检人编码") 
b.Groups.AddDef("员工姓名","质检人姓名") 
b.Groups.AddDef("操作工编码") 
b.Groups.AddDef("员工姓名","操作工姓名") 
b.Totals.AddDef("实际完成数量")
b.Totals.AddDef("操作工罚款") 

b.VerticalTotal=True


Tables(e.Form.Name & "_Table1").DataSource = b.BuildDataSource

工艺卡工序表和工艺卡工序操作员表都与员工表关联,这样添加的员工表就会重复,怎样可以进行区分呀?在添加分组列的时候可以分别取出对应的员工姓名?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/8/14 12:50:00 [只看该作者]

上例子吧

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/8/14 14:19:00 [只看该作者]

b.Groups.AddDef("{表名}.员工姓名","质检人姓名")

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


加好友 发短信
等级:童狐 帖子:272 积分:2421 威望:0 精华:0 注册:2013/4/13 10:03:00
  发帖心情 Post By:2013/8/14 14:34:00 [只看该作者]

我想做的统计报表格式如下:

生产单号 投产日期 加工要求 品种名称 工序名称 质检人编码 质检人姓名 操作工编码 操作工姓名 计件工资 操作工罚款 应发计件工资

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/8/14 14:41:00 [只看该作者]

三楼不是给你答案了吗:

 

如果某列在多个表出现,你可以:

 

b.Groups.AddDef("{表名1}.列名1","质检人姓名")

b.Groups.AddDef("{表名2}.列名1","操作员姓名")


 回到顶部