以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  递归计算零件数量也就是MRP计算  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=67540)

--  作者:布莱克朱
--  发布时间:2015/4/25 20:25:00
--  递归计算零件数量也就是MRP计算
在帮助中有一个计算零件适用量的例子,但是那个例子是只有上下级一层关系的计算

我现在求助的是 根据生产计划中的图号的要求生产量 去匹配BOM表的上级(图号),获取相对应的所有下级的下级(无限下级的)的所有图号并计算每一个图号的使用量

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:递归22.foxdb





[此贴子已经被作者于2015/4/26 7:45:38编辑过]

--  作者:有点酸
--  发布时间:2015/4/25 20:31:00
--  

等周一bin上班帮你看吧


--  作者:布莱克朱
--  发布时间:2015/4/25 20:33:00
--  
不会吧 
--  作者:布莱克朱
--  发布时间:2015/4/26 7:46:00
--  
顶下
--  作者:布莱克朱
--  发布时间:2015/4/26 17:55:00
--  
继续顶
--  作者:游
--  发布时间:2015/4/26 20:22:00
--  
1、按生产计划和BOM展开 生成毛需求计算表(临时表),并按图号排序。

2、用Bin 的函数遍历填充实际需求量(实际表)


Dim 上次图号 As String = ""

For Each dr As DataRow In  临时表.DataRows
    If 上次图号 <>  dr("图号")  Then
        \'执行函数()
实际表  新增行 并填充
         上次图号 =  dr("图号")  
    End If

Next

--  作者:blackzhu
--  发布时间:2015/4/27 7:57:00
--  
方法已经有一个而且已经计算出!
我想继续等BIN或者老大帮我写个代码,看看有无其他的代码算法以及我想核对一下计算结果
[此贴子已经被作者于2015/4/27 7:58:25编辑过]

--  作者:blackzhu
--  发布时间:2015/4/27 9:12:00
--  
bin  继续关注下
--  作者:Bin
--  发布时间:2015/4/27 9:13:00
--  
不是给写出过一次了么?这次有什么不同?
--  作者:blackzhu
--  发布时间:2015/4/27 9:27:00
--  
跟之前不一样:

你看一楼 

我现在求助的是 根据生产计划中的图号的要求生产量 去匹配BOM表的上级(图号),获取相对应的所有下级的下级(无限下级的)的所有图号并计算每一个图号的使用量 要求在分解表中写入每一个下级图号的零件使用量