Foxtable(狐表)用户栏目专家坐堂 → [求助]如何通过代码判断匹配对应数据?


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

主题:[求助]如何通过代码判断匹配对应数据?

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


加好友 发短信
等级:幼狐 帖子:94 积分:862 威望:0 精华:0 注册:2017/7/9 3:59:00
[求助]如何通过代码判断匹配对应数据?  发帖心情 Post By:2017/7/10 18:04:00 [只看该作者]

各位老大们好

想请教一下,这个代码应该怎么写?
在查询表中的表达式列中实现自动判断该行的“日均销量”属于表“设置参数”中的哪一列,然后返回对应数据。
代码查了半天还是写不出来。。
拜托各位了


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

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


[此贴子已经被作者于2017/7/22 1:15:03编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/10 18:23:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


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


加好友 发短信
等级:幼狐 帖子:94 积分:862 威望:0 精华:0 注册:2017/7/9 3:59:00
  发帖心情 Post By:2017/7/10 19:46:00 [只看该作者]

甜老大,这个有办法用表达式或全局代码、全局变量来实现吗?因为后续还有别的模块需要这个功能。。。

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110551 积分:562645 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/10 20:43:00 [只看该作者]

查询_采购关联,DataColChanged事件,需要重置"日均销量"列


If e.DataCol.Name = "日均销量"  AndAlso e.NewValue > 0 Then
    Dim dr As DataRow = DataTables("设置参数").Find("预警库存_日销大于 < " & e.NewValue & " and 预警库存_日销小于等于 >= " & e.NewValue)
    If dr IsNot Nothing Then
        e.DataRow("库存预警_预警天数") = dr("预警库存_预警库存天数")
    End If
End If

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


加好友 发短信
等级:幼狐 帖子:94 积分:862 威望:0 精华:0 注册:2017/7/9 3:59:00
  发帖心情 Post By:2017/7/10 21:03:00 [只看该作者]

已成功!
非常感谢!!!!

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


加好友 发短信
等级:幼狐 帖子:94 积分:862 威望:0 精华:0 注册:2017/7/9 3:59:00
  发帖心情 Post By:2017/7/11 18:47:00 [只看该作者]

老师,您看下我这段代码对吗?为什么会一直出错。。

If e.DataCol.Name = "供应商"  AndAlso e.NewValue IsNot Nothing Then
    Dim dr As DataRow = DataTables("供应商设置").Find("名称 = " & e.NewValue )
    If dr IsNot Nothing Then
        e.DataRow("jhj") = dr("起订量")
    End If
End If

目的是实现查询表 供应商设置 中“名称”栏,返回数据“起订量”
而且现在一旦修改供应商中名称一栏,产品供应商表格就出错,修改不了供应商一栏

.NET Framework 版本:2.0.50727.8745
Foxtable 版本:2017.6.12.1
错误所在事件:表,产品供应商,DataColChanged
详细错误信息:
调用的目标发生了异常。


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip



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


加好友 发短信
等级:幼狐 帖子:94 积分:862 威望:0 精华:0 注册:2017/7/9 3:59:00
  发帖心情 Post By:2017/7/11 19:11:00 [只看该作者]

把表事件去掉后面就不会出现出错提示了,不过这个事件代码要怎么写才能实现呢?

 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110551 积分:562645 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/11 21:03:00 [只看该作者]

If e.DataCol.Name = "供应商"  AndAlso e.NewValue > "" Then
    Dim dr As DataRow = DataTables("供应商设置").Find("名称 = '" & e.NewValue & "'")
    If dr IsNot Nothing Then
        e.DataRow("jhj") = dr("起订量")
    End If
End If

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


加好友 发短信
等级:幼狐 帖子:94 积分:862 威望:0 精华:0 注册:2017/7/9 3:59:00
  发帖心情 Post By:2017/7/11 22:11:00 [只看该作者]

谢谢老师!已经解决了!
还有一个问题想请教老师,现在我们标准库存天数的计算方法是:供应商起订量/各个产品规格的日均销量
但是实际上对于供应商只要是产品相同(即品名相同,规格可以不同)即可。现在我们的算法是按每种产品规格都满足起订量来设置的,会导致库存增加很多。

foxtable强大的汇总模式已经统计出品名相同的产品在同一供应商下的各规格累计日均销量了。
有没有办法可以使用汇总模式中的数据来进行计算?即使用红色箭头中的”产品A+供应商A的日均销量累计值“ ,将紫色框中的 ”标准预警天数“表达式设置为" [供应商起订量] / [产品A+供应商A的日均销量累计值] ” 

谢谢老师!

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



[此贴子已经被作者于2017/7/11 22:12:03编辑过]

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


加好友 发短信
等级:幼狐 帖子:94 积分:862 威望:0 精华:0 注册:2017/7/9 3:59:00
  发帖心情 Post By:2017/7/11 22:17:00 [只看该作者]

附件如下
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip


[此贴子已经被作者于2017/7/11 22:17:36编辑过]

 回到顶部
总数 17 1 2 下一页