Call 山菊花 & jsxjd & 香川群子老师、根据日程计划自动计算物料需求计划

香川群子

不好意思代码中有bug

If r > 0 Then ar2(ii, jj) = ar2(ii, jj) + r * s

误为 If r > 0 Then ar2(ii, jj) = ar2(ii, jj+3) + r * s
统计结果错位了。

香川群子

Day-Day 发表于 2014-9-4 21:03
测试过了，有一些问题存在啊，
重复点击的话，数据会叠加在一起。会害死人的啊！

bug是这样产生的：

最初写的代码是：

If r > 0 Then ar2(ii, jj + 3) = ar2(ii, jj + 3) + r * s
因为结果数组从C列(数组第1列)开始，而输出数据从F列(数组第4列)开始，所以要加3


但是后来，我灵机一动，把数组起点改为直接从F列(数组第1列)开始了，于是把等式左边的 + 3，给删去了。却忘了同时删去右边的 + 3 这就bug产生的原因。


除此以外都没有问题了。因为实际计算也只有这一处。


【看上去写了这么多几十行的代码，真正有用的、产生计算结果的部分只有这一句代码！】

香川群子

这个bug其实很容易在实际运用中发现……

如果最后几天有数据需要计算时，马上就会产生+3以后的数组溢出错误。

但是，楼主提供的模拟数据很少，所以不能在运行中发现这个bug。呵呵。


所以，提供模拟数据时，也要尽量涵盖各种范围。

香川群子

另外，Access数据库没有问题。

Day-Day

香川群子 发表于 2014-9-5 11:01
不好意思代码中有bug

If r > 0 Then ar2(ii, jj) = ar2(ii, jj) + r * s

稍后测试一下下，测试N片后，我就纳闷使用相同物料的怎么不累加呢？呵呵

香川群子

做了个最大4层BOM的Mrp计算用数据库。

原理：
分层逐步计算、最后合并到一张表显示。（合并使用了宏，是非常简单的Access公式宏，比录制宏更简单）

呵呵。
有兴趣的同学可以下载后试用。有问题、有要求来问。

Day-Day

香川群子 发表于 2014-9-5 14:30
做了个最大4层BOM的Mrp计算用数据库。

原理：

好强大，激动不已！

香川群子

《数据库应用版块》那里没啥人气、好凄凉！

Day-Day

香川群子 发表于 2014-9-5 15:10
《数据库应用版块》那里没啥人气、好凄凉！

老师最擅长哪方面的啊？数据库 or ？

香川群子

Day-Day 发表于 2014-9-5 15:52
老师最擅长哪方面的啊？数据库 or ？

比上不足比下有余……

一般的问题都会两手。