- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 为何出现这样 如图 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=196278)
-- 发布时间：2025/4/14 21:47:00
-- 为何出现这样 如图
-- 发布时间：2025/4/14 22:26:00
--
说明本来就是这样
-- 发布时间：2025/4/14 22:29:00
--
计算出来的
-- 发布时间：2025/4/14 22:31:00
--
Tables(e.form.Name & "_Table1").fill("selec a.供应商编码, a.供应商名称,a.简码, 期初金额, sum(金额2) as 进货金额, sum(金额1) as 付款金额,(isnull(期初金额,0)-isnull(sum(金额2),0)+isnull(sum(金额1),0)) as 余额 from {供应商} as a left join ( selec 单位编码, 单位名称, 贷方金额 as 金额1, 0 as 金额2 from {资金收付明细单} where 单据状态=\'已审核\' union all selec 供应商编码,供应商名称,0,实际金额 as 金额2 from {辅料流水帐} where 单据状态=\'已审核\') As b on a.供应商编码 = b.单位编码 And a.供应商名称 = b.单位名称 group by a.供应商编码, a.供应商名称,a.简码,期初金额","wjhansdata",True)
\'Tables(e.form.Name & "_Table1").SetColVisibleWidth("产品编码|60|产品名称|236|产品规格|100|基本单位|60|辅助库存|60|库存数量|100")
Tables(e.form.Name & "_Table1").Cols("期初金额").GrandTotal = True \'指定要合计的列
Tables(e.form.Name & "_Table1").Cols("进货金额").GrandTotal = True
Tables(e.form.Name & "_Table1").Cols("付款金额").GrandTotal = True
Tables(e.form.Name & "_Table1").Cols("余额").GrandTotal = True
Tables(e.form.Name & "_Table1").SetColVisibleWidth("供应商编码|60|供应商名称|260|余额|120")
Tables(e.form.Name & "_Table1").GrandTotal = True \'显示合计模式
\'Tables(e.form.Name & "_Table1").DataTable.DataCols("余额").SetFormat("0.00")
这样计算出来的
-- 发布时间：2025/4/14 22:43:00
--
参与计算的列全部改为高精度