Foxtable(狐表)用户栏目专家坐堂 → 求助:如何根据当前选择的多个物料编号,删除库存表中对应物料编号多有的出库操作行!


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

主题:求助:如何根据当前选择的多个物料编号,删除库存表中对应物料编号多有的出库操作行!

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


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
求助:如何根据当前选择的多个物料编号,删除库存表中对应物料编号多有的出库操作行!  发帖心情 Post By:2015/6/5 17:28:00 [只看该作者]

Dim fdr As DataRow = DataTables("库存表").Find("序列号 in ('" & e.DataRow("物料编号").Replace(",", "','") & "') and 操作类型 = '出库操作'")
fdr.Delete

 

求助:如何根据当前选择的多个物料编号,删除库存表中对应物料编号多有的出库操作行!

上述代码只能实现最后一个物料编号对应的数据,求指导!

 

 

我自行参照帮助中的查找行遍历方式,结果运行无效果!

 

Dim dr As DataRow
dr =
DataTables("订单").Find("[产品] = 'PD01'", "日期 Desc")
If
dr IsNot Nothing Then
    Dim
wz As Integer = Tables("订单").FindRow(dr)
    If
wz >= 0 Then
        Tables
("订单").Position = wz

    End If
End If


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/6/5 17:33:00 [只看该作者]


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


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
回复:(Bin)用Deletefor?http://www.foxtable....  发帖心情 Post By:2015/6/5 17:39:00 [只看该作者]

谢谢 BIN老师

按照你的办法解决了

DataTables("库存表").DeleteFor("序列号 in ('" & e.DataRow("物料编号").Replace(",", "','") & "') and 操作类型 = '出库操作'")

[此贴子已经被作者于2015/6/5 17:39:15编辑过]

 回到顶部