<td height="20" class="cd-menu"></td>
  </tr>
  <tr>
    <td height="13" bgcolor="#FFFFFF" class="toolbar">&nbsp;</td>
  </tr>
  <tr> 
    <td height="20" bgcolor="#FFFFFF" class="toolbar"><a href="javascript:ue_nuevo();"><img src="../../shared/imagebank/tools20/nuevo.gif" title="Nuevo" alt="Nuevo" width="20" height="20" border="0"></a><a href="javascript:ue_guardar();"><img src="../../shared/imagebank/tools20/grabar.gif" title="Guardar" alt="Grabar" width="20" height="20" border="0"></a><a href="javascript:ue_buscar();"><img src="../../shared/imagebank/tools20/buscar.gif" title="Buscar" alt="Buscar" width="20" height="20" border="0"></a><img src="../../shared/imagebank/tools20/imprimir.gif" title="Imprimir" alt="Imprimir" width="20" height="20"><a href="javascript:ue_eliminar();"><img src="../../shared/imagebank/tools20/eliminar.gif" title="Eliminar" alt="Eliminar" width="20" height="20" border="0"></a><a href="sigespwindow_blank.php"><img src="../../shared/imagebank/tools20/salir.gif" title="Salir" alt="Salir" width="20" height="20" border="0"></a><img src="../../shared/imagebank/tools20/ayuda.gif" title="Ayuda" alt="Ayuda" width="20" height="20"></td>
  </tr>
</table>
<?php 
require_once "class_folder/sigesp_spg_c_tipomodificaciones.php";
$io_cfg = new sigesp_spg_c_tipomodificaciones();
require_once "../../shared/class_folder/class_mensajes.php";
$io_msg = new class_mensajes();
$ls_operacion = $io_fun_cfg->uf_obteneroperacion();
$ls_codtipmodpre = $io_fun_cfg->uf_obtenervalor("txtcodtipmodpre", "");
$ls_dentipmodpre = $io_fun_cfg->uf_obtenervalor("txtdentipmodpre", "");
$ls_pretipmodpre = $io_fun_cfg->uf_obtenervalor("txtpretipmodpre", "");
$ls_contipmodpre = $io_fun_cfg->uf_obtenervalor("txtcontipmodpre", "");
$ls_status = $io_fun_cfg->uf_obtenervalor("status", "");
$ls_codemp = $_SESSION["la_empresa"]["codemp"];
switch ($ls_operacion) {
    case "NUEVO":
        require_once "../../shared/class_folder/sigesp_c_generar_consecutivo.php";
        $io_keygen = new sigesp_c_generar_consecutivo();
        $ls_codtipmodpre = $io_keygen->uf_generar_numero_nuevo("SPG", "spg_tipomodificacion", "codtipmodpre", "SPGMOD", 4, "", "", "");
        $ls_dentipmodpre = "";
        $ls_pretipmodpre = "";
        $ls_contipmodpre = "";
        $ls_status = "";
        break;
require_once "class_folder/sigesp_scv_c_ciudad.php";
require_once "../../shared/class_folder/class_funciones_db.php";
require_once "../../shared/class_folder/class_mensajes.php";
require_once "../../shared/class_folder/sigesp_c_check_relaciones.php";
$io_conect = new sigesp_include();
$conn = $io_conect->uf_conectar();
$io_sql = new class_sql($conn);
$io_dsmun = new class_datastore();
$io_funcion = new class_funciones();
$io_scv = new sigesp_scv_c_ciudad($conn);
$io_funciondb = new class_funciones_db($conn);
$io_msg = new class_mensajes();
$io_chkrel = new sigesp_c_check_relaciones($conn);
$lb_existe = "";
$ls_operacion = $io_fun_viaticos->uf_obteneroperacion();
$ls_codpai = $io_fun_viaticos->uf_obtenervalor("cmbpais", "---");
$ls_codest = $io_fun_viaticos->uf_obtenervalor("cmbestado", "---");
$ls_codciu = $io_fun_viaticos->uf_obtenervalor("txtcodciu", "");
$ls_desciu = $io_fun_viaticos->uf_obtenervalor("txtdesciu", "");
$ls_estatus = $io_fun_viaticos->uf_obtenervalor("hidestatus", "");
$lr_datos["estado"] = $ls_codest;
$lr_datos["pais"] = $ls_codpai;
$ls_codemp = $_SESSION["la_empresa"]["codemp"];
switch ($ls_operacion) {
    case "NUEVO":
        $lb_empresa = false;
        if ($ls_codest != "---") {
            $ls_codciu = $io_scv->uf_generar_codigo($lb_empresa, $ls_codemp, 'scv_ciudades', 'codciu', $ls_codpai, $ls_codest);
            if (empty($ls_codciu)) {
                $io_msg->message($io_funciondb->is_msg_error);
            }
<?php

session_start();
require_once "../../../shared/class_folder/grid_param.php";
$io_grid = new grid_param();
require_once "../../class_folder/class_funciones_cfg.php";
$io_funciones_cfg = new class_funciones_cfg();
$li_totrows = $io_funciones_cfg->uf_obtenervalor("totrows", "1");
// Proceso a Ejecutar.
$ls_proceso = $io_funciones_cfg->uf_obtenervalor("proceso", "");
switch ($ls_proceso) {
    case "LIMPIAR":
        uf_print_detalles($li_totrows);
        break;
    case "LOADDT":
        uf_load_dt_fuentefinanciamiento();
        break;
    case "DELETE_DT":
        uf_delete_dt_fuentefinanciamiento();
        break;
}
function uf_print_detalles($ai_totrows)
{
    /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    //	     Function: uf_print_detalles
    //		   Access: private
    //	    Arguments: ai_totrows  // Total de filas a imprimir
    //	  Description: Método que imprime el grid de las Fuentes de Financiamiento.
    //	   Creado Por: Ing. Néstor Falcón.
    // Fecha Creación: 22/12/2008.								Fecha Última Modificación : 22/12/2008.
    /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  <tr>
    <td height="13" bgcolor="#FFFFFF" class="toolbar">&nbsp;</td>
  </tr>
  <tr> 
    <td height="20" bgcolor="#FFFFFF" class="toolbar"><a href="javascript:ue_guardar();"><img src="../shared/imagebank/tools20/grabar.gif" title="Guardar" alt="Grabar" width="20" height="20" border="0"></a><a href="javascript:ue_buscar();"></a><a href="javascript:ue_eliminar();"></a><a href="sigespwindow_blank.php"><img src="../shared/imagebank/tools20/salir.gif" title="Salir" alt="Salir" width="20" height="20" border="0"></a></td>
  </tr>
</table>

<?php 
require_once "class_folder/sigesp_cfg_c_correo.php";
require_once "../shared/class_folder/class_mensajes.php";
$io_cfg = new sigesp_cfg_c_correo("../");
$io_msg = new class_mensajes();
//Instanciando la clase mensajes
$ls_operacion = $io_fun_cfg->uf_obteneroperacion();
$ls_msjenvio = $io_fun_cfg->uf_obtenervalor("rdmsjenvio", 0);
$ls_msjsmtp = $io_fun_cfg->uf_obtenervalor("rdmsjsmtp", 0);
$ls_msjservidor = $io_fun_cfg->uf_obtenervalor("txtmsjservidor", "");
$ls_msjpuerto = $io_fun_cfg->uf_obtenervalor("txtmsjpuerto", "");
$ls_msjhtml = $io_fun_cfg->uf_obtenervalor("rdmsjhtml", 0);
$ls_msjremitente = $io_fun_cfg->uf_obtenervalor("txtmsjremitente", "");
switch ($ls_operacion) {
    case "NUEVO":
        $lb_valido = $io_cfg->uf_load_configuracion_correo($ls_msjenvio, $ls_msjsmtp, $ls_msjservidor, $ls_msjpuerto, $ls_msjhtml, $ls_msjremitente);
        break;
    case "GUARDAR":
        $lb_valido = $io_cfg->uf_guardar($ls_msjenvio, $ls_msjsmtp, $ls_msjservidor, $ls_msjpuerto, $ls_msjhtml, $ls_msjremitente, $la_seguridad);
        if ($lb_valido) {
            $lb_valido = $io_cfg->uf_load_configuracion_correo($ls_msjenvio, $ls_msjsmtp, $ls_msjservidor, $ls_msjpuerto, $ls_msjhtml, $ls_msjremitente);
        }
        break;
    <td height="20" bgcolor="#E7E7E7" class="cd-menu"><script type="text/javascript" language="JavaScript1.2" src="js/menu.js"></script></td>
  </tr>
  <tr>
    <td height="13" class="toolbar">&nbsp;</td>
  </tr>
  <tr>
    <td height="20" class="toolbar"><div align="left"><a href="javascript: ue_nuevo();"><img src="../../shared/imagebank/tools20/nuevo.gif" title="Nuevo" alt="Nuevo" width="20" height="20" border="0"></a><a href="javascript: ue_guardar();"><img src="../../shared/imagebank/tools20/grabar.gif" title="Guardar" alt="Grabar" width="20" height="20" border="0"></a><a href="javascript: ue_buscar();"><img src="../../shared/imagebank/tools20/buscar.gif" title="Buscar" alt="Buscar" width="20" height="20" border="0"></a><a href="javascript: ue_eliminar();"><img src="../../shared/imagebank/tools20/eliminar.gif" title="Eliminar" alt="Eliminar" width="20" height="20" border="0"></a><a href="javascript: ue_cerrar();"><img src="../../shared/imagebank/tools20/salir.gif" title="Salir" alt="Salir" width="20" height="20" border="0"></a></div>      
    <div align="center"></div>      <div align="center"></div>      <div align="center"></div>      <div align="center"></div></td>
  </tr>
</table>
<?php 
require_once "../../shared/class_folder/class_mensajes.php";
require_once "sigesp_scb_c_tipofondo.php";
$io_cfg = new sigesp_scb_c_tipofondo();
$ls_operacion = $io_fun_cfg->uf_obteneroperacion();
$ls_codtipfon = $io_fun_cfg->uf_obtenervalor("txtcodtipfon", "");
$ls_dentipfon = $io_fun_cfg->uf_obtenervalor("txtdentipfon", "");
$li_porrepfon = $io_fun_cfg->uf_obtenervalor("txtporrepfon", "0,00");
$ls_status = $io_fun_cfg->uf_obtenervalor("status", "N");
switch ($ls_operacion) {
    case "NUEVO":
        require_once "../../shared/class_folder/sigesp_c_generar_consecutivo.php";
        $io_keygen = new sigesp_c_generar_consecutivo();
        $ls_codtipfon = $io_keygen->uf_generar_numero_nuevo("CFG", "scb_tipofondo", "codtipfon", "CFGSCB", 4, "", "", "");
        $ls_dentipfon = "";
        $li_porrepfon = "0,00";
        $ls_status = "N";
        break;
    case "GUARDAR":
        $lb_valido = $io_cfg->uf_guardar($ls_status, &$ls_codtipfon, $ls_dentipfon, $li_porrepfon, $la_seguridad);
        if ($lb_valido) {
function uf_cargar_dt($i)
{
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    //	     Function: uf_limpiarvariables
    //		   Access: private
    //	  Description: Función que limpia todas las variables necesarias en la página
    //	   Creado Por: María Beatriz Unda
    // Fecha Creación: 27/11/2007 								Fecha Última Modificación :
    ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    global $ls_txtdesbd, $ls_codestpro, $ls_estclapre;
    $ls_txtdesbd = $_POST["txtdesbd" . $i];
    $ls_codestpro = $_POST["txtcodestpre" . $i];
    $ls_estclapre = $_POST["txtestcla" . $i];
}
if ($ls_operacion == "BLANQUEAR") {
    $li_totrows = $io_fun_cfg->uf_obtenervalor("totalfilas", 1);
    $ls_codestpro = $_POST["txtcodestpre1"];
    $ls_bd = $_POST["txtbd"];
    $ls_estcla = $_POST["txtestcla"];
    $li_fila = $_POST["filaaux"];
    for ($i = 1; $i <= $li_totrows; $i++) {
        //Object que contiene los objetos y valores	iniciales del grid.
        $object[$i][1] = "<input type=text  name=txtdesbd" . $i . "      id=txtdesbd" . $i . "     value=''  class=sin-borde style=text-align:center size=40 readonly onKeyPress=return keyRestrict(event,'1234567890'+'abcdefghijklmnñopqrstuvwxyz');>";
        $object[$i][2] = "<input type=text  name=txtcodestpre" . $i . "  id=txtcodestpre" . $i . " value=''  class=sin-borde style=text-align:left   size=40 readonly maxlength=254>";
        $object[$i][3] = "<input type=text  name=txtestcla" . $i . "     id=txtestcla" . $i . "    value=''  class=sin-borde style=text-align:center size=40 readonly>";
        $object[$i][4] = "<a href=javascript:uf_delete_dt('" . $i . "');><img src=../shared/imagebank/tools15/eliminar.gif alt=Cancelar Registro de Detalle Presupuestario width=15 height=15 border=0></a>";
    }
    for ($i = $li_totrows; $i > $li_fila; $i--) {
        $object[$i][1] = "<input type=text  name=txtdesbd" . $i . "      value=''  id=txtdesbd" . $i . "     class=sin-borde style=text-align:center size=40 readonly>";
        $object[$i][2] = "<input type=text  name=txtcodestpre" . $i . "  value=''  id=txtcodestpre" . $i . " class=sin-borde style=text-align:left   size=40 readonly maxlength=254 >";
        $object[$i][3] = "<input type=text  name=txtestcla" . $i . "     value=''  id=txtestcla" . $i . "    class=sin-borde style=text-align:center size=40 readonly>";
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//uf_limpiarvariables();
if($ls_operacion=="NUEVO")
{
    uf_limpiarvariables();
    $ls_codigo   = $fun_db->uf_generar_codigo(false,"","sigesp_ctrl_numero","id");
}
 if ($ls_operacion=="GUARDAR")
	{ 
		/*  list($lb_existe,$ls_existe)=$io_ctrl_numero->uf_verificar_procede($ls_empresa,$ls_prefijo,$lr_datos["codsis"] ,$ls_logusr);
		   if($ls_existe=='0')
		   {*/
		    $la_estasig=$io_cfs->uf_obtenervalor("txtasignados",""); 
			$la_estdisp=$io_cfs->uf_obtenervalor("txtdisponibles","");
			$li_conasig=count($la_estasig); 
			$li_condisp=count($la_estdisp);
			$ls_codproc = $lr_datos["codsis"];
			if(!empty($la_estasig))
			{
				for($li_i=0;$li_i<$li_conasig;$li_i++)
				{ 
					 $ls_codusu=$la_estasig[$li_i];   
					 list($lb_valido,$ls_codsis)=$io_ctrl_numero->uf_buscar_campo("sigesp_procedencias","codsis"," procede='".$ls_codproc."'");
					 $lb_existe=$io_ctrl_numero->uf_select_ctrl_numero($ls_empresa,$ls_codsis,$ls_codproc,$ls_codusu);
					 if (!$lb_existe)
					 {    
						$lb_valido = $io_ctrl_numero->uf_guardar_ctrl_numero($lr_datos,$ls_codusu,$ls_codsis,$la_seguridad);
					 } 
//-----------------------------------------------------------------------------------------------------------------------------------
// Clase donde se cargan todos los catálogos del sistema CFG con la utilización del AJAX
//-----------------------------------------------------------------------------------------------------------------------------------
session_start();
require_once "class_funciones_cfg.php";
$io_funciones_cfg = new class_funciones_cfg();
if (isset($_SESSION["la_empresa"])) {
    $li_estmodest = $_SESSION["la_empresa"]["estmodest"];
    $li_loncodestpro1 = $_SESSION["la_empresa"]["loncodestpro1"];
    $li_loncodestpro2 = $_SESSION["la_empresa"]["loncodestpro2"];
    $li_loncodestpro3 = $_SESSION["la_empresa"]["loncodestpro3"];
    $li_loncodestpro4 = $_SESSION["la_empresa"]["loncodestpro4"];
    $li_loncodestpro5 = $_SESSION["la_empresa"]["loncodestpro5"];
}
// Tipo del catalogo que se requiere pintar
$ls_catalogo = $io_funciones_cfg->uf_obtenervalor("catalogo", "");
switch ($ls_catalogo) {
    case "CODESTPRO1":
        uf_print_codestpro1();
        break;
    case "CODESTPRO2":
        uf_print_codestpro2();
        break;
    case "CODESTPRO3":
        uf_print_codestpro3();
        break;
    case "CODESTPRO4":
        uf_print_codestpro4();
        break;
    case "CODESTPRO5":
        uf_print_codestpro5();