$ls_monto=$io_report->rs_data->fields["monto"]; $ls_totalpersona=$ls_totalpersona+$ls_totalper; $ls_totalmonto=$ls_totalmonto+$ls_monto; $la_data[$li_i]=array('codigo'=>$ls_codconc,'nombre'=>$ls_nomcon,'personal'=>number_format($ls_totalper,0,"","."), 'asignacion'=>number_format($ls_monto,2,",",".")); $li_i++; $io_report->rs_data->MoveNext(); } if ($li_i>1) { $ls_denominacion="CUADRE DE INGRESO DE PENSIONES TODOS LOS PAGOS"; uf_print_cabecera($ls_denominacion, $io_pdf); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $ls_denominacion="Totales Ingresos todos los Pagos"; $ls_totalpersona=number_format($ls_totalpersona,0,"","."); $ls_totalmonto=number_format($ls_totalmonto,2,",","."); uf_print_piecabecera($ls_denominacion, $ls_totalpersona,$ls_totalmonto,&$io_pdf); unset($la_data); } if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>"); } unset($io_pdf);
$ls_codestpro=$ls_codestpro1." - ".$ls_codestpro2." - ".$ls_codestpro3." - ".$ls_codestpro4." - ".$ls_codestpro5; } $li_montocta=$io_report->ds_cuentas->data["monto"][$li_s]; $li_montocta=number_format($li_montocta,2,",","."); $la_data[$li_s]=array('programatica'=>$ls_codestpro,'spg_cuenta'=>$ls_spgcuenta, 'denominacion'=>$ls_dencuenta,'monto'=>$li_montocta); } uf_print_detalle_cuentas($la_data,$ls_monto,&$io_pdf); unset($la_data); } } } } } uf_print_piecabecera($li_monbasimptot,$li_montotcar,$li_monto,$ls_monto,&$io_pdf); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>"); } } ?>
} $io_report->DS_detalle->resetds("cedper"); if(!empty($la_data)) { uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $li_total=$li_total+$li_subtot; $ls_descripcion="Pago por Taquilla"; $li_subtot=$io_fun_nomina->uf_formatonumerico($li_subtot); uf_print_pie_detalle($ls_descripcion,$li_subtot,$io_pdf); // Imprimimos pie de la cabecera } unset($la_data); } $io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera unset($io_cabecera); $li_total=$io_fun_nomina->uf_formatonumerico($li_total); uf_print_piecabecera($li_total,$io_pdf); $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->stopObject($io_encabezado); unset($io_encabezado); } $io_report->DS->resetds("codban"); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>");
} } } if($ls_estlugcom==0) { $ls_estlugcom="Nacional"; } else { $ls_estlugcom="Extranjero"; } /* if(($ls_despai=='---seleccione---')||($ls_desest=='---seleccione---')||($ls_denmun=='---seleccione---')||()) { }*/ uf_print_piecabecera($ld_monsubtot,$ld_monimp,$ld_montot,$ls_monto,$ls_estlugcom,$ls_denmon,$ls_tasa,$ls_despai, $ls_desest,$ls_denmun,$ls_denpar,$ls_obsordcom,$ls_montodivi,&$io_pdf); } if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); //print(" close();"); print("</script>"); } unset($io_report); unset($io_funciones);
$ls_apenomper=$io_report->DS_detalle->data["apeper"][$li_s].", ". $io_report->DS_detalle->data["nomper"][$li_s]; $li_empleado=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS_detalle->data["personal"][$li_s])); $li_patron=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS_detalle->data["patron"][$li_s])); $li_total= abs($io_report->DS_detalle->data["personal"][$li_s])+ abs($io_report->DS_detalle->data["patron"][$li_s]); $li_emp_total=$li_emp_total+abs($io_report->DS_detalle->data["personal"][$li_s]); $li_pat_total=$li_pat_total+abs($io_report->DS_detalle->data["patron"][$li_s]); $li_tot_total=$li_tot_total+$li_total; $li_total=$io_fun_nomina->uf_formatonumerico(abs($li_total)); $la_data[$li_s]=array('nro'=>$li_s,'cedula'=>$ls_cedper,'nombre'=>$ls_apenomper,'empleado'=>$li_empleado,'patron'=>$li_patron,'total'=>$li_total); } $io_report->DS_detalle->resetds("cedper"); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $li_emp_total=$io_fun_nomina->uf_formatonumerico(abs($li_emp_total)); $li_pat_total=$io_fun_nomina->uf_formatonumerico(abs($li_pat_total)); $li_tot_total=$io_fun_nomina->uf_formatonumerico(abs($li_tot_total)); uf_print_piecabecera($li_emp_total,$li_pat_total,$li_tot_total,$io_pdf); // Imprimimos el pie de la cabecera $io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera if($li_i<$li_totrow) { $io_pdf->ezNewPage(); // Insertar una nueva página } unset($io_cabecera); unset($la_data); } } $io_report->DS->resetds("codconc"); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte }
$li_totalasignacion=$io_fun_nomina->uf_formatonumerico($li_totalasignacion); $li_totaldeduccion=$io_fun_nomina->uf_formatonumerico($li_totaldeduccion); $li_totalaporte=$io_fun_nomina->uf_formatonumerico($li_totalaporte); $li_total_neto=$io_fun_nomina->uf_formatonumerico($li_total_neto); uf_print_piecabecera($li_totalasignacion,$li_totaldeduccion,$li_totalaporte,$li_total_neto,$ls_obsrecper,$io_pdf); // Imprimimos el pie de la cabecera*/ if ($io_pdf->ezPageCount==$li_numpag) {// Hacemos el commit de los registros que se desean imprimir $io_pdf->transaction('commit'); } else {// Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($ls_cedper,$ls_apenomper,$ls_descar,$ls_desuniadm,$ld_fecingper,$ls_codcueban,$io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_piecabecera($li_totalasignacion,$li_totaldeduccion,$li_totalaporte,$li_total_neto,$ls_obsrecper,$io_pdf); // Imprimimos el pie de la cabecera*/ } } unset($la_data); $io_report->rs_data->MoveNext(); } $li_totasi=$io_fun_nomina->uf_formatonumerico($li_totasi); $li_totded=$io_fun_nomina->uf_formatonumerico($li_totded); $li_totapo=$io_fun_nomina->uf_formatonumerico($li_totapo); $li_totgeneral=$io_fun_nomina->uf_formatonumerico($li_totgeneral); uf_print_piepagina($li_totasi,$li_totded,$li_totapo,$li_totgeneral,$io_pdf); uf_print_firmas(&$io_pdf); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte
$ls_nomcon=$io_report->DS->data["nomcon"][$li_i]; $li_monact=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS->data["actual"][$li_i])); $li_monpre=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS->data["previo"][$li_i])); $li_monmov=$io_report->DS->data["actual"][$li_i]-$io_report->DS->data["previo"][$li_i]; $li_monmov=$io_fun_nomina->uf_formatonumerico($li_monmov); $la_data[$li_i]=array('codigo'=>$ls_codconc,'nombre'=>$ls_nomcon,'anterior'=>$li_monpre,'movimiento'=>$li_monmov,'actual'=>$li_monact); $li_totprevio=$li_totprevio+abs($io_report->DS->data["previo"][$li_i]); $li_totactual=$li_totactual+abs($io_report->DS->data["actual"][$li_i]); $li_totmovimiento=$li_totmovimiento+($io_report->DS->data["actual"][$li_i]-$io_report->DS->data["previo"][$li_i]); } $io_report->DS->resetds("codconc"); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $li_totprevio=$io_fun_nomina->uf_formatonumerico($li_totprevio); $li_totactual=$io_fun_nomina->uf_formatonumerico($li_totactual); $li_totmovimiento=$io_fun_nomina->uf_formatonumerico($li_totmovimiento); uf_print_piecabecera($li_totprevio,$li_totactual,$li_totmovimiento,$li_totrow,$io_pdf); // Imprimimos el pie de la cabecera if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>"); } unset($io_pdf); } unset($io_report);
{ uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle } else { print("<script language=JavaScript>"); print(" alert('No hay nada que reportar!');"); print(" close();"); print("</script>"); } $li_totgeneral=$li_totasi-$li_totded; $li_totasi=$io_fun_nomina->uf_formatonumerico($li_totasi); $li_totded=$io_fun_nomina->uf_formatonumerico($li_totded); $li_totapo=$io_fun_nomina->uf_formatonumerico($li_totapo); $li_totgeneral=$io_fun_nomina->uf_formatonumerico($li_totgeneral); uf_print_piecabecera($li_totasi,$li_totded,$li_totapo,$li_totgeneral,$io_pdf); // Imprimimos el pie de la cabecera if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>"); } unset($io_pdf); } unset($io_report);
uf_print_cabecera($ls_denominacion,&$io_pdf); uf_print_detalle($la_data1,$io_pdf); // Imprimimos el detalle $ls_denom="Total Asignaciones"; uf_print_piecabecera($ls_denom, $ls_persona_tot1,number_format($ls_monto_tot1,2,",","."),&$io_pdf); $monto_total=$monto_total+($ls_monto_tot1); $personal_total=$personal_total+($ls_persona_tot1); $io_pdf->ezSetDy(-5); unset($la_data1); } if($ls_deduc>0) { $ls_denominacion="Deducciones"; uf_print_cabecera($ls_denominacion,&$io_pdf); uf_print_detalle($la_data2,$io_pdf); // Imprimimos el detalle $ls_denom="Total Deducciones"; uf_print_piecabecera($ls_denom, $ls_persona_tot2,number_format($ls_monto_tot2,2,",","."),&$io_pdf); $monto_total2=$monto_total2+($ls_monto_tot2); $personal_total2=$personal_total2+($ls_persona_tot2); $io_pdf->ezSetDy(-5); unset($la_data2); } } $io_report->rs_data->MoveNext(); }//fin del for if ($monto_total>0) { $io_pdf->ezSetDy(-5); $ls_denom="TOTAL GENERAL ASIGNACIONES"; uf_print_piecabecera2($ls_denom,number_format($monto_total,2,",","."),&$io_pdf); }
uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_piedetalle($li_total,$ls_desuniadm,$io_pdf); // Imprimimos el pie de la cabecera } } else { $io_pdf->transaction('commit'); } } unset($la_data); $io_report->rs_data->MoveNext(); } $li_total_neto=$io_fun_nomina->uf_formatonumerico($li_total_neto); $io_pdf->EzsetDy(-2); $li_s = $li_s-1; uf_print_piecabecera($li_total_neto,$li_s,$io_pdf); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>"); } unset($io_pdf); } unset($io_report);
$li_valsal2=0; $li_valsal_sentencia=0; } } // Imprimimos el detalle uf_print_detalle($la_data,$io_pdf); uf_print_piecabecera($io_fun_nomina->uf_formatonumerico($li_total),$li_contador,$ls_desuniadmact,$io_pdf); $monto_total = $monto_total + $li_total; $ultima_linea = $io_pdf->y; $io_pdf->filledRectangle(96,$ultima_linea-10,600,1); // Imprimimos el fin del reporte $io_pdf->ezText(' ',12,array('justification' => 'full')); uf_imprime_totales($contador_personas,$io_fun_nomina->uf_formatonumerico($cesta_tot-$deducciones_tot) ,$io_pdf); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();");
$ls_cedper=$io_report->DS->data["cedper"][$li_i]; $ls_nomper=$io_report->DS->data["apeper"][$li_i].", ".$io_report->DS->data["nomper"][$li_i]; $ls_estado1=$io_report->DS->data["est1cestic"][$li_i]; $ls_estado2=$io_report->DS->data["est2cestic"][$li_i]; $li_ticket=abs($io_report->DS->data["valsal"][$li_i])/abs($io_report->DS->data["moncestic"][$li_i]); $li_valsal=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS->data["valsal"][$li_i])); $li_total=$li_total+abs($io_report->DS->data["valsal"][$li_i]); $li_totalticket=$li_totalticket+$li_ticket; $li_ticket=$io_fun_nomina->uf_formatonumerico($li_ticket); $la_data[$li_contador]=array('nro'=>$li_contador,'cedula'=>$ls_cedper,'nombre'=>$ls_nomper,'estado1'=>$ls_estado1,'estado2'=>$ls_estado2,'ticket'=>$li_ticket,'valor'=>$li_valsal); } $io_report->DS->resetds("cedper"); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $li_total=$io_fun_nomina->uf_formatonumerico($li_total); $li_totalticket=$io_fun_nomina->uf_formatonumerico($li_totalticket); uf_print_piecabecera($li_total,$li_totalticket,$io_pdf); // Imprimimos el fin del reporte if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>"); } unset($io_pdf); } unset($io_report);
} $io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera unset($io_cabecera); //$li_total=$io_fun_nomina->uf_formatonumerico($li_total); //uf_print_piecabecera($li_total,$io_pdf); $io_report->rs_data->MoveNext(); }//endwhile; endforeach; $li_total=$io_fun_nomina->uf_formatonumerico($li_total); uf_print_piecabecera($li_total,$io_pdf,$li_nro_total); } if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>");
$la_data[$li_s]=array('codigo'=>$ls_codper,'nombre'=>$ls_apenomper,'tipo'=>$ls_destippre,'estatus'=>$ls_stapre, 'fecha'=>$ld_fecpre,'monto'=>$li_monpre,'amortizado'=>$li_monamopre,'cuotas'=>$li_numcuopre, 'saldo'=>$li_saldo); $li_totprestamo=$li_totprestamo+$io_report->DS_detalle->data["monpre"][$li_s]; $li_totamortizado=$li_totamortizado+$io_report->DS_detalle->data["monamopre"][$li_s]; $li_totcuota=$li_totcuota+$io_report->DS_detalle->data["numcuopre"][$li_s]; $li_totsaldo=$li_totsaldo+($io_report->DS_detalle->data["monpre"][$li_s]-$io_report->DS_detalle->data["monamopre"][$li_s]); $li_tottra=$li_tottra+1; } $io_report->DS_detalle->resetds("codper"); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $li_totprestamo=$io_fun_nomina->uf_formatonumerico(abs($li_totprestamo)); $li_totamortizado=$io_fun_nomina->uf_formatonumerico(abs($li_totamortizado)); $li_totcuota=abs($li_totcuota); $li_totsaldo=$io_fun_nomina->uf_formatonumerico(abs($li_totsaldo)); uf_print_piecabecera($li_tottra,$li_totprestamo,$li_totamortizado,$li_totcuota,$li_totsaldo,$io_pdf); // Imprimimos el pie de la cabecera $io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera if($li_i<$li_totrow) { $io_pdf->ezNewPage(); // Insertar una nueva página } unset($io_cabecera); unset($la_data); } } $io_report->DS->resetds("codconc"); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte }
$ls_codestpro=$ls_codestpro1.$ls_codestpro2.$ls_codestpro3; } else { $ls_codestpro=substr($ls_codestpro1,-2)."-".substr($ls_codestpro2,-2)."-".substr($ls_codestpro3,-2)."-".substr($ls_codestpro4,-2)."-".substr($ls_codestpro5,-2); } $ls_spg_cuenta=substr($ls_spg_cuenta,0,3)."-".substr($ls_spg_cuenta,3,2)."-".substr($ls_spg_cuenta,5,2)."-".substr($ls_spg_cuenta,7,2); $la_data[$li_s]=array('codestpro'=>$ls_codestpro,'denominacion'=>$ls_dencuenta, 'cuenta'=>$ls_spg_cuenta,'monto'=>$ld_monto); } //////////////////////////para calcular el monto total si tiene o no descuentos///////////////// $ls_monto_menos_desc=$ld_montot-$descuento; $ld_montot=number_format($ld_montot,2,",","."); $ls_monto_menos_desc=number_format($ls_monto_menos_desc,2,",","."); ///////////////////////////////////////////////////////////////////////////////////////////////// uf_print_piecabecera($ld_monsubtot,$ld_monimp,$ls_monto_menos_desc,$descuento,&$io_pdf); uf_print_detalle_cuentas($la_data,&$io_pdf); uf_print_piecabecera_total($ld_montot,&$io_pdf); unset($la_data); } } } } } } uf_monto_en_letras($ls_monto,&$io_pdf); } if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte
if ($lb_validosep) { $li_totrow = $io_report->ds_soc_sep->getRowCount("numordcom"); for ($li_row=1;$li_row<=$li_totrow;$li_row++) { $ls_numsep = $io_report->ds_soc_sep->data["numsol"][$li_row]; $ls_denunadm = $io_report->ds_soc_sep->data["denuniadm"][$li_row]; $la_datasep[$li_row] = array('codigo'=>$ls_numsep,'denuniadm'=>$ls_denunadm); } uf_print_detalle_sep($la_datasep,$io_pdf); } } } } } uf_print_piecabecera($ls_estcondat,$ls_lugcom,$ls_moneda,$ld_tasa,$ld_mondiv,$ls_denpai,$ls_denest,$ls_denmun,$ls_denpar,$ld_montot,$ls_monto,&$io_pdf); if ($ls_tiporeporte==0) { uf_print_piecabeceramonto_bsf($ld_montotaux,&$io_pdf); } } if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();");
$rs_data_dt->MoveNext(); } unset($row); unset($rs_data_dt->fields); $io_report->io_sql->free_result($rs_data_dt); } $rs_data->MoveNext(); } if(($lb_valido)&&($li_s>0)) // Si no ocurrio ningún error { uf_print_detalle($la_data,$io_pdf); $li_montototalbene=$io_fun_nomina->uf_formatonumerico($li_montototalbene); unset($la_data); uf_print_piecabecera($li_s,$li_montototalbene,$io_pdf); // Imprimimos el pie de la cabecera $io_report->io_sql->free_result($rs_data); $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { if($li_s==0) { print("<script language=JavaScript>"); print(" alert('No hay nada que Reportar');"); print(" close();"); print("</script>"); } else {
} } if($ls_estcondat=="B") { uf_print_detalle_bienes($la_data,$io_pdf); } else { uf_print_detalle_servicios($la_dataser,$io_pdf); } unset($la_data); } } } } uf_print_piecabecera($ld_monsubtot,$ld_monimp,$ld_montot,$ls_monto,$ld_montotaux,$ls_codmoneda,&$io_pdf); uf_print_cuadros_inferiores($ls_obsordcom,$ls_obscom,$li_tasa,$li_totconv,&$io_pdf); } if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>"); }
} else { if ($li_s==0) { print("<script language=JavaScript>"); print(" alert('No hay Personal con Monto de Deducciones Mayor a las Asignaciones');"); print(" close();"); print("</script>"); } else { uf_print_detalle($la_data,$io_pdf); $ls_totalasignacion=number_format($ls_totalasignacion,2,",","."); $ls_totaldeduccion=number_format($ls_totaldeduccion,2,",","."); $ls_totalaporte=number_format($ls_totalaporte,2,",","."); $ls_total_diferencia=number_format($ls_total_diferencia,2,",","."); $ls_total_deduccion_aporte=number_format($ls_total_deduccion_aporte,2,",","."); uf_print_piecabecera($ls_totalasignacion,$ls_totaldeduccion,$ls_totalaporte,$ls_total_deduccion_aporte,$ls_total_diferencia,$ls_total_personas,$io_pdf); $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } } } unset ($la_data); unset($io_pdf); unset($io_report); unset($io_funciones); unset($io_fun_nomina); ?>
$ls_nomper=$io_report->DS->data["apeper"][$li_i].", ".$io_report->DS->data["nomper"][$li_i]; $li_personal=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS->data["personal"][$li_i])); $li_patron=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS->data["patron"][$li_i])); $li_total=abs($io_report->DS->data["personal"][$li_i]+$io_report->DS->data["patron"][$li_i]); $li_total=$io_fun_nomina->uf_formatonumerico($li_total); $li_totper=$li_totper+abs($io_report->DS->data["personal"][$li_i]); $li_totpat=$li_totpat+abs($io_report->DS->data["patron"][$li_i]); $li_totalgeneral=$li_totper+$li_totpat; $la_data[$li_i]=array('nro'=>$li_i,'cedula'=>$ls_cedper,'nombre'=>$ls_nomper,'personal'=>$li_personal,'patron'=>$li_patron,'total'=>$li_total); } $io_report->DS->resetds("cedper"); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $li_totper=$io_fun_nomina->uf_formatonumerico($li_totper); $li_totpat=$io_fun_nomina->uf_formatonumerico($li_totpat); $li_totalgeneral=$io_fun_nomina->uf_formatonumerico($li_totalgeneral); uf_print_piecabecera($li_totper,$li_totpat,$li_totalgeneral,$io_pdf); // Imprimimos el fin del reporte if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>"); } unset($io_pdf); } unset($io_report);
$li_totrow = $io_report->ds->getRowCount("numsol"); $li_montot = 0; for ($li_i = 1; $li_i <= $li_totrow && $lb_valido; $li_i++) { $ls_numsol = $io_report->ds->data["numsol"][$li_i]; $ld_fecemisol = $io_report->ds->data["fecemisol"][$li_i]; $li_monsol = $io_report->ds->data["monsol"][$li_i]; $ls_nombre = $io_report->ds->data["nombre"][$li_i]; $li_montot = $li_montot + $li_monsol; $li_monsol = number_format($li_monsol, 2, ',', '.'); $ld_fecemisol = $io_funciones->uf_convertirfecmostrar($ld_fecemisol); $la_data[$li_i] = array('numsol' => $ls_numsol, 'nombre' => $ls_nombre, 'fecemisol' => $ld_fecemisol, 'monsol' => $li_monsol); } $li_montot = number_format($li_montot, 2, ',', '.'); uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle uf_print_piecabecera($li_i, $li_montot, $io_pdf); // Imprimimos el pie de la cabecera unset($io_cabecera); unset($la_data); $io_report->ds->resetds("numsol"); if ($lb_valido) { $io_pdf->ezStopPageNumbers(1, 1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else { print "<script language=JavaScript>"; print " alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"; print " close();"; print "</script>"; }
else { $ls_codestpro=$ls_codestpro1.'-'.$ls_codestpro2.'-'.$ls_codestpro3.'-'.$ls_codestpro4.'-'.$ls_codestpro5; } $la_data[$li_s]=array('codestpro'=>$ls_codestpro,'denominacion'=>$ls_dencuenta, 'cuenta'=>$ls_spg_cuenta,'monto'=>$ld_monto); } uf_print_detalle_cuentas($la_data,&$io_pdf); unset($la_data); } } } } } } uf_print_piecabecera($ld_monsubtot,$ld_monimp,$ld_montot,$ls_monto,&$io_pdf); } if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); //print(" close();"); print("</script>"); } unset($io_report); unset($io_funciones);
{// Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($ls_coduniadm,$ls_desuniadm,$io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_piedetalle($li_totasi,$li_totded,$li_totapo,$li_totnet,$io_pdf); // Imprimimos el pie del detalle } } unset($la_data); } $li_totneto=$li_totasignacion-$li_totdeduccion; $li_totasignacion=$io_fun_nomina->uf_formatonumerico($li_totasignacion); $li_totdeduccion=$io_fun_nomina->uf_formatonumerico($li_totdeduccion); $li_totaporte=$io_fun_nomina->uf_formatonumerico($li_totaporte); $li_totneto=$io_fun_nomina->uf_formatonumerico($li_totneto); uf_print_piecabecera($li_totasignacion,$li_totdeduccion,$li_totaporte,$li_totneto,$io_pdf); // Imprimimos el pie de la cabecera $io_report->DS->resetds("minorguniadm"); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print(" close();"); print("</script>"); } unset($io_pdf); }
if($lb_valido) { $li_totrow_det=$io_report->rs_data_detalle->RecordCount(); $li_s=1; while(!$io_report->rs_data_detalle->EOF) { $ls_cedper=$io_report->rs_data_detalle->fields["cedper"]; $ls_apenomper=$io_report->rs_data_detalle->fields["apeper"].", ". $io_report->rs_data_detalle->fields["nomper"]; $ls_descar=$io_report->rs_data_detalle->fields["descar"]; $li_valsal=$io_fun_nomina->uf_formatonumerico(abs($io_report->rs_data_detalle->fields["valsal"])); $la_data[$li_s]=array('nro'=>$li_s,'cedula'=>$ls_cedper,'nombre'=>$ls_apenomper,'cargo'=>$ls_descar,'monto'=>$li_valsal); $li_s++; $io_report->rs_data_detalle->MoveNext(); } uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_piecabecera($li_tottra,$li_montot,$io_pdf); // Imprimimos el pie de la cabecera $io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera if($li_i<$li_totrow) { $io_pdf->ezNewPage(); // Insertar una nueva página } unset($io_cabecera); unset($la_data); } $li_i++; $io_report->rs_data->MoveNext(); } uf_print_firmas(&$io_pdf); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
'asignacion'=>$li_asignacion, 'deduccion'=>$li_deduccion,'neto'=>''); $li_s++; $io_report->rs_data_detalle->MoveNext(); } uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $li_total_neto=$li_totalasignacion-$li_totaldeduccion; $li_totasi=$li_totasi+$li_totalasignacion; $li_totded=$li_totded+$li_totaldeduccion; $li_totapo=$li_totapo+$li_totalaporte; $li_totgeneral=$li_totgeneral+$li_total_neto; $li_totalasignacion=number_format($li_totalasignacion,2,",","."); $li_totaldeduccion=number_format($li_totaldeduccion,2,",","."); $li_totalaporte=number_format($li_totalaporte,2,",","."); $li_total_neto=number_format($li_total_neto,2,",","."); uf_print_piecabecera($li_totalasignacion,$li_totaldeduccion,$li_totalaporte,$li_total_neto,$io_pdf); } unset($la_data); $io_report->rs_data->MoveNext(); } $li_totasi=number_format($li_totasi,2,",","."); $li_totded=number_format($li_totded,2,",","."); $li_totapo=number_format($li_totapo,2,",","."); $li_totgeneral=number_format($li_totgeneral,2,",","."); uf_print_piepagina($li_totasi,$li_totded,$li_totapo,$li_totgeneral,$io_pdf); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error