$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"]);
