$li_toting=0; $li_totded=0; $ls_codper=$io_report->rs_data->fields["codper"]; $ls_cedper=$io_report->rs_data->fields["cedper"]; $ls_nomper=$io_report->rs_data->fields["apeper"].", ".$io_report->rs_data->fields["nomper"]; $ls_descar=$io_report->rs_data->fields["descar"]; $ls_codcueban=$io_report->rs_data->fields["codcueban"]; $li_total=$io_report->rs_data->fields["total"]; $io_cabecera=$io_pdf->openObject(); // Creamos el objeto cabecera if($li_reg==1) { uf_print_cabecera1($ls_cedper,$ls_nomper,$ls_descar,$io_cabecera,$io_pdf); // Imprimimos la cabecera del registro } else { uf_print_cabecera2($ls_cedper,$ls_nomper,$ls_descar,$io_cabecera,$io_pdf); // Imprimimos la cabecera del registro } $lb_valido=$io_report->uf_recibopago_conceptopersonal($ls_codper,$ls_conceptocero,$ls_conceptop2, $ls_conceptoreporte,$ls_tituloconcepto,$ls_quincena,&$io_report->rs_data_detalle); // Obtenemos el detalle del reporte if($lb_valido) { $li_totrow_det=$io_report->rs_data_detalle->RecordCount(); $li_asig=0; $li_dedu=0; if($li_adelanto==1)// Utiliza el adelanto de quincena { switch($ls_quincena) { case "1": // primera quincena; $li_asig=$li_asig+1;
if($i > 0) { uf_print_cabecera1($io_pdf,$io_encabezado); uf_print_detalle($ls_data,$io_pdf); $io_fun_nomina->uf_formatonumerico($ld_neto1); uf_print_total($i,$ld_neto1,$io_pdf); if($j > 0) { $io_pdf->stopObject($io_encabezado); $io_pdf->ezNewPage(); // Insertar una nueva página $io_pdf->ezSetCmMargins(3.6,2.5,3,3); // Configuración de los margenes en centímetros } } if($j > 0) { uf_print_cabecera2($io_pdf); uf_print_detalle($ls_data2,$io_pdf); $io_fun_nomina->uf_formatonumerico($ld_neto2); uf_print_total($j,$ld_neto2,$io_pdf); } unset($ls_data); unset($ls_data2); } $io_report->io_sql->free_result($rs_data); if (($lb_valido)&&($li_numrowtot>0)) // 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 {
$ls_cedper=$io_report->rs_data->fields["cedper"]; $ls_nomper=$io_report->rs_data->fields["apeper"].", ".$io_report->rs_data->fields["nomper"]; $ls_descar=$io_report->rs_data->fields["descar"]; $ls_codcueban=$io_report->rs_data->fields["codcueban"]; $li_total=$io_report->rs_data->fields["total"]; $ls_unidadadmin=$io_report->rs_data->fields["minorguniadm"].$io_report->rs_data->fields["ofiuniadm"]. $io_report->rs_data->fields["uniuniadm"].$io_report->rs_data->fields["depuniadm"]. $io_report->rs_data->fields["prouniadm"]; $io_cabecera=$io_pdf->openObject(); // Creamos el objeto cabecera if($li_reg==1) { uf_print_cabecera1($ls_codper,$ls_cedper,$ls_nomper,$ls_codcueban,$ls_unidadadmin,$io_cabecera,$io_pdf); // Imprimimos la cabecera del registro } else { uf_print_cabecera2($ls_codper,$ls_cedper,$ls_nomper,$ls_codcueban,$ls_unidadadmin,$io_cabecera,$io_pdf); // Imprimimos la cabecera del registro } $lb_valido=$io_report->uf_recibopago_conceptopersonal($ls_codper,$ls_conceptocero,$ls_conceptop2, $ls_conceptoreporte,$ls_tituloconcepto,$ls_quincena); // Obtenemos el detalle del reporte if($lb_valido) { $li_totrow_det=$io_report->rs_data_detalle->RecordCount(); $li_asig=0; $li_dedu=0; if($li_adelanto==1)// Utiliza el adelanto de quincena { switch($ls_quincena) { case "1": // primera quincena; $li_asig=$li_asig+1;
} $la_data[$li_s]=$la_valores; } $li_totnet=$li_toting-$li_totded; $li_toting=$io_fun_nomina->uf_formatonumerico($li_toting); $li_totded=$io_fun_nomina->uf_formatonumerico($li_totded); $li_totnet=$io_fun_nomina->uf_formatonumerico($li_totnet); if($li_reg==1) { uf_print_cabecera1($ls_cedper,$ls_nomper,$ls_descar,$ls_desuniadm,$li_sueper,$ld_fecingper,$ls_nomban,$ls_codcueban,$io_cabecera,$io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera1($li_toting,$li_totded,$li_totnet,$io_pdf); // Imprimimos pie de la cabecera } else { uf_print_cabecera2($ls_cedper,$ls_nomper,$ls_descar,$ls_desuniadm,$li_sueper,$ld_fecingper,$ls_nomban,$ls_codcueban,$io_cabecera,$io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera2($li_toting,$li_totded,$li_totnet,$io_pdf); // Imprimimos pie de la cabecera } $io_report->DS_detalle->resetds("codconc"); unset($la_data_a); unset($la_data_d); unset($la_data); $io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera if(($li_i<$li_totrow)&&($li_reg==2)) { $io_pdf->ezNewPage(); // Insertar una nueva página $li_reg=1; } else {
$ls_nomper=$io_report->rs_data->fields["apeper"]; $ls_apeper=$io_report->rs_data->fields["nomper"]; $ls_descar=$io_report->rs_data->fields["descar"]; $ls_codcueban=$io_report->rs_data->fields["codcueban"]; $li_sueper=$io_report->rs_data->fields["sueper"]; $li_sueper=$io_fun_nomina->uf_formatonumerico($li_sueper); $li_total=$io_report->rs_data->fields["total"]; $io_cabecera=$io_pdf->openObject(); // Creamos el objeto cabecera if($li_reg==1) { uf_print_cabecera($ls_cedper,$ls_nomper,$ls_apeper,$ls_descar,$ld_fecdesper, $ld_fechasper,$li_i,$li_sueper,$io_cabecera,$io_pdf); // Imprimimos la cabecera del registro } else { uf_print_cabecera2($ls_cedper,$ls_nomper,$ls_apeper,$ls_descar,$ld_fecdesper, $ld_fechasper,$li_i,$li_sueper,$io_cabecera,$io_pdf); // Imprimimos la cabecera del registro } $lb_valido=$io_report->uf_recibopago_conceptopersonal($ls_codper,$ls_conceptocero,$ls_conceptop2, $ls_conceptoreporte,$ls_tituloconcepto,$ls_quincena); // Obtenemos el detalle del reporte if($lb_valido) { $li_totrow_det=$io_report->rs_data_detalle->RecordCount(); $li_asig=0; $li_dedu=0; if($li_adelanto==1)// Utiliza el adelanto de quincena { switch($ls_quincena) { case "1": // primera quincena; $li_asig=$li_asig+1; $ls_codconc="----------";
$ls_nomper=$io_report->rs_data->fields["apeper"].", ".$io_report->rs_data->fields["nomper"]; $ls_descar=$io_report->rs_data->fields["descar"]; $ls_desubifis = $io_report->rs_data->fields["desubifis"]; $ls_fecingper=$io_funciones->uf_convertirfecmostrar($io_report->rs_data->fields["fecingper"]); $ls_codcueban=$io_report->rs_data->fields["codcueban"]; $li_total=$io_report->rs_data->fields["total"]; $li_sueper = $io_report->rs_data->fields["sueper"]; $io_cabecera=$io_pdf->openObject(); // Creamos el objeto cabecera if($li_reg==1) { uf_print_cabecera1($ls_cedper,$ls_nomper,$ls_descar,$ls_desnom,$ls_fecingper,&$io_cabecera,&$io_pdf,$ls_desubifis,$li_sueper); // Imprimimos la cabecera del registro } else { uf_print_cabecera2($ls_cedper,$ls_nomper,$ls_descar,$ls_desnom,$ls_fecingper,&$io_cabecera,&$io_pdf,$ls_desubifis,$li_sueper); // Imprimimos la cabecera del registro } $lb_valido=$io_report->uf_recibopago_conceptopersonal($ls_codper,$ls_conceptocero,$ls_conceptop2, $ls_conceptoreporte,$ls_tituloconcepto,$ls_quincena); // Obtenemos el detalle del reporte if($lb_valido) { $li_totrow_det=$io_report->rs_data_detalle->RecordCount(); $li_asig=0; $li_dedu=0; if($li_adelanto==1)// Utiliza el adelanto de quincena { switch($ls_quincena) { case "1": // primera quincena; $li_asig=$li_asig+1;
case "C": $ls_nex_ben="Conyugue"; break; case "H": $ls_nex_ben="Hijo"; break; case "P": $ls_nex_ben="Progenitor"; break; case "C": $ls_nex_ben="Hermano"; break; } $io_report->rs_data_detalle2->MoveNext(); } uf_print_cabecera2($ls_ced_ben,$ls_nombre_ben,$ls_banco_ben,$ls_cta_ben,$ls_porcentaje_ben,$ls_nex_ben, $ls_ano,&$io_pdf); } $li_bene=0; $lb_valido=$io_report->uf_pagonomina_conceptopersonal($ls_codper,$ls_conceptocero,$ls_tituloconcepto,$ls_conceptoreporte,$ls_conceptop2); // Obtenemos el detalle del reporte if($lb_valido) { $li_totrow_res=$io_report->rs_data_detalle->RecordCount(); $li_s=1; while(!$io_report->rs_data_detalle->EOF) { $ls_codconc=$io_report->rs_data_detalle->fields["codconc"]; $ls_nomcon=$io_report->rs_data_detalle->fields["nomcon"]; $ls_tipsal=rtrim($io_report->rs_data_detalle->fields["tipsal"]); $li_valsal=abs($io_report->rs_data_detalle->fields["valsal"]);