Hi
I am getting above error on below expression
=Ceiling(Code.MyFun(Fields!LCode.Value)/5) . In Custom Code below is the code
Dim FlagTable As System.Collections.Hashtable Dim Flag AS Integer Function MyFunc(ByVal NewValue As Object) As Integer If (FlagTable Is Nothing) Then FlagTable = New System.Collections.Hashtable End If If (NewValue Is Nothing) Then NewValue = "-" End If If (Not FlagTable .Contains(NewValue )) Then Flag =Flag + 1 FlagTable.Add(NewValue, nothing) End If MyFunc = Flag End Function
Thanks