Determines if a string value is contained in an array of strings.

Function (Stringvar Array Items, Stringvar Value)
     Numbervar i;
  Booleanvar flag:=False;
     If Ubound(Items)>0 Then
      For i := 1 To Ubound(Items) Do (
            If Items[i]=Value Then (
                flag:=True;
                Exit For
            )
        )
    //End If
    ;
//return result
flag;


Crystal Reports · Functions · Programming