以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何实现这样的功能? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=59569)
|
-- 作者:jswjyjf
-- 发布时间:2014/11/6 16:27:00
-- 如何实现这样的功能?
在进销存系统中 ,进货单录入 涉及到库存 往来的变化,我的思路是这样的 ,录入时 保存的功能 ,只保存进货单和进货单明细,审核的功能是1.将保存好的进货单 金额信息 转到对应的往来单位,2.将保存好的进货单 数量 金额信息 转到对应的库存产品中去。 审核后 不能修改了。结果是正确的,但是 审核撤销 修改后 ,往来单位 和库存如何相应变化
求大神指点
|
-- 作者:jswjyjf
-- 发布时间:2014/11/6 16:29:00
--
哦 瞬间开窍
|
-- 作者:jswjyjf
-- 发布时间:2014/11/6 16:44:00
--
此主题相关图片如下:qq图片20141106162159.jpg
|
-- 作者:jswjyjf
-- 发布时间:2014/11/6 16:46:00
--
如何进货单 审核了 ,就不能修改进货单及进货单明细 ,如何实现
|
-- 作者:有点甜
-- 发布时间:2014/11/6 16:47:00
--
设置控件和表不能被编辑即可。
|
-- 作者:jswjyjf
-- 发布时间:2014/11/6 16:52:00
--
如果下一条没有审核的话 只读就取消 是吗
|
-- 作者:有点甜
-- 发布时间:2014/11/6 16:53:00
--
在currentchanged写代码,如果已审核,就设置为只读。
|
-- 作者:jswjyjf
-- 发布时间:2014/11/6 17:16:00
--
If Tables("进货单").Current IsNot Nothing AndAlso Tables("进货单").Current.Isnull("进货单号") = False Then DataTables("进货单明细").LoadFilter = "进货单号 = \'" & Tables("进货单").Current("进货单号") & "\'" Else DataTables("进货单明细").LoadFilter = "进货单号 is null" End If DataTables("进货单明细").Load
这个代码 放在currentchanged 事件中 可以吗
|
-- 作者:有点甜
-- 发布时间:2014/11/6 17:35:00
--
不行,currentchanged 不要load数据。
建议你放在positionchanged
|
-- 作者:jswjyjf
-- 发布时间:2014/11/6 19:17:00
--
在没有排序 汇总 情况下 好像两个事件一样的
|