session_start();
include("../lib.proy.php");
include("../config.php");
include("../lib.proy.02.php");
include("lib-ana_text.01.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;
case 'profesor':
$conexion=conectar("prof" ,"5j9j1k09");
$academico=chequeo_priv("programacion_aula");
break;
case 'orientador':
$conexion=conectar("orient" ,"5j9j1k09");
$academico=chequeo_priv("programacion_aula");
break;
}
OpenTable('AnaTex','AnaFra','../../');
if (!isset($_POST['PDF'])){
echo "
Escriba la frase que desee analizar y pulse el botón analizar";
echo "
";
echo "";
echo "";
echo "";
echo "
";
if(isset($_POST['texto']))
{
$sel_categorias="SELECT id_categoria,categoria FROM categorias WHERE identificador=".$_SESSION['institucion'];
$tabla_categorias = guardar_select_tabla ($conexion, $sel_categorias, $num_categorias);
for($i=0;$i<$num_categorias;$i++)
{
$sel_raices="SELECT verbos.verbo, raices.raiz from verbos, raices where verbos.id_verbo=raices.id_verbo AND verbos.id_categoria=".$tabla_categorias[$i][0];
$tabla_aguja = guardar_select_tabla ($conexion, $sel_raices, $num_agujas);
Analizar($tabla_aguja,$_POST['texto'],$num_agujas,$tabla_categorias[$i][1]);
}
?>
}
}
else{
?>
}
CloseTable();
?>
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.