summaryrefslogtreecommitdiffstats
path: root/admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php
diff options
context:
space:
mode:
Diffstat (limited to 'admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php')
-rw-r--r--admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php157
1 files changed, 157 insertions, 0 deletions
diff --git a/admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php b/admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php
new file mode 100644
index 00000000..b2e747b9
--- /dev/null
+++ b/admin/ogAdmSources/ogAdmWebCon/gestores/gestor_perfilsoftwares.php
@@ -0,0 +1,157 @@
+<?
+// *************************************************************************************************************************************************
+// Aplicación WEB: ogAdmWebCon
+// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
+// Fecha Creación: Año 2003-2004
+// Fecha Última modificación: Marzo-2005
+// Nombre del fichero: gestor_perfilsoftwares.php
+// Descripción :
+// Gestiona el mantenimiento de la tabla de perfilessoft
+// *************************************************************************************************************************************************
+include_once("../includes/ctrlacc.php");
+include_once("../clases/AdoPhp.php");
+include_once("../clases/XmlPhp.php");
+include_once("../clases/ArbolVistaXML.php");
+include_once("../includes/CreaComando.php");
+include_once("../includes/constantes.php");
+include_once("../includes/opciones.php");
+include_once("./relaciones/perfilessoft_eliminacion.php");
+//________________________________________________________________________________________________________
+$opcion=0; // Inicializa parametros
+
+$idperfilsoft=0;
+$descripcion="";
+$comentarios="";
+$grupoid=0;
+
+if (isset($_GET["opcion"])) $opcion=$_GET["opcion"]; // Recoge parametros
+
+if (isset($_GET["idperfilsoft"])) $idperfilsoft=$_GET["idperfilsoft"];
+if (isset($_GET["descripcion"])) $descripcion=$_GET["descripcion"];
+if (isset($_GET["comentarios"])) $comentarios=$_GET["comentarios"];
+if (isset($_GET["grupoid"])) $grupoid=$_GET["grupoid"];
+if (isset($_GET["identificador"])) $idperfilsoft=$_GET["identificador"];
+
+$tablanodo=""; // Arbol para nodos insertados
+
+$cmd=CreaComando($cadenaconexion); // Crea objeto comando
+$resul=false;
+if ($cmd){
+ $resul=Gestiona();
+ $cmd->Conexion->Cerrar();
+}
+// *************************************************************************************************************************************************
+?>
+<HTML>
+<HEAD>
+<BODY>
+<?
+ $literal="";
+ switch($opcion){
+ case $op_alta :
+ $literal="resultado_insertar_perfilsoftwares";
+ break;
+ case $op_modificacion:
+ $literal="resultado_modificar_perfilsoftwares";
+ break;
+ case $op_eliminacion :
+ $literal="resultado_eliminar_perfilsoftwares";
+ break;
+ case $op_movida :
+ $literal="resultado_mover";
+ break;
+ default:
+ break;
+ }
+echo '<p><span id="arbol_nodo">'.$tablanodo.'</span></p>';
+if ($resul){
+ echo '<SCRIPT language="javascript">'.chr(13);
+ echo 'var oHTML'.chr(13);
+ echo 'var cTBODY=document.getElementsByTagName("TBODY");'.chr(13);
+ echo 'o=cTBODY.item(1);'.chr(13);
+ if ($opcion==$op_alta )
+ echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idperfilsoft.",o.innerHTML);";
+ else
+ echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ','".$descripcion."');";
+ echo '</SCRIPT>';
+}
+else{
+ echo '<SCRIPT language="javascript">';
+ echo " window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."',".$idperfilsoft.")";
+ echo '</SCRIPT>';
+}
+?>
+</BODY>
+</HTML>
+<?
+/**************************************************************************************************************************************************
+ Inserta, modifica o elimina datos en la tabla perfilessoft
+________________________________________________________________________________________________________*/
+function Gestiona(){
+ global $cmd;
+ global $opcion;
+
+ global $idcentro;
+ global $idperfilsoft;
+ global $descripcion;
+ global $comentarios;
+ global $grupoid;
+
+ global $op_alta;
+ global $op_modificacion;
+ global $op_eliminacion;
+ global $op_movida;
+
+ global $tablanodo;
+
+ $cmd->CreaParametro("@idcentro",$idcentro,1);
+ $cmd->CreaParametro("@idperfilsoft",$idperfilsoft,1);
+ $cmd->CreaParametro("@descripcion",$descripcion,0);
+ $cmd->CreaParametro("@comentarios",$comentarios,0);
+ $cmd->CreaParametro("@grupoid",$grupoid,1);
+
+ switch($opcion){
+ case $op_alta :
+ $cmd->texto="INSERT INTO perfilessoft (descripcion,comentarios,idcentro,grupoid) VALUES (@descripcion,@comentarios,@idcentro,@grupoid)";
+ $resul=$cmd->Ejecutar();
+ if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta
+ $idperfilsoft=$cmd->Autonumerico();
+ $arbolXML=SubarbolXML_perfilessoft($idperfilsoft,$descripcion);
+ $baseurlimg="../images/signos"; // Url de las imagenes de signo
+ $clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol
+ $arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault);
+ $tablanodo=$arbol->CreaArbolVistaXML();
+ }
+ break;
+ case $op_modificacion:
+ $cmd->texto="UPDATE perfilessoft SET descripcion=@descripcion,comentarios=@comentarios WHERE idperfilsoft=@idperfilsoft";
+ $resul=$cmd->Ejecutar();
+ break;
+ case $op_eliminacion :
+ $resul=EliminaPerfilessoft($cmd,$idperfilsoft,"idperfilsoft");
+ break;
+ case $op_movida :
+ $cmd->texto="UPDATE perfilessoft SET grupoid=@grupoid WHERE idperfilsoft=@idperfilsoft";
+ $resul=$cmd->Ejecutar();
+ break;
+ default:
+ break;
+ }
+ return($resul);
+}
+/*________________________________________________________________________________________________________
+ Crea un arbol XML para el nuevo nodo insertado
+________________________________________________________________________________________________________*/
+function SubarbolXML_perfilessoft($idperfilsoft,$descripcion){
+ global $LITAMBITO_PERFILESSOFT;
+ $cadenaXML='<PERFILESSOFTWARES ';
+ // Atributos
+ $cadenaXML.=' imagenodo="../images/iconos/perfilsoftware.gif"';
+ $cadenaXML.=' infonodo="' .$descripcion.'"';
+ $cadenaXML.=' nodoid='.$LITAMBITO_PERFILESSOFT.'-'.$idperfilsoft;
+ $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PERFILESSOFT."'" .')"';
+ $cadenaXML.='>';
+ $cadenaXML.='</PERFILESSOFTWARES>';
+ return($cadenaXML);
+}
+?> \ No newline at end of file