ZeroNum ( number ; len )

Returns a number with leading zeroes

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

Theo Ros - Show more from this author

Sample input:

ZeroNum ( 123 ; 7 )

Sample output:

0000123

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

/* ----------------------------------------------------------
Returns a string containing the number with as many 
leading "0" characters as needed to reach the given
total length.

In:  number - the number to format
       len - the total length of the
               returned string

Return type: Text
Syntax: ZeroNum ( number ; len )

Theo Ros
----------------------------------------------------------*/

// speed things up by prefilling a buffer with 32 zeroes
Let ( [ num = GetAsNumber ( number ) ; 
           zero = "00000000000000000000000000000000" ] ; 
  Case ( Length ( num ) >= len ; num ;
             // added recursion overflow check
             Int ( len / 32 ) > 999 ; "ERROR: too many recursions" ;  
             len > Length ( num ) + 32 ; zero & ZeroNum ( number ; len - 32 ) ; 
             Right ( zero & num ; len ) 
  )
)

Returns a string containing the number with as many leading "0" characters as needed to reach the given total length.

In: number - the number to format
len - the total length of the
returned string

Return type: Text

Comments

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

ZeroNum ( number ; len )

Comments

Support this website.

Support this website.