{
$ls_codestpro = $ls_codestpro1.'-'.$ls_codestpro2.'-'.$ls_codestpro3.'-'.$ls_codestpro4.'-'.$ls_codestpro5;
}
$la_data[$li_s]=array('codestpro'=>$ls_codestpro,'denominacion'=>$ls_dencuenta,
'cuenta'=>$ls_spg_cuenta,'monto'=>$ld_monto);
}
uf_print_detalle_cuentas($la_data,&$io_pdf);
unset($la_data);
}
}
}
}
}
}
uf_print_piecabecera($ld_monsubtot,$ld_monimp,$ld_montot,$ls_monto,&$io_pdf);
uf_print_clausulas($ls_estcondat,&$io_pdf);
}
if($lb_valido) // 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
{
print("<script language=JavaScript>");
print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');");
print(" close();");
print("</script>");
}
unset($io_report);
unset($io_funciones);
if ($li_z<4)
{
if ($li_z==1)
{
$io_pdf->setColor(1,0,0,0);
$io_pdf->addText(250,45,12,"CONTABILIDAD");
$io_pdf->setColor(0,0,0,0);
}
$io_pdf->ezNewPage();
uf_print_detalle($la_data2,&$io_pdf);
uf_print_detalle_cuentas($la_data,&$io_pdf);
uf_print_piecabecera($ld_monsubtot,$ld_monimp,$ld_montot,$ls_monto,&$io_pdf);
if(!empty($la_clausulas)&&($ls_estcondat=="S"))
{
uf_print_clausulas($la_data1,&$io_pdf);
}
}
}
}
}
if($lb_valido) // 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
{
print("<script language=JavaScript>");
print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');");
// print(" close();");
