Dalam pembuatan kwitansi mata uang dollar, kita memakai penjelasan bahasa Inggris. Misal 1000 menjadi One thousand. Berikut akan dijelaskan pembuatan fungsi tersebut
- Pembuatan program satuan
Ini merupakan fungsi dasar
function us_satuan($angka,$debug)
{
$a_str[‘1’]=”one”;
$a_str[‘2’]=”two”;
$a_str[‘3’]=”three”;
$a_str[‘4’]=”four”;
$a_str[‘5’]=”five”;
$a_str[‘6’]=”six”;
$a_str[‘7’]=”seven”;
$a_str[‘8’]=”eight”;
$a_str[‘9’]=”nine”;
$panjang=strlen($angka);
for ($b=0;$b<$panjang;$b++)
{
$a_bil[$b]=substr($angka,$panjang-$b-1,1);
}
if ($panjang>2)
{
if ($a_bil[2]!=”0″)
{
$terbilang= ” “.$a_str[$a_bil[2]]. ” hundred”;
}
}if ($panjang>1)
{
if ($a_bil[1]==”1″)
{
if ($a_bil[0]==”0″)
{
$terbilang .=” ten”;
}
else if ($a_bil[0]==”1″)
{
$terbilang .=” eleven”;
}
else if ($a_bil[0]==”2″)
{
$terbilang .=” twelve”;
}
else if ($a_bil[0]==”3″)
{
$terbilang .=” thirteen”;
}
else
{
$terbilang .=” “.$a_str[$a_bil[0]].”teen”;
}
return $terbilang;
}
else if ($a_bil[1]==”2″)
{
$terbilang .=” twenty”;
}
else if ($a_bil[1]==”3″)
{
$terbilang .=” thirty”;
}
else if ($a_bil[1]==”4″)
{
$terbilang .=” forty”;
}
else if ($a_bil[1]==”5″)
{
$terbilang .=” fifty”;
}
else
{
$terbilang .=” “.$a_str[$a_bil[1]].”ty”;
}
}
if ($a_bil[0]!=”0″)
{
$terbilang .=” “.$a_str[$a_bil[0]];
}
return $terbilang;
} - Fungsi ke kedua adalah pemecahan tiap 3 digit
Pemecahan 3 digit dimulai satua, thousand, million dan billion
function us_terbilang($angka,$debug)
{
$angka = str_replace(“.”,”,”,$angka);
list ($angka, $desimal) = explode(“,”,$angka);
$panjang=strlen($angka);
for ($b=0;$b<$panjang;$b++)
{
$myindex=$panjang-$b-1;
$a_bil[$b]=substr($angka,$myindex,1);
}
if ($panjang>9)
{
$bil=$a_bil[9];
if ($panjang>10)
{
$bil=$a_bil[10].$bil;
}if ($panjang>11)
{
$bil=$a_bil[11].$bil;
}
if ($bil!=”” && $bil!=”000″)
{
$terbilang .= us_satuan($bil,$debug).” billion”;
}
}if ($panjang>6)
{
$bil=$a_bil[6];
if ($panjang>7)
{
$bil=$a_bil[7].$bil;
}if ($panjang>8)
{
$bil=$a_bil[8].$bil;
}
if ($bil!=”” && $bil!=”000″)
{
$terbilang .= us_satuan($bil,$debug).” million”;
}
}
if ($panjang>3)
{
$bil=$a_bil[3];
if ($panjang>4)
{
$bil=$a_bil[4].$bil;
}if ($panjang>5)
{
$bil=$a_bil[5].$bil;
}
if ($bil!=”” && $bil!=”000″)
{
$terbilang .= us_satuan($bil,$debug).” thousand”;
}
}$bil=$a_bil[0];
if ($panjang>1)
{
$bil=$a_bil[1].$bil;
}if ($panjang>2)
{
$bil=$a_bil[2].$bil;
}
if ($bil!=”” && $bil!=”000″)
{
$terbilang .= us_satuan($bil,$debug);
}if ($desimal!=””)
{
if (strlen($desimal)==1)
{
$desimal=$desimal.”0″;
}
else
{
$desimal=substr($desimal,0,2);
}
$terbilang=” $terbilang $desimal/100″;
}return trim($terbilang);
} - Contoh pemakaian
us_terbilang(1000)=one thousand
Kunjungi www.proweb.co.id untuk menambah wawasan anda.