Newest functions Upload a function Leave a tip My account

There are 2,522 functions in this library.

terbilang ( number )

Change a number value into a TEXT in indonesian Rupiah

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

Andrew - Show more from this author

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

"#"& Proper( Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);1;1))<1;"";Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);1;1))=1;"Seratus ";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);1;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Ratus ")) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))<1;""; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=0;"Sepuluh "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=1;"Sebelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=2;"Duabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=3;"Tigabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=4;"Empatbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=5;"Limabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=6;"Enambelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=7;"Tujuhbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=8;"Delapanbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))=9;"Sembilanbelas "; Choose(Middle(Right("000000000000000"&GetAsText(angka);15);2;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Puluh "))))))))))) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))=1;"";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);3;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);1;1))+GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);2;1))+GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);3;1))>0;"Trilyun ") & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);4;1))<1;"";Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);4;1))=1;"Seratus ";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);4;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Ratus ")) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))<1;""; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))=0;"Sepuluh "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))=1;"Sebelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))=2;"Duabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))=3;"Tigabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))=4;"Empatbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))=5;"Limabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))=6;"Enambelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))=7;"Tujuhbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))=8;"Delapanbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=9;"Sembilanbelas "; Choose(Middle(Right("000000000000000"&GetAsText(angka);15);5;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Puluh "))))))))))) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))=1;"";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);6;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);4;1))+GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);5;1))+GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);6;1))>0;"Milyar ") & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);7;1))<1;"";Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);7;1))=1;"Seratus ";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);7;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Ratus ")) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))<1;""; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=0;"Sepuluh "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=1;"Sebelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=2;"Duabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=3;"Tigabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=4;"Empatbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=5;"Limabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=6;"Enambelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=7;"Tujuhbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=8;"Delapanbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))=9;"Sembilanbelas "; Choose(Middle(Right("000000000000000"&GetAsText(angka);15);8;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Puluh "))))))))))) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))=1;"";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);9;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);7;1))+GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);8;1))+GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);9;1))>0;"Juta ") & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);10;1))&GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))&GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))="001" ;""; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);10;1))<1;"";Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);10;1))=1;"Seratus ";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);10;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Ratus "))) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);10;1))&GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))&GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))="001" ;""; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))<1;""; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=0;"Sepuluh "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=1;"Sebelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=2;"Duabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=3;"Tigabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=4;"Empatbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=5;"Limabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=6;"Enambelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=7;"Tujuhbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=8;"Delapanbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))=9;"Sembilanbelas "; Choose(Middle(Right("000000000000000"&GetAsText(angka);15);11;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Puluh ")))))))))))) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);10;1))&GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))&GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))="001" ;"Seribu "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))=1;"";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);12;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan "))) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);10;1))&GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))&GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))="001" ;""; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);10;1))+GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);11;1))+GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);12;1))>0;"Ribu ")) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);13;1))<1;"";Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);13;1))=1;"Seratus ";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);13;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Ratus ")) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))<1;""; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=0;"Sepuluh "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=1;"Sebelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=2;"Duabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=3;"Tigabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=4;"Empatbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=5;"Limabelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=6;"Enambelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=7;"Tujuhbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=8;"Delapanbelas "; Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1 and GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);15;1))=9;"Sembilanbelas "; Choose(Middle(Right("000000000000000"&GetAsText(angka);15);14;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")&"Puluh "))))))))))) & Case(GetAsNumber(Middle(Right("000000000000000"&GetAsText(angka);15);14;1))=1;"";Choose(Middle(Right("000000000000000"&GetAsText(angka);15);15;1);"";"Satu ";"Dua ";"tiga ";"Empat ";"lima ";"Enam ";"Tujuh ";"Delapan ";"Sembilan ")) ) &"Rupiah #" Click to copy

Latest version - Fix small typo where Number between 19.000.000 - 19.999.999 are wrongly spelled.

Change a number value into a TEXT in indonesian Rupiah, Great to use for Billing.

 

Comments

		comment, VR Apr 15, 2011
You have an undefined variable "angka" . I believe it should be the function parameter "number". Also, there are simpler ways to extract digits, e.g.: thousands = Mod ( Div ( number ; 10^3 ) ; 10^3 )

		Walkspy, Jakarta/Indonesia May 3, 2011
work well if you directly type numbers in "angka" field and has no decimal. when "angka" filed is calculated value, should be use Floor, Ceiling or Round function.

		Andrew May 6, 2011
Thanks For Comment, this is my first function, i'm still learning filemaker...i'm no programer but filemaker help me a lot... I will try to fix it latter

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: