主题：赋值

你好！

表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

你好！

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

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:测试.zip