Dim g As New CrossTableBuilder("统计表1", DataTables("fsuf_pmc"))
g.HGroups.AddDef("orderdate", DateGroupEnum.Day, "日")
g.VGroups.AddDef("actualgxda")
g.VGroups.AddDef("already", "已排|未排")
g.VGroups.AddDef("complete", "已完工|未完工")
g.Totals.AddDef("iquantity", "iquantity")
g.Build()
MainTable = Tables("统计表1")