} else { $io_pdf->transaction('start'); // Iniciamos la transacción $thisPageNum=$io_pdf->ezPageCount; $ls_cedper = $la_array["cedper"][0]; $ls_fecliq = $lo_function->uf_dtoc($la_array["fecliq"][0]); $ls_fecing = $lo_function->uf_dtoc($la_array["fecing"][0]); $ls_fecegr = $lo_function->uf_dtoc($la_array["fecegr"][0]); $ls_cargo = $la_array["descargo"][0]; $li_anoser = $la_array["anoser"][0]; $li_messer = $la_array["messer"][0]; $li_diaser = $la_array["diaser"][0]; $ls_dencauret = $la_array["dencauret"][0]; $ld_salint = $lo_function->uf_ntoc($la_array["salint"][0], 2); $ld_sueproper = $lo_function->uf_ntoc($la_array["sueproper"][0], 2); $ld_suediaper = $la_array["salint"][0]/30; $ld_suediaper = $lo_function->uf_ntoc($ld_suediaper, 2); $ls_desuniadm = $la_array["desuniadm"][0]; $la_data[0]=array('numliq'=>$ls_numliq,'fecliq'=>$ls_fecliq); uf_print_cabecera_1($la_data,$io_pdf); $la_data2[0]=array('nomper'=>$ls_nomper,'cedper'=>$ls_cedper); uf_print_cabecera_2($la_data2,$io_pdf); $la_data3[0]=array('descargo'=>$ls_cargo,'desuniadm'=>$ls_desuniadm); uf_print_cabecera_3($la_data3,$io_pdf); $la_data4[0]=array('fecing'=>$ls_fecing,'fecegr'=>$ls_fecegr,'anoser'=>$li_anoser,'messer'=>$li_messer,'diaser'=>$li_diaser); uf_print_cabecera_4($la_data4,$io_pdf); $la_data5[0]=array('dencauret'=>$ls_dencauret,'sueproper'=>$ld_sueproper,'salint'=>$ld_salint,'suediaper'=>$ld_suediaper); uf_print_cabecera_5($la_data5,$io_pdf);
{ if ($li_d==0) $ld_fecdesde=$lo_function->uf_dtoc($la_detalle["fecant"][$li_d]); $li_diaant = ($li_diaant + $la_detalle["diaacu"][$li_d]); $ld_monant = ($ld_monant + $la_detalle["monant"][$li_d]); $ld_monantant = ($ld_monantant + $la_detalle["monantant"][$li_d]); $ld_monint = ($ld_monint + $la_detalle["monint"][$li_d]); if ($li_d==$li_totrow_det-1) $ld_fechasta=$lo_function->uf_dtoc($la_detalle["fecant"][$li_d]); } $ls_cedper = $la_array["cedper"][$li_i]; $ls_nomper = $la_array["nomper"][$li_i]." ".$la_array["apeper"][$li_i]; $ls_desnom = $la_array["desnom"][$li_i]; $ld_parcial= ($ld_monant-$ld_monantant); $ld_total = ($ld_parcial+$ld_monint); $ld_monant = $lo_function->uf_ntoc($ld_parcial, 2); $ld_monint = $lo_function->uf_ntoc($ld_monint, 2); $ld_totales= $lo_function->uf_ntoc($ld_total, 2); $la_data[0]=array('cedper'=>$ls_cedper,'nomper'=>$ls_nomper,'fecha_desde'=>$ld_fecdesde,'fecha_hasta'=>$ld_fechasta,'diaant'=>$li_diaant,'antiguedad'=>$ld_monant,'interes'=>$ld_monint,'total'=>$ld_totales,'desnom'=>$ls_desnom); uf_print_detalle($la_data,$lo_pdf); // Imprimimos el detalle $ld_totaldeuda = ($ld_totaldeuda + $ld_total); unset($lo_cabecera); unset($la_data); } } $ld_totaldeuda = $lo_function->uf_ntoc($ld_totaldeuda, 2); uf_print_total($ld_totaldeuda,$lo_pdf); if($lb_valido) // Si no ocurrio ningún error {
$li_final=strrpos($ls_contenido,"}"); $li_longitud=$li_final-$li_inicio; $ls_nuevocuerpo=substr($ls_contenido,$li_inicio,$li_longitud); $ls_punt=fopen($ls_salida,"w"); fputs($ls_punt,$ls_cabecera); //-----------------------------------------------------------------------------------------------------------------// $ls_cedper = $la_personal["cedper"][0]; $ls_nomper = $la_personal["nomper"][0]; $ls_apeper = $la_personal["apeper"][0]; $ls_fecingper= $lo_function->uf_dtoc($la_personal["fecingper"][0]); $ls_descar = $la_personal["descar"][0]; $ls_codnom = $la_personal["codnom"][0]; $ls_desnom = $la_personal["desnom"][0]; $ls_desuniadm = $la_personal["desuniadm"][0]; $ld_monant = $lo_function->uf_ntoc($la_personal["monant"][0], 2); $ls_fecantper= $lo_function->uf_dtoc($la_personal["fecantper"][0]); $ls_motant = $la_personal["motant"][0]; $ld_mondeulab = $lo_function->uf_ntoc($la_personal["mondeulab"][0], 2); $ld_monporant = $lo_function->uf_ntoc($la_personal["monporant"][0], 2); $ls_cuerpo=$ls_nuevocuerpo; $ls_cuerpo=str_replace("\$ls_cedper",$ls_cedper,$ls_cuerpo); $ls_cuerpo=str_replace("\$ls_nomper",$ls_nomper,$ls_cuerpo); $ls_cuerpo=str_replace("\$ls_apeper",$ls_apeper,$ls_cuerpo); $ls_cuerpo=str_replace("\$ldt_fecingper",$ls_fecingper,$ls_cuerpo); $ls_cuerpo=str_replace("\$ls_carper",$ls_descar,$ls_cuerpo); $ls_cuerpo=str_replace("\$ls_dennom",$ls_desnom,$ls_cuerpo); $ls_cuerpo=str_replace("\$ls_undadm",$ls_desuniadm,$ls_cuerpo); $ls_cuerpo=str_replace("\$ld_monant",$ld_monant,$ls_cuerpo); $ls_cuerpo=str_replace("\$ldt_fecantper",$ls_fecantper,$ls_cuerpo);
$io_pdf->addObject($io_encabezado,'all'); }// end function uf_print_cabecera_detalle //----------------------------------------------------------------------------------------------------------------------------------------------------------------// $lb_valido=$lo_anticipo_dao->getReporteAnticipo($_GET["codper"],$la_array); if ($lb_valido) { error_reporting(E_ALL); set_time_limit(1800); // $lo_pdf = new Cezpdf('LETTER','portrait'); // Instancia de la clase PDF //$io_pdf->selectFont('../../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra // $io_pdf->ezSetCmMargins(4.5,3,3,3); // Configuración de los margenes en centímetros // $io_pdf->ezStartPageNumbers(550,50,10,'','',1); // Insertar el número de página $li_totrow=count($la_array["nomper"]); $ld_monant = $lo_function->uf_ntoc($la_array["monant"][0], 2); $ls_cedper = $la_array["cedper"][0]; $ls_nomper = $la_array["nomper"][0]; $ls_apeper = $la_array["apeper"][0]; $ls_fecingper= $lo_function->uf_dtoc($la_array["fecingper"][0]); $ls_descar = $la_array["descar"][0]; $ls_codnom = $la_array["codnom"][0]; $ls_desnom = $la_array["desnom"][0]; $ls_desuniadm = $la_array["desuniadm"][0]; // $lo_pdf->add_texto('justification',30,11,' Por solicitud de la parte interesada, se hace entrega del Anticipo de Prestaciones Sociales '); // $lo_pdf->add_texto('justification',40,11,'por el monto de Bs. <b>'.$ld_monant.'</b> al <b>Sr.(a) </b> <b>'.$ls_apeper.'</b>, <b>'.$ls_nomper.'</b>'); // $lo_pdf->add_texto('justification',50,11,'portador de la C.I. Nº <b>'.$ls_cedper.'</b> quien ocupa el cargo de <b>'.$ls_descar.'</b> en esta Institución, '); // $lo_pdf->add_texto('justification',60,11,'desde la fecha <b>'.$ls_fecingper.'</b> en el Departamento de <b>'.$ls_desuniadm.'</b>'); // $lo_pdf->add_texto('justification',70,11,'como <b>'.$ls_desnom.'</b> '); // $lo_pdf->add_texto('justification',110,11,'<b>Recibi conforme: </b> '); // $lo_pdf->add_texto('justification',120,11,'<b>C.I.: </b> ');
set_time_limit(1800); $li_totrow=count($la_array["codper"]); for($li_i=0;$li_i<$li_totrow;$li_i++) { $lo_cabecera= $lo_pdf->openObject(); // Creamos el objeto cabecera uf_print_cabecera($la_array["codper"][$li_i],$la_array["nomper"][$li_i],$la_array["apeper"][$li_i],$lo_cabecera,$lo_pdf); // Imprimimos la cabecera del registro /**/ // Obtenemos el detalle del reporte $lb_hay = $lo_sueldos_dao->getDetalleSueldos("ORDER BY fecincsue",$la_array['codper'][$li_i],$la_detalle); if($lb_hay) { $li_totrow_det=count($la_detalle["fecincsue"]); for($li_d=0;$li_d<$li_totrow_det;$li_d++) { $ls_fecincsue = $lo_function->uf_dtoc($la_detalle["fecincsue"][$li_d]); $ld_monsuebas = $lo_function->uf_ntoc($la_detalle["monsuebas"][$li_d], 2); $ld_monsueint = $lo_function->uf_ntoc($la_detalle["monsueint"][$li_d], 2); $ld_monsuenordia= $lo_function->uf_ntoc($la_detalle["monsuenordia"][$li_d], 2); $la_data[$li_d]=array('fecha'=>$ls_fecincsue,'sueldo_base'=>$ld_monsuebas,'sueldo_integral'=>$ld_monsueint,'sueldo_diario'=>$ld_monsuenordia); } uf_print_detalle($la_data,$lo_pdf); // Imprimimos el detalle $lo_pdf->stopObject($lo_cabecera); // Detener el objeto cabecera if($li_i<$li_totrow-1) { $lo_pdf->ezNewPage(); // Insertar una nueva página } unset($lo_cabecera); unset($la_data); } }
else // Imprimimos el reporte { error_reporting(E_ALL); set_time_limit(1800); $lo_cabecera= $lo_pdf->openObject(); // Creamos el objeto cabecera uf_print_cabecera($la_array["cedper"][0],$la_array["nomper"][0],$la_array["apeper"][0],$lo_cabecera,$lo_pdf); // Imprimimos la cabecera del registro // Obtenemos el detalle del reporte $lb_hay = $lo_antiguedad_dao->getDetalleAntiguedad("ORDER BY ".$_GET["orden"],$_GET["codper"],$_GET["fechainicio"],$_GET["fechafin"],$la_detalle); if($lb_hay) { $li_totrow_det=count($la_detalle["fecant"]); for($li_d=0;$li_d<$li_totrow_det;$li_d++) { $ls_fecant = $lo_function->uf_dtoc($la_detalle["fecant"][$li_d]); $ld_salbas = $lo_function->uf_ntoc($la_detalle["salbas"][$li_d], 2); $ld_incbonvac = $lo_function->uf_ntoc($la_detalle["incbonvac"][$li_d], 2); $ld_incbonnav = $lo_function->uf_ntoc($la_detalle["incbonnav"][$li_d], 2); $ld_salintdia = $lo_function->uf_ntoc($la_detalle["salintdia"][$li_d], 2); $li_diabas = $la_detalle["diabas"][$li_d]; $li_diacom = $la_detalle["diacom"][$li_d]; $ld_monant = $lo_function->uf_ntoc($la_detalle["monant"][$li_d], 2); $ld_monacuant = $lo_function->uf_ntoc($la_detalle["monacuant"][$li_d], 2); $ld_monantant = $lo_function->uf_ntoc($la_detalle["monantant"][$li_d], 2); $ld_salparant = $lo_function->uf_ntoc($la_detalle["salparant"][$li_d], 2); $ld_porint = $lo_function->uf_ntoc($la_detalle["porint"][$li_d], 2); $li_diaint = $la_detalle["diaint"][$li_d]; $ld_monint = $lo_function->uf_ntoc($la_detalle["monint"][$li_d], 2); $ld_monacuint = $lo_function->uf_ntoc($la_detalle["monacuint"][$li_d], 2); $ld_saltotant = $lo_function->uf_ntoc($la_detalle["saltotant"][$li_d], 2); $la_data[$li_d]=array('fecant'=>$ls_fecant,'salbas'=>$ld_salbas,'incbonvac'=>$ld_incbonvac,'incbonnav'=>$ld_incbonnav,'salintdia'=>$ld_salintdia,'diabas'=>$li_diabas,'diacom'=>$li_diacom,'monant'=>$ld_monant,'monacuant'=>$ld_monacuant,'monantant'=>$ld_monantant,'salparant'=>$ld_salparant,'porint'=>$ld_porint,'diaint'=>$li_diaint,'monint'=>$ld_monint,'monacuint'=>$ld_monacuint,'saltotant'=>$ld_saltotant);