<?php

$texto = texto_numero(14000.73);
echo $texto;
function texto_numero($cantidad)
{
    $cantidad = (string) $cantidad;
    $cantidad_p = explode(".", $cantidad);
    $texto = letra_prin($cantidad_p[0]);
    if ($cantidad_p[1] != "") {
        if ($cantidad_p[1] < 9) {
            $cantidad_p[1] .= "0";
        }
        $texto2 = letra_prin($cantidad_p[1]);
        $texto .= " PUNTO " . $texto2;
    }
    return $texto;
}
function letra_prin($cantidad)
{
    $longitud = strlen($cantidad);
    $texto = "";
    if ($longitud >= 4 && $longitud <= 5) {
        if ($longitud == 4) {
            $cantidad_enviada = $cantidad[0];
            $cantidad = $cantidad[1] . $cantidad[2] . $cantidad[3];
        }
        if ($longitud == 5) {
            $cantidad_enviada = $cantidad[0] . $cantidad[1];
            $cantidad = $cantidad[2] . $cantidad[3] . $cantidad[4];
        }
			$pdf->MultiCell(30,5,"IMPORTE DE HONORARIOS:",0,'L',false);
			$pdf->SetXY($posx+2+150,$posy+53);
			$pdf->MultiCell(30,5,"$".campo(number_format($totalper, 2, ".", ",")),0,'R',false);
			$posy+=5;
			$pdf->SetXY($posx+2+120,$posy+66);
			$pdf->MultiCell(30,5,"ISR RETENIDO:",0,'L',false);
			$pdf->SetXY($posx+2+150,$posy+66);
			$pdf->MultiCell(30,5,"$".campo(number_format($totalded, 2, ".", ",")),0,'R',false);
			$neto=$totalper-$totalded;
			$pdf->SetXY($posx+2+150,$posy+72);
			$pdf->MultiCell(30,5,"________",0,'R',false);
			$pdf->SetXY($posx+2+120,$posy+76);
			$pdf->MultiCell(30,5,"IMPORTE NETO",0,'L',false);
			$pdf->SetXY($posx+2+150,$posy+76);
			$pdf->MultiCell(30,5,"$".campo(number_format($neto, 2, ".", ",")),0,'R',false);
			$nletra=texto_numero($neto);
			$tdecimales=explode(".",$neto);
			if($tdecimales[1]!=""){
				if($tdecimales[1]<9)
					$tdecimales[1].="0";
			}
			else
				$tdecimales[1].="00";
			$pdf->SetXY($posx+2,$posy+100);
			$pdf->MultiCell(180,10,"",1,'L',false);
			$pdf->SetXY($posx+2,$posy+100);
			$pdf->SetFont('Arial','B',9);
			$pdf->MultiCell(30,5,"Importe Neto con letra",0,'L',false);
			$pdf->SetXY($posx+2+25,$posy+101);
			$pdf->MultiCell(150,5,$nletra." PESOS ".$tdecimales[1]."/100 M.N.",0,'C',false);
			$pdf->SetXY($posx+2,$posy+130);