Advertisement
Guest User

Untitled

a guest
Jun 26th, 2019
65
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.55 KB | None | 0 0
  1. =Code.Divide
  2. (IIf(Fields!Results.Value = "BKR3 - Total Overtime Hours", Fields!Results.Value, 0)) ,
  3. (IIf(Fields!Emp_Type.Value = "BKR1 - Total Paid Hours", Fields!Results.Value, 1))
  4.  
  5. Public Function Divide(ByVal dividend as Double, ByVal divisor as Double) As Double
  6. If IsNothing(divisor) Or divisor = 0 Or IsNothing(dividend) Or dividend=0 THEN
  7. Return 0
  8. Else
  9. Return dividend/divisor
  10. End If
  11. End Function
  12.  
  13. Overtime % 0.18%
  14.  
  15. Overtime % #Error
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement