主题：苦恼.数据在局域网中使用

老爹，请看清楚哦，先用SQL语句生成临时表，再填充。这样会产生空格或回车吗？

计算总金额是直接用SQL计算医嘱表生成的，而结算表金额大于总金额时，多出的部分正好是重复的行的总额。

对啊，但请看看清楚SQL查询语句以及GroupTableBuilder函数生成的临时表，那个是不会产生重复内容吧？按道理就算有重复行，结算表的总金额也应该等于医嘱表总金额啊。

C版，系统fa piao打印产生的金额是直接针对医嘱表查询进行计算的，这保证了患者总金额的准确性，而汇总清单则是通过对结算表查询生成。
正常情况下，98%的患者这两者总金额是相等的，但总有那么一两个会出现重复数据，导致两者相差几十元甚至上千元，这与浮点应该无关，是生成临时表或填充时重复填充了某些行。

你注意到吗？代码第一行实际上就是医嘱表计算总金额的类似公式。

select sum(round(单价*用量*天数,2)) AS 金额 from [H_YIZ] where 住院ID = '" & str & "'"


为何经过了统计和填充两个步骤就会出现重复行呢？网络传输？或者其他问题？或者是BUG？

            cmd.CommandText = "select 住院ID,项目,规格,类别,单位,单价,用量*天数 AS 用量,round(单价*用量*天数,2) AS 金额 from [H_YIZ] where 住院ID = '" & str & "'"
            dt = cmd.ExecuteReader()
            Dim g As New GroupTableBuilder("清单",dt)
            g.Groups.AddDef("住院ID")
            g.Groups.AddDef("类别")
            g.Groups.AddDef("项目")
            g.Groups.AddDef("规格")
            g.Groups.AddDef("单位")
            g.Groups.AddDef("单价")
            g.Totals.AddDef("用量")
            g.Totals.AddDef("金额")
            g.Build()


            dim f As New Filler
            f.SourceTable = DataTables("清单")
            f.SourceCols = "住院ID,类别,项目,规格,单位,单价,用量"
            f.DataTable = DataTables("结算")
            f.DataCols = "住院ID,类别,项目,规格,单位,单价,用量"
            f.Distinct = False
            f.Fill()
            DataTables("结算").Save()

第四点成立的话，那为何总金额不相等？两个SQL语句是在已经办理出院后同时执行的，该患者在医嘱表中的信息早已停止录入。

我觉得还是填充时出现了问题，至于是什么原因造成的就不清楚了。

这个是有的，并且，每行都有患者ID列，不会发生把原来的数据错误引用的问题。

如果出错，为什么不是全部患者？就一两个？我的感觉是，生成临时表时已经出现了重复行，填充时又设定了false，所以出现重复。至于为何生成临时表时出现重复行那就真的搞不懂了。