在分组统计中生成的代码,中间不会有groups和totals交替出现,虽然在maintablechanged事件中可以调整代码顺序,但结果还是分组归分组、统计归统计,但这种分组统计不是我所希望的。
请教:怎样才能真正实现下列的混合输出呢?谢谢!
If MainTable.Name = "项目全面管理" And (user.name="王玉堂" Or user.name="开发者") Then
Dim g As New GroupTableBuilder("在建自查", DataTables("项目全面管理"))
g.Groups.AddDef("实体名称")
g.Groups.AddDef("编号")
g.Groups.AddDef("项目名称")
g.Groups.AddDef("项目经理")
g.Totals.AddDef("合同额_历年已签")
g.Totals.AddDef("合同额_历年未签")
g.Totals.AddDef("合同额_本年已签")
g.Totals.AddDef("合同额_本年未签")
g.Totals.AddDef("营业额_本年合计")
g.Totals.AddDef("营业额_历年累计")
g.Totals.AddDef("营业额_总计")
g.Totals.AddDef("营业额_剩余")
g.Groups.AddDef("项目地区")
g.Groups.AddDef("合同甲方")
g.Groups.AddDef("合同乙方")
g.Groups.AddDef("行业类别")
g.Groups.AddDef("工程类型")
g.Groups.AddDef("开工日期", DateGroupEnum.None)
g.Groups.AddDef("合同工期", DateGroupEnum.None)
g.Groups.AddDef("外协单位名称")
g.Groups.AddDef("合同签订")
g.Totals.AddDef("合同额")
g.Totals.AddDef("已付额")
g.Groups.AddDef("备注")
g.Filter = "[状态]='在建'"
g.Build()
Tables("在建自查").AutoSizeCols()
End If