If e.DataRow("线长确认") = Nothing AndAlso e.DataRow("设备指派") = Nothing AndAlso e.DataRow("实际完成日期") = Nothing AndAlso e.DataRow("线长验收") = Nothing Then e.DataRow("节点状态") = "线长审核" ElseIf e.DataRow("线长确认") <> Nothing AndAlso e.DataRow("设备指派") = Nothing AndAlso e.DataRow("实际完成日期") = Nothing AndAlso e.DataRow("线长验收") = Nothing Then e.DataRow("节点状态") = "待分配" ElseIf e.DataRow("线长确认") <> Nothing AndAlso e.DataRow("设备指派") <> Nothing AndAlso e.DataRow("实际完成日期") = Nothing AndAlso e.DataRow("线长验收") = Nothing e.DataRow("节点状态") = "单已分解" ElseIf e.DataRow("线长确认") <> Nothing AndAlso e.DataRow("设备指派") <> Nothing AndAlso e.DataRow("实际完成日期") = Nothing AndAlso e.DataRow("线长验收") = Nothing e.DataRow("节点状态") = "维修中" ElseIf e.DataRow("线长确认") <> Nothing AndAlso e.DataRow("设备指派") <> Nothing AndAlso e.DataRow("实际完成日期") <> Nothing AndAlso e.DataRow("线长验收") = Nothing e.DataRow("节点状态") = "待验收" Else e.DataRow("节点状态") = "已完成" End If
|