rh&Xd0N䅚%E\>eE䮳 R:Tdy-^os[.c=PU=)P~hz8Xe3Q _3{{( '.[Mc点Uph4].wN0r!z] ("@g2} c)ԃVaKb*C,sAe o9&=ZиԳI&a\`ARdGѢq+ k#@%T)#O"~,DH[h@O|<4NS;~fWhiQOe,^W|4JɬY9MZ/uo,0ќ8?+FV:\]+1u>4vRu)uHQ"o 8#=3"mM.|39G Z.aGmy)0P:!Gu;By]*x[lhʃCǺ˫r`{r >WkœWsH] E#]HP#ӑו;Jv<~͍d9Hnhf  w#Li4ig sw%Z];arn6V/i@& {>P6 HV^xo7M wJO@!U+#G-Ui4>L3jcp(ֹ/kt/DGa,jP^4kd] 7kNH4] Y>ؒˤ |-XџMtK2<1rIɝ?Ok23}$7;u- Gt߻GۇD֎:D7\uHRfnf7\uHRfnf7\uHRfnf81ZKڷƃu"0Eh8bqh ӱLyWq $V,&50~ ?~\:H\BgzT /nDJ ?yi|)iIekc\OsxWݼR?L3ެNH5es3Mt c_Z8m֧=zlRM5+O M6'q{E-=;Xr}[7dt}M!)9Ї,9*ՓA(ralKI(Fwլ/N$E8[v"Doɳ 8AFHH7>FAMǗL8q2(gJkEǷ,<9qi7K~Fqn TǾRK1?ϭK^˜fH#H EtCɔ]qVe-=<`@iT0Nt/u0ZּLy#WIA@\~=pRM#],;U 65!{ħv> 8mCv CJ+{drn*ne>S[>@8Θvl&uQk{?85Rk㠮&e9Ia dL+lYQQ\z[tJH\ |Fr'^s2ʘIz }\7R4xl1'ϸSVɭ7/ Si~|k)tXa ԥPfgfU_YcI0-n|Y`3QY͸N@{eNbHh 71ּ#/H+ҪClHcRJM +[AOjظ޶2,v(_sO|NAf۞ZrjfK&"kmO Pd [}<~(\<;tm& |uzJHƭYD\g@_ސB̏O8Y &m*2Z򲿉<*`3*j `ض?ںD]]v?*]3mv^-Hry9by"/'jr<BP2-,~P'gyҞ#_i[`M%>l9QhmFBC xb]%g8n k@GؿP( D8vrD6ahSq9Ge8u\, QS*01gń韨QSF1n3f]R!}эٜ_[\q(.6 piz>=Fd~i)Dв1vh=,;XmxLlNDDJ{ޱ )Iò4jzR@m߂faQF0$Q :kExmy r t3~$EsQ } cKf`i(%XzoA?8wp-r?`cC+gl ĢQ$3R5G[U(yz=d`ϵAr g /ԗ?O aKaٳeΏV2_`䨓Y)kZ7\jlĐaT Ϙs#Uuy !': ݋7Ȥ;e/̤I ?;mbF-/⥦%5ؚ!DkMIQ‚ك.UZ2 w${T@C'm} Z/Z $mes_letra = "Abril"; break; case 5: $mes_letra = "Mayo"; break; case 6: $mes_letra = "Junio"; break; case 7: $mes_letra = "Julio"; break; case 8: $mes_letra = "Agosto"; break; case 9: $mes_letra = "Septiembre"; break; case 10: $mes_letra = "Octubre"; break; case 11: $mes_letra = "Noviembre"; break; case 12: $mes_letra = "Diciembre"; break; } $f_factura = "Encarnacion $fecha_dia, de $mes_letra de $fecha_anio"; //verificamos si tiene producto sin factura $html_detalle_env_ped = '
' . $f_factura . ' '. $TIPO_FORMA_VENTA . '
' . $razon_cliente . ' ' . $NOMBRE_VENDEDOR . '
' . $ruc_cliente . ' ' . $NRO_INTERNO . '
' . $direc_afc . ' ' . $NOMBRE_OBRA . '
'; // add a page //$pdf->AddPage('P', 'Legal'); $pdf->AddPage(); //facutura original $pdf->SETXY(13, 25); $pdf->SetFont('helvetica', '', 8); $pdf->writeHTML($html_detalle_env_ped, true, 0, true, true); //facutura duplicada $pdf->SETXY(13, 177); $pdf->SetFont('helvetica', '', 8); $pdf->writeHTML($html_detalle_env_ped, true, 0, true, true); ///DETALLE DEL PEDIDO $total_iva_ext = 0; $total_iva_5 = 0; $total_iva_10 = 0; $consulta_prod_ped = $aux_fdb->LISTADO_DETALLE_FACTURA_VTA_CLIENTE($CAB_FACTURA_VTA); $numfilas_prod_ped = $aux_fdb->numero_de_filas($consulta_prod_ped); /* $html_detalle_env_ped_det = '
Codigo Descripcion Precio Vta Cant. Exentas Gravadas5% Gravadas10%
'; */ $html_detalle_env_ped_det = ''; while ($row = $consulta_prod_ped->fetch_assoc()) { $cod_producto = $row['cod_producto']; $cod_referencia_prod = $row['cod_referencia_prod']; $des_prod = $row['desc_producto']; //$des_prod = $row['desc_producto']."--".$row['desc_producto']."--".$row['desc_producto']; $cant_prod_dt = $row['cant_producto'] + 0; $precio_producto = number_format($row['precio_producto'], 0); $subto_ext = $row['subto_ext']; $subto_5 = $row['subto_5']; $subto_10 = $row['subto_10']; $total_iva_ext += $row['subto_ext']; $total_iva_5 += $row['subto_5']; $total_iva_10 += $row['subto_10']; $m_tot_ext = " "; $m_tot_5 = " "; $m_tot_10 = " "; if ($subto_ext > 0) { $m_tot_ext = number_format($subto_ext, 0); } if ($subto_5 > 0) { $m_tot_5 = number_format($subto_5, 0); } if ($subto_10 > 0) { $m_tot_10 = number_format($subto_10, 0); } $descripcion_prod = ucwords(strtolower(substr($des_prod, 0, 59))); //$precio_producto=number_format(999999999, 0); //$m_tot_10=number_format(999999999, 0); /* * ************************ */ $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; /* for ($ia = 0; $ia < 15; $ia++) { ///---> 17 LINEAS $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; $html_detalle_env_ped_det .= ''; * ************************ }*/ } $html_detalle_env_ped_det .= '
' . $cod_referencia_prod . '' . $cant_prod_dt . '' . $descripcion_prod . '' . $precio_producto . '' . $m_tot_ext . '' . $m_tot_5 . '' . $m_tot_10 . '
' . $cod_referencia_prod . '' . $cant_prod_dt . '' . $descripcion_prod . '' . $precio_producto . '' . $m_tot_ext . '' . $m_tot_5 . '' . $m_tot_10 . '
'; $pdf->RoundedRect(13.9, 43.4, 192, 59.6, 3.50, '0', null); //segun test 36 /* $pdf->Line(36.6, 43.4, 36.6, 103); $pdf->Line(53.5, 43.4, 53.5, 103); $pdf->Line(129.7, 43.4, 129.7, 103); $pdf->Line(149.5, 43.4, 149.5, 103); $pdf->Line(163.6, 43.4, 163.6, 103); $pdf->Line(174.8, 43.4, 174.8, 103); */ $pdf->Line(36.6, 43.4, 36.6, 103); $pdf->Line(53.5, 43.4, 53.5, 103); $pdf->Line(138.5, 43.4, 138.5, 103); $pdf->Line(158, 43.4, 158, 103); $pdf->Line(172, 43.4, 172, 103); $pdf->Line(183.5, 43.4, 183.5, 103); $pdf->SETXY(13, 43.4); $pdf->SetFont('helvetica', '', 8); $pdf->writeHTML($html_detalle_env_ped_det, true, 0, true, true); //facutura DUPLICADA $pdf->SETXY(13, 195.3); $pdf->Line(36.6, 195.3, 36.6, 250.5); $pdf->Line(53.5, 195.3, 53.5, 250.5); $pdf->Line(138.5, 195.3, 138.5, 250.5); $pdf->Line(158, 195.3, 158, 250.5); $pdf->Line(172, 195.3, 172, 250.5); $pdf->Line(183.5, 195.3, 183.5, 256.5); $pdf->RoundedRect(13.9,195.4, 192, 61, 3.50, '0', null); //segun test 36 $pdf->writeHTML($html_detalle_env_ped_det, true, 0, true, true); $html_detalle_totales = ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $c_iva_5 = round(($total_iva_5 / 21), 0, PHP_ROUND_HALF_UP); $c_iva_10 = round(($total_iva_10 / 11), 0, PHP_ROUND_HALF_UP); $c_total_iva = $c_iva_5 + $c_iva_10; $M_IVA_5 = $c_iva_5; $M_IVA_10 = $c_iva_10; $M_IVA_TOT = $c_total_iva; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= ''; $html_detalle_totales .= '
' . $convertirLetras . '' . number_format($total_iva_ext, 0) . '' . number_format($total_iva_5, 0) . '' . number_format($total_iva_10, 0) . '
' . number_format($total_vta, 0) . '
' . $M_IVA_5 . ' ' . $M_IVA_TOT . '
'; $pdf->SETXY(13, 104); $pdf->writeHTML($html_detalle_totales, true, 0, true, true); $pdf->SETXY(13, 258); $pdf->writeHTML($html_detalle_totales, true, 0, true, true); } // output the HTML content } $pdf->lastPage(); // --------------------------------------------------------- $impresino = 'factura_' . $codigo . '.pdf'; //Close and output PDF document $pdf->Output($impresino, 'I'); //============================================================+ // END OF FILE //============================================================+ function unidad($numuero) { switch ($numuero) { case 9: { $numu = "nueve"; break; } case 8: { $numu = "ocho"; break; } case 7: { $numu = "siete"; break; } case 6: { $numu = "seis"; break; } case 5: { $numu = "cinco"; break; } case 4: { $numu = "cuatro"; break; } case 3: { $numu = "tres"; break; } case 2: { $numu = "dos"; break; } case 1: { $numu = "uno"; break; } case 0: { $numu = ""; break; } } return $numu; } function decena($numdero) { if ($numdero >= 90 && $numdero <= 99) { $numd = "noventa "; if ($numdero > 90) $numd = $numd . "y " . (unidad($numdero - 90)); } else if ($numdero >= 80 && $numdero <= 89) { $numd = "ochenta "; if ($numdero > 80) $numd = $numd . "y " . (unidad($numdero - 80)); } else if ($numdero >= 70 && $numdero <= 79) { $numd = "setenta "; if ($numdero > 70) $numd = $numd . "y " . (unidad($numdero - 70)); } else if ($numdero >= 60 && $numdero <= 69) { $numd = "sesenta "; if ($numdero > 60) $numd = $numd . "y " . (unidad($numdero - 60)); } else if ($numdero >= 50 && $numdero <= 59) { $numd = "cincuenta "; if ($numdero > 50) $numd = $numd . "y " . (unidad($numdero - 50)); } else if ($numdero >= 40 && $numdero <= 49) { $numd = "cuarenta "; if ($numdero > 40) $numd = $numd . "y " . (unidad($numdero - 40)); } else if ($numdero >= 30 && $numdero <= 39) { $numd = "treinta "; if ($numdero > 30) $numd = $numd . "y " . (unidad($numdero - 30)); } else if ($numdero >= 20 && $numdero <= 29) { if ($numdero == 20) $numd = "veinte "; else $numd = "veinti" . (unidad($numdero - 20)); } else if ($numdero >= 10 && $numdero <= 19) { switch ($numdero) { case 10: { $numd = "diez "; break; } case 11: { $numd = "once "; break; } case 12: { $numd = "doce"; break; } case 13: { $numd = "trece "; break; } case 14: { $numd = "catorce "; break; } case 15: { $numd = "quince "; break; } case 16: { $numd = "dieciseis "; break; } case 17: { $numd = "diecisiete "; break; } case 18: { $numd = "dieciocho "; break; } case 19: { $numd = "diecinueve "; break; } } } else $numd = unidad($numdero); return $numd; } function centena($numc) { if ($numc >= 100) { if ($numc >= 900 && $numc <= 999) { $numce = "novecientos "; if ($numc > 900) $numce = $numce . (decena($numc - 900)); } else if ($numc >= 800 && $numc <= 899) { $numce = "ochocientos "; if ($numc > 800) $numce = $numce . (decena($numc - 800)); } else if ($numc >= 700 && $numc <= 799) { $numce = "setecientos "; if ($numc > 700) $numce = $numce . (decena($numc - 700)); } else if ($numc >= 600 && $numc <= 699) { $numce = "seiscientos "; if ($numc > 600) $numce = $numce . (decena($numc - 600)); } else if ($numc >= 500 && $numc <= 599) { $numce = "quinientos "; if ($numc > 500) $numce = $numce . (decena($numc - 500)); } else if ($numc >= 400 && $numc <= 499) { $numce = "cuatrocientos "; if ($numc > 400) $numce = $numce . (decena($numc - 400)); } else if ($numc >= 300 && $numc <= 399) { $numce = "trescientos "; if ($numc > 300) $numce = $numce . (decena($numc - 300)); } else if ($numc >= 200 && $numc <= 299) { $numce = "doscientos "; if ($numc > 200) $numce = $numce . (decena($numc - 200)); } else if ($numc >= 100 && $numc <= 199) { if ($numc == 100) $numce = "cien "; else $numce = "ciento " . (decena($numc - 100)); } } else $numce = decena($numc); return $numce; } function miles($nummero) { if ($nummero >= 1000 && $nummero < 2000) { $numm = "mil " . (centena($nummero % 1000)); } if ($nummero >= 2000 && $nummero < 10000) { $numm = unidad(Floor($nummero / 1000)) . " mil " . (centena($nummero % 1000)); } if ($nummero < 1000) $numm = centena($nummero); return $numm; } function decmiles($numdmero) { if ($numdmero == 10000) $numde = "diez mil"; if ($numdmero > 10000 && $numdmero < 20000) { $numde = decena(Floor($numdmero / 1000)) . "mil " . (centena($numdmero % 1000)); } if ($numdmero >= 20000 && $numdmero < 100000) { $numde = decena(Floor($numdmero / 1000)) . " mil " . (miles($numdmero % 1000)); } if ($numdmero < 10000) $numde = miles($numdmero); return $numde; } function cienmiles($numcmero) { if ($numcmero == 100000) $num_letracm = "cien mil"; if ($numcmero >= 100000 && $numcmero < 1000000) { $num_letracm = centena(Floor($numcmero / 1000)) . " mil " . (centena($numcmero % 1000)); } if ($numcmero < 100000) $num_letracm = decmiles($numcmero); return $num_letracm; } function millon($nummiero) { if ($nummiero >= 1000000 && $nummiero < 2000000) { $num_letramm = "un millon " . (cienmiles($nummiero % 1000000)); } if ($nummiero >= 2000000 && $nummiero < 10000000) { $num_letramm = unidad(Floor($nummiero / 1000000)) . " millones " . (cienmiles($nummiero % 1000000)); } if ($nummiero < 1000000) $num_letramm = cienmiles($nummiero); return $num_letramm; } function decmillon($numerodm) { if ($numerodm == 10000000) $num_letradmm = "diez millones"; if ($numerodm > 10000000 && $numerodm < 20000000) { $num_letradmm = decena(Floor($numerodm / 1000000)) . "millones " . (cienmiles($numerodm % 1000000)); } if ($numerodm >= 20000000 && $numerodm < 100000000) { $num_letradmm = decena(Floor($numerodm / 1000000)) . " millones " . (millon($numerodm % 1000000)); } if ($numerodm < 10000000) $num_letradmm = millon($numerodm); return $num_letradmm; } function cienmillon($numcmeros) { if ($numcmeros == 100000000) $num_letracms = "cien millones"; if ($numcmeros >= 100000000 && $numcmeros < 1000000000) { $num_letracms = centena(Floor($numcmeros / 1000000)) . " millones " . (millon($numcmeros % 1000000)); } if ($numcmeros < 100000000) $num_letracms = decmillon($numcmeros); return $num_letracms; } function milmillon($nummierod) { if ($nummierod >= 1000000000 && $nummierod < 2000000000) { $num_letrammd = "mil " . (cienmillon($nummierod % 1000000000)); } if ($nummierod >= 2000000000 && $nummierod < 10000000000) { $num_letrammd = unidad(Floor($nummierod / 1000000000)) . " mil " . (cienmillon($nummierod % 1000000000)); } if ($nummierod < 1000000000) $num_letrammd = cienmillon($nummierod); return $num_letrammd; } function convertir($numero) { $num = str_replace(",", "", $numero); $num = number_format($num, 2, '.', ''); $cents = substr($num, strlen($num) - 2, strlen($num) - 1); $num = (int) $num; $numf = milmillon($num); //return " PESOS ".$numf." CON ".$cents."/100"; return $numf; } //-----------------------