Hi
Hope you all good.
Trying to get a ceiling function to working in Crystal 9 - have to create it coz Crystal doesn't seem to have it.
It works fine in My Access VBA Module
Here is the VBA code that works fine (found it on the net):
Public Function Ceiling(ByVal X As Double, Optional ByVal Factor As Double =
1) As Double
' X is the value you want to round
' is the multiple to which you want to round
Ceiling = (Int(X / Factor) - (X / Factor - Int(X / Factor) > 0)) *
Factor
End Function
How do I write that as a working function in Crystal that I can call in
another function later?
(May seem dumb - but also been beating my head again a brick wall with
regards to another "problem" I'm having with regards to an DAO Error
Code:0xc0d error - see next post on that one.)
Any help will be GREAT.
D
Hope you all good.
Trying to get a ceiling function to working in Crystal 9 - have to create it coz Crystal doesn't seem to have it.
It works fine in My Access VBA Module
Here is the VBA code that works fine (found it on the net):
Public Function Ceiling(ByVal X As Double, Optional ByVal Factor As Double =
1) As Double
' X is the value you want to round
' is the multiple to which you want to round
Ceiling = (Int(X / Factor) - (X / Factor - Int(X / Factor) > 0)) *
Factor
End Function
How do I write that as a working function in Crystal that I can call in
another function later?
(May seem dumb - but also been beating my head again a brick wall with
regards to another "problem" I'm having with regards to an DAO Error
Code:0xc0d error - see next post on that one.)
Any help will be GREAT.
D