Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共8 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:foxtable中做库存帐务的疑问

1楼
唐尸三摆手 发表于:2011/11/16 9:55:00
在库存账务查询的结果中,由于选择了日期的区间,希望结果中的第一行显示“承上期”,也就是之前的余额,请教如何实现
2楼
狐狸爸爸 发表于:2011/11/16 9:57:00
呵呵,做个例子上吧?
3楼
唐尸三摆手 发表于:2011/11/16 10:01:00
老大请看附件的例子
上传了两次怎么没有呢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.table


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20111116094312.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2011-11-16 10:04:45编辑过]
4楼
唐尸三摆手 发表于:2011/11/16 10:21:00


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20111116088312.jpg
图片点击可在新窗口打开查看
窗口按钮代码如下

Dim d1 As Date = Forms("窗口1").Controls("DateTimePicker1").value
Dim d2 As Date = Forms("窗口1").Controls("DateTimePicker2").value
Dim b As New SQLGroupTableBuilder("统计表1","aab")
b.Groups.AddDef("date_voucher",DateGroupEnum.none,"凭证日期") '根据产品分组
b.Groups.AddDef("id_voucher","","凭证号") '根据产品分组
b.Groups.AddDef("note2","","科目名称") '根据产品分组
b.Groups.AddDef("note1","","摘要") '根据产品分组
b.Totals.AddDef("inputnum","","收入_数量") '对数量进行统计
b.Totals.AddDef("inputacount","","收入_金额") '对数量进行统计
b.Totals.AddDef("outputnum","","支出_数量") '对数量进行统计
b.Totals.AddDef("outputacount","","支出_金额") '对数量进行统计
b.Totals.AddExp("inventorynum","inputnum - outputnum","结存_数量")
b.Totals.AddExp("inventoryacount","inputacount - outputacount","结存_金额")
b.Filter = "date_voucher between #"& d1 &"# And #"& d2 &"#"
Tables("窗口1_table1").DataSource = b.BuildDataSource

 

 

主要是希望查询结果的第一行摘要栏显示“承上期”,并在余额栏填入上一行的结余数量及金额

[此贴子已经被作者于2011-11-16 10:22:58编辑过]
5楼
狐狸爸爸 发表于:2011/11/16 10:27:00
呵呵,没有看懂你的问题,统计只能是机械的,如果有特殊的需求,可以对生成的统计表进行再加工,例如插入一行,编码计算出上期的值,填入这一行中。
6楼
yangming 发表于:2011/11/16 11:54:00
楼主的文件不对吧?
7楼
yangming 发表于:2011/11/16 12:28:00
贺老师,临时表及窗口表均不支持移动行和插入行
[此贴子已经被作者于2011-11-16 12:42:08编辑过]
8楼
狐狸爸爸 发表于:2011/11/16 14:35:00
以下是引用yangming在2011-11-16 12:28:00的发言:
贺老师,临时表及窗口表均不支持移动行和插入行

 

不支持,除非明确增加一个_SortKey列.

共8 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .04688 s, 3 queries.