IsValidABN ( text )

Validates Australian ABN numbers.

Average rating: 4.0 (36 votes) Log in to vote

Vaughan Bromfield - Show more from this author

Sample input:

IsValidABN ( 11 111 111 111 )

Sample output:

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

Case( 

IsEmpty( text ) ; 
1 ; 

Let( 

[

ABN = Filter ( text ; "0123456789" ) ;

ABN01 = Middle ( ABN ; 1 ; 1 ) ; 
ABN02 = Middle ( ABN ; 2 ; 1 ) ; 
ABN03 = Middle ( ABN ; 3 ; 1 ) ; 
ABN04 = Middle ( ABN ; 4 ; 1 ) ; 
ABN05 = Middle ( ABN ; 5 ; 1 ) ; 
ABN06 = Middle ( ABN ; 6 ; 1 ) ; 
ABN07 = Middle ( ABN ; 7 ; 1 ) ; 
ABN08 = Middle ( ABN ; 8 ; 1 ) ; 
ABN09 = Middle ( ABN ; 9 ; 1 ) ; 
ABN10 = Middle ( ABN ; 10 ; 1 ) ; 
ABN11 = Middle ( ABN ; 11 ; 1 ) ; 

ABNSum = 
( ( ABN01 - 1 ) * 10 ) + 
( ABN02 * 1 ) + 
( ABN03 * 3 ) + 
( ABN04 * 5 ) + 
( ABN05 * 7 ) + 
( ABN06 * 9 ) + 
( ABN07 * 11 ) + 
( ABN08 * 13 ) + 
( ABN09 * 15 ) + 
( ABN10 * 17 ) + 
( ABN11 * 19 ) 

] ; 

Length( ABN ) = 11 and 
Mod ( ABNSum ; 89 ) = 0

)
)

Validates Australian ABN numbers. The result is either 0 (not valid) or 1 (valid ). Null imput evaluates to 1.

It ignors all spaces and other separators.

This function uses the checksum algortithm as published by the Australian Government.

Comments

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

IsValidABN ( text )

Comments

Support this website.

Support this website.