$io_fun_nomina->uf_loadmodalidad(&$li_len1,&$li_len2,&$li_len3,&$li_len4,&$li_len5,&$ls_tituloprog);
$io_fun_nomina->uf_formatoprogramatica($ls_codestpro1.$ls_codestpro2.$ls_codestpro3.$ls_codestpro4.$ls_codestpro5,&$ls_programatica);
$ls_titulo="<b>Resumen Contable</b>";
$ls_titulo2="<b>Presupuestario de Conceptos</b>";
$ls_titulo3="<b>".$ls_tituloprog."</b>";
$ls_titulo4="<b>".$ls_programatica."</b>";
$ls_periodo="<b>Período Nro ".$ls_peractnom.", ".$ld_fecdesper." - ".$ld_fechasper."</b>";
//--------------------------------------------------------------------------------------------------------------------------------
$lb_valido=uf_insert_seguridad($ls_titulo,$ls_titulo2,$ls_desnom,$ls_periodo,$li_tipo); // Seguridad de Reporte
if($lb_valido) // Buscamos la información que afecta el presupuesto
{
switch($ls_conpronom)
{
case "1":
$lb_valido=$io_report->uf_contableconceptos_especifico_presupuesto_proyecto($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,
$ls_codestpro4,$ls_codestpro5,$ls_estcla,
$ls_subnomdes,$ls_subnomhas);
break;
default:
$lb_valido=$io_report->uf_contableconceptos_especifico_presupuesto($ls_codestpro1,$ls_codestpro2,$ls_codestpro3,
$ls_codestpro4,$ls_codestpro5,$ls_estcla,
$ls_subnomdes,$ls_subnomhas);
break;
}
}
if($lb_valido==false) // Existe algún error ó no hay registros
{
print("<script language=JavaScript>");
print(" alert('No hay nada que Reportar');");
print(" close();");
