Foxtable(狐表)用户栏目专家坐堂 → [求助]库存数量不足请注意订货代码


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

主题:[求助]库存数量不足请注意订货代码

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/1/7 19:33:00 [显示全部帖子]

 得看你的库存是怎么计算得出的了。一般可以直接编写datacolchanged事件

 if e.datacol.name = "数量" then
     if e.datarow("数量") < 5 then
         msgbox("请注意订货")
     end if
 end if

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/1/7 19:54:00 [显示全部帖子]

 那就把代码写在销售表/出货表的datacolchanged事件里。

if e.datacol.name = "出货数量" then
    dim pdr as datarow = datatables("库存表").find("关联列 = '" & e.datarow("出货数量") & "'")
    if pdr isnot nothing andalso pdr("数量") < 5 then
        msgbox("库存不够")
    end if
end if

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/1/7 20:42:00 [显示全部帖子]

 你可以参考到期提醒的例子自己做一下,代码差不多。弄不好,就上传例子。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/1/7 21:51:00 [显示全部帖子]

 如下

 
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:数量提醒.table


 回到顶部