source: admin/WebConsole/gestores/gestor_grupos.php @ 5d05b06

Last change on this file since 5d05b06 was 4329e85, checked in by ramon <ramongomez@…>, 12 years ago

Versión 1.0.5, #565: Integrar código del ticket:565 en rama de desarrollo.

git-svn-id: https://opengnsys.es/svn/branches/version1.0@3446 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 10.5 KB
RevLine 
[4329e85]1<?php
[3ec149c]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_grupos.php
8// Descripción :
9//              Gestiona el mantenimiento de la tabla de grupos
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("./relaciones/aulas_eliminacion.php");
18include_once("./relaciones/ordenadores_eliminacion.php");
19include_once("./relaciones/gruposordenadores_eliminacion.php");
20include_once("./relaciones/procedimientos_eliminacion.php");
21include_once("./relaciones/tareas_eliminacion.php");
22include_once("./relaciones/trabajos_eliminacion.php");
23include_once("./relaciones/imagenes_eliminacion.php");
24include_once("./relaciones/hardwares_eliminacion.php");
25include_once("./relaciones/perfileshard_eliminacion.php");
26include_once("./relaciones/softwares_eliminacion.php");
27include_once("./relaciones/perfilessoft_eliminacion.php");
28include_once("./relaciones/incrementales_eliminacion.php");
29include_once("./relaciones/repositorios_eliminacion.php");
30include_once("./relaciones/menus_eliminacion.php");
31include_once("./relaciones/reservas_eliminacion.php");
32include_once("./relaciones/entidades_eliminacion.php");
33include_once("./relaciones/centros_eliminacion.php");
34include_once("../includes/opciones.php");
35//________________________________________________________________________________________________________
36$opcion=0; // Inicializa parametros
37
38$nombregrupo="";
39$grupoid=0;
40$idgrupo=0;
41$tipo=0;
42$literaltipo="";
43$iduniversidad=0;
44$comentarios="";
45
46if (isset($_POST["opcion"])) $opcion=$_POST["opcion"]; // Recoge parametros
47if (isset($_POST["nombregrupo"])) $nombregrupo=$_POST["nombregrupo"];
48if (isset($_POST["grupoid"])) $grupoid=$_POST["grupoid"];
49if (isset($_POST["idgrupo"])) $idgrupo=$_POST["idgrupo"];
50if (isset($_POST["tipo"])) $tipo=$_POST["tipo"];
51if (isset($_POST["literaltipo"])) $literaltipo=$_POST["literaltipo"];
52if (isset($_POST["iduniversidad"])) $iduniversidad=$_POST["iduniversidad"];
53if (isset($_POST["comentarios"])) $comentarios=$_POST["comentarios"];
54
55$tablanodo=""; // Arbol para nodos insertados
56
57$cmd=CreaComando($cadenaconexion); // Crea objeto comando
58$resul=false;
59if ($cmd){
60        $resul=Gestiona();
61        $cmd->Conexion->Cerrar();
62}
63// *************************************************************************************************************************************************
64?>
65<HTML>
66<HEAD>
67        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
68<BODY>
69        <SCRIPT language="javascript" src="../jscripts/propiedades_grupos.js"></SCRIPT>
[4329e85]70<?php
[3ec149c]71        $literal="";
72        switch($opcion){
73                case $op_alta :
74                        $literal="resultado_insertar_grupos";
75                        break;
76                case $op_modificacion:
77                        $literal="resultado_modificar_grupos";
78                        break;
79                case $op_eliminacion :
80                        $literal="resultado_eliminar_grupos";
81                        break;
82                default:
83                        break;
84        }
85echo '<p><span id="arbol_nodo">'.$tablanodo.'</span></p>';
86if ($resul){
87        echo '<SCRIPT language="javascript">'.chr(13);
88        echo 'var o=document.getElementById("arbol_nodo");'.chr(13);
89        if ($opcion==$op_alta )
90                echo $literal."(1,'".$cmd->DescripUltimoError()." ',".$idgrupo.",o.innerHTML);";
91        else
92                echo $literal."(1,'".$cmd->DescripUltimoError()." ','".$nombregrupo."');";
93        echo '</SCRIPT>';
94}
95else{
96        echo '<SCRIPT language="javascript">';
97        echo $literal."(0,'".$cmd->DescripUltimoError()."',".$idgrupo.")";
98        echo '</SCRIPT>';
99}
100?>
101</BODY>
102</HTML>
[4329e85]103<?php
[3ec149c]104/**************************************************************************************************************************************************
105        Inserta, modifica o elimina datos en la tabla grupos
106________________________________________________________________________________________________________*/
107function Gestiona(){
108        global  $cmd;
109        global  $opcion;
110        global  $idcentro;
111        global  $nombregrupo;
112        global  $grupoid;
113        global  $idgrupo;
114        global  $tipo;
115        global  $literaltipo;
116        global  $iduniversidad;
117        global  $comentarios;
118        global  $op_alta;
119        global  $op_modificacion;
120        global  $op_eliminacion;
121        global  $tablanodo;
122
123        if($iduniversidad) $idcentro=0; // Administración
124
125        $cmd->CreaParametro("@nombregrupo",$nombregrupo,0);
126        $cmd->CreaParametro("@grupoid",$grupoid,1);
127        $cmd->CreaParametro("@idcentro",$idcentro,1);
128        $cmd->CreaParametro("@idgrupo",$idgrupo,1);
129        $cmd->CreaParametro("@tipo",$tipo,1);
130        $cmd->CreaParametro("@iduniversidad",$iduniversidad,1);
131        $cmd->CreaParametro("@comentarios",$comentarios,0);
132
133        switch($opcion){
134                case $op_alta :
135                        $cmd->texto="INSERT INTO grupos(nombregrupo,idcentro,grupoid,tipo,iduniversidad,comentarios) VALUES (@nombregrupo,@idcentro,@grupoid,@tipo,@iduniversidad,@comentarios)";
136                        $resul=$cmd->Ejecutar();
137
138                        if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta
139                                $idgrupo=$cmd->Autonumerico();
140                                $arbolXML=SubarbolXML_grupos($idgrupo,$nombregrupo,$literaltipo);
141                                $baseurlimg="../images/signos";
142                                $clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol
143                                $arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault);
144                                $tablanodo=$arbol->CreaNodo(0);
145                        }
146                        break;
147                case $op_modificacion:
148                        $cmd->texto="UPDATE grupos SET nombregrupo=@nombregrupo,comentarios=@comentarios WHERE idgrupo=@idgrupo";
149                        $resul=$cmd->Ejecutar();
150                        break;
151                case $op_eliminacion :
152                        $resul=EliminaGrupos($cmd,$idgrupo,"idgrupo",$literaltipo);// Eliminación en cascada
153                        break;
154                default:
155                        break;
156        }
157        return($resul);
158}
159/*________________________________________________________________________________________________________
160        Crea un arbol XML para el nuevo nodo insertado
161________________________________________________________________________________________________________*/
162function SubarbolXML_grupos($idgrupo,$nombregrupo,$literaltipo){
163
164        $cadenaXML='<GRUPOS';
165        // Atributos
166        $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$literaltipo."'" .')"';
167        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
168        $cadenaXML.=' infonodo="'.$nombregrupo.'"';
169        $cadenaXML.=' nodoid='.$literaltipo.'-'.$idgrupo;
170        $cadenaXML.='>';
171        $cadenaXML.='</GRUPOS>';
172        return($cadenaXML);
173}
174/*________________________________________________________________________________________________________
175        Elimina en cascada grupos
176                Parametros:
177                - cmd: Un comando ya operativo (con conexión abierta) 
178                - idgrupo: El identificador del grupo
179                - literaltipo: El literal del grupo
180                - literaltipo: El literal del grupo
181                - swid: Indica 0= El identificador es tipo alfanumérico 1= EI identificador es tipo numérico ( valor por defecto)
182________________________________________________________________________________________________________*/
183function        EliminaGrupos($cmd,$identificador,$nombreid,$literaltipo,$swid=1){
184        if (empty($identificador)) return(true);
185
186        global $LITAMBITO_GRUPOSAULAS ;
[4329e85]187        global $LITAMBITO_GRUPOSIMAGENESMONOLITICAS ;
188        global $LITAMBITO_GRUPOSIMAGENESBASICAS ;
189        global $LITAMBITO_GRUPOSIMAGENESINCREMENTALES ;
[3ec149c]190        global $LITAMBITO_GRUPOSPROCEDIMIENTOS ;
191        global $LITAMBITO_GRUPOSTAREAS ;
192        global $LITAMBITO_GRUPOSTRABAJOS ;
193        global $LITAMBITO_GRUPOSCOMPONENTESHARD  ;
194        global $LITAMBITO_GRUPOSCOMPONENTESSOFT ;
195        global $LITAMBITO_GRUPOSPERFILESHARD ;
196        global $LITAMBITO_GRUPOSPERFILESSOFT ;
197        global $LITAMBITO_GRUPOSSOFTINCREMENTAL ;
198        global $LITAMBITO_GRUPOSMENUS ;
199        global $LITAMBITO_GRUPOSREPOSITORIOS ;
200        global $LITAMBITO_GRUPOSRESERVAS ;
201        global $LITAMBITO_GRUPOSENTIDADES ;
202
203        if($swid==0)
204                $cmd->texto="SELECT  idgrupo  FROM grupos WHERE ".$nombreid."='".$identificador."'";
205        else
206                $cmd->texto='SELECT  idgrupo  FROM grupos WHERE '.$nombreid.'='.$identificador;
207        $rs=new Recordset;
208        $rs->Comando=&$cmd;
209        if (!$rs->Abrir()) return(false); // Error al abrir recordset
210        if ($rs->numeroderegistros==0) return(true);
211        $rs->Primero();
212        while (!$rs->EOF){
213                $resul=EliminaGrupos($cmd,$rs->campos["idgrupo"],"grupoid",$literaltipo);
214                if ($resul){
215                        switch($literaltipo){
216                                case $LITAMBITO_GRUPOSAULAS :
217                                        $resul=EliminaAulas($cmd,$rs->campos["idgrupo"],"grupoid");
218                                        break;
219                                case $LITAMBITO_GRUPOSPROCEDIMIENTOS :
220                                        $resul=EliminaProcedimientos($cmd,$rs->campos["idgrupo"],"grupoid");
221                                        break;
222                                case $LITAMBITO_GRUPOSTAREAS :
223                                        $resul=EliminaTareas($cmd,$rs->campos["idgrupo"],"grupoid");
224                                        break;
225                                case $LITAMBITO_GRUPOSTRABAJOS :
226                                        $resul=EliminaTrabajos($cmd,$rs->campos["idgrupo"],"grupoid");
227                                        break;
[4329e85]228                                case $LITAMBITO_GRUPOSIMAGENESMONOLITICAS :
[3ec149c]229                                        $resul=EliminaImagenes($cmd,$rs->campos["idgrupo"],"grupoid");
230                                        break;
[4329e85]231                                case $LITAMBITO_GRUPOSIMAGENESBASICAS :
232                                        $resul=EliminaImagenes($cmd,$rs->campos["idgrupo"],"grupoid");
233                                        break;
234                                case $LITAMBITO_GRUPOSIMAGENESINCREMENTALES :
235                                        $resul=EliminaImagenes($cmd,$rs->campos["idgrupo"],"grupoid");
236                                        break;                                 
[3ec149c]237                                case $LITAMBITO_GRUPOSCOMPONENTESHARD  :
238                                        $resul=EliminaHardwares($cmd,$rs->campos["idgrupo"],"grupoid");
239                                        break;
240                                case $LITAMBITO_GRUPOSCOMPONENTESSOFT :
241                                        $resul=EliminaSoftwares($cmd,$rs->campos["idgrupo"],"grupoid");
242                                        break;
243                                case $LITAMBITO_GRUPOSPERFILESHARD :
244                                        $resul=EliminaPerfileshard($cmd,$rs->campos["idgrupo"],"grupoid");
245                                        break;
246                                case $LITAMBITO_GRUPOSPERFILESSOFT :
247                                        $resul=EliminaPerfilessoft($cmd,$rs->campos["idgrupo"],"grupoid");
248                                        break;
249                                case $LITAMBITO_GRUPOSSOFTINCREMENTAL :
250                                        $resul=EliminaSoftincremental($cmd,$rs->campos["idgrupo"],"grupoid");
251                                        break;
252                                case $LITAMBITO_GRUPOSREPOSITORIOS :
253                                        $resul=Eliminarepositorios($cmd,$rs->campos["idgrupo"],"grupoid");
254                                        break;
255                                case $LITAMBITO_GRUPOSMENUS :
256                                        $resul=EliminaMenus($cmd,$rs->campos["idgrupo"],"grupoid");
257                                        break;
258                                case $LITAMBITO_GRUPOSRESERVAS :
259                                        $resul=EliminaReservas($cmd,$rs->campos["idgrupo"],"grupoid");
260                                        break;
261                                case $LITAMBITO_GRUPOSENTIDADES :
262                                        $resul=EliminaEntidad($cmd,$rs->campos["idgrupo"],"grupoid");
263                                        break;
264                                default:
265                                                $resul=false;
266                        }
267                }
268                if (!$resul){
269                        $rs->Cerrar();
270                        return(false);
271                }
272                $rs->Siguiente();
273        }
274        if($swid==0)
275                $cmd->texto="DELETE FROM grupos WHERE ".$nombreid."='".$identificador."'";
276        else
277                $cmd->texto='DELETE FROM grupos  WHERE '.$nombreid.'='.$identificador;
278        $resul=$cmd->Ejecutar();
279        return($resul);
280}
281?>
[4329e85]282
Note: See TracBrowser for help on using the repository browser.