source: admin/WebConsole/varios/perfilessoftwares_disponibles.php @ 1a22cd2

918-git-images-111dconfigfileconfigure-oglivegit-imageslgromero-new-oglivemainmaint-cronmount-efivarfsmultivmmultivm-ogboot-installerogClonningEngineogboot-installer-jenkinsoglive-ipv6test-python-scriptsticket-301ticket-50ticket-50-oldticket-577ticket-585ticket-611ticket-612ticket-693ticket-700ubu24tplunification2use-local-agent-oglivevarios-instalacionwebconsole3
Last change on this file since 1a22cd2 was 6e9cc32, checked in by ramon <ramongomez@…>, 16 years ago

Borrar caracteres BOM de UTF-8 en ficheros PHP de WebConsole?.

git-svn-id: https://opengnsys.es/svn/trunk@514 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 7.8 KB
Line 
1<?
2include_once("../includes/ctrlacc.php");
3
4include_once("../clases/AdoPhp.php");
5include_once("../clases/XmlPhp.php");
6include_once("../clases/TablaVistaXML.php");
7include_once("../clases/MenuContextual.php");
8
9$idperfilhard=0;
10$descripcionperfil="";
11if (isset($_GET["idperfilhard"])) $idperfilhard=$_GET["idperfilhard"]; // Recoge parametros
12if (isset($_GET["descripcionperfil"])) $descripcionperfil=$_GET["descripcionperfil"]; // Recoge parametros
13
14//-------------------------------------------------------------------------------
15// Para pruebas
16// $idcentro = 1;
17//$cadenaconexion="127.0.0.1;usuhidra;passusuhidra;BDHidra;sqlserver";
18//-------------------------------------------------------------------------------
19$cmd=CreaComando($cadenaconexion);
20if (!$cmd)
21        $arbolXML=""; // Error de conexión
22else
23        $arbolXML=CreaArbol($cmd,$idperfilhard); // Crea el arbol XML con todos los datos del perfil hardware
24$baseurlimg="../images/tsignos";
25$clasedefault="tabla_listados_sin";
26$titulotabla="Perfiles y Softwares Combinacional disponibles"; 
27$arbol=new TablaVistaXml($arbolXML,0,$baseurlimg,$clasedefault,0,20,130,$titulotabla);
28
29?>
30<HTML>
31<TITLE>" Administración web de aulas"</TITLE>
32<HEAD>
33        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
34        <SCRIPT language="javascript" src="../clases/jscripts/TablaVistaXml.js"></SCRIPT>
35        <SCRIPT language="javascript" src="../clases/jscripts/MenuContextual.js"></SCRIPT>
36        <SCRIPT language="javascript" src="../jscripts/hardwares.js"></SCRIPT>
37        <SCRIPT language="javascript" src="../jscripts/comunes.js"></SCRIPT>
38</HEAD>
39<BODY>
40        <p align=center class=cabeceras>Perfiles Hardwares<br>
41        <span align=center class=subcabeceras>Perfiles Softwares disponibles</span>&nbsp;<img src="../images/iconos/confisoft.gif"></p>
42        <br>
43        <DIV align=center>
44                <span class=presentaciones><b>Perfil Hardware:&nbsp;</b><? echo $descripcionperfil?></span>
45        <?
46        echo $arbol->CreaTablaVistaXml(); // Crea arbol de configuraciones
47        $flotante=new MenuContextual(); // Instancia clase
48        $XMLcontextual=CreacontextualXMLTipos_H(); // Crea menu contextual de tipos
49
50        ?>
51        </DIV>
52         <input type=hidden value="<? echo $idcentro?>" id=idcentro>     
53<?
54//________________________________________________________________________________________________________
55include_once("../includes/iframecomun.php");
56//________________________________________________________________________________________________________
57?>
58</BODY>
59</HTML>
60<?
61/*==============================================================
62        Devuelve una objeto comando totalmente operativo (con la conexión abierta)
63        Parametros:
64                - cadenaconexion: Una cadena con los datos necesarios para la conexión: nombre del servidor
65                usuario,password,base de datos,etc separados por coma
66----------------------------------------------------------------------------------------------------------------*/
67function CreaComando($cadenaconexion){
68        $strcn=split(";",$cadenaconexion);
69        $cn=new Conexion;
70        $cmd=new Comando;       
71        $cn->CadenaConexion($strcn[0],$strcn[1],$strcn[2],$strcn[3],$strcn[4]);
72        if (!$cn->Abrir()) return (false);
73        $cmd->Conexion=&$cn;
74        return($cmd);
75}
76/*=======================================================
77        Devuelve una cadena con formato XML de toda la información de las configuraciones
78        hardwares
79        Parametros:
80                - idperfilhard: El identificador del perfil hardware
81                - cmd:Una comando ya operativo ( con conexión abierta) 
82----------------------------------------------------------------------------------------------------*/
83function CreaArbol($cmd,$idperfilhard){
84        $cadenaXML=SubarbolXML_PerfilesSoftwaresDisponibles($cmd,$idperfilhard);
85        return($cadenaXML);
86}
87//-------------------------------------------------------------------------------------------------------------------------------------------------
88function SubarbolXML_PerfilesSoftwaresDisponibles($cmd,$idperfilhard){
89        $cadenaXML="";
90        $gidperfilsoft=null;
91        $swcombi=false;
92        $rs=new Recordset;
93        $cmd->texto="SELECT perfilessoft.idperfilsoft ,perfilessoft.descripcion as pdescripcion,softcombinacional.idsoftcombinacional,softcombinacional.descripcion  as cdescripcion FROM perfilessoft  ";
94        $cmd->texto.=" LEFT OUTER JOIN  perfileshard_perfilessoft  ON perfileshard_perfilessoft.idperfilsoft=perfilessoft.idperfilsoft" ;
95        $cmd->texto.=" LEFT OUTER JOIN  phard_psoft_softcombinacional  ON phard_psoft_softcombinacional.idphardidpsoft=perfileshard_perfilessoft .idphardidpsoft" ;
96        $cmd->texto.=" LEFT OUTER JOIN  softcombinacional  ON softcombinacional.idsoftcombinacional=phard_psoft_softcombinacional .idsoftcombinacional" ;
97        $cmd->texto.=" WHERE perfileshard_perfilessoft.idperfilhard=".$idperfilhard;
98        $cmd->texto.=" ORDER by perfilessoft.descripcion,softcombinacional.descripcion";
99
100        $rs->Comando=&$cmd;
101        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
102        $rs->Primero();
103
104        while (!$rs->EOF){
105                if ($gidperfilsoft!=$rs->campos["idperfilsoft"]){
106                        if ($gidperfilsoft){
107                                if ($swcombi){
108                                        $swcombi=false;
109                                        $cadenaXML.='</DISPONIBLESCOMBI>';
110                                }
111                                $cadenaXML.='</PERFILESSOFTWARES>';
112                        }
113                        $gidperfilsoft=$rs->campos["idperfilsoft"];
114                        $cadenaXML.='<PERFILESSOFTWARES';
115                        // Atributos
116                        $cadenaXML.=' imagenodo="../images/iconos/perfilsoftware.gif"';
117                        $cadenaXML.=' infonodo="'.$rs->campos["pdescripcion"].'"';
118                        $cadenaXML.=' classnodo="linea_abajo"';
119                        $cadenaXML.='>';
120                }
121                if ($rs->campos["idsoftcombinacional"]){
122                        if (!$swcombi){
123                                $swcombi=true;
124                                $cadenaXML.='<DISPONIBLESCOMBI';
125                                $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
126                                $cadenaXML.=' infonodo="Software combinacional disponible"';
127                                $cadenaXML.='>';
128                        }       
129                        $cadenaXML.='<PERFILSOFTWARE';
130                        // Atributos
131                        $cadenaXML.=' imagenodo="../images/iconos/softcombi.gif"';
132                        $cadenaXML.=' infonodo="'.$rs->campos["cdescripcion"].'"';
133                        $cadenaXML.='>';
134                        $cadenaXML.=SubarbolXML_ComponentesdelCombi($cmd,$rs->campos["idsoftcombinacional"]);
135                        $cadenaXML.='</PERFILSOFTWARE>';
136                }
137                $rs->Siguiente();
138        }
139        if ($gidperfilsoft){
140                if ($swcombi){
141                        $swcombi=false;
142                        $cadenaXML.='</DISPONIBLESCOMBI>';
143                }
144                $cadenaXML.='</PERFILESSOFTWARES>';
145
146        }
147        $rs->Cerrar();
148
149        return($cadenaXML);
150}
151//-------------------------------------------------------------------------------------------------------------------------------------------------
152function SubarbolXML_ComponentesdelCombi($cmd,$idsoftcombinacional){
153        $cadenaXML="";
154        $rs=new Recordset;
155        $cmd->texto="SELECT softwares.idsoftware,softwares.descripcion, tiposoftwares.urlimg FROM softwares";
156        $cmd->texto.=" INNER JOIN tiposoftwares  ON softwares.idtiposoftware=tiposoftwares.idtiposoftware";
157        $cmd->texto.=" INNER JOIN softcombinacional_softwares  ON softcombinacional_softwares.idsoftware=softwares.idsoftware";
158        $cmd->texto.=" WHERE softcombinacional_softwares.idsoftcombinacional=".$idsoftcombinacional."  order by tiposoftwares.idtiposoftware,softwares.descripcion";
159        $rs->Comando=&$cmd;
160        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
161        $rs->Primero();
162        while (!$rs->EOF){
163                $cadenaXML.='<COMPONENTESSOFTWARES';
164                // Atributos
165                $cadenaXML.=' imagenodo='.$rs->campos["urlimg"];
166                $cadenaXML.=' infonodo="'.$rs->campos["descripcion"].'"';
167                $cadenaXML.='>';
168                $cadenaXML.='</COMPONENTESSOFTWARES>';
169                $rs->Siguiente();
170        }
171        $rs->Cerrar();
172        return($cadenaXML);
173}
174/*===================================================
175        Menus contextuales
176---------------------------------------------------------------------------------------------*/
177function CreacontextualXMLTipos_H(){
178        $layerXML='<MENUCONTEXTUAL';
179        $layerXML.=' idctx="flo_Tipos"';
180        $layerXML.=' maxanchu=187';
181        $layerXML.=' swimg=1';
182        $layerXML.=' clase="menu_contextual"';
183        $layerXML.='>';
184
185        $layerXML.='<ITEM';
186        $layerXML.=' alpulsar="insertar_tipohardware()"';
187        $layerXML.=' imgitem="../images/iconos/confihard.gif"';
188        $layerXML.=' textoitem="Definir nuevo tipo de hardware"';
189        $layerXML.='></ITEM>';
190
191        $layerXML.='</MENUCONTEXTUAL>';
192        return($layerXML);
193}
194?>
Note: See TracBrowser for help on using the repository browser.