Newest functions Upload a function Leave a tip My account

There are 2,522 functions in this library.

PhoneMaskAU ( number )

Mask Australian phone numbers

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

Bob Stuart Crouch Think Data http://thinkdata.com.au

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

//Restrict input to digits-only Let ( ( num = Filter ( number ; "0123456789" ) ; Phone = /* Vary occurrence of spaces, depending if the phone number features 10 digits... */ Case ( Left ( num; 1 ) = "0" or Left ( num; 4 ) = "1800" or Left ( num; 4 ) = "1300"; Left ( num ; 4 ) & " " & Middle ( num ; 5 ; 3 ) & " " & Middle ( num ; 8 ; 3 ) ; //or 6 digits... Length ( num ) = 6; Left ( num ; 2 ) & " " & Middle ( num ; 3 ; 2 ) & " " & Middle ( num ; 5 ; 2 ) ; // or the default format for 8-digit numbers Left ( num ; 4 ) & " " & Middle ( num ; 5 ; 4 ) & // if it exceeds 8 digits, assume it is an extension If ( Length ( num ) > 8; " x" & Middle ( num ; 9 ; 99 ) ; "" ) ) ] ; // Allow ## ## ## formatting for 6-digit numbers e.g. "13 13 13" If ( Length ( Num ) < 8 and Left ( num ; 2) ≠ 13; // if number is too short [less than 8 digits] display a message in red as error TextColor ( "Too few digits" ; RGB ( 255 ; 0 ; 0 ) ); // Reset the default colour if the phone number is valid TextColor ( phone ; RGB ( 0 ; 0 ; 0 ) ) ) ) Click to copy

The heavy lifting was done by Timothy Brown of Antidote Solutions in his CF PhoneMask. I chose to adapt his good work and tried to make it applicable to all the kinds of phone numbers encountered in Australia. Here, you'll find fixed line numbers "(##) #### ####", cellular phones "#### ### ###", 1800 and 1300 numbers "1800 ### ###" and 6-digit numbers which look like 13 ## ##. PhoneMaskAU accounts for all of them, but if you can think of ways to make it more elegant, I'm all ears.

I have made no attempt to incorporate Area Code into this Custom Function. Instead, I use a user-entered global Default Area Code in my databases, set to auto enter (do not replace existing values, if any) which auto-fills another field called AreaCode, if (Number) is 8-digits. The Auto Enter calc looks like this:

NOTE: THIS CORRECTS THE EARLIER VERSION WHICH CONTAINED "SPACE" CHARACTERS WITHIN THE FILTER FUNCTION. HERE, THE SPACES ARE REMOVED. APOLOGIES.

If ( Length ( Filter ( Phone; "0123456789" ) ) = 8 ; gDefaultAC ; "" )

Because it is set NOT to "replace existing values, if any", the user can type another Area Code which won't be changed automatically to the Default Area Code if the phone number is altered.

 

Comments

		Doug Wesson, Sydney Australia Feb 15, 2009
Hi Bob Nice one however it needs to be extended. Would be nice to format phone numbers to take advantage of international number eg 612 9334 5600 or just local eg 02 9334 5600

		ron, usa May 17, 2013
I keep getting the error that there is an improper ')' . I can't see it. I copied and pasted everything. Why?

Log in to post comments.

 

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

Support this website.

This library has been a free commmunity resource for FileMaker users and developers for 20 years. It receives no funding and has no advertisements. If it has helped you out, I'd really appreciate it if you could contribute whatever you think it's worth: