以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  赋值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=74372)

--  作者:cqlistone
--  发布时间:2015/9/9 16:18:00
--  赋值

你好!

表A中有四列:实际库存量(表达式生成)、库存上限、库存下限、库存水平状态

通过实际库存量的变化在库存水平状态列自动填入“高库存(大于库存上限)、欠缺(小于库存下限)、正常(实际库存量介于库存上下限之间)

下面代码只能赋值高库位,其它不执行

 

 

Select Case e.DataCol.Name
    Case "实际库存量","库存上限"
        Dim dr1 As DataRow = e.DataRow
        If dr1("实际库存量") =0  Then
            dr1("库存水平状态") = "欠缺"
        Else
            Dim tp1 As Integer = dr1("实际库存量") - dr1("库存上限")
            If tp1 >  0
                dr1("库存水平状态") = "高库存"
            End If
        End If
End Select

Select Case e.DataCol.Name
    Case "实际库存量","库存下限"
        Dim dr2 As DataRow = e.DataRow
        If dr2("实际库存量") = 0  Then
            dr2("库存水平状态") = "欠缺"
        Else
            Dim tp2 As Integer = dr2("实际库存量") - dr2("库存下限")
            If tp2 <  0
                dr2("库存水平状态") = "欠缺"
            End If
        End If
End Select


--  作者:Hyphen
--  发布时间:2015/9/9 16:52:00
--  

表达式列不会触发DataColChanged这些事件

http://www.foxtable.com/help/topics/2381.htm


--  作者:大红袍
--  发布时间:2015/9/9 16:56:00
--  

你要去到 实际库存量 列的表达式的构成的表列的datacolchanged事件写代码。

 

让其触发 库存下限 列的datacolchanged事件

 

http://www.foxtable.com/help/topics/1587.htm

 


--  作者:cqlistone
--  发布时间:2015/9/10 10:10:00
--  

你好!

还不行,帮我看看。从入库明细和出库明细表计算库存管理表的实际库存量后给库存水平状态赋值

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


--  作者:大红袍
--  发布时间:2015/9/10 10:29:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.foxdb