SOS:各实力派高手留步！试金石在此！！！

sf

请教：

我在开发公司库存管理系统时遇到的问题：1、我的库存量是在库存窗体中计算得到的，请

问如何在计算生成的同时把产生的数据保存在库存表中，因为我想通过库存表中的库存量

实现－－－出库时，当要出库材料的出库量大于库存量时，系统提示库存量不足，同时取

消此出库操作。但我现在我法获取库存窗体中计算生成的具体材料的库存量。－－－－－

－－－请问各高手，如何实现？
2、如何实现出库或入库信息确认后24小时，锁定历史出入库记录让操作员无法修改，当

然要让我有权登录后取消锁定的功能按钮，因为用户有时还是会出现误输入的情况。

－－－请问各高手，如何实现？
谢谢！！！

[此贴子已经被作者于2003-5-28 11:13:18编辑过]

sf

哪位大侠来给我指点迷津、、、迫切等待、、、、、、

谢谢！

竹笛

第1个问题：思路错误，叫我怎么说呢。库存与窗体无关，库存应该是表中数据减去表中数据。
第2个问题：思路错误，历史数据本来就不允许修改，要改到后台由管理员去改。

sf

竹兄你好，

第二个问题：我想要做的是能否做一个控件，能锁定所输入的数据，比方说，操作

员输入一条出库信息，出库量为13个，第二天他又把这条记录修改成了出库量为8个，如

何能输入信息24小时后锁定这条记录，防止操作员篡改数据。请再次指点。

谢谢！！！

第一个问题：换句话说就是想如何把窗体中的计算数据自动存在表中，我从论坛中搜了几

条方法，但效果不是很好，不能得到真正数据，而且必须打开此窗体，数据才能保存一部

分。我的数据库是大体分成三个表：入库、出库、库存。库存窗体中嵌入入库和出库两个

子窗体，库存量通过入库合计－出库合计获得，如5楼图片tp所示。我想在出库单中引用库

存量，用查询方式需要等待数据的重新计算，速度不快，不如从表中提出数据快速，所以

我想能否真正实现窗体中计算数据的时效性保存于数据表中。。。不好意思，话太长了，

表达能力欠缺请各位见谅，

请指导－－－－谢谢！！！

[此贴子已经被作者于2003-5-26 14:27:37编辑过]

sf

图片在此！谢谢。。。

竹笛

看不见你的图片。

sf

不好意思，下载后打开吧，上传别的格式太不清楚，我做成了TIF格式，太大，我压缩了一下，麻烦你的，在此谢过！

sf

第二个问题,我已解决,第一个问题还有请大家出谋划策....谢谢!!!

sf

第一个问题的难点在于库存窗体中的入库量合计和出库量合计也都是从子窗体中计算得出,在库

存表中没有数据列,我试着在入库量合计和出库量合计控件加入beforafterupdate()和afterupdate

()事件: me.库存量=nz(me.入库量合计)-nz(me.出库量合计) .此种方法也不行.不能把计算的库

存量存入表中.

等待各位雪中送碳..........

[此贴子已经被作者于2003-5-28 11:06:52编辑过]

sf

各老兄：
          我的上两个问题，经过两天反复调试，终于搞定了，我的方法肯定不是最好或比较好的方法，但暂时这是我想到的没有办法的办法了。
           第一个解决思路及方法：设计一个含有现有库存量查询，以此为源数据，在出库窗体上建立现有库存量控件，通过材料ID建立了出库材料选定时，关联调出此材料的库存量，然后在出库量控件的afterupdate事件设定当出库量大于库存量时弹出窗口警告，并设出库量等于现库存量即可。
          第二个解决思路及方法：在出库单窗体上设置个控制按钮（Lock）及一个复选框（jlock）。控制按钮控制复选框的真或假,  复选框的真和假控制每个出库单各窗体控件是否锁定。 也可建立一反锁定按钮 .这是用按钮人工控制，也可通过系统时间自动锁定，用系统时间和出库单日期作比较，如大于规定天数则锁定即可.在VBAh中你可设定某些人员登录时,反锁定按钮隐藏,或限制反锁定按钮的使用人员.
If jlock.Value = True Then
      
        Me!lblCheck.Caption = "此出库单已审核,不能修改"
        Me!出库单ID.Locked = True
        Me!出库单编号.Locked = True
        Me!出库日期.Locked = True
        Me!出库单说明.Locked = True
        Me![出库单子窗体].Locked = True
     ElseIf jlock.Value = False Then
        Me!lblCheck.Caption = "此出库单未审核,可以添加和修改"
        Me!出库单ID.Locked = False
        Me!出库单编号.Locked = False
        Me!出库日期.Locked = False
        Me!出库单说明.Locked = False
        Me![出库单子窗体].Locked = False
    End If
这样可实现:出库单录入后24小时锁定记录,也可人工随时锁定.如果操作员以前记录输入错误但被锁定时,必须由管理员来解锁修改.双重锁定,够安全了吧.---------
    不过,调用系统时间,如果总把系统时间调整为固定一天,那自动锁定将形同虚设,所以最好使用软件时间限制加密的方法.使用自设相对时间,不用系统时间.这一点我还不知如何实现,如果老兄你知道,请指点.谢谢!

[此贴子已经被作者于2003-5-29 16:29:46编辑过]