Foxtable(狐表)用户栏目专家坐堂 → [求助]计算代码


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

主题:[求助]计算代码

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110527 积分:562519 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/28 22:48:00 [显示全部帖子]

不能出仓具体指什么?

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


加好友 发短信
等级:超级版主 帖子:110527 积分:562519 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/29 10:58:00 [显示全部帖子]

设定该产品出仓单不能开具体指什么?取消库存数量的填写?还是说不能新建出仓单?还是说出仓单不能录入库存为0 的物料编号............

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


加好友 发短信
等级:超级版主 帖子:110527 积分:562519 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/29 17:44:00 [显示全部帖子]

新建一行数据的时候,还没有选择产品,不可能知道库存是多少。

建议把物料编号(或者产品名称)列改为使用下拉窗口选择产品,然后下拉窗口只显示有库存的产品,类似:http://www.foxtable.com/webhelp/topics/2116.htm

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


加好友 发短信
等级:超级版主 帖子:110527 积分:562519 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/1 10:14:00 [显示全部帖子]

出仓单,DataColChanging事件

If e.DataCol.Name = "物料编号" Then
    If e.NewValue > "" Then
        Dim dr As DataRow = DataTables("毛坯仓库存量统计表").Find("物料编号='" & e.NewValue & "' And 库存数量 > 0")
        If dr Is Nothing Then
            msgbox("库存不足")
            e.NewValue = Nothing
        End If
    End If
End If

 回到顶部