以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]库存 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=115630) |
||||
-- 作者:q2520 -- 发布时间:2018/3/10 18:37:00 -- [求助]库存 出库数量 多于 库存数量的时候 出现提示 取消操作 代码要怎么写
|
||||
-- 作者:有点甜 -- 发布时间:2018/3/11 21:26:00 -- 跨表引用参考
http://www.foxtable.com/webhelp/scr/1451.htm
跨表统计参考
http://www.foxtable.com/webhelp/scr/1454.htm
|
||||
-- 作者:q2520 -- 发布时间:2018/3/12 10:26:00 -- 怎么比较 数量的多少 我不知道代码怎么写 |
||||
-- 作者:有点甜 -- 发布时间:2018/3/12 10:36:00 -- 以下是引用q2520在2018/3/12 10:26:00的发言:
怎么比较 数量的多少 我不知道代码怎么写
如果是同表比较,就在datacolchanging事件写代码
If e.DataCol.Name = "出库数量" Then If e.newvalue > e.DataRow("库存数量") Then msgbox("不能多于库存数量") e.Cancel = true End If End If |
||||
-- 作者:q2520 -- 发布时间:2018/3/13 8:15:00 -- 不是一个表 是出库单的数量列 比较 库存单的库存数量列 |
||||
-- 作者:有点甜 -- 发布时间:2018/3/13 8:40:00 -- If e.DataCol.Name = "数量" Then Dim fdr As DataRow = DataTables("库存").find("编号 = \'" & e.DataRow("编号") & "\'") If fdr IsNot Nothing Then If e.newvalue > fdr("库存数量") Then msgbox("不能多于库存数量") e.Cancel = True End If End If End If |
||||
-- 作者:q2520 -- 发布时间:2018/3/13 8:54:00 -- 十分感谢 我都觉得这问题很幼稚 代码能看懂 就是写不出来 只是现在急需先做出个成品 以后再慢慢学 能给个别的联系方式 随时请教吗 |
||||
-- 作者:有点甜 -- 发布时间:2018/3/13 9:03:00 -- 以下是引用q2520在2018/3/13 8:54:00的发言:
十分感谢 我都觉得这问题很幼稚 代码能看懂 就是写不出来 只是现在急需先做出个成品 以后再慢慢学 能给个别的联系方式 随时请教吗
有问题,到论坛上提问即可。或者联系客服QQ800014337 |
||||
-- 作者:q2520 -- 发布时间:2018/3/27 12:44:00 -- [求助]
需要实现2个功能 第一 、 出库单 产品的先进先出 第二、 库存表里显示 同一个产品 不同的单价 数量 多行显示 比方说我这个实例里面 打印机 2次采购 单价分别是100进货1个 单价200进货2个 库存表里 要显示2条打印机的库存 100单价的有几个 200单价的有几个 如果单价100的那个都出库没了 那就只显示单价200的还有几个 就行 [此贴子已经被作者于2018/3/27 13:15:21编辑过]
|
||||
-- 作者:q2520 -- 发布时间:2018/3/27 14:45:00 -- 甜老师 给帮忙看下 问题 |