Shopping Cart

Free Newsletter
Signup

Contact

FileMaker is a registered trademark of FileMaker, Inc. in the U.S. and other countries.

FileMaker Pro Custom Functions

List | Show Random | Upload | Add This to Your Site

NumToText_POR

Rate this function:

Average rating: 3.9 (7 votes)
Discuss this Custom Function

Ibrahim Bittar Torres, Eikonsys
http://www.eikonsys.com

Converts an amount from number to text in Portuguese

Sample Input:

NumToText_Por (123.45, "Euros" , "a pagar" )

Sample Output:

cento vinte e três Euros 45/100 a pagar.

Let ( [ Text = Right ( "000000000000000000" & GetAsText ( Int ( Abs ( Monto ) ) ) ; 18 ) ; N01 = Middle ( text ; 1 ; 1 ) ; N02 = Middle ( text ; 2 ; 1 ) ; N03 = Middle ( text ; 3 ; 1 ) ; N04 = Middle ( text ; 4 ; 1 ) ; N05 = Middle ( text ; 5 ; 1 ) ; N06 = Middle ( text ; 6 ; 1 ) ; N07 = Middle ( text ; 7 ; 1 ) ; N08 = Middle ( text ; 8 ; 1 ) ; N09 = Middle ( text ; 9 ; 1 ) ; N10 = Middle ( text ; 10 ; 1 ) ; N11 = Middle ( text ; 11 ; 1 ) ; N12 = Middle ( text ; 12 ; 1 ) ; N13 = Middle ( text ; 13 ; 1 ) ; N14 = Middle ( text ; 14 ; 1 ) ; N15 = Middle ( text ; 15 ; 1 ) ; N16 = Middle ( text ; 16 ; 1 ) ; N17 = Middle ( text ; 17 ; 1 ) ; N18 = Middle ( text ; 18 ; 1 ) ; Decimal = Right ( "00" & ( Round ( Monto ; 2 ) - Int ( Monto ) ) * 100 ; 2 ) ] ; Trim ( //Centenas de Miles de Billón Case ( N01 = 1 and N02 = 0 and N03 = 0 ; "cen " ; N01 = 1 ; "cento " ; N01 = 2 ; "duzcentos " ; N01 = 3 ; "trezentos " ; N01 = 4 ; "quatrocentos " ; N01 = 5 ; "quinhentos " ; N01 = 6 ; "seiscentos " ; N01 = 7 ; "setecentos " ; N01 = 8 ; "oitocentos " ; N01 = 9 ; "novecentos " ; "" ) & //Decenas de Miles de Billón Case ( N02 = 1 and N03 = 0 ; "dez " ; N02 = 1 and N03 = 1 ; "onze " ; N02 = 1 and N03 = 2 ; "doze " ; N02 = 1 and N03 = 3 ; "treze " ; N02 = 1 and N03 = 4 ; "quiatorze " ; N02 = 1 and N03 = 5 ; "quinze " ; N02 = 1 and N03 = 6 ; "dezesseis " ; N02 = 1 and N03 = 7 ; "dezessete " ; N02 = 1 and N03 = 8 ; "dezoito " ; N02 = 1 and N03 = 9 ; "dezenove " ; N02 = 2 and N03 = 0 ; "vinte " ; N02 = 3 and N03 = 0 ; "trinta " ; N02 = 4 and N03 = 0 ; "quarenta " ; N02 = 5 and N03 = 0 ; "cinquenta " ; N02 = 6 and N03 = 0 ; "sessenta " ; N02 = 7 and N03 = 0 ; "setenta " ; N02 = 8 and N03 = 0 ; "oitenta " ; N02 = 9 and N03 = 0 ; "noventa " ; N02 = 2 ; "vinte e " ; N02 = 3 ; "trinta e " ; N02 = 4 ; "quarenta e " ; N02 = 5 ; "cinquenta e " ; N02 = 6 ; "sessenta e " ; N02 = 7 ; "setenta e " ; N02 = 8 ; "oitenta e " ; N02 = 9 ; "noventa e " ; "" ) & //Unidades de Miles de Billón Case ( N03 = 1 and N02 > 1 ; "um " ; N03 = 1 and N02 = 0 ; "um " ; N03 = 2 and ( N02 > 1 or N02 = 0 ) ; "dois " ; N03 = 3 and ( N02 > 1 or N02 = 0 ) ; "três " ; N03 = 4 and ( N02 > 1 or N02 = 0 ) ; "quatro " ; N03 = 5 and ( N02 > 1 or N02 = 0 ) ; "cinco " ; N03 = 6 ; "seis " ; N03 = 7 ; "sete " ; N03 = 8 ; "oito " ; N03 = 9 ; "nove " ; "" ) & If ( N01 > 0 or N02 > 0 or N03 > 0 ; "mil " ; "" ) & //Centenas de Billón Case ( N04 = 1 and N05 = 0 and N06 = 0 ; "cen " ; N04 = 1 ; "cento " ; N04 = 2 ; "duzentos " ; N04 = 3 ; "trezentos " ; N04 = 4 ; "quatrocentos " ; N04 = 5 ; "quinhentos " ; N04 = 6 ; "seiscentos " ; N04 = 7 ; "setecentos " ; N04 = 8 ; "oitocentos " ; N04 = 9 ; "novecentos " ; "" ) & //Decenas de Miles de Billón Case ( N05 = 1 and N06 = 0 ; "dez " ; N05 = 1 and N06 = 1 ; "onze " ; N05 = 1 and N06 = 2 ; "doze " ; N05 = 1 and N06 = 3 ; "treze " ; N05 = 1 and N06 = 4 ; "quatorze " ; N05 = 1 and N06 = 5 ; "quinze " ; N05 = 1 and N06 = 6 ; "dezesseis " ; N05 = 1 and N06 = 7 ; "dezessete " ; N05 = 1 and N06 = 8 ; "dezoito " ; N05 = 1 and N06 = 9 ; "dezenove " ; N05 = 2 and N06 = 0 ; "vinte " ; N05 = 3 and N06 = 0 ; "trinta " ; N05 = 4 and N06 = 0 ; "quarenta " ; N05 = 5 and N06 = 0 ; "cinquenta " ; N05 = 6 and N06 = 0 ; "sessenta " ; N05 = 7 and N06 = 0 ; "setenta " ; N05 = 8 and N06 = 0 ; "oitenta " ; N05 = 9 and N06 = 0 ; "noventa " ; N05 = 2 ; "vinte e " ; N05 = 3 ; "trinta e " ; N05 = 4 ; "quarenta e " ; N05 = 5 ; "cinquenta e " ; N05 = 6 ; "sessenta e " ; N05 = 7 ; "setenta e " ; N05 = 8 ; "oitenta e " ; N05 = 9 ; "noventa e " ; "" ) & //Unidades de Billón Case ( N06 = 1 and N05 > 1 ; "um " ; N06 = 1 and N05 = 0 ; "um " ; N06 = 2 and ( N05 > 1 or N05 = 0 ) ; "dois " ; N06 = 3 and ( N05 > 1 or N05 = 0 ) ; "três " ; N06 = 4 and ( N05 > 1 or N05 = 0 ) ; "quatro " ; N06 = 5 and ( N05 > 1 or N05 = 0 ) ; "cinco " ; N06 = 6 ; "seis " ; N06 = 7 ; "sete " ; N06 = 8 ; "oito " ; N06 = 9 ; "nove " ; "" ) & Case ( N01 = 0 and N02 = 0 and N03 = 0 and N04 = 0 and N05 = 0 and N06 = 0 ; "" ; N01 = 0 and N02 = 0 and N03 = 0 and N04 = 0 and N05 = 0 and N06 = 1 ; "bilhão" ; "biliões" ) & " " & //Centenas de Miles de Millón Case ( N07 = 1 and N08 = 0 and N09 = 0 ; "cen " ; N07 = 1 ; "cento " ; N07 = 2 ; "duzcentos " ; N07 = 3 ; "trezentos " ; N07 = 4 ; "quatrocentos " ; N07 = 5 ; "quinhentos " ; N07 = 6 ; "seiscentos " ; N07 = 7 ; "setecentos " ; N07 = 8 ; "oitocientos " ; N07 = 9 ; "novecentos " ; "" ) & //Decenas de Miles de Millón Case ( N08 = 1 and N09 = 0 ; "dez " ; N08 = 1 and N09 = 1 ; "onze " ; N08 = 1 and N09 = 2 ; "doze " ; N08 = 1 and N09 = 3 ; "treze " ; N08 = 1 and N09 = 4 ; "quatorce " ; N08 = 1 and N09 = 5 ; "quince " ; N08 = 1 and N09 = 6 ; "dezesseis " ; N08 = 1 and N09 = 7 ; "dezessete " ; N08 = 1 and N09 = 8 ; "dezoito " ; N08 = 1 and N09 = 9 ; "dezenove " ; N08 = 2 and N09 = 0 ; "vinte " ; N08 = 3 and N09 = 0 ; "trinta " ; N08 = 4 and N09 = 0 ; "quarenta " ; N08 = 5 and N09 = 0 ; "cinquenta " ; N08 = 6 and N09 = 0 ; "sessenta " ; N08 = 7 and N09 = 0 ; "setenta " ; N08 = 8 and N09 = 0 ; "oitenta " ; N08 = 9 and N09 = 0 ; "noventa " ; N08 = 2 ; "vinte e " ; N08 = 3 ; "trinte e " ; N08 = 4 ; "quarenta e " ; N08 = 5 ; "cinquenta e " ; N08 = 6 ; "sessenta e " ; N08 = 7 ; "setenta e " ; N08 = 8 ; "oitenta e " ; N08 = 9 ; "noventa e " ; "" ) & //Unidades de Miles de Millón Case ( N09 = 1 and N08 > 1 ; "um " ; N09 = 1 and N08 = 0 ; "um " ; N09 = 2 and ( N08 > 1 or N08 = 0 ) ; "dois " ; N09 = 3 and ( N08 > 1 or N08 = 0 ) ; "três " ; N09 = 4 and ( N08 > 1 or N08 = 0 ) ; "quatro " ; N09 = 5 and ( N08 > 1 or N08 = 0 ) ; "cinco " ; N09 = 6 ; "seis " ; N09 = 7 ; "sete " ; N09 = 8 ; "oito " ; N09 = 9 ; "nove " ; "" ) & If ( N07 > 0 or N08 > 0 or N09 > 0 ; "mil " ; "" ) & //Centenas de Millón Case ( N10 = 1 and N11 = 0 and N12 = 0 ; "cen " ; N10 = 1 ; "cento " ; N10 = 2 ; "duzentos " ; N10 = 3 ; "trezentos " ; N10 = 4 ; "quatrocentos " ; N10 = 5 ; "quinhentos " ; N10 = 6 ; "seiscentos " ; N10 = 7 ; "setecentos " ; N10 = 8 ; "oitocentos " ; N10 = 9 ; "novecentos " ; "" ) & //Decenas de Millón Case ( N11 = 1 and N12 = 0 ; "dez " ; N11 = 1 and N12 = 1 ; "onze " ; N11 = 1 and N12 = 2 ; "doze " ; N11 = 1 and N12 = 3 ; "treze " ; N11 = 1 and N12 = 4 ; "quatorce " ; N11 = 1 and N12 = 5 ; "quince " ; N11 = 1 and N12 = 6 ; "dezesseis " ; N11 = 1 and N12 = 7 ; "dezessete " ; N11 = 1 and N12 = 8 ; "dezoito " ; N11 = 1 and N12 = 9 ; "dezenove " ; N11 = 2 and N12 = 0 ; "vinte " ; N11 = 3 and N12 = 0 ; "trinta " ; N11 = 4 and N12 = 0 ; "quarenta " ; N11 = 5 and N12 = 0 ; "cinquenta " ; N11 = 6 and N12 = 0 ; "sessenta " ; N11 = 7 and N12 = 0 ; "setenta " ; N11 = 8 and N12 = 0 ; "oitenta " ; N11 = 9 and N12 = 0 ; "noventa " ; N11 = 2 ; "vinte e " ; N11 = 3 ; "trinta e " ; N11 = 4 ; "quarenta e " ; N11 = 5 ; "cinquenta e " ; N11 = 6 ; "sessenta e " ; N11 = 7 ; "setenta e " ; N11 = 8 ; "oitenta e " ; N11 = 9 ; "noventa e " ; "" ) & //Unidades de Millón Case ( N12 = 1 and N11 > 1 ; "um " ; N12 = 1 and N11 = 0 ; "um " ; N12 = 2 and ( N11 > 1 or N11 = 0 ) ; "dois " ; N12 = 3 and ( N11 > 1 or N11 = 0 ) ; "três " ; N12 = 4 and ( N11 > 1 or N11 = 0 ) ; "quatro " ; N12 = 5 and ( N11 > 1 or N11 = 0 ) ; "cinco " ; N12 = 6 ; "seis " ; N12 = 7 ; "sete " ; N12 = 8 ; "oito " ; N12 = 9 ; "nove " ; "" ) & Case ( N07 = 0 and N08 = 0 and N09 = 0 and N10 = 0 and N11 = 0 and N12 = 0 ; "" ; N07 = 0 and N08 = 0 and N09 = 0 and N10 = 0 and N11 = 0 and N12 = 1 ; "milhão" ; "milhões" ) & " " & //Centenas de Mil Case ( N13 = 1 and N14 = 0 and N15 = 0 ; "cen " ; N13 = 1 ; "cento " ; N13 = 2 ; "duzentos " ; N13 = 3 ; "trezentos " ; N13 = 4 ; "quatrocentos " ; N13 = 5 ; "quinhentos " ; N13 = 6 ; "seiscentos " ; N13 = 7 ; "setecentos " ; N13 = 8 ; "oitocentos " ; N13 = 9 ; "novecentos " ; "" ) & //Decenas de Mil Case ( N14 = 1 and N15 = 0 ; "dez " ; N14 = 1 and N15 = 1 ; "onze " ; N14 = 1 and N15 = 2 ; "doze " ; N14 = 1 and N15 = 3 ; "treze " ; N14 = 1 and N15 = 4 ; "quatorce " ; N14 = 1 and N15 = 5 ; "quince " ; N14 = 1 and N15 = 6 ; "dezesseis " ; N14 = 1 and N15 = 7 ; "dezessete " ; N14 = 1 and N15 = 8 ; "dezoito " ; N14 = 1 and N15 = 9 ; "dezenove " ; N14 = 2 and N15 = 0 ; "vinte " ; N14 = 3 and N15 = 0 ; "trinta " ; N14 = 4 and N15 = 0 ; "quarenta " ; N14 = 5 and N15 = 0 ; "cinquenta " ; N14 = 6 and N15 = 0 ; "sessenta " ; N14 = 7 and N15 = 0 ; "setenta " ; N14 = 8 and N15 = 0 ; "oitenta " ; N14 = 9 and N15 = 0 ; "noventa " ; N14 = 2 ; "vinte e " ; N14 = 3 ; "trinta e " ; N14 = 4 ; "quarenta e " ; N14 = 5 ; "cinquenta e " ; N14 = 6 ; "sessenta e " ; N14 = 7 ; "setenta e " ; N14 = 8 ; "oitenta e " ; N14 = 9 ; "noventa e " ; "" ) & //Unidades de Mil Case ( N15 = 1 and N14 > 1 ; "um " ; N15 = 1 and N14 = 0 ; "um " ; N15 = 2 and ( N14 > 1 or N14 = 0 ) ; "dois " ; N15 = 3 and ( N14 > 1 or N14 = 0 ) ; "três " ; N15 = 4 and ( N14 > 1 or N14 = 0 ) ; "quatro " ; N15 = 5 and ( N14 > 1 or N14 = 0 ) ; "cinco " ; N15 = 6 ; "seis " ; N15 = 7 ; "sete " ; N15 = 8 ; "oito " ; N15 = 9 ; "nove " ; "" ) & If ( N13 > 0 or N14 > 0 or N15 > 0 ; "mil " ; "" ) & //Centenas Case ( N16 = 1 and N17 = 0 and N18 = 0 ; "cen " ; N16 = 1 ; "cento " ; N16 = 2 ; "duzentos " ; N16 = 3 ; "trezentos " ; N16 = 4 ; "quatrocentos " ; N16 = 5 ; "quinhentos " ; N16 = 6 ; "seiscentos " ; N16 = 7 ; "setecentos " ; N16 = 8 ; "oitocentos " ; N16 = 9 ; "novecentos " ; "" ) & //Decenas Case ( N17 = 1 and N18 = 0 ; "dez " ; N17 = 1 and N18 = 1 ; "onze " ; N17 = 1 and N18 = 2 ; "doze " ; N17 = 1 and N18 = 3 ; "treze " ; N17 = 1 and N18 = 4 ; "quatorce " ; N17 = 1 and N18 = 5 ; "quince " ; N17 = 1 and N18 = 6 ; "dezesseis " ; N17 = 1 and N18 = 7 ; "dezessete " ; N17 = 1 and N18 = 8 ; "dezoito " ; N17 = 1 and N18 = 9 ; "dezenove " ; N17 = 2 and N18 = 0 ; "vinte " ; N17 = 3 and N18 = 0 ; "trinta " ; N17 = 4 and N18 = 0 ; "quarenta " ; N17 = 5 and N18 = 0 ; "cinquenta " ; N17 = 6 and N18 = 0 ; "sessenta " ; N17 = 7 and N18 = 0 ; "setenta " ; N17 = 8 and N18 = 0 ; "oitenta " ; N17 = 9 and N18 = 0 ; "noventa " ; N17 = 2 ; "vinte e " ; N17 = 3 ; "trinta e " ; N17 = 4 ; "quarenta e " ; N17 = 5 ; "cinquenta e " ; N17 = 6 ; "sessenta e " ; N17 = 7 ; "setenta e " ; N17 = 8 ; "oitenta e " ; N17 = 9 ; "noventa e " ; "" ) & //Unidades Case ( N18 = 1 and N17 > 1 ; "um " ; N18 = 1 and N17 = 0 ; "um " ; N18 = 2 and ( N17 > 1 or N17 = 0 ) ; "dois " ; N18 = 3 and ( N17 > 1 or N17 = 0 ) ; "três " ; N18 = 4 and ( N17 > 1 or N17 = 0 ) ; "quatro " ; N18 = 5 and ( N17 > 1 or N17 = 0 ) ; "cinco " ; N18 = 6 ; "seis " ; N18 = 7 ; "sete " ; N18 = 8 ; "oito " ; N18 = 9 ; "nove " ; "" ) & If ( Int ( Monto ) = 0 ; "zero " ; "" ) & If ( not IsEmpty ( Currency ) ; Currency & " " ; "" ) & Decimal & "/100 " & Sufijo ) )
Then copy & paste into FileMaker Advanced's Edit Custom Function window.

Click here to copy To Clip Manager if you have myFMbutler's Clip Manager installed

Description:

This function can be used to express amounts in text for invoices or any other administrative document.

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

This is my Custom Function and I want to edit it

Discuss:

5 most recent comments | Show all 10 comments

Hi Panos

Yes, both mean "hundred". This is because in spanish and portuguese the number 100 is named "cien" or "cen" in portuguese and any other number but 100 is named "ciento" or "cento" in portuguese.

For example: 123 is named "ciento veintitres" and in portuguese is named "cento e vinte e três".

In spanish, for the 20's there is a contraction and instead of naming 23 as veinte y tres is named veintitres.

Please send me your finished calculation. I'm working in a multi language version of my ERP and though greek was not one of my first choices after spanish is always good to have some of the hard work already solved.

Regards.

Ibrahim Bittar Torres, León, México.
April 07, 2010 9:21am

By the way, numbers 11 to 20 are "repeated" because they have special names in spanish and portuguese. It's like eleven for 11, instead of ten and one...

Ibrahim Bittar Torres, León, México.
April 07, 2010 9:24am

Hi Ibrahim,
I sent you via e-mail your function
in Greek. Your function works excellent
Thanks again
Panos

PANOS, Salonica GREECE (Europe)
April 08, 2010 11:29am

Hi,
You predicted for negative numbers ?
when appears a negative result?

PANOS, SALONICA GREECE
April 13, 2010 2:01pm

Not really. Is very unlikely that you want to express a negative number in text.

Anyway, what you can do is to check if the amount < 0 and add a "-" sign or the word "minus" before the final calculation.

Shouldn't be a problem.

Regards.

Ibrahim Bittar Torres, León, México.
April 13, 2010 2:08pm

Make a comment about this Custom Function (please try to keep it brief & to the point). Anyone can post:

Download the Custom Function Dashboard Widget for OS X
Keep all the latest Custom Functions right at your fingertips!

Newest Custom Functions:

1.	CountWordOccurrences ( text ; searchWord )
	(Tue, Feb 07, 11:15am)
2.	indonesian_date(date)
	(Mon, Feb 06, 7:14pm)
3.	phpArrayValue ( array ; key ; pos )
	(Fri, Jan 27, 1:49pm)
4.	solfm_timeToMinutes (theTime;roundSec)
	(Fri, Jan 20, 6:26am)
5.	filterLines(filterField;filterValue;Result)
	(Sat, Jan 14, 2:20pm)
6.	getMaxValue ( theList )
	(Thu, Jan 12, 1:06pm)
7.	MiddleWordsIncPunct ( text ; startingWord ; numberOfWords )
	(Sat, Jan 07, 9:16am)
8.	WindowInfo
	(Fri, Jan 06, 12:39pm)


			[ Close Window ]
	The class that teaches you how to successfully sell your FileMaker Pro solution as a professional shrinkwrapped software application.
	Let's Meet in Person Sunday, August 13 2006, Orlando FL Courtyard Orlando International Drive
	Don't miss this most important day of the Developer Conference. Please click here for complete details and online registration.

FileMaker Pro Custom Functions

Description:

Discuss:

Let's Meet in Person