Example #1
0
function site()
{
    $tituloBtn = tituloBtnPn("<span>Admistración</span><p>DEL SISTEMA</p><div class='bicel'></div>", "", "200px", "TituloA");
    $menu = "Desarrollo]" . $enlace . "?accionDA=CreacionTipoDato]panelB-R}";
    $menu .= "Inventarios]" . $enlace . "?TipoCampoHtml=Lista]panelB-R}";
    $menu .= "Ventas]" . $enlace . "?TipoCampoHtml=Lista]panelB-R}";
    $menu .= "Campus]" . $enlace . "?TipoCampoHtml=Lista]panelB-R}";
    // $menu .= "Site Map]mapa-sitio.php]divB}";
    $mv = menuVertical($menu, 'menu3');
    $s = layoutLH("", $tituloBtn . $mv);
    return $s;
}
function datosAlternos($parm)
{
    global $vConex, $enlace;
    if ($parm == "DAlternos") {
        $pestanas = getPestanasHtml($enlace, 'datosalternos');
        $tituloBtn = Titulo("<span>Configuraci&oacute;n</span><p>DEL SISTEMA</p><div class='bicel'></div>", "", "200px", "TituloA");
        // $tituloBtn = Titulo("<span>Administrador </span><p>DE GESTIÓN</p><div class='bicel'></div>","","200px","TituloA");
        $menu = "<i class='icon-edit'></i>Menu Empresa]" . $enlace . "?MenuPerfil=Listado]panelB-R}";
        $menu .= "<i class='icon-edit'></i>Crear Empresa]./_vistas/gad_empresas.php?CrearEmpresa=ListarEmpresa]panelB-R}";
        $menu .= "<i class='icon-edit'></i>Master]" . $enlace . "?MenuPerfil=updtaePerflMaster]panelB-R}";
        $menu .= "<i class='icon-edit'></i>Perfiles Sys]" . $enlace . "?MenuPerfil=PerfilSysView]panelB-R}";
        $menu .= "<i class='icon-edit'></i>Perfiles x Empresa]" . $enlace . "?MenuPerfil=PerfilSys]panelB-R}";
        $menu .= "<i class='icon-edit'></i>Eliminar Menus Fallidos]" . $enlace . "?MenuPerfil=PerfilDelete]panelB-R}";
        $menu .= "<i class='icon-edit'></i>Videoconferencia]./_vistas/gad_admin_videoconferencia.php?Main=Listado]panelB-R}";
        $menu .= "<i class='icon-cog'></i>Tipo de Datos]" . $enlace . "?accionDA=CreacionTipoDato]panelB-R}";
        $menu .= "<i class='icon-cog'></i>Tipo Campo Html]" . $enlace . "?TipoCampoHtml=Lista]panelB-R}";
        $menu .= "<i class='icon-cog'></i>Base de Datos]" . $enlace . "?BDatos=Lista]panelB-R}";
        // $menu .= "<i class='icon-cog'></i>Archivo de Trabajo]" . $enlace . "?FTrabajo=Lista]panelB-R}";
        // $menu .= "<i class='icon-cog'></i> Anuncios]./_vistas/procesos_temporales.php?ActualizaAnuncio=Listado]panelB-R}";
        // $menu .= "<i class='icon-cog'></i> Sectores]" . $enlace . "?accionDA=Sectores]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Eliminar Usuario]" . $enlace . "?accionDA=Usuarios]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Cambiar Usuario]" . $enlace . "?accionDA=CambiarUsuarios]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Eliminar Matricula]" . $enlace . "?accionDA=Matriculas]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Eliminar Programa E- Almacen]./_vistas/gad_Admin_productos.php?PanelAdmin=EliminaPrograma]panelB-R}";
        // $menu .= "<i class='icon-cog'></i> Eliminar Programa Curso - Almacen]./_vistas/gad_Admin_productos.php?PanelAdmin=EliminaPrograma]panelB-R}";
        // $menu .= "<i class='icon-cog'></i> Eliminar Matricula]" . $enlace . "?accionDA=Matriculas]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Eliminar Programa]" . $enlace . "?accionDA=Programa]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Eliminar Curso]" . $enlace . "?accionDA=Curso]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Crear Tema (color) ]./_vistas/gad_empresas.php?CrearEmpresa=CrearTemaColor]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Eliminar UsuarioEbook]" . $enlace . "?accionDA=EliminarEbook]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Reporte Usuarios Matriculados]" . $enlace . "?accionDA=ReporteMatriculas]panelB-R}";
        $mv = menuVertical($menu, 'menu4', '');
        $s = layoutLH($pestanas, $tituloBtn . $mv, '');
    }
    if ($parm == "DMaestros") {
        $pestanas = getPestanasHtml($enlace, 'datosmaestros');
        $tituloBtn = Titulo("<span>Configuraci&oacute;n</span><p>DATOS MAESTROS</p><div class='bicel'></div>", "", "200px", "TituloA");
        $menu .= "<i class='icon-cog'></i> Paises]" . $enlace . "?accionDA=Paises]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Departamentos]" . $enlace . "?accionDA=Departamentos]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Empresas]" . $enlace . "?accionDA=Empresas]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Categorias]" . $enlace . "?accionDA=Categorias]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Sectores]" . $enlace . "?accionDA=TipoSectores]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Tipo Evaluación]" . $enlace . "?accionDA=TipoEvaluacion]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Moneda]" . $enlace . "?accionDA=Moneda]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Tipo Producto]" . $enlace . "?accionDA=TipoProducto]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Tipo Pregunta]" . $enlace . "?accionDA=TipoPregunta]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Servidores Video Conferencia]" . $enlace . "?accionDA=ServerVC]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Areas]" . $enlace . "?accionDA=Area]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Reclamo Atencion]" . $enlace . "?accionDA=Reclamo]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Tutoriales]{$enlace}?Tutorial=view]panelB-R}";
        $menu .= "<i class='icon-cog'></i> Soporte Master]{$enlace}?Soporte=view]panelB-R}";
        ////////////////////////////////-----------------------
        $menu .= "<i class='icon-cog'></i> Tipos de Proyectos]{$enlace}?TipoProyectos=Tipos]panelB-R}";
        $mv = menuVertical($menu, 'menu4');
        $s = layoutLH($pestanas, $tituloBtn . $mv);
    }
    if ($parm == "ReporteMatriculas") {
        $sql = "select TipoAccesoMatricula AS 'Tipo de Acceso Matricula',count(*) AS 'Usuarios',TipoAccesoMatricula as CodigoAjax from matriculas\n        where TipoAccesoMatricula IN ('Programa','Ebook')\n        group by  TipoAccesoMatricula";
        $suma = "select(select count(*) AS 'Usuarios' from matriculas\n        where TipoAccesoMatricula IN ('Programa','Ebook')\n        )as Total  ";
        $ftchO = fetchOne($suma);
        $Total = $ftchO->Total;
        $ftch = fetchAll($sql);
        $ftchC = count($ftch);
        $Url_Raiz_Link = "{$enlace}?accionDA=ReporteMatriculasDetalle&CantUsuarios={$CantUsuarios}";
        $Url_Add_Link = array("CodigoAjax" => "TipoAccesoMatricula", "Usuarios" => "Usuarios");
        $Panel_Destino = 'panelB-R';
        $reporte = ListR("", $sql, $vConex, 'reporteA', 'd,d', $Url_Raiz_Link, $Url_Add_Link, $Panel_Destino);
        $subMenu = tituloBtnPn("<label style='color:#9E9E9E;font-weight: bold;'>{$Total}</label><p>Usuarios Matriculados</p><div class='bicel'></div>", null, "auto", "TituloA");
        $s = PanelUnico($subMenu, $reporte, 'panelB-R2', '500px');
    }
    if ($parm == "ReporteMatriculasDetalle") {
        $TipoAccesoMatricula = get('TipoAccesoMatricula');
        $usuarios = get('Usuarios');
        $sql = "select Cliente,Producto,Entidad,FechaInscripcion from matriculas where TipoAccesoMatricula='{$TipoAccesoMatricula}'\n        order by Entidad desc";
        $btn = "Retornar]{$enlace}?accionDA=ReporteMatriculas]panelB-R}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("<label style='color:#9E9E9E;font-weight: bold;'>{$usuarios}</label><br></label></label><span>Usuarios por </span><p>{$TipoAccesoMatricula}</p><div class='bicel'></div>", $btn, "auto", "TituloA");
        $Url_Raiz_Link = "{$enlace}?accionDA=ReporteMatriculasDetalle&CantUsuarios={$CantUsuarios}";
        $Url_Add_Link = array("CodigoAjax" => "TipoAccesoMatricula", "Usuarios" => "Usuarios");
        $Panel_Destino = 'panelB-R';
        $reporte = ListR("", $sql, $vConex, 'reporteA', 'd,d,d,d', $Url_Raiz_Link, $Url_Add_Link, $Panel_Destino);
        $cab = PanelUnico($subMenu, $reporte, 'panelB-R2', '500px');
        $s = layoutV($cab, 'panelB-R2');
    }
    if ($parm == "CreacionTipoDato") {
        $btn = "Crea Tipo]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>TIPOS DE CAMPOS</p>", $btn, "100px", "TituloA");
        $sql = 'SELECT Codigo, Descripcion, Codigo AS CodigoAjax FROM sys_tipo_input ';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=editaReg";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        // $path = array('Imagen' => '../_files/','ImagenMarca' => '../_files/');
        $uRLForm = "Guardar]" . $enlace . "?metodo=sys_tipo_input&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear tipo de campo";
        $form = c_form($titulo, $vConex, "sys_tipo_input", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "editaReg") {
        $codigo = get("codigoSys_tipo_input");
        // $btn = "Crea Tipo]Abrir]panel-FloatB}";
        // $btn = Botones($btn,'botones1');
        $subMenu = tituloBtnPn("Editar Registro", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=sys_tipo_input&transaccion=UPDATE&codigo=" . $codigo . "]panelB-R]F]}";
        $uRLForm .= "Eliminar]" . $enlace . "?metodo=sys_tipo_input&transaccion=DELETE&codigo=" . $codigo . "]panelB-R]]}";
        $form = c_form($titulo, $vConex, "sys_tipo_input", "CuadroA", $path, $uRLForm, "'" . $codigo . "'", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    #########
    if ($parm == "Usuarios") {
        $subMenu = tituloBtnPn("Eliminar Usuario", $btn, "100px", "TituloA");
        $uRLForm = "Eliminar]" . $enlace . "?metodo=usuarios&transaccion=DELETE]panelB-R]F]}";
        $form = c_form_adp($titulo . $btn, $vConex, "del_usuarios", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'CodPrograma');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "EliminarEbook") {
        $subMenu = tituloBtnPn("Eliminar Usuario - Ebook", $btn, "100px", "TituloA");
        $uRLForm = "Eliminar]" . $enlace . "?metodo=EliminarEbook&transaccion=DELETE]panelB-R]F]}";
        $form = c_form_adp($titulo . $btn, $vConex, "del_EbookEiminar", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'CodPrograma');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    #########
    if ($parm == "CambiarUsuarios") {
        $subMenu = tituloBtnPn("Modificar Usuario", $btn, "100px", "TituloA");
        $uRLForm = "Modificar]" . $enlace . "?metodo=Cambiarusuarios&transaccion=UPDATE]panelB-R]F]}";
        $form = c_form_adp($titulo . $btn, $vConex, "FUpdateUsuarios", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'CodPrograma');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    #########
    if ($parm == "Matriculas") {
        $subMenu = tituloBtnPn("Eliminar Matriculas", $btn, "100px", "TituloA");
        $uRLForm = "Eliminar]" . $enlace . "?metodo=matriculas&transaccion=DELETE]panelB-R]F]}";
        $form = c_form_adp($titulo . $btn, $vConex, "del_matriculas", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'IdMatricula');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    ########
    ########
    if ($parm == "Programa") {
        $subMenu = tituloBtnPn("Eliminar Programa", $btn, "100px", "TituloA");
        $uRLForm = "Eliminar]" . $enlace . "?metodo=programa&transaccion=DELETE]panelB-R]F]}";
        $form = c_form_adp($titulo . $btn, $vConex, "FElimprograma", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'CodPrograma');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    ########
    if ($parm == "Curso") {
        $subMenu = tituloBtnPn("Eliminar Curso", $btn, "100px", "TituloA");
        $uRLForm = "Eliminar]" . $enlace . "?metodo=curso&transaccion=DELETE]panelB-R]F]}";
        $form = c_form_adp($titulo . $btn, $vConex, "FElimcurso", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'CodCursos');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    #########
    if ($parm == "TipoSectores") {
        $subMenu = tituloBtnPn("Listado <p>DE PROGRAMAS</p>", $btn, "100px", "TituloA");
        $sql = 'SELECT IdSectores AS Codigo,Descripcion AS Nombre, TipoInterface,  IdSectores AS CodigoAjax FROM sectores 
        ORDER BY Codigo';
        /*
         $sql = '  SELECT AR.Titulo AS Programa,CT.Descripcion AS Categoria,TP.Descripcion AS "Tipo de Programa",SC.Descripcion AS Sector ,PR.CodPrograma AS CodigoAjax FROM almacen AS AL';
         $sql .= ' INNER JOIN articulos AS AR  ON AR.Producto = AL.Producto ';
         $sql .= ' INNER JOIN categorias AS CT  ON CT.CategoriCod = AR.Categoria ';
         $sql .= ' INNER JOIN programas AS PR ON PR.CodPrograma = AR.Productofab  ';
         $sql .= ' INNER JOIN tipoprograma AS TP ON TP.IDTipoPrograma = PR.TipoPrograma  ';
         $sql .= ' LEFT JOIN sectores AS SC ON SC.IdSectores = PR.Sector  ';
         $sql .= ' WHERE AL.TipoProducto LIKE "programa%" ';
         $sql .= ' ORDER BY Programa';
        */
        $clase = 'reporteA';
        $enlaceCod = 'IdSectores';
        $url = $enlace . "?accionDA=DetalleSector";
        $panel = 'panelB-R';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R");
    }
    if ($parm == "DetalleSector") {
        $Codigo = get("codigoSys_tipo_input");
        $subMenu = tituloBtnPn("Editar Sector", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=sector_edit&transaccion=UPDATE&Codigo=" . $Codigo . "]VpanelB-R2]F]}";
        $tSelectD = array('Sector' => 'SELECT IdSectores,Descripcion FROM sectores ORDER BY Descripcion');
        $form = c_form_adp($titulo . $btn, $vConex, "sector_edit", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'CodPrograma');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "Paises") {
        $btn = "Crear Pais]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>DE PAISES</p>", $btn, "100px", "TituloA");
        $sql = '  SELECT CodPais AS Codigo,Nombre,CodPostal AS "Codigo Postal",CodPais AS CodigoAjax FROM pais';
        $sql .= ' ORDER BY Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=DetallePaises";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $uRLForm = "Guardar]" . $enlace . "?metodo=pais_edit&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear País";
        $form = c_form($titulo, $vConex, "pais_edit", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "DetallePaises") {
        $Codigo = get("codigoSys_tipo_input");
        $subMenu = tituloBtnPn("Editar País", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=pais_edit&transaccion=UPDATE&Codigo=" . $Codigo . "]panelB-R]F]}";
        $uRLForm .= "Eliminar]" . $enlace . "?metodo=pais_edit&transaccion=DELETE&Codigo=" . $Codigo . "]panelB-R]]}";
        $form = c_form_adp($titulo . $btn, $vConex, "pais_edit", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'CodPAis');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "Departamentos") {
        $btn = "Crear Depa.]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>DE DEPARTAMENTOS</p>", $btn, "100px", "TituloA");
        $sql = '  SELECT DP.Codigo,DP.Descripcion AS Departamento,PA.Nombre AS Pais ,DP.Codigo AS CodigoAjax FROM departamentos AS DP';
        $sql .= ' INNER JOIN pais AS PA ON PA.CodPais = DP.Pais';
        $sql .= ' ORDER BY Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=DetalleDepartamentos";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $uRLForm = "Guardar]" . $enlace . "?metodo=departamento_edit&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear Departamento";
        $tSelectD = array('Pais' => 'SELECT CodPais AS Codigo,Nombre FROM pais ORDER BY Codigo');
        $form = c_form($titulo, $vConex, "departamento_edit", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "DetalleDepartamentos") {
        $Codigo = get("codigoSys_tipo_input");
        $subMenu = tituloBtnPn("Editar Departamento", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=departamento_edit&transaccion=UPDATE&Codigo=" . $Codigo . "]panelB-R]F]}";
        $uRLForm .= "Eliminar]" . $enlace . "?metodo=departamento_edit&transaccion=DELETE&Codigo=" . $Codigo . "]panelB-R]]}";
        $tSelectD = array('Pais' => 'SELECT CodPais AS Codigo,Nombre FROM pais ORDER BY Codigo');
        $form = c_form_adp($titulo . $btn, $vConex, "departamento_edit", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'Codigo');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "Empresas") {
        $subMenu = tituloBtnPn("Listado <p>DE EMPRESAS</p>", $btn, "100px", "TituloA");
        $sql = '  SELECT CodEmpresa AS Codigo,NombreEmpresa AS Empresa,PA.Nombre AS Pais,DP.Descripcion AS Departamento ,CodEmpresa AS CodigoAjax FROM empresa AS EM';
        $sql .= ' LEFT JOIN pais AS PA ON PA.CodPais = EM.Pais';
        $sql .= ' LEFT JOIN departamentos AS DP ON DP.Codigo = EM.Departamento';
        $sql .= ' ORDER BY CodEmpresa';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=DetalleEmpresas";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "DetalleEmpresas") {
        $Codigo = get("codigoSys_tipo_input");
        $subMenu = tituloBtnPn("Editar País y Departamento", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=empresa_edit&transaccion=UPDATE&Codigo=" . $Codigo . "]panelB-R]F]}";
        $tSelectD = array('Pais' => 'SELECT CodPais AS Codigo,Nombre FROM pais ORDER BY Codigo', 'Departamento' => 'SELECT Codigo,Descripcion FROM departamentos ORDER BY Codigo', 'CategoriaEmpresa' => 'SELECT IdSectores AS Codigo,Descripcion FROM sectores ORDER BY Codigo', 'TipoEmpresa' => 'SELECT IDTipoEmpresa AS Codigo,TipEmpDescripcion FROM tipoempresa ORDER BY Codigo', 'Categoria' => 'SELECT CategoriCod AS Codigo,Descripcion FROM categorias ORDER BY Codigo');
        $form = c_form_adp($titulo . $btn, $vConex, "empresa_edit", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'CodEmpresa');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "Categorias") {
        $btn = "Crea_Categoria]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>DE CATEGORIAS</p>", $btn, "100px", "TituloA");
        $sql = '  SELECT CategoriCod AS Codigo,Descripcion AS Nombre, TipoInterface , Orden,CategoriCod AS CodigoAjax FROM categorias';
        $sql .= ' ORDER BY Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=DetalleCategorias";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $uRLForm = "Guardar]" . $enlace . "?metodo=categoria_edit&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear Categoria";
        $form = c_form($titulo, $vConex, "categoria_edit", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "DetalleCategorias") {
        $Codigo = get("codigoSys_tipo_input");
        $subMenu = tituloBtnPn("Editar Categoria", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=categoria_edit&transaccion=UPDATE&Codigo=" . $Codigo . "]panelB-R]F]}";
        $uRLForm .= "Eliminar]" . $enlace . "?metodo=categoria_edit&transaccion=DELETE&Codigo=" . $Codigo . "]panelB-R]]}";
        $form = c_form_adp($titulo . $btn, $vConex, "categoria_edit", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'CategoriCod');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "TipoSectores") {
        $btn = "Crear_Sector]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>DE SECTORES</p>", $btn, "100px", "TituloA");
        $sql2 = '  SELECT IdSectores AS Codigo,Descripcion AS Nombre, TipoInterface, Orden,IdSectores AS CodigoAjax FROM sectores';
        $sql2 .= ' ORDER BY Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=DetalleTipoSectores";
        $panel = 'panelB-R';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $uRLForm = "Guardar]" . $enlace . "?metodo=sectores_edit&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear Sector";
        $form = c_form($titulo, $vConex, "sectores_edit", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R");
    }
    if ($parm == "DetalleTipoSectores") {
        $Codigo = get("codigoSys_tipo_input");
        $subMenu = tituloBtnPn("Editar Sector", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=sectores_edit&transaccion=UPDATE&Codigo=" . $Codigo . "]panelB-R]F]}";
        $uRLForm .= "Eliminar]" . $enlace . "?metodo=sectores_edit&transaccion=DELETE&Codigo=" . $Codigo . "]panelB-R]]}";
        $form = c_form_adp($titulo . $btn, $vConex, "sectores_edit", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'IdSectores');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "TipoProducto") {
        $btn = "Crear Tipo]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Tipo <p>DE PRODUCTOS</p>", $btn, "100px", "TituloA");
        $sql = '  SELECT TipoProductoId AS Codigo,Descripcion AS Nombre, TipoInterface, Orden,TipoProductoId AS CodigoAjax FROM tipoproducto';
        $sql .= ' ORDER BY Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigo_tipoproducto';
        $url = $enlace . "?accionDA=TipoProducto_edit";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        //W($);
        $uRLForm = "Guardar]" . $enlace . "?metodo=tipoproducto_edit&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear Tipo de Producto";
        $form = c_form_adp($titulo, $vConex, "tipoproducto_edit", "CuadroA", $path, $uRLForm, "", $tSelectD, 'TipoProductoId');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "TipoProducto_edit") {
        $Codigo = get("codigo_tipoproducto");
        //WE( $Codigo);
        $subMenu = tituloBtnPn("Editar Sector", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=tipoproducto_edit&transaccion=UPDATE&Codigo=" . $Codigo . "]panelB-R]F]}";
        $uRLForm .= "Eliminar]" . $enlace . "?metodo=tipoproducto_edit&transaccion=DELETE&Codigo=" . $Codigo . "]panelB-R]]}";
        $form = c_form_adp($titulo . $btn, $vConex, "tipoproducto_edit", "CuadroA", $path, $uRLForm, "'" . $Codigo . "'", $tSelectD, 'TipoProductoId');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "TipoPregunta") {
        $btn = "Crear Tipo]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Tipo <p>DE PREGUNTAS</p>", $btn, "100px", "TituloA");
        $sql = '  SELECT Codigo, Descripcion FROM tipo_pregunta';
        $sql .= ' ORDER BY Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigo_tipo_pregunta_edit';
        $url = $enlace . "?accionDA=TipoPregunta_edit";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $uRLForm = "Guardar]" . $enlace . "?metodo=tipo_pregunta_edit&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear Tipo de Producto";
        $form = c_form_adp($titulo, $vConex, "tipo_pregunta_edit", "CuadroA", $path, $uRLForm, "", $tSelectD, 'Codigo');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "TipoPregunta_edit") {
        $Codigo = get("codigo_tipo_pregunta_edit");
        $subMenu = tituloBtnPn("Editar Sector", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=tipo_pregunta_edit&transaccion=UPDATE&Codigo=" . $Codigo . "]panelB-R]F]}";
        $uRLForm .= "Eliminar]" . $enlace . "?metodo=tipo_pregunta_edit&transaccion=DELETE&Codigo=" . $Codigo . "]panelB-R]]}";
        $form = c_form_adp($titulo . $btn, $vConex, "tipo_pregunta_edit", "CuadroA", $path, $uRLForm, "'" . $Codigo . "'", $tSelectD, 'Codigo');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "ServerVC") {
        $btn = "Agregar]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Maestro de Servidores <p>Video Conferencia</p>", $btn, "100px", "TituloA");
        $sql = "SELECT Codigo as CodigoAjax,Descripcion,CantSalas 'Cant. Sala',CantUsuarioSala 'Usuarios por Sala',IpServidor,Dominio\n                FROM vc_maestroservidor\n                ORDER BY Codigo";
        $clase = 'reporteA';
        $enlaceCod = 'codvcmaestroservidor';
        $url = "{$enlace}?accionDA=ServerVC_edit";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'Codigo', '', '');
        $uRLForm = "Guardar]{$enlace}?metodo=vcmaestroservidor&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Agregar Servidor de Video Conferencia";
        $form = c_form_adp($titulo, $vConex, "vc_maestroservidor", "CuadroA", $path, $uRLForm, "", $tSelectD, 'Codigo');
        $form = "<div style='width:400px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "ServerVC_edit") {
        $Codigo = get("codvcmaestroservidor");
        $subMenu = tituloBtnPn("Editar Servidor", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]{$enlace}?metodo=vcmaestroservidor&transaccion=UPDATE&Codigo={$Codigo}]panelB-R]F]}";
        $uRLForm .= "Eliminar]{$enlace}?metodo=vcmaestroservidor&transaccion=DELETE&Codigo={$Codigo}]panelB-R]]}";
        $form = c_form_adp($titulo . $btn, $vConex, "vc_maestroservidor", "CuadroA", $path, $uRLForm, "'" . $Codigo . "'", $tSelectD, 'Codigo');
        $form = "<div style='width:500px;'>{$form}</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "TipoEvaluacion") {
        $btn = "Crear Tipo Evaluación]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>DE TIPO EVALUACIÓN</p>", $btn, "100px", "TituloA");
        $sql = '  SELECT Codigo,Tipo,Concepto,Codigo AS CodigoAjax FROM elevaluaciontipo';
        $sql .= ' ORDER BY Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=DetalleTipoEvaluacion";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $uRLForm = "Guardar]" . $enlace . "?metodo=tipoevaluacion_edit&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear Tipo Evaluación";
        $form = c_form($titulo, $vConex, "tipoevaluacion_edit", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "DetalleTipoEvaluacion") {
        $Codigo = get("codigoSys_tipo_input");
        $subMenu = tituloBtnPn("Editar Tipo Evaluación", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=tipoevaluacion_edit&transaccion=UPDATE&Codigo=" . $Codigo . "]panelB-R]F]}";
        $uRLForm .= "Eliminar]" . $enlace . "?metodo=tipoevaluacion_edit&transaccion=DELETE&Codigo=" . $Codigo . "]panelB-R]]}";
        $form = c_form_adp($titulo . $btn, $vConex, "tipoevaluacion_edit", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'Codigo');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "Moneda") {
        $btn = "Crear Tipo Moneda]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>DE TIPO DE MONEDAS</p>", $btn, "100px", "TituloA");
        $sql = '  SELECT Codigo,Descripcion,Codigo AS CodigoAjax FROM moneda';
        $sql .= ' ORDER BY Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=DetalleMoneda";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $uRLForm = "Guardar]" . $enlace . "?metodo=moneda_edit&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear Tipo Moneda";
        $form = c_form($titulo, $vConex, "moneda_edit", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "DetalleMoneda") {
        $Codigo = get('codigoSys_tipo_input');
        $CodigoA = $Codigo;
        $Codigo = "'{$Codigo}'";
        $subMenu = tituloBtnPn("Editar Tipo Moneda", $btn, "100px", "TituloA");
        $uRLForm = 'Actualizar]' . $enlace . '?metodo=moneda_edit&transaccion=UPDATE&Codigo=' . $CodigoA . ']panelB-R]F]}';
        $uRLForm .= 'Eliminar]' . $enlace . '?metodo=moneda_edit&transaccion=DELETE&Codigo=' . $CodigoA . ']panelB-R]]}';
        $form = c_form_adp($titulo . $btn, $vConex, "moneda_edit", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'Codigo');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "Area") {
        $btn = "Crear Area]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>DE AREAS</p>", $btn, "120px", "TituloA");
        $sql = '  SELECT Descripcion,InterfazUso,Codigo AS CodigoAjax FROM ga_area WHERE EntidadCreadora = "Sys" ';
        $sql .= ' ORDER BY Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=DetalleArea";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $uRLForm = "Guardar]" . $enlace . "?metodo=ga_area&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear Area";
        $form = c_form($titulo, $vConex, "ga_area", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "DetalleArea") {
        $Codigo = get('codigoSys_tipo_input');
        $CodigoA = $Codigo;
        $Codigo = "'{$Codigo}'";
        $subMenu = tituloBtnPn("Editar Tipo Area", $btn, "120px", "TituloA");
        $uRLForm = 'Actualizar]' . $enlace . '?metodo=ga_area&transaccion=UPDATE&Codigo=' . $CodigoA . ']panelB-R]F]}';
        $uRLForm .= 'Eliminar]' . $enlace . '?metodo=ga_area&transaccion=DELETE&Codigo=' . $CodigoA . ']panelB-R]]}';
        $form = c_form_adp($titulo . $btn, $vConex, "ga_area", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'Codigo');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    if ($parm == "Reclamo") {
        $btn = "Crear Reclamo Caso]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>DE RECLAMOS CASOS</p>", $btn, "160px", "TituloA");
        $sql = '  SELECT RR.Nombre,AA.Descripcion as Area ,RR.Descripcion,RR.Codigo AS CodigoAjax FROM reclamo_atencion_caso as RR LEFT JOIN ga_area AS AA ON AA.Codigo = RR.Area ';
        $sql .= ' ORDER BY RR.Codigo';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=DetalleReclamo";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        $tSelectD = array('Area' => 'SELECT Codigo,Descripcion FROM ga_area WHERE EntidadCreadora = "Sys" AND InterfazUso = "Reclamo" ORDER BY Codigo');
        $uRLForm = "Guardar]" . $enlace . "?metodo=reclamo_atencion_caso&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear Reclamo Caso";
        $form = c_form($titulo, $vConex, "reclamo_atencion_caso", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "DetalleReclamo") {
        $Codigo = get('codigoSys_tipo_input');
        $CodigoA = $Codigo;
        $Codigo = "'{$Codigo}'";
        $subMenu = tituloBtnPn("Editar Reclamo Caso", $btn, "120px", "TituloA");
        $uRLForm = 'Actualizar]' . $enlace . '?metodo=reclamo_atencion_caso&transaccion=UPDATE&Codigo=' . $CodigoA . ']panelB-R]F]}';
        $uRLForm .= 'Eliminar]' . $enlace . '?metodo=reclamo_atencion_caso&transaccion=DELETE&Codigo=' . $CodigoA . ']panelB-R]]}';
        $tSelectD = array('Area' => 'SELECT Codigo,Descripcion FROM ga_area WHERE EntidadCreadora = "Sys" AND InterfazUso = "Reclamo" ORDER BY Codigo');
        $form = c_form_adp($titulo . $btn, $vConex, "reclamo_atencion_caso", "CuadroA", $path, $uRLForm, $Codigo, $tSelectD, 'Codigo');
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    WE($s);
}
function datosAlternos($parm)
{
    global $vConex, $enlace;
    if ($parm == "DAlternos") {
        $menu = "Formularios]" . $enlace . "]cuerpo}";
        $menu .= "Tablas]" . $enlace . "?accionCT=tablas]cuerpo}";
        $menu .= "Datos Alternos]" . $enlace . "?datosAlternos=DAlternos]divB]Marca}";
        $mHrz = menuHorizontal($menu, 'menuV1');
        $tituloBtn = Titulo("<span>Configuración</span><p>DEL SISTEMA</p><div class='bicel'></div>", "", "200px", "TituloA");
        // $tituloBtn = Titulo("<span>Administrador </span><p>DE GESTIÓN</p><div class='bicel'></div>","","200px","TituloA");
        $menu = "<span class='edicion_site'></span>Menú Empresa]" . $enlace . "?MenuPerfil=Listado]panelB-R}";
        $menu .= "<span class='edicion_site'></span>Master]" . $enlace . "?MenuPerfil=updtaePerflMaster]panelB-R}";
        $menu .= "<span class='edicion_site'></span>Perfiles Sys]" . $enlace . "?MenuPerfil=PerfilSysView]panelB-R}";
        $menu .= "<span class='edicion_site'></span>Perfiles x Empresa]" . $enlace . "?MenuPerfil=PerfilSys]panelB-R}";
        $menu .= "<span class='edicion_site'></span>Videoconferencia]./_vistas/gad_admin_videoconferencia.php?Main=Listado]panelB-R}";
        $menu .= "<span class='icon_engranaje'></span>Tipo de Datos]" . $enlace . "?accionDA=CreacionTipoDato]panelB-R}";
        $menu .= "<span class='icon_engranaje'></span>Tipo Campo Html]" . $enlace . "?TipoCampoHtml=Lista]panelB-R}";
        $menu .= "<span class='icon_engranaje'></span>Base de Datos]" . $enlace . "?BDatos=Lista]panelB-R}";
        //$menu .= "<span class='icon_engranaje'></span>Site Map]mapa-sitio.php]divB}";
        $mv = menuVertical($menu, 'menu4');
        // $panelA = layoutV2( $mHrz . $pestanas , $tituloBtn.$mv);
        $panelA = layoutLH($mHrz . $pestanas, $tituloBtn . $mv);
        $panel = array(array('PanelA1', '100%', $panelA));
        $s = LayoutPage($panel);
    }
    if ($parm == "CreacionTipoDato") {
        $btn = "Crea Tipo]Abrir]panel-FloatB}";
        $btn = Botones($btn, 'botones1');
        $subMenu = tituloBtnPn("Listado <p>TIPOS DE CAMPOS</p>", $btn, "100px", "TituloA");
        $sql = 'SELECT Codigo, Descripcion, Codigo AS CodigoAjax FROM sys_tipo_input ';
        $clase = 'reporteA';
        $enlaceCod = 'codigoSys_tipo_input';
        $url = $enlace . "?accionDA=editaReg";
        $panel = 'panelB-R2';
        $reporte = ListR2($titulo, $sql, $vConex, $clase, '', $url, $enlaceCod, $panel, 'sys_tipo_inputB', '');
        // $path = array('Imagen' => '../_files/','ImagenMarca' => '../_files/');
        $uRLForm = "Guardar]" . $enlace . "?metodo=sys_tipo_input&transaccion=INSERT]panelB-R]F]panel-FloatB}";
        $titulo = "Crear tipo de campo";
        $form = c_form($titulo, $vConex, "sys_tipo_input", "CuadroA", $path, $uRLForm, "", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $style = "left:170px;top:0px;";
        $divFloat = panelFloat($form, "panel-FloatB", $style);
        $s = layoutLSB($divFloat . $subMenu, $reporte, "panelB-R2");
    }
    if ($parm == "editaReg") {
        $codigo = get("codigoSys_tipo_input");
        // $btn = "Crea Tipo]Abrir]panel-FloatB}";
        // $btn = Botones($btn,'botones1');
        $subMenu = tituloBtnPn("Editar Registro", $btn, "100px", "TituloA");
        $uRLForm = "Actualizar]" . $enlace . "?metodo=sys_tipo_input&transaccion=UPDATE&codigo=" . $codigo . "]panelB-R]F]}";
        $uRLForm .= "Eliminar]" . $enlace . "?metodo=sys_tipo_input&transaccion=DELETE&codigo=" . $codigo . "]panelB-R]]}";
        $form = c_form($titulo, $vConex, "sys_tipo_input", "CuadroA", $path, $uRLForm, "'" . $codigo . "'", $tSelectD);
        $form = "<div style='width:500px;'>" . $form . "</div>";
        $s = layoutV($subMenu, $form);
    }
    WE($s);
}