以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 先进先出及区间统计 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=124660) |
||||
-- 作者:15528900289 -- 发布时间:2018/9/11 15:44:00 -- 先进先出及区间统计 老师,附件里面有个表。 1、例子二中,后面我两了两列,(里面的数据是我手田写进去的,想请教老师如何自动实现此功能),这个表是为了更的管理呆滞品和对先进先出进行管理,根据现有库存找到这个产品按照先进先出原则理论的最早入库时间,以及在那个时间中入库理论入库未发个数。 2、如何生成一种区间统计表,比如列子二中选择1999-02-01到1999-02-15这个区间。系统能实现,自动生成区间内各个产品的期初库存,入库数量,出库数量,区间内的期末结存。
[此贴子已经被作者于2018/9/11 15:44:44编辑过]
|
||||
-- 作者:有点甜 -- 发布时间:2018/9/11 15:47:00 -- 1、先进先出
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=122869&skin=0
2、参考(加上筛选条件)
http://www.foxtable.com/webhelp/scr/2305.htm
|
||||
-- 作者:15528900289 -- 发布时间:2018/9/11 15:50:00 -- 老师,我上传了附件,怎么帖子里面看不到附件,图片怎么传不了。帖子就是foxtable中案例“高效率流水账”案例二。
|
||||
-- 作者:有点甜 -- 发布时间:2018/9/11 15:58:00 -- 认认真真看懂2楼的实例和帮助文档。 |
||||
-- 作者:15528900289 -- 发布时间:2018/9/19 9:53:00 -- 谢谢老师,关于第1个问题,我看了链接,不是我想要的,不过还是有些帮助,我自己写了一段代码可以实现。我想用”二分法“来实现这个过程,可以提高软件性能, 我刚学foxtable不久,还不能实现,还请老师多多指导和优化。代码如下: Dim kc As Integer = e.DataRow("库存") Dim jikc As Integer Dim drs As List (of DataRow) drs = e.DataTable.Select("[产品] = \'"& e.DataRow("产品") &"\'","日期 desc") \'生成一个关于产品名称,日期倒序排列的集合 For Each dr As DataRow In drs jikc = jikc + dr("入库") \'从现在入库的的时间倒序往前累加入库量 If jikc >= kc \'当累加的入库数量大于等于现在的库存时,就找到了理论最早的入库记录 e.DataRow("先进先出_最早库存") = dr("日期") \'找到最早入库的时间,如果仓库还有更早的时间货品说明仓库管理不到位 e.DataRow("先进先出_当日余量") = jikc - kc \'找到最早入库时间的可发数量,快速指导库房生成人员发货 e.DataRow("先进先出_库藏天数") = (e.DataRow("日期") - dr("日期")).days \'判断最久的库藏天数,可以为后面的成品核算,意见过期产品及时处理 Exit For End If Next 关于第二个问题,我想用临时表来完成,我现在对这一块知识还比较陌生,不过算话是想通了,就是代码不熟,还请老师多帮帮忙。
|
||||
-- 作者:有点甜 -- 发布时间:2018/9/19 10:20:00 -- 具体的实例发上来,说明具体的操作(输入什么,得到什么) |