Foxtable(狐表)用户栏目专家坐堂 → 求助关联表字段计算


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

主题:求助关联表字段计算

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


加好友 发短信
等级:童狐 帖子:202 积分:1276 威望:0 精华:0 注册:2015/4/16 12:05:00
  发帖心情 Post By:2015/7/13 14:49:00 [只看该作者]

提示说字符串错误,我看了是单精度小数,可以运算啊,哪里出错了

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


加好友 发短信
等级:童狐 帖子:202 积分:1276 威望:0 精华:0 注册:2015/4/16 12:05:00
  发帖心情 Post By:2015/7/13 14:49:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:03.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:002.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/13 14:52:00 [只看该作者]

e.DataRow("上线包装投入数量") = e.DataRow("第一列") + e.DataRow("第二列") - e.DataRow("第三列")

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


加好友 发短信
等级:童狐 帖子:202 积分:1276 威望:0 精华:0 注册:2015/4/16 12:05:00
  发帖心情 Post By:2015/7/13 18:35:00 [只看该作者]

代码都写好了,数据也测试过了,计算没有问题。现在的问题是明细表中有个新增按钮,之前是可以使用的,但是现在点击按钮 ,会闪退,这是啥问题?图片点击可在新窗口打开查看

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


加好友 发短信
等级:童狐 帖子:202 积分:1276 威望:0 精华:0 注册:2015/4/16 12:05:00
  发帖心情 Post By:2015/7/13 18:36:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:截图.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:闪退.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/13 19:17:00 [只看该作者]

 贴出datacolchanged写的代码。

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


加好友 发短信
等级:童狐 帖子:202 积分:1276 威望:0 精华:0 注册:2015/4/16 12:05:00
  发帖心情 Post By:2015/7/13 21:00:00 [只看该作者]


[此贴子已经被作者于2015/7/13 21:45:16编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/13 21:18:00 [只看该作者]

 代码不会造成程序退出。

 

 请做一个出错的例子发上来。


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


加好友 发短信
等级:童狐 帖子:202 积分:1276 威望:0 精华:0 注册:2015/4/16 12:05:00
  发帖心情 Post By:2015/7/19 14:26:00 [只看该作者]

大神来看看呢,前12行我写的代码,出现闪退,第十三行没写代码,就可以增加明细行,帮忙看看啥原因
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:物料信息.table


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/19 14:46:00 [只看该作者]

Select Case e.DataCol.Name
    Case "出厂包装类型","上线包装类型","出厂包装数量","上线包装数量","每小时工作量","单车用量" ,"拉动时间","使用地点数","安全系数","当班生产时间","包装周转周期","额外包装占用率"

        If e.DataRow("出厂包装类型") = "纸箱" AndAlso e.DataRow("上线包装类型") = "纸箱"
            e.DataRow("出厂包装投入数量") = "1"
            e.DataRow("上线包装投入数量") = "1"
           
        ElseIf e.DataRow("出厂包装类型") = "纸箱" AndAlso e.DataRow("上线包装类型") = "塑料箱"
            e.DataRow("出厂包装投入数量") = "1"
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("单车用量") / e.DataRow("上线包装数量")*e.DataRow("拉动时间")*e.DataRow("安全系数")*e.DataRow("使用地点数")
           
        ElseIf e.DataRow("出厂包装类型") = "纸箱" AndAlso e.DataRow("上线包装类型") = "铁箱"
            e.DataRow("出厂包装投入数量") = "1"
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("单车用量") / e.DataRow("上线包装数量")*e.DataRow("拉动时间")*e.DataRow("安全系数")*e.DataRow("使用地点数")
           
        ElseIf e.DataRow("出厂包装类型") = "纸箱" AndAlso e.DataRow("上线包装类型") = "专用器具"
            e.DataRow("出厂包装投入数量") = "1"
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("单车用量") / e.DataRow("上线包装数量")*e.DataRow("拉动时间")*e.DataRow("安全系数")*e.DataRow("使用地点数")
           
        ElseIf e.DataRow("出厂包装类型") = "仓储笼" AndAlso e.DataRow("上线包装类型") = "塑料箱"
            e.DataRow("出厂包装投入数量") = e.DataRow("每小时工作量") *e.DataRow("当班生产时间") * e.DataRow("包装周转周期")*e.DataRow("额外包装占用率")/e.DataRow("出厂包装数量")
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("单车用量") / e.DataRow("上线包装数量")*e.DataRow("拉动时间")*e.DataRow("安全系数")*e.DataRow("使用地点数")
           
        ElseIf e.DataRow("出厂包装类型") = "仓储笼" AndAlso e.DataRow("上线包装类型") = "铁箱"
            e.DataRow("出厂包装投入数量") = e.DataRow("每小时工作量") *e.DataRow("当班生产时间") * e.DataRow("包装周转周期")*e.DataRow("额外包装占用率")/e.DataRow("出厂包装数量")
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("单车用量") / e.DataRow("上线包装数量")*e.DataRow("拉动时间")*e.DataRow("安全系数")*e.DataRow("使用地点数")
           
        ElseIf e.DataRow("出厂包装类型") = "仓储笼" AndAlso e.DataRow("上线包装类型") = "专用器具"
            e.DataRow("出厂包装投入数量") = e.DataRow("每小时工作量") *e.DataRow("当班生产时间") * e.DataRow("包装周转周期")*e.DataRow("额外包装占用率")/e.DataRow("出厂包装数量")
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("单车用量") / e.DataRow("上线包装数量")*e.DataRow("拉动时间")*e.DataRow("安全系数")*e.DataRow("使用地点数")
           
        ElseIf e.DataRow("出厂包装类型") = "铁箱" AndAlso e.DataRow("上线包装类型") = "塑料箱"
            e.DataRow("出厂包装投入数量") = e.DataRow("每小时工作量") *e.DataRow("当班生产时间") * e.DataRow("包装周转周期")*e.DataRow("额外包装占用率")/e.DataRow("出厂包装数量")
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("单车用量") / e.DataRow("上线包装数量")*e.DataRow("拉动时间")*e.DataRow("安全系数")*e.DataRow("使用地点数")
           
        ElseIf e.DataRow("出厂包装类型") = "铁箱" AndAlso e.DataRow("上线包装类型") = "铁箱"
            e.DataRow("出厂包装投入数量") =  "0"
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("当班生产时间") * e.DataRow("包装周转周期")*e.DataRow("额外包装占用率")/e.DataRow("上线包装数量")
           
        ElseIf e.DataRow("出厂包装类型") = "铁箱" AndAlso e.DataRow("上线包装类型") = "专用器具"
            e.DataRow("出厂包装投入数量") = e.DataRow("每小时工作量") *e.DataRow("当班生产时间") * e.DataRow("包装周转周期")*e.DataRow("额外包装占用率")/e.DataRow("出厂包装数量")
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("单车用量") / e.DataRow("上线包装数量")*e.DataRow("拉动时间")*e.DataRow("安全系数")*e.DataRow("使用地点数")
           
        ElseIf e.DataRow("出厂包装类型") = "塑料箱" AndAlso e.DataRow("上线包装类型") = "塑料箱"
            e.DataRow("出厂包装投入数量") =  "0"
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("当班生产时间") * e.DataRow("包装周转周期")*e.DataRow("额外包装占用率")/e.DataRow("上线包装数量")
           
        ElseIf e.DataRow("出厂包装类型") = "专用器具" AndAlso e.DataRow("上线包装类型") = "专用器具"
            e.DataRow("出厂包装投入数量") =  "0"
            e.DataRow("上线包装投入数量") =e.DataRow("每小时工作量") *e.DataRow("当班生产时间") * e.DataRow("包装周转周期")*e.DataRow("额外包装占用率")/e.DataRow("上线包装数量")
           
        End If
End Select
[此贴子已经被作者于2015/7/19 14:45:43编辑过]

 回到顶部
总数 80 上一页 1 2 3 4 5 6 7 8 下一页