以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请专家帮忙看看,表达式列的问题!  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=23362)

--  作者:jiskin
--  发布时间:2012/9/10 10:17:00
--  请专家帮忙看看,表达式列的问题!

库存量 是表达式列

我在商品入库表中入库了一个产品A之后,保存 正常,但是如果我再修改入库产品A 将产品A改成B之后,我再取消修改,这个时候 ,库存B居然有库存增加了……

 

 附件是开发版的,因为做一个普通版的例子太麻烦了,抱歉

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


--  作者:jiskin
--  发布时间:2012/9/10 10:51:00
--  
以下是引用muhua在2012-9-10 10:42:00的发言:

商品入库点击修改的时候出错了(是不是删除了新增出库的窗口了?)。

你不要直接点表窗口 点左侧窗口栏上的商品出库,是“修改入库”

[此贴子已经被作者于2012-9-10 10:54:01编辑过]

--  作者:jiskin
--  发布时间:2012/9/10 11:05:00
--  
以下是引用muhua在2012-9-10 10:59:00的发言:

是点“修改入库”

 

 

把取消的代码设置成这样:

 

Dim r As DataRow = Tables("商品入库").Current.DataRow
r("入库数量") = r.OriginalValue("入库数量")
Tables("商品入库").Current.Reject()
\'DataTables("商品入库").DataCols("入库量").RaiseDataColChanged()
e.Form.Close()

 

还有,需要把窗口设置为“独立”,不要设置为“模式”窗口。

问题依旧……


--  作者:jiskin
--  发布时间:2012/9/10 12:33:00
--  
以下是引用muhua在2012-9-10 11:45:00的发言:

Dim r As DataRow = Tables("商品入库").Current.DataRow
r("入库数量") = r.OriginalValue("入库数量")
Tables("商品入库").Current.Reject()
\'DataTables("商品入库").DataCols("入库量").RaiseDataColChanged()
DataTables("商品入库").DataCols("入库数量").RaiseDataColChanged()
e.Form.Close()
DataTables("商品库存").Load()

 

这样可以了,测试过了。

 

good~~ 希望在新版本中能直接更新啊

顺便替我看下 窗口中的两颗tree 能否代码合并啊 ,我搞不来了 才分两颗tree的


--  作者:狐狸爸爸
--  发布时间:2012/9/10 15:29:00
--  

不能触发的问题,撤销修改按钮,这样改就行:

 

Dim r As Row = Tables("商品入库").Current
r("商品名称")= r.DataRow.OriginalValue("商品名称")
r.Reject

e.Form.Close

[此贴子已经被作者于2012-9-10 15:29:06编辑过]

--  作者:jiskin
--  发布时间:2012/9/10 16:30:00
--  
以下是引用muhua在2012-9-10 14:26:00的发言:

可以的,但是我不知道你的tree是放在哪里的。

窗口管理里面啊~~