Newest functions Upload a function Leave a tip My account

There are 2,522 functions in this library.

NumToText_POR

Converts an amount from number to text in Portuguese

  Average rating: 4.5 (31 votes) Log in to vote

Ibrahim Bittar Torres - Show more from this author Eikonsys, S.A. de C.V. http://www.eikonsys.com

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

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 ) ) Click to copy

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

 

Comments

		panos, greece Apr 6, 2010
what is this??????????? in english exept currency Monto ; Currency ; Sufijo

		Ibrahim Bittar Torres, Eikonsys, S.A. de C.V. Apr 6, 2010
Monto is amount, sufijo is suffix. Why are you so bothered?. This is a modification of a CF to calculate text in spanish so it is meant for spanish readers. If you don't like spanish you can substitute the parameters for greek words and it will work anyway.

		panos, greece Apr 7, 2010
OK I change all in Greek language but tell me can I use one field for exable Monto (amount) Thanks

		Ibrahim Bittar Torres, Eikonsys, S.A. de C.V. Apr 7, 2010
When you use this CF the parameters are the values you put into the function to get a result. For example: Monto = 123.45 Currency = "USD" Sufijo = " - Thanks for your purchase." The result is: ONE HUNDRED TWENTY THREE 45/100 USD - THANKS FOR YOUR PURCHASE. Of course, all of this in portuguese. I used english so you could understand the principle. Now, if you want to change the word "Monto" for "Amount" or "Ποσό" you have to go all the way through the function and replace the word "Monto". The same for the rest of the parameters. The result will be the same. Please let me know if this solves your problem. Yo can write directly to my inbox: ibrahim_bittar@eikonsys.com Regards

		PANOS, Salonica GREECE (Europe) Apr 7, 2010
Thanks so much, all it's ok, I change everythink in Greek language which belongs in European community, I have change only the words of numbers for exable "cento" in "εκατό" etc. Also I cut some word of numbers because appeared two times as follow for (13) δεκατρία I put (10) δέκα and the (3) τρια get it correctly !!! I put up a trillion and all it;s ok Tell me "cen" what meens? Is similar to the one hundred ? Thanks again Panos Trifidis SV2YJ Radio Amateur Salonica tryfipa@gmail.com Case ( N02 = 1 and N03 = 0 ; "δέκα " ; N02 = 1 and N03 = 1 ; "ένδεκα " ; N02 = 1 and N03 = 2 ; "δώδεκα " ; N02 = 1 and N03 = 3 ; "δέκα " ; N02 = 1 and N03 = 4 ; "δέκα " ; N02 = 1 and N03 = 5 ; "δέκα " ; N02 = 1 and N03 = 6 ; "δέκα " ; N02 = 1 and N03 = 7 ; "δέκα " ; N02 = 1 and N03 = 8 ; "δέκα " ; N02 = 1 and N03 = 9 ; "δέκα " ; N02 = 2 and N03 = 0 ; "είκοσι " ; N02 = 3 and N03 = 0 ; "τριάντα " ; N02 = 4 and N03 = 0 ; "σαράντα " ; N02 = 5 and N03 = 0 ; "πενήντα " ; N02 = 6 and N03 = 0 ; "εξήντα " ; N02 = 7 and N03 = 0 ; "εβδομήντα " ; N02 = 8 and N03 = 0 ; "ογδόντα " ; N02 = 9 and N03 = 0 ; "εννενήντα " ; N02 = 2 ; "είκοσι " ; N02 = 3 ; "τριάντα " ;

		Ibrahim Bittar Torres, Eikonsys, S.A. de C.V. Apr 7, 2010
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, Eikonsys, S.A. de C.V. Apr 7, 2010
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...

		PANOS, Salonica GREECE (Europe) Apr 8, 2010
Hi Ibrahim, I sent you via e-mail your function in Greek. Your function works excellent Thanks again Panos

		PANOS, SALONICA GREECE Apr 13, 2010
Hi, You predicted for negative numbers ? when appears a negative result?

		Ibrahim Bittar Torres, Eikonsys, S.A. de C.V. Apr 13, 2010
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.

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: