| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]查找出错。 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=87630) |
| -- 作者：2900819580 -- 发布时间：2016/7/15 11:29:00 -- [求助]查找出错。 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) 需生产数量() ----> 整数 完成数量() ----> 整数 未产数量() ----> 整数 日期() ----> 日期型 |
| -- 作者：Hyphen -- 发布时间：2016/7/15 12:22:00 -- Select Case e.DataCol.Name Case "完成数量" dr("未产数量")=dr("需生产数量")-dr("完成数量") pr = DataTables("SMT排期").Find(fi) if pr isnot nothing then pr("完成数量") = DataTables("生产日报表").Compute("sum(完成数量)",fismt) End Select
|