ExtractPhoneNumbers ( text ; placeholder )

Extract Phone numbers

Average rating: 4.5 (28 votes) Log in to vote

Bart Bartholomay
HAB Marketing
http://habmarketing.com

Sample input:

ExtractPhoneNumbers ( "Here are some phone numbers

(555) 222 - 1212. 555-9876
777555-2222. 44 444 555-6666" ; "" )

Sample output:

555 222 1212
555 9876
777 555 2222
44 444 555 6666

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

/*-------------------------------------------------------------------

   Function:      ExtractPhoneNumbers ( text ; placeholder )

   Type:            Returns formatted list of Phone Numbers ( xx xxx xxx xxxx)

   Purpose:       To extract a list of valid phone numbers from text.

   Parameter:    text 
                        placeholder  ( use - ""  )

   Constraints:  All phone numbers MUST be saparated by at least a "," better yet on a separate line 

   Author:         Bart Bartholomay
                        HAB Marketing
                        bart@habmarketing.com

---------------------------------------------------------------------*/


Let (

[

           stext =  Substitute ( text ; "." ; "¶" ) ;
        listtext =  Filter ( stext ; "0123456789¶" ) ;
           ptext =  GetValue ( listtext ; 1 ) ;
               len =  Length ( ptext ) + 1 ;
          phone =  Trim ( Replace ( Replace ( Replace  ( ptext ; len - 4 ; 0 ; " " ) ; len - 7 ; 0 ; " " ) ; len - 10 ; 0 ; " " ) ) ;
   validphone =  Length ( phone ) > 0 ;
         newlist =  If ( validphone ; Case( Length (placeholder) > 0 ; placeholder & ¶  & phone ; phone ) ; placeholder )

] ;   
               
                         If ( ValueCount ( listtext ) > 0 ;
                            ExtractPhoneNumbers (RightValues( listtext ; ValueCount ( listtext ) - 1 ) ; newlist ) ;
                           TextFormatRemove ( newlist ) 
                            )
)

Input any type of text that includes phone numbers making sure that they don't run together and are separated by at least a "." or carriage return. Enter a "" null value for the placeholder.

The result displays a list of phone numbers.

Note: This is version 2.0 and has NOT been checked against all conceivable types of phone numbers. Please email the author if you have suggestions.

Comments

		Rakesh, Netherlands Aug 15, 2012
Accepting telephonenumbers starting with 00 44... etc would be great.

		Bart Bartholomay, Vero Beach, FL Aug 15, 2012
Had a request to amend this Custom Function to account for European codes, and while not all formats have been tested a country code of "XX" will work. The Custom Function can be changed fairly easily to accommodate others.

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

ExtractPhoneNumbers ( text ; placeholder )

Comments

Support this website.

Support this website.