Beyaz.Net İpucu

Filemaker da Sayıyı yazıya çeviren fonksiyon

FileMaker’da sadece iki alan kullanarak sayırı yazıya çevirebilirsiniz. Mesela 5624 sayısını

"Beşbinaltıyüzyirmidört" şeklinde yazdırabilirsiniz. Nasıl mı? Aşağıdaki calculation ile.

Choose(Int(Int(Tutar Rakamla/1000000000)/100);

"";"";"iki";"Üç";"Dört";"Beş";"Altı";"Yedi";"Sekiz";"Dokuz") &

If(Int(Int(Tutar Rakamla/1000000000)/100) > 0;" Yüz ";"") &

Choose(Int(Mod(Int(Tutar Rakamla/1000000000);100)/10);

"";"";"Yirmi ";"Otuz ";"Kırk ";"Elli"; "Altmış ";"Yetmiş ";"Seksen ";"Doksan ") &

Choose(If(Mod(Int(Tutar Rakamla/1000000000);100) >= 20;

Mod(Int(Tutar Rakamla/1000000000);10); Mod(Int(Tutar Rakamla/1000000000);100));

""; "Bir " ;"iki " ;"Üç " ;"Dört " ;"Beş " ;"Altı " ;"Yedi " ;"Sekiz ";"Dokuz " ;

"On " ;"Onbir " ;"Oniki " ;"Onüç " ;"Ondört " ;"Onbeş ";"Onaltı " ;"Onyedi " ;"Onsekiz " ;"Ondokuz ") &

If(Int(Tutar Rakamla/1000000000) > 0;"Milyar ";"") &

Choose(Int(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000)/100);

"";"";"iki";"Üç";"Dört";"Beş";"Altı";"Yedi";"Sekiz";"Dokuz") &

If(Int(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000)/100) > 0;"Yüz ";"") &

Choose(Int(Mod(Int((Tutar Rakamla (Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000);100)/10);

"On " ;"Onbir " ;"Oniki " ;"Onüç " ;"Ondört " ;"Onbeş ";"Onaltı " ;"Onyedi " ;"Onsekiz " ;"Ondokuz ") &

If(Int(Tutar Rakamla/1000000000) > 0;"Milyar ";"") &

Choose(Int(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000)/100);

"";"";"iki";"Üç";"Dört";"Beş";"Altı";"Yedi";"Sekiz";"Dokuz") &

If(Int(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000)/100) > 0;"Yüz ";"") &

Choose(Int(Mod(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000);100)/10);

"";"";"Yirmi ";"Otuz ";"Kırk";"Elli ";"Altmış ";"Yetmiş ";"Seksen ";"Doksan ") &

Choose(If(Mod(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000);100) >= 20;

Mod(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000);10);

Mod(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000);100));

"";"Bir " ;"iki " ;"Üç " ;"Dört " ;"Beş " ;"Altı " ;"Yedi " ;"Sekiz ";"Dokuz " ;

"On " ;"Onbir " ;"Oniki " ;"Onüç " ;"Ondört " ;"Onbeş ";"Onaltı " ;"Onyedi " ;"Onsekiz " ;"Ondokuz ") &

If(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000000) * 1000000000 ))/1000000) > 0;"Milyon ";"") &

Choose(Int(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000) * 1000000 ))/1000)/100);

"";"";"iki";"Üç";"Dört";"Beş";"Altı";"Yedi";"Sekiz";"Dokuz") &

If(Int(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000) * 1000000 ))/1000)/100) > 0;" Yüz ";"") &

Choose(Int(Mod(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000) * 1000000 ))/1000);100)/10);

"";"";"Yirmi ";"Otuz ";"Kırk";"Elli ";"Altmış ";"Yetmiş ";"Seksen ";"Doksan ") &

Choose(If(Mod(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000) * 1000000 ))/1000);100) >= 20;

Mod(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000) * 1000000 ))/1000);10);

Mod(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000) * 1000000 ))/1000);100));

"";"" ;"iki " ;"Üç " ;"Dört " ;"Beş " ;"Altı " ;"Yedi " ;"Sekiz ";"Dokuz " ;

"On " ;"Onbir " ;"Oniki " ;"Onüç " ;"Ondört " ;"Onbeş ";"Onaltı " ;"Onyedi " ;"Onsekiz " ;"Ondokuz ") &

If(Int((Tutar Rakamla-(Int(Tutar Rakamla/1000000) * 1000000 ))/1000) > 0;"Bin ";"") &

Choose(Int(Int(Mod(Tutar Rakamla;1000))/100);"";"";"iki";"Üç";"Dört";"Beş";"Altı";

"Yedi";"Sekiz";"Dokuz") & If(Int(Int(Mod(Tutar Rakamla;1000))/100) > 0;" Yüz ";"") &

Choose(Int(Mod(Int(Mod(Tutar Rakamla;1000));100)/10);"";"";"Yirmi ";"Otuz ";"Kırk";"Elli ";"Altmış ";"Yetmiş

";"Seksen ";"Doksan ") &

Choose(If(Mod(Int(Mod(Tutar Rakamla;1000));100) >= 20;Mod(Int(Mod(Tutar

Rakamla;1000));10);Mod(Int(Mod(Tutar Rakamla;1000));100));

"";"Bir" ;"iki " ;"Üç " ;"Dört " ;"Beş " ;"Altı " ;"Yedi " ;"Sekiz ";"Dokuz " ;

"On " ;"Onbir " ;"Oniki " ;"Onüç " ;"Ondört " ;"Onbeş ";"Onaltı " ;

"Onyedi " ;"Onsekiz " ;"Ondokuz ") &

If(Tutar Rakamla < 1;" "; If(Tutar Rakamla < 2;"";""))

Kategorideki Güncel Makaleler