$io_pdf->transaction('start'); // Iniciamos la transacción
$li_numpag=$io_pdf->ezPageCount; // Número de página
$li_totalasignacion=0;
$li_totaldeduccion=0;
$li_totalaporte=0;
$li_total_neto=0;
$ls_codper=$io_report->rs_data->fields["codper"];
$ls_cedper=$io_report->rs_data->fields["cedper"];
$ls_apenomper=$io_report->rs_data->fields["apeper"].", ". $io_report->rs_data->fields["nomper"];
$ls_descar=$io_report->rs_data->fields["descar"];
$ls_desuniadm=$io_report->rs_data->fields["desuniadm"];
$ld_fecingper=$io_funciones->uf_convertirfecmostrar($io_report->rs_data->fields["fecingper"]);
$ls_codcueban=$io_report->rs_data->fields["codcueban"];
$ls_obsrecper=$io_report->rs_data->fields["obsrecper"];
uf_print_cabecera($ls_cedper,$ls_apenomper,$ls_descar,$ls_desuniadm,$ld_fecingper,$ls_codcueban,$io_pdf); // Imprimimos la cabecera del registro
$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"]);
switch($ls_tipsal)
{
case "A":
$li_totalasignacion=$li_totalasignacion + $li_valsal;
$li_asignacion=$io_fun_nomina->uf_formatonumerico($li_valsal);
