以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]表达式的运算  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=27998)

--  作者:ljh29206
--  发布时间:2013/1/16 9:38:00
--  [求助]表达式的运算

[月初库存]+IIF(Child(部品信息关联).进出方式="入库",Sum(Child(部品信息关联).总数量))-IIF(Child(部品信息关联).进出方式="出库",sum(Child(部品信息关联).总数量))

提示 cannot interpet token \'child\' at position 12.

 

有1个总表     列 为  月初库存   和  当前库存

有1个子表     列 为  进出方式( 分别是 入库 和 出库)   和  总数量

 

请教 我上边的 表达式那里错了.      当前库存 = 月初库存 +  入库总数  -出库总数 


--  作者:lin_hailun
--  发布时间:2013/1/16 10:18:00
--  
 你要实现的东西不能通过表达式直接完成的,编写少量代码吧。

 http://www.foxtable.com/help/topics/2234.htm
--  作者:ljh29206
--  发布时间:2013/1/16 10:22:00
--  

哦,明白了 .多谢林老师.

 

帮助没看透......


--  作者:ljh29206
--  发布时间:2013/1/16 11:36:00
--  

Dim g As New GroupTableBuilder("统计表1", DataTables("部品明细"))
Dim dt1 As fxDataSource
g.Groups.AddDef("品番")
g.Groups.AddDef("品名")

g.Totals.AddDef("初期库存")
g.Totals.AddDef("最低在库")
g.Totals.AddDef("最高在库")
dt1 = g.BuildDataSource()

\'建立  一个  以 品番  为 唯一值 的 列表  (含列   品番  品名 初期库存 最低在库  最高在库 )

 

Dim t As New CrossTableBuilder("统计表2", DataTables("进出明细"))
Dim dt2 As fxDataSource
t.HGroups.AddDef("品番")
t.HGroups.AddDef("品名")
t.VGroups.AddDef("进出方式")
t.Totals.AddDef("总数量", "总数量")
dt2 = t.BuildDataSource()

dt1.Combine("品番",dt2,"品番")

e.Form.Controls("Table1").DataSource = dt1

\'建立  一个  以 品番  为 唯一值 的 列表  (含列   品番  品名 出库  入库 )

 

dt1.Combine("品番",dt2,"品番")

\'按帮助建立一个 联合的表格

 

e.Form.Controls("Table1").DataSource = dt1 \'将统计结果绑定到Table
\'With DataTables("窗口1_Table1").DataCols  \'用表达式列计算库存数据
 \'   .Add("当前库存",Gettype(Integer), "IsNull([初期库存],0) + ISNULL([入库],0) - ISNULL([出库],0)")
\'End With

 

\'按帮助  建立一个 表格,但 报错,请 老师帮忙看下 如何操作.
图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看


--  作者:lin_hailun
--  发布时间:2013/1/16 11:42:00
--  
 这一句改一下试试

e.Form.Controls("Table1").DataSource = dt1

 改成

e.Form.Controls("Table1").Table.DataSource = dt1

--  作者:ljh29206
--  发布时间:2013/1/16 12:01:00
--  

林老师 ,可以生成表

 

但   dt2 的数据  能看到表头,   里面的 数量 全部为空 ,请问 是不是

  dt1.Combine("品番",dt2,"品番")    这个代码 不正确?

另外 如果 要  通过这个生成的 联合表  得出 当前库存  该这么写?

能否直接

With Tables("Table1").Cols  \'用表达式列计算库存数据
   .Add("当前库存",Gettype(Integer), "IsNull([初期库存],0) + ISNULL([入库],0) - ISNULL([出库],0)")
End With

 

 

 


--  作者:lin_hailun
--  发布时间:2013/1/16 12:10:00
--  
 帮助里没有grouptablebuilder和CrossTableBuilder的连接。

 上传你的项目,说明你要达到的目的,方便大家测试。

--  作者:ljh29206
--  发布时间:2013/1/16 13:12:00
--  

老师,项目已经上传, 附件请查看.

 

里面有1个 部品明细表  及1个进出明细

 

部品明细表 有 月初库存(已知)  当前库存(需计算)

 

进出明细表  有  进出方式( 入库 , 出库)  需要先统计 入库 及 出库的 各个数量

 

得出后, 当前库存进行 计算.   月初库存+ 入库总量-出库总量

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.table


--  作者:lin_hailun
--  发布时间:2013/1/16 14:48:00
--  
 代码写在了 表属性->事件->datacolchanged 里,修改了对应的列,就会自动显示当前库存了。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.table


--  作者:ljh29206
--  发布时间:2013/1/16 15:05:00
--  

多谢 林老师的 帮忙.