- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]工资计算代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=63542)
-- 发布时间：2015/1/23 9:32:00
-- [求助]工资计算代码
a
此主题相关图片如下：gz.jpg
实际工资=日工资乘以出勤
日工资和出勤为空
实际工资=基本工资
这个代码如何写
-- 发布时间：2015/1/23 9:36:00
--
DataColChanged
select case e.dataco.name
case "基本工资","日工资","出勤"
if e.datarow.isnull("日工资")=False orelse e.datarow.lsnull("出勤")=false then
e.datarow("实际工资")=e.datarow("基本工资")
else
e.datarow("实际工资")=e.datarow("日工资")*e.datarow("出勤")
end if
end select
-- 发布时间：2015/1/23 9:37:00
--
If e.DataRow.IsNull("日工资") AndAlso e.DataRow.IsNll("出勤") Then
e.DataRow("实际工资") = e.DataRow("基本工资")
Else
e.DataRow("实际工资") = e.DataRow("日工资") * e.DataRow("出勤")
End If