source: admin/WebConsole/varios/perfilessoftwares_disponibles.php @ 3fef8e1

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 3fef8e1 was a6b881e, checked in by alonso <alonso@…>, 16 years ago

primeros archivos de administración

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