$io_tcpdf->Ln(3);
$io_tcpdf->Cell(0,8,$ls_periodo,0,0,'C');
$li_totrow=$io_report->rs_data->RecordCount();
$li_i=1;
$li_total=0;
$li_totalpersonas=0;
while(!$io_report->rs_data->EOF)
{
$ls_codban=$io_report->rs_data->fields["codban"];
$ls_nomban=$io_report->rs_data->fields["nomban"];
$io_tcpdf->uf_print_cabecera_listadobanco($ls_codban,$ls_nomban); // Imprimimos la cabecera del registro
//-------------------------------------------Buscamos las cuentas de ahorro---------------------------------------------
$ls_tipcueban="A"; // Buscamos las cuentas de ahorro
if (($ls_tipocuenta == '') || ($ls_tipocuenta == $ls_tipcueban))
{
$lb_valido=$io_report->uf_listadobanco_personal($ls_codban,$ls_suspendido,$ls_tipcueban,$ls_quincena,$ls_subnomdes,
$ls_subnomhas,$ls_codperdes,$ls_codperhas,$ls_orden); // Obtenemos el detalle del reporte
if($lb_valido)
{
$li_subtot=0;
$li_totrow_det=$io_report->rs_data_detalle->RecordCount();
$li_s=0;
while(!$io_report->rs_data_detalle->EOF)
{
$ls_cedper=$io_report->rs_data_detalle->fields["cedper"];
$ls_nomper=$io_report->rs_data_detalle->fields["apeper"].", ".$io_report->rs_data_detalle->fields["nomper"];
$li_subtot=$li_subtot+$io_report->rs_data_detalle->fields["monnetres"];
$li_monnetres=$io_fun_nomina->uf_formatonumerico($io_report->rs_data_detalle->fields["monnetres"]);
$ls_codcueban=$io_report->rs_data_detalle->fields["codcueban"];
//$la_data[$li_s]=array(($li_s+1),$ls_cedper,$ls_nomper,$ls_codcueban,$li_monnetres);
$la_data[$li_s]=array(($li_s+1),$ls_cedper,$ls_nomper,$li_monnetres);
$li_s++;
