source: admin/WebConsole/varios/informacion_repositorios.php

qndtest
Last change on this file was 043e67d, checked in by pablombg <noreply@…>, 7 years ago

#814: Sustituir las etiquetas cortas de php por el formato largo

git-svn-id: https://opengnsys.es/svn/branches/version1.1@5502 a21b9725-9963-47de-94b9-378ad31fedc9

  • Property mode set to 100644
File size: 6.9 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: informacion_repositorios.php
8// Descripción :
9//              Muestra los ordenadores que están gestionados por un repositorio
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../clases/XmlPhp.php");
15include_once("../clases/ArbolVistaXML.php");
16include_once("../idiomas/php/".$idioma."/informacion_repositorio_".$idioma.".php");
17//________________________________________________________________________________________________________
18$idrepositorio=0; 
19$descripcionrepositorio=""; 
20if (isset($_GET["idrepositorio"])) $idrepositorio=$_GET["idrepositorio"]; // Recoge parametros
21if (isset($_GET["descripcionrepositorio"])) $descripcionrepositorio=$_GET["descripcionrepositorio"]; // Recoge parametros
22
23$cmd=CreaComando($cadenaconexion);
24if (!$cmd)
25        Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D.
26else
27        $arbolXML=CreaArbol($cmd,$idrepositorio); // Crea el arbol XML
28
29// Creación del árbol
30$baseurlimg="../images/tsignos";
31$clasedefault="tabla_listados_sin";
32$titulotabla=$TbMsg[3]; 
33$arbol=new ArbolVistaXml($arbolXML,0,$baseurlimg,$clasedefault,1,20,130,1,$titulotabla);
34?>
35<HTML>
36<TITLE>Administración web de aulas</TITLE>
37<HEAD>
38        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
39        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
40        <SCRIPT language="javascript" src="../clases/jscripts/ArbolVistaXML.js"></SCRIPT>
41</HEAD>
42<BODY>
43        <P align=center class=cabeceras><?php echo $TbMsg[0]?><BR>
44        <SPAN align=center class=subcabeceras><?php echo $TbMsg[1]?></SPAN>&nbsp;<IMG src="../images/iconos/repositorio.gif"><BR><BR>
45        <IMG src="../images/iconos/repositorio.gif"><SPAN class=presentaciones>&nbsp;&nbsp;
46        <U><?php echo $TbMsg[2]?></U>:<?php echo $descripcionrepositorio?></SPAN></P>
47        <?php echo $arbol->CreaArbolVistaXml(); // Crea arbol de configuraciones?>
48</BODY>
49</HTML>
50<?php
51/**************************************************************************************************************************************************
52        Devuelve una cadena con formato XML de toda la información de los repositorios
53        Parametros:
54                - cmd:Una comando ya operativo ( con conexión abierta) 
55                - idrepositorio: El identificador del perfil repositorios
56________________________________________________________________________________________________________*/
57function CreaArbol($cmd,$idrepositorio){
58        $cadenaXML=SubarbolXML_Repositorios($cmd,$idrepositorio);
59        return($cadenaXML);
60}
61//________________________________________________________________________________________________________
62function SubarbolXML_Repositorios($cmd,$idrepositorio){
63        global $TbMsg;
64        $cadenaXML="";
65        $rs=new Recordset; 
66        $cmd->texto="SELECT idrepositorio,nombrerepositorio,comentarios
67                                                FROM repositorios
68                                                WHERE idrepositorio=".$idrepositorio ;
69        $rs->Comando=&$cmd; 
70        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
71        $rs->Primero(); 
72        while (!$rs->EOF){
73                $cadenaXML.='<REPOSITORIO';
74                // Atributos                   
75                $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_Repositorio'" .')"';
76                $cadenaXML.=' imagenodo="../images/iconos/repositorio.gif" ';
77                $cadenaXML.=' infonodo="'.$rs->campos["nombrerepositorio"].'"';
78                $cadenaXML.='>';
79                if($rs->campos["comentarios"]>" "){
80                        $cadenaXML.='<PROPIEDAD';
81                        $cadenaXML.=' imagenodo="../images/iconos/propiedad.gif"';
82                        $cadenaXML.=' infonodo="[b]'.$TbMsg[4].' :[/b] '.$rs->campos["comentarios"].'"';
83                        $cadenaXML.='>';
84                        $cadenaXML.='</PROPIEDAD>';
85                }
86                $cadenaXML.=SubarbolXML_grupos_repositorios_ordenadores($cmd,$rs->campos["idrepositorio"]);
87                $cadenaXML.=SubarbolXML_ImagenesDisponibles($cmd,$idrepositorio);       
88                $cadenaXML.='</REPOSITORIO>';
89                $rs->Siguiente();
90        }
91        $rs->Cerrar();
92        return($cadenaXML);
93}
94//-------------------------------------------------------------------------------------------------------------------------------------------
95function SubarbolXML_grupos_repositorios_ordenadores($cmd,$idrepositorio)
96{
97        global $TbMsg;
98       
99        $cadenaXML="";
100        $gidaula="";
101        $rs=new Recordset; 
102        $cmd->texto="SELECT aulas.idaula,aulas.nombreaula,ordenadores. idordenador,ordenadores.nombreordenador
103                                                                        FROM ordenadores
104                                                                         INNER JOIN aulas ON  ordenadores.idaula=aulas.idaula
105                                                                         WHERE ordenadores.idrepositorio=".$idrepositorio."
106                                                                         ORDER BY aulas.idaula,ordenadores.nombreordenador";
107        $rs->Comando=&$cmd; 
108        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
109        $rs->Primero(); 
110        if ($rs->numeroderegistros>0) {
111                $cadenaXML.='<AULASORDENADORES';
112                $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
113                $cadenaXML.=' infonodo="'.$TbMsg[6].'"';
114                $cadenaXML.='>';
115        }       
116        while (!$rs->EOF){
117                if ($gidaula!=$rs->campos["idaula"]){
118                        if ($gidaula!="")
119                                $cadenaXML.='</AULA>';
120                        $cadenaXML.='<AULA ';
121                        // Atributos           
122                        $cadenaXML.=' imagenodo="../images/iconos/aula.gif"';
123                        $cadenaXML.=' infonodo="'.$rs->campos["nombreaula"].'"';
124                        $cadenaXML.='>';
125                        $gidaula=$rs->campos["idaula"];
126                }
127                // Visualiza los ordenadores de cada aula ( temporalmente desabilitado por rendimiento )
128                $cadenaXML.='<ORDENADOR';
129                // Atributos                   
130                $cadenaXML.=' imagenodo="../images/iconos/ordenador.gif"';
131                $cadenaXML.=' infonodo="'.$rs->campos["nombreordenador"].'"';
132                $cadenaXML.='></ORDENADOR>';
133                $rs->Siguiente();
134        }
135        if ($gidaula!=""){
136                $cadenaXML.='</AULA>';
137                $cadenaXML.='</AULASORDENADORES>';     
138        }       
139        $rs->Cerrar();
140        return($cadenaXML);
141}
142//________________________________________________________________________________________________________
143function SubarbolXML_ImagenesDisponibles($cmd,$idrepositorio)
144{
145        global $TbMsg;
146       
147        $cadenaXML="";
148
149        $cmd->texto="SELECT DISTINCT imagenes.* FROM imagenes
150                                                                WHERE imagenes.idrepositorio=".$idrepositorio."
151                                                                AND  imagenes.codpar>0
152                                                                ORDER by imagenes.descripcion";
153        $rs=new Recordset; 
154        $rs->Comando=&$cmd; 
155        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
156        if ($rs->numeroderegistros>0) {
157                $cadenaXML.='<DISPONIBLESIMAGENES';
158                $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
159                $cadenaXML.=' infonodo="'.$TbMsg[5].'"';
160                $cadenaXML.='>';
161        }
162        while (!$rs->EOF){
163                $cadenaXML.='<IMAGENES';
164                $cadenaXML.=' imagenodo="../images/iconos/imagenes.gif"';
165                $cadenaXML.=' infonodo="'.$rs->campos["descripcion"].' ('.$TbMsg["IMGTYPE".$rs->campos["tipo"]].')"';
166                $cadenaXML.='</IMAGENES>';
167                $rs->Siguiente();
168        }
169        if ($rs->numeroderegistros>0) {
170                $cadenaXML.='</DISPONIBLESIMAGENES>';
171        }
172        $rs->Cerrar();
173        return($cadenaXML);
174}
175?>
Note: See TracBrowser for help on using the repository browser.