source: admin/WebConsole/gestores/gestor_perfilsoftwares.php

qndtest
Last change on this file was b6ec162, checked in by Ramón M. Gómez <ramongomez@…>, 5 years ago

#834: Remove all redundant PHP closing tags.
  • Property mode set to 100644
File size: 5.7 KB
Line 
1<?php
2// *************************************************************************************************************************************************
3// Aplicación WEB: ogAdmWebCon
4// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
5// Fecha Creación: Año 2009-2010
6// Fecha Última modificación: Agosto-2010
7// Nombre del fichero: gestor_perfilsoftwares.php
8// Descripción :
9//              Gestiona el mantenimiento de la tabla de perfilessoft
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../clases/XmlPhp.php");
14include_once("../clases/ArbolVistaXML.php");
15include_once("../includes/CreaComando.php");
16include_once("../includes/constantes.php");
17include_once("../includes/opciones.php");
18include_once("./relaciones/perfilessoft_eliminacion.php");
19//________________________________________________________________________________________________________
20$opcion=0; // Inicializa parametros
21
22$idperfilsoft=0; 
23$descripcion="";
24$comentarios="";
25$grupoid=0; 
26
27if (isset($_POST["opcion"])) $opcion=$_POST["opcion"]; // Recoge parametros
28
29if (isset($_POST["idperfilsoft"])) $idperfilsoft=$_POST["idperfilsoft"];
30if (isset($_POST["descripcion"])) $descripcion=$_POST["descripcion"]; 
31if (isset($_POST["comentarios"])) $comentarios=$_POST["comentarios"]; 
32if (isset($_POST["grupoid"])) $grupoid=$_POST["grupoid"];
33if (isset($_POST["identificador"])) $idperfilsoft=$_POST["identificador"];
34
35$tablanodo=""; // Arbol para nodos insertados
36
37$cmd=CreaComando($cadenaconexion); // Crea objeto comando
38$resul=false;
39if ($cmd){
40        $resul=Gestiona();
41        $cmd->Conexion->Cerrar();
42}
43if($opcion!=$op_movida){
44        echo '<HTML>';
45        echo '<HEAD>';
46        echo '  <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">';
47        echo '<BODY>';
48        echo '<P><SPAN style="visibility:hidden" id="arbol_nodo">'.$tablanodo.'</SPAN></P>';
49        echo '  <SCRIPT language="javascript" src="../jscripts/propiedades_perfilsoftwares.js"></SCRIPT>';
50        echo '<SCRIPT language="javascript">'.chr(13);
51        if ($resul){
52                echo 'var oHTML'.chr(13);
53                echo 'var cTBODY=document.getElementsByTagName("TBODY");'.chr(13);
54                echo 'o=cTBODY.item(1);'.chr(13);
55        }
56}
57
58$literal="";
59switch($opcion){
60        case $op_alta :
61                $literal="resultado_insertar_perfilsoftwares";
62                break;
63        case $op_modificacion:
64                $literal="resultado_modificar_perfilsoftwares";
65                break;
66        case $op_eliminacion :
67                $literal="resultado_eliminar_perfilsoftwares";
68                break;
69        case $op_movida :
70                $literal="resultado_mover";
71                break; 
72        default:
73                break;
74}
75if ($resul){
76        if ($opcion==$op_alta )
77                echo $literal."(1,'".$cmd->DescripUltimoError()." ',".$idperfilsoft.",o.innerHTML);".chr(13);
78        else
79                echo $literal."(1,'".$cmd->DescripUltimoError()." ','".$descripcion."');".chr(13);
80}
81else
82        echo $literal."(0,'".$cmd->DescripUltimoError()."',".$idperfilsoft.")";
83
84if($opcion!=$op_movida){
85        echo '  </SCRIPT>';
86        echo '</BODY>   ';
87        echo '</HTML>'; 
88}
89/**************************************************************************************************************************************************
90        Inserta, modifica o elimina datos en la tabla perfilessoft
91________________________________________________________________________________________________________*/
92function Gestiona(){
93        global  $cmd;
94        global  $opcion;
95
96        global  $idcentro;
97        global  $idperfilsoft;
98        global  $descripcion;
99        global  $comentarios;
100        global  $grupoid;
101
102        global  $op_alta;
103        global  $op_modificacion;
104        global  $op_eliminacion;
105        global  $op_movida;
106
107        global  $tablanodo;
108
109        $cmd->CreaParametro("@idcentro",$idcentro,1);
110        $cmd->CreaParametro("@idperfilsoft",$idperfilsoft,1);
111        $cmd->CreaParametro("@descripcion",$descripcion,0);
112        $cmd->CreaParametro("@comentarios",$comentarios,0);
113        $cmd->CreaParametro("@grupoid",$grupoid,1);
114
115        switch($opcion){
116                case $op_alta :
117                        $cmd->texto="INSERT INTO perfilessoft (descripcion,comentarios,idcentro,grupoid) VALUES (@descripcion,@comentarios,@idcentro,@grupoid)";
118                        $resul=$cmd->Ejecutar();
119                        if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta
120                                $idperfilsoft=$cmd->Autonumerico();
121                                $arbolXML=SubarbolXML_perfilessoft($idperfilsoft,$descripcion);
122                                $baseurlimg="../images/signos"; // Url de las imagenes de signo
123                                $clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol
124                                $arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault);
125                                $tablanodo=$arbol->CreaArbolVistaXML();
126                        }
127                        break;
128                case $op_modificacion:
129                        $cmd->texto="UPDATE perfilessoft SET descripcion=@descripcion,comentarios=@comentarios WHERE idperfilsoft=@idperfilsoft";
130                        $resul=$cmd->Ejecutar();
131                        break;
132                case $op_eliminacion :
133                        $resul=EliminaPerfilessoft($cmd,$idperfilsoft,"idperfilsoft");
134                        break;
135                case $op_movida :
136                        $cmd->texto="UPDATE perfilessoft SET  grupoid=@grupoid WHERE idperfilsoft=@idperfilsoft";
137                        $resul=$cmd->Ejecutar();
138                        break;
139                default:
140                        break;
141        }
142        return($resul);
143}
144/*________________________________________________________________________________________________________
145        Crea un arbol XML para el nuevo nodo insertado
146________________________________________________________________________________________________________*/
147function SubarbolXML_perfilessoft($idperfilsoft,$descripcion){
148                global $LITAMBITO_PERFILESSOFT;
149                $cadenaXML='<PERFILESSOFTWARES ';
150                // Atributos           
151                $cadenaXML.=' imagenodo="../images/iconos/perfilsoftware.gif"';
152                $cadenaXML.=' infonodo="' .$descripcion.'"';
153                $cadenaXML.=' nodoid='.$LITAMBITO_PERFILESSOFT.'-'.$idperfilsoft;
154                $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PERFILESSOFT."'" .')"';
155                $cadenaXML.='>';
156                $cadenaXML.='</PERFILESSOFTWARES>';
157                return($cadenaXML);
158}
159
Note: See TracBrowser for help on using the repository browser.