Foxtable(狐表)用户栏目专家坐堂 → MRP运算扩展数据计算问题


  共有5013人关注过本帖树形打印复制链接

主题:MRP运算扩展数据计算问题

帅哥哟,离线,有人找我吗?
chk
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:52 积分:528 威望:0 精华:0 注册:2018/4/23 8:59:00
MRP运算扩展数据计算问题  发帖心情 Post By:2022/4/23 16:23:00 [只看该作者]

您好!
       增加的扩展数据表"生产在线",假如M01需求数量20个,其中库存可以提供0个,已经在线生产的有5个,所以实际需要生产的是15个,但是得出的结果是实际需要生产的是10个。换了几组数据测试,结果是在线生产数计算出实际生产数时每次感觉都翻了一倍,不知道为什么?谢谢,麻烦帮忙看看!


 Dim mrp As New InlineMRPBuilder("MRP统计表")
'设置BOM表
mrp.BOM.DataTable = DataTables("物料清单")
mrp.BOM.ParentCol = "上级"
mrp.BOM.MaterialCol = "物料编号"
mrp.BOM.QuantityCol = "用量"
'设置成品率表
mrp.Yield.DataTable = DataTables("成品率")
mrp.Yield.MaterialCol = "物料编号"
mrp.Yield.YieldCol= "成品率"
'设置库存表
mrp.Stock.DataTable = DataTables("原辅料仓库汇总表")
mrp.Stock.MaterialCol = "物料编号"
mrp.Stock.QuantityCol= "库存数量"
mrp.Stock.MinimumCol = "安全库存"
'设置采购价格表
mrp.Purchase.DataTable = DataTables("采购价格表")
mrp.Purchase.MaterialCol = "物料编号"
mrp.Purchase.PriceCol= "单价"
'设置生产计划
For Each dr As DataRow In DataTables("生产计划汇总").DataRows
    mrp.Plan.Add(dr("产品编号"), dr("未生产数量"))
'增加扩展数据表
mrp.Extensions.Add(DataTables("采购在途"),"物料编号","数量", "计划_采购在途")
mrp.Extensions.Add(DataTables("生产在线"),"中间件","数量", "计划_生产在线")
Next
'附加数据列
mrp.Additions.Add(DataTables("物料库"), "物料编号", "物料名称", "物料名称")

'生成统计结果
mrp.Build()
MainTable = Tables("MRP统计表")图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/23 16:27:00 [只看该作者]

把这几个表的数据导出来测试一下

 回到顶部
帅哥哟,离线,有人找我吗?
chk
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:52 积分:528 威望:0 精华:0 注册:2018/4/23 8:59:00
  发帖心情 Post By:2022/4/23 17:32:00 [只看该作者]

您好!
     用什么方式导出来测试,可以找出问题?


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/23 17:39:00 [只看该作者]

方法1、把这个项目文件发过来测试

 回到顶部