FileMaker Pro Custom Functions

/*------------------------------------------------------- Searches a Return delimited list 'list' for the occurrance of the given value. Returns the 1-based indexnumber if found, 0 if value is not in the list. Syntax: ListIndex ( list ; string ; matchcase ) In: list - the return delimited list to search string - the string to look for in the item matchcase - if True, the list is searched Case Sensitive if False, a Case Insensitive search is performed Return type: Number ListIndex ( "John¶Paul¶George¶Ringo" ; "ringo" ; False ) --> 4 ListIndex ( "John¶Paul¶George¶Ringo" ; "ringo" ; True ) --> 0 Theo Ros ----------------------------------------------------------*/ Let ( [ lst = If ( Left ( list ; 1 ) <> "¶" ; "¶" & list ; list ) & "¶" ; pos = If ( matchcase ; // do a Case Sensitive PatternCount Let( [ marker = "%!Case!%" ; // use a highly unlikely string find = marker & string ; // combine into new search string lst = Substitute ( lst ; string ; find ) ] ; // redefine the list // now we search for the combined string Position ( lst ; find ; 1 ; 1 ) ) ; // do a normal case Insensitive PatternCount Position ( lst ; string ; 1 ; 1 ) ) ] ; If ( pos ; PatternCount ( Left ( lst ; pos ) ; "¶" ) ; 0 ) )
 Then copy & paste into FileMaker Advanced's Edit Custom Function window.