主题：交叉统计问题困扰，请指教！

大侠们请出手相助，这段代码怎么不行了呢，10月11日更新之前还好好的


MainTable = Tables("wmdd")
Syscmd.Table.load
Dim g As New CrossTableBuilder("tj01", DataTables("wmdd"), "[部门编码]='0148'and [排产日期] >= #2009-10-01#")
g.HGroups.AddDef("分类编码")
g.HGroups.AddDef("分类名称")
g.VGroups.AddDef("排产日期", DateGroupEnum.None)
g.Totals.AddDef("计划数量", "计划数量")
g.OrderByTotal = True
g.HorizontalTotal = True
g.Filter = "[部门编码]='0148'and [排产日期] >= #2009-10-01#"
g.Build()
MainTable = Tables("tj01")
For Each cl As Col In CurrentTable.Cols
    cl.Width = 42
Next
CurrentTable.Cols(1).Width =155
CurrentTable.Cols.Frozen = 2
Syscmd.Table.ChangeAlterBackColor(Color.Beige)
Syscmd.Table.ChangeGridLineColor(Color.gray)



提示错误信息如下：


此主题相关图片如下：lll.bmp

文件全部是外部查询表，而且发现同步表数据操作（也就是系统菜单“同步”）时假死

然后就会出现上述提示

在线等啊，他爹在不

问题应该出在同步外部数据表的命令上了，代码后面是正确的，
MainTable = Tables("wmdd")
Syscmd.Table.load
这里有问题

删除就可以了，但是外部数据要更新如何修改这句代码，请指教！

这个表wmdd属于外部数据源多表查询，代码如下，经测试，在建立外部查询表时可正常生成，但是只要同步此表，就出现上述提示，查询表的代码如下：

select distinct a.planid as'计划组号', a.requiredate as'排产日期',f.date_paying as'交货期',c.deptcode as'部门编码',d.name as'部门名称',a.requiresumcontractno as'订单编号',a.id_contract as'合同编号',a.itemcode as'产品编码',b.name as'产品名称',b.unit as'单位',b.classcode as'分类编码',e.classname as'分类名称',a.plannum as'计划数量',a.finishnum as'完成数量',a.color as'颜色',a.remark as'商标',f.price_taxfree*g.rate_exchange as '单价' from aec00000 a,aaa00000 b,abb00000 c,zad00000 d,aam00000 e,eba00000 g,ebf00000 f where a.itemcode=b.code and a.centercode='0100' and c.itemcode=a.itemcode and c.deptcode=d.code and b.classcode=e.classcode and a.plannum<>a.finishnum and a.requiredate>getdate()-30  and g.id_contract=f.id_contract and a.id_contract=f.id_contract and f.id_product= a.itemcode  and g.sellunit<>'0702' order by a.requiredate,c.deptcode,a.itemcode

需要说明的是，在10月11日的更新前版本中，这段代码是没问题的，他爹，抽出您宝贵时间看一下，好吗？

去掉Distinct后，生成表是可以的，但是同步命令就出现假死现象，并提示上述出错信息。
而且发现一个现象，多表查询做同步都会报错，外部数据表同步就正常。

有消息了吗

其他人试试同步外部多表查询表有这种现象吗