 加好友  发短信
等级：贵宾
帖子：39310
积分：196782
威望：0
精华：1
注册：2015/4/25 9:23:00
|
 Post By：2016/6/24 10:24:00 [只看该作者]
1楼代码，写成
Case "本工序_日生产能力_根","包装工序_需要数量_根","本工序_库存在制品_根","本工序_废品损失率_百分比"
If e.DataRow.IsNull("包装工序_需要数量_根") Then
e.DataRow("本工序_应投产数量_根")=Nothing
Else
If e.DataRow.IsNull("本工序_库存在制品_根") Then
e.DataRow("本工序_库存在制品_根")=0
Else
If e.DataRow.IsNull("本工序_废品损失率_百分比") Then
e.DataRow("本工序_废品损失率_百分比")=0
Else
e.DataRow("本工序_应投产数量_根") = e.DataRow("包装工序_需要数量_根")*(1+"本工序_废品损失率_百分比") - e.DataRow("本工序_库存在制品_根")'
End If
If e.DataRow.IsNull("本工序_投产数量_根") OrElse e.DataRow.IsNull("本工序_日生产能力_根") Then
e.DataRow("本工序_生产周期_天")=Nothing
Else
e.DataRow("本工序_生产周期_天") = e.DataRow("本工序_投产数量_根") / e.DataRow("本工序_日生产能力_根")'计算D列的代码
End If
End If
End If
|
|
