Newest functions Upload a function Leave a tip My account

There are 2,572 functions in this library.

ValidCode ( Code ; Type )

Calculates the check number of various types of codes

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

Klaus-Dieter Bruegmann - Show more from this author kade project http://www.kade-project.de

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

/* ValidCode ( Code ; Type ) Author: kade, Klaus-Dieter Brügmann, www.kade-project.de - Aug. 2006 */ Let ( [ TheType = Case ( Type = "UPC" or Type = "UPC A" ; 1 ; Type = "EAN 8" or Type = "UPC E" ; 5 ; 0) ; noCN = Case ( Length ( Code ) + TheType = 12 ; 1 ; 0 ) ; CheckInput = Case ( Length ( Code ) <> Length ( Filter ( Code ; "0123456789" ) ) ; "Error" ; Length ( Code ) + TheType + noCN <> 13 ; "Error" ; "" ) ; TheCode = Right ( "0000" & Left ( Code ; Length ( Code ) - Abs ( noCN -1 ) ) ; 12) ; TheCN = Right ( 10 - Mod ( ( ( Middle ( TheCode ; 12 ; 1 ) + Middle ( TheCode ; 10 ; 1 ) + Middle ( TheCode ; 8 ; 1 ) + Middle ( TheCode ; 6 ; 1 ) + Middle ( TheCode ; 4 ; 1 ) + Middle ( TheCode ; 2 ; 1 ) ) * 3 ) + Middle ( TheCode ; 11; 1 ) + Middle ( TheCode ; 9 ; 1 ) + Middle ( TheCode ; 7 ; 1 ) + Middle ( TheCode ; 5 ; 1 ) + Middle ( TheCode ; 3 ; 1 ) + Middle ( TheCode ; 1 ; 1 ) ; 10 ) ; 1) ] ; Case ( IsEmpty ( CheckInput ) ; TheCN ; CheckInput ) ) /* Who wanna get the complete code instaed of the checkdigit use the following calculation: Case ( IsEmpty ( CheckInput ); Right ( TheCode ; Length ( TheCode ) - TheType ) & TheCN; CheckInput ) */ Click to copy

ValidCode calculates the checknumber of 13 digit codes like EAN 13 ( European Article Number ), ISBN 13 (International Standard Book Number), ISSN 13 (International Standard Serial Number), of 12 digit code UPC A (Universal Product Code) and also of the 8 digit codes EAN 8 and UPC E. If you leave the parameter "Type" empty or input is "ISBN" or "ISSN" it calculates the check number of a 13 digit code.

 

Comments

		Grace, Melbourne Sep 16, 2013
How do you custom edit this function to work with my table?

		PhilModJunk, Modesto Jan 7, 2014
This function trips an Error in FileMaker 13. Code is not permitted as a parameter name. I had to rename this parameter before I could define the funciton in my database.

		Lars, Hagen / Germany Jul 2, 2017
Hi, is there any update for the newer Filmmaker versions? I have also the problem with type in filemaker 14 Many thanks

		Eddie Albert Jan 8, 2019
To work in newer FM, just substitute the word "code" with "barcode" in the formula. DO NOT change the word "TheCode"

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 21 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: