主题：数据

刚才错了  是盘头_绩效的公式,公式如下

If VARS("XZBZ")=0 Then
    Dim dr As DataRow = e.DataRow
    If e.DataRow.IsNull("xbms")  Then
         dr("xbms")=0
    End If  
   
    dr("yjcn") = 500*(dr("gzsj")*60-60-dr("ztjsj"))
    dr("sjcn")=dr("ms")*dr("gs")+dr("xbms")-dr("sbms")
    dr("jxcn")=500*(dr("sjcn")+dr("gs")*dr("js")*5+dr("tj_fscs")*dr("js")*10+dr("tj_jstggs")*dr("js")*0.15 +dr("tj_sxggs")*300)/dr("js")
    dr("dcl")=dr("jxcn")/dr("yjcn")*100

end if