session_start();
include("../lib.proy.php");
include("../lib.proy.02.php");
require_once ('../config.php');
switch($_SESSION['tipo_usr'])
{
case 'director':
$conexion=conectar("direc" ,"5j9j1k09");
$academico=chequeo_priv("gestion_datos_centro");
break;
case 'editorial':
$conexion=conectar("edit" ,"5j9j1k09");
$academico=chequeo_priv("gestion_datos_editorial");
break;
case 'junta':
$conexion=conectar("junta" ,"5j9j1k09");
$academico=chequeo_priv("gestion_datos_editorial");
break;
}
?>
OpenTable('AnaTex','Verbos','../../');
echo "
";
echo '";
echo "
";
if(isset($_POST['accion2']) AND $_POST['accion2']=='Borrar')
{
$borrar="delete from raices where id_raiz=".$_POST['id_raiz_a'];
$in=pg_exec($conexion,$borrar);
}
if(isset($_POST['accion2']) AND $_POST['accion2']=='Modificar')
{
$sel_raiz="select raiz from RAICES where id_raiz=".$_POST['id_raiz_a'];
$tabla_raiz=guardar_select_tabla($conexion,$sel_raiz,$num_raiz);
if($tabla_raiz[0][0]!=$_POST['raiz'])
{
$sel_raiz2="select raiz from raices where id_verbo='".$_POST['id_verbo']."' AND raiz='".$_POST['raiz']."'";
$tabla_raiz2=guardar_select_tabla($conexion,$sel_raiz2,$num_raiz2);
if($num_raiz2==0)
{
$modifica="update raices set raiz='".$_POST['raiz']."' where id_verbo=".$_POST['id_verbo']." AND id_raiz=".$_POST['id_raiz_a'];
$in=pg_exec($conexion,$modifica);
}
else
{
?>
}
}
}
if(isset($_POST['accion2']) AND $_POST['accion2']=='Insertar')
{
$sel_raiz="select raiz from raices where id_verbo='".$_POST['id_verbo']."' AND raiz='".$_POST['raiz']."'";
$tabla_raiz=guardar_select_tabla($conexion,$sel_raiz,$num_raiz);
if($num_raiz==0)
{
$insert="insert into raices (raiz, id_verbo) values('".$_POST['raiz']."','".$_POST['id_verbo']."')";
$in=pg_exec($conexion,$insert);
}
else
{
?>
}
}
if($_POST['accion']=="Gestionar raíces" OR isset($_POST['accion2']))
{
echo "
";
echo "";
echo "
";
}
CloseTable();
?>
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.