Dim pr As DataRow
Dim dr As DataRow = e.DataRow
Dim fi As String = "订单编号 = '" & dr("订单编号") & "' and 成品代码 = '" & dr("成品代码") & "' and 产品代码 = '" & dr("产品代码") & "' and 半成品代码 = '" & dr("半成品代码") & "'"
Dim fismt As String = fi & " and 生产车间 = 'SMT'"
Select Case e.DataCol.Name
Case "完成数量"
dr("未产数量")=dr("需生产数量")-dr("完成数量")
pr = DataTables("SMT排期").Find(fi)
pr("完成数量") = DataTables("生产日报表").Compute("sum(完成数量)",fismt)
End Select
以上代码出现以下错误提示：
.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2016.6.20.1
错误所在事件：表，生产日报表，DataColChanged
详细错误信息：
调用的目标发生了异常。
未将对象引用设置到对象的实例。、、、
SMT排期
订单编号() ----> 字符型(16)
成品代码() ----> 字符型(16)
产品代码() ----> 字符型(16)
型号() ----> 字符型(32) ----> Parent(明细_SMT排期表).产品型号
半成品代码() ----> 字符型(16)
板号规格() ----> 字符型(16)
半成品类型() ----> 字符型(10)
用量() ----> 整数
产品数量() ----> 整数 ----> Parent(明细_SMT排期表).订单数量
需产数量() ----> 整数 ----> [产品数量]* [用量]
完成数量() ----> 整数
未产数量() ----> 整数 ----> [需产数量] - IsNull([完成数量],0)
接单日期() ----> 日期型 ----> Parent(明细_SMT排期表).接单日期
出货期限() ----> 日期型 ----> Parent(明细_SMT排期表).出货期限
备料情况_计划() ----> 日期型
备料情况_实际() ----> 日期型
开始生产_计划() ----> 日期型
开始生产_实际() ----> 日期型
实际完成_计划() ----> 日期型
实际完成_实际() ----> 日期型
生产日报表
生产车间() ----> 字符型(10)
订单编号() ----> 字符型(16)
成品代码() ----> 字符型(16)
产品代码() ----> 字符型(16)
半成品代码() ----> 字符型(16)
半成品类型() ----> 字符型(10)
需生产数量() ----> 整数
完成数量() ----> 整数
未产数量() ----> 整数
日期() ----> 日期型
加好友 
发短信
Post By：2016/7/15 11:29:00 [只看该作者]
