TextFindTimeValues ( TextToSearch ; ValuesFound )

Returns a Value List of Times Found in a String.

Average rating: 4.7 (26 votes) Log in to vote

Hal Gumbert - Show more from this author
CampSoftware
http://www.campsoftware.com

Sample input:

Input 1: TextFindTimeValues ( "1/7/2012 7am Breakfast at Tiffany's; Meet outside." ; "" )

Input 2: TextFindTimeValues ( "1/5/2012 10am Call Hal to confirm the 1:15pm appointment." ; "" )

Sample output:

Output 1: "7am"

Output 2: "10am¶1:15pm"

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

/*

TextFindTimeValues ( TextToSearch ; ValuesFound )

Hal Gumbert, CampSoftware.com

Returns a Value List of Times Found in a String.

Parameters:
TextToSearch = the text to search
ValuesFound = used to track found values 

Return Value:
A Value List of Found Values

Input: TextFindTimeValues ( "1/7/2012 7am Breakfast at Tiffany's; Meet outside." ; "" )
Output: "7am"

Input: TextFindTimeValues ( "1/5/2012 10am Call Hal to confirm the 1:15pm appointment." ; "" )
Output: "10am¶1:15pm"

*/

Let ( [

// Get the Word to examine.
theWord = MiddleWords ( TextToSearch ; 1 ; 1 ) ; 

// Is the Word a Time?   
theWordIsATime = If ( (not IsEmpty ( GetAsTime ( theWord ) ) ) and ( GetAsTime ( Time ( Hour ( GetAsTime ( theWord ) ) ; Minute ( GetAsTime ( theWord ) ) ; 0 ) ) ≠ "?" ) ; 1 ; 0 ) ;

// Add the Word to the Value List if it is a Date.
theValuesFound = ValuesFound & If ( theWordIsATime ; If ( not IsEmpty ( ValuesFound ) ; "¶" ; "" ) & theWord ; "" ) ;

// The Words to be examined.
theWordsRemaining = MiddleWords ( TextToSearch ; 2 ; WordCount ( TextToSearch ) )

] ; 

// If there are no words remaining, return the Values, otherwise, search the remaining words.
If ( IsEmpty ( theWordsRemaining ) ; theValuesFound ; TextFindTimeValues ( theWordsRemaining ; theValuesFound ) )

)

TextFindTimeValues ( TextToSearch ; ValuesFound )

Hal Gumbert, CampSoftware.com

Returns a Value List of Times Found in a String.

Parameters:
TextToSearch = the text to search
ValuesFound = used to track found values

Return Value:
A Value List of Found Values

Input: TextFindTimeValues ( "1/7/2012 7am Breakfast at Tiffany's; Meet outside." ; "" )
Output: "7am"

Input: TextFindTimeValues ( "1/5/2012 10am Call Hal to confirm the 1:15pm appointment." ; "" )
Output: "10am¶1:15pm"

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

TextFindTimeValues ( TextToSearch ; ValuesFound )

Comments

Support this website.

Support this website.