Newest functions Upload a function Leave a tip My account

There are 2,522 functions in this library.

ISBN13Check ( ISBN13 ; text )

validates ISBN-13

  Average rating: 4.6 (29 votes) Log in to vote

Larry Nichols - Show more from this author n/a n/a

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

Let ( [ v1 = Middle ( isbn13 ; 1 ; 1 ) * 1 ; v2 = Middle ( isbn13 ; 2 ; 1 ) * 3 ; v3 = Middle ( isbn13 ; 3 ; 1 ) * 1 ; v4 = Middle ( isbn13 ; 4 ; 1 ) * 3 ; v5 = Middle ( isbn13 ; 5 ; 1 ) * 1 ; v6 = Middle ( isbn13 ; 6 ; 1 ) * 3 ; v7 = Middle ( isbn13 ; 7 ; 1 ) * 1 ; v8 = Middle ( isbn13 ; 8 ; 1 ) * 3 ; v9 = Middle ( isbn13 ; 9 ; 1 ) * 1 ; v10 = Middle ( isbn13 ; 10 ; 1 ) * 3 ; v11 = Middle ( isbn13 ; 11 ; 1 ) * 1 ; v12 = Middle ( isbn13 ; 12 ; 1 ) * 3 ; vSum = Evaluate ( v1 + v2 + v3 + v4 + v5 + v6 + v7 + v8 + v9 + v10 + v11 + v12 ); modSum = Mod ( vSum ; 10 )]; Case ( Length ( isbn13 ) > 13 ; text ; modSum = 0 and Middle ( isbn13 ; 13 ; 1 ) = 0 ; "" ; 10 - modSum = Middle ( isbn13 ; 13 ; 1 ); "" ; text ) ) Click to copy

For booksellers and others who need to validate their 13-digit ISBNs during data entry, this function checks a number against the industry calculation for ISBN13s and outputs a warning message of your choice if validation fails. I recommend nesting the TextColor () function in the second parameter to make the warning message more eye-catching.

 

Comments

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: