$li_k=1;
while((!$io_report->rs_data->EOF)&&($lb_valido))
{
$li_totasi=0;
$li_totded=0;
$li_totapo=0;
$li_totgeneral=0;
$ls_minorguniadm=$io_report->rs_data->fields["minorguniadm"];
$ls_ofiuniadm=$io_report->rs_data->fields["ofiuniadm"];
$ls_uniuniadm=$io_report->rs_data->fields["uniuniadm"];
$ls_depuniadm=$io_report->rs_data->fields["depuniadm"];
$ls_prouniadm=$io_report->rs_data->fields["prouniadm"];
$ls_desuniadm=$io_report->rs_data->fields["desuniadm"];
uf_print_cabecera($ls_minorguniadm,$ls_ofiuniadm,$ls_uniuniadm,$ls_depuniadm,$ls_prouniadm,$ls_desuniadm,$io_pdf); // Imprimimos la cabecera del registro
$lb_valido=$io_report->uf_pagonominaunidad_personal($ls_codperdes,$ls_codperhas,$ls_conceptocero,$ls_conceptoreporte,
$ls_conceptop2,$ls_minorguniadm,$ls_ofiuniadm,$ls_uniuniadm,
$ls_depuniadm,$ls_prouniadm,$ls_subnomdes,$ls_subnomhas,$ls_orden); // Cargar el DS con los datos de la cabecera del reporte
$li_totrow=$io_report->rs_data_detalle->RecordCount();
while((!$io_report->rs_data_detalle->EOF)&&($lb_valido))
{
$li_totalasignacion=0;
$li_totaldeduccion=0;
$li_totalaporte=0;
$li_total_neto=0;
$ls_codper=$io_report->rs_data_detalle->fields["codper"];
$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"];
$ls_desuniadm=$io_report->rs_data_detalle->fields["desuniadm"];
$ld_fecingper=$io_funciones->uf_convertirfecmostrar($io_report->rs_data_detalle->fields["fecingper"]);
$ls_codcueban=$io_report->rs_data_detalle->fields["codcueban"];
