source: admin/WebConsole/varios/informacion_menus.php @ 2b2311f

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 2b2311f was 3ec149c, checked in by alonso <alonso@…>, 15 years ago

git-svn-id: https://opengnsys.es/svn/trunk@1314 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 9.5 KB
RevLine 
[3ec149c]1<?
2// ******************************************************************************************************
3// Aplicación WEB: ogAdmWebCon
4// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
5// Fecha Creaciónn: Año 2009-2010
6// Fecha Última modificación: Agosto-2010
7// Nombre del fichero: informacion_menus.php
8// Descripción :
9//              Muestra los items que forman parte de un menu y sus valores
10// *****************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../clases/XmlPhp.php");
14include_once("../clases/ArbolVistaXML.php");
15include_once("../includes/constantes.php");
16include_once("../includes/comunes.php");
17include_once("../includes/CreaComando.php");
18include_once("../idiomas/php/".$idioma."/informacion_menus_".$idioma.".php");
19//________________________________________________________________________________________________________
20$idmenu=0;
21$descripcionmenu="";
22if (isset($_GET["idmenu"])) $idmenu=$_GET["idmenu"]; // Recoge parametros
23if (isset($_GET["descripcionmenu"])) $descripcionmenu=$_GET["descripcionmenu"]; // Recoge parametros
24
25$contitempub=0; // Contador de itemsp�blicos para dimensinar ventana
26$contitempri=0; // Contador de itemsp�blicos para dimensinar ventana
27
28$cmd=CreaComando($cadenaconexion);
29if (!$cmd)
30        Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D.
31else
32        $arbolXML=CreaArbol($cmd,$idmenu); // Crea el arbol XML
33
34// Creaciónn del �rbol
35$baseurlimg="../images/tsignos";
36$clasedefault="tabla_listados_sin";
37$titulotabla=$TbMsg[3]; 
38$arbol=new ArbolVistaXml($arbolXML,0,$baseurlimg,$clasedefault,1,20,130,1,$titulotabla);
39//________________________________________________________________________________________________________
40?>
41<HTML>
42<TITLE>Administración web de aulas</TITLE>
43<HEAD>
44        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
45        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
46        <SCRIPT language="javascript" src="../clases/jscripts/ArbolVistaXML.js"></SCRIPT>
47        <SCRIPT language="javascript" src="../jscripts/informacion_menus.js"></SCRIPT>
48        <SCRIPT language="javascript" src="../jscripts/comunes.js"></SCRIPT>
49        <SCRIPT language="javascript" src="../jscripts/opciones.js"></SCRIPT>
50        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/informacion_menus_'.$idioma.'.js"></SCRIPT>'?>
51</HEAD>
52<BODY>
53        <FORM name=fdatos>
54                <input type=hidden value="<? echo $idmenu?>" id=idmenu> 
55                <input type=hidden value="<? echo $contitempub?>" id=contitempub>       
56                <input type=hidden value="<? echo $contitempri?>" id=contitempri>       
57        </FORM>
58        <p align=center class=cabeceras><?echo $TbMsg[0]?><br>
59        <span align=center class=subcabeceras><?echo $TbMsg[1]?></span>&nbsp;<img src="../images/iconos/menus.gif"><br>
60        <img src="../images/iconos/menu.gif"><span class=presentaciones>&nbsp;&nbsp;<u><?echo $TbMsg[2]?></u>:  <? echo $descripcionmenu?></span></p>
61        <?
62        echo $arbol->CreaArbolVistaXML(); // Crea arbol de configuraciones
63        ?>
64</BODY>
65</HTML>
66<?
67// *************************************************************************************************************************************************
68function CreaArbol($cmd,$idmenu){
69        $cadenaXML=SubarbolXML_Menus($cmd,$idmenu);
70        return($cadenaXML);
71}
72//________________________________________________________________________________________________________
73function SubarbolXML_Menus($cmd,$idmenu)
74{
75        global $TbMsg;
76
77        $cadenaXML="";
78        $cmd->texto="SELECT * FROM menus WHERE idmenu=".$idmenu;
79        $rs=new Recordset;
80        $rs->Comando=&$cmd;
81        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
82        $rs->Primero();
83        while (!$rs->EOF){
84                $cadenaXML.='<MENU';
85                // Atributos
86                $cadenaXML.=' imagenodo="../images/iconos/menu.gif"';
87                $cadenaXML.=' infonodo="'.$rs->campos["descripcion"].'"';
88                $cadenaXML.='>';
89                $cadenaXML.=SubarbolXML_Ordenadores($cmd,$idmenu);
90                $cadenaXML.=SubarbolXML_Items($cmd,$idmenu);
91                $cadenaXML.='</MENU>';
92                $rs->Siguiente();
93        }
94        $rs->Cerrar();
95        return($cadenaXML);
96}
97//________________________________________________________________________________________________________
98function SubarbolXML_Ordenadores($cmd,$idmenu)
99{
100        global $TbMsg;
101
102        $cadenaXML="";
103        $gidaula=null;
104        $cmd->texto="SELECT aulas.idaula,aulas.nombreaula,ordenadores. idordenador,ordenadores.nombreordenador
105                                                                FROM ordenadores
106                                                                INNER JOIN aulas ON  ordenadores.idaula=aulas.idaula
107                                                                WHERE ordenadores.idmenu=".$idmenu." ORDER BY aulas.idaula,ordenadores.nombreordenador";
108        $rs=new Recordset;
109        $rs->Comando=&$cmd;
110        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
111        $rs->Primero();
112        if ($rs->numeroderegistros>0){
113                $cadenaXML.='<ORDENADORES';
114                $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
115                $cadenaXML.=' infonodo="'.$TbMsg[21].'"';
116                $cadenaXML.='>';
117        }
118        while (!$rs->EOF){
119                if ($gidaula!=$rs->campos["idaula"]){
120                        if ($gidaula)
121                                $cadenaXML.='</AULA>';
122                        $cadenaXML.='<AULA ';
123                        // Atributos           
124
125                        $cadenaXML.=' imagenodo="../images/iconos/aula.gif"';
126                        $cadenaXML.=' infonodo="'.$rs->campos["nombreaula"].'"';
127                        $cadenaXML.='>';
128                        $gidaula=$rs->campos["idaula"];
129                }
130                $cadenaXML.='<ORDENADOR';
131                // Atributos                   
132                $cadenaXML.=' imagenodo="../images/iconos/ordenador.gif"';
133                $cadenaXML.=' infonodo="'.$rs->campos["nombreordenador"].'"' ;
134                $cadenaXML.='></ORDENADOR>';
135                $rs->Siguiente();
136        }
137        if ($gidaula)
138                $cadenaXML.='</AULA>';
139        if ($rs->numeroderegistros>0)
140                        $cadenaXML.='</ORDENADORES>';
141        $rs->Cerrar();
142        return($cadenaXML);
143}
144//________________________________________________________________________________________________________
145function SubarbolXML_Items($cmd,$idmenu){
146        global  $TbMsg;
147        global  $ITEM_PUBLICO;
148        global  $ITEM_PRIVADO;
149        global  $idcentro;
150        global  $EJECUCION_PROCEDIMIENTO;
151        global  $EJECUCION_TAREA;
152        global  $contitempub;
153        global  $contitempri;
154
155        $cadenaXML="";
156        $rs=new Recordset;
157        $cmd->texto="SELECT acciones_menus.*,iconos.urlicono as urlimg
158                                                                FROM  acciones_menus
159                                                                LEFT OUTER JOIN iconos ON acciones_menus.idurlimg =iconos.idicono
160                                                                WHERE acciones_menus.idmenu=".$idmenu."
161                                                        ORDER BY acciones_menus.tipoitem,acciones_menus.orden";
162
163        $rs->Comando=&$cmd;
164        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
165        $rs->Primero();
166        $tbmodalidad[1]=$TbMsg[18];
167        $tbmodalidad[2]=$TbMsg[19];
168
169        $swpub=false;
170        $swpriv=false;
171       
172        $cadenaXML.='<ITEMS';
173        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
174        $cadenaXML.=' infonodo="'.$TbMsg[22].'"';
175        $cadenaXML.='>';       
176       
177        while (!$rs->EOF){
178                if ($rs->campos["tipoitem"]==$ITEM_PUBLICO){
179                        $contitempub++;
180                        if (!$swpub) {
181                                $cadenaXML.='<ITEMSPUBLICOS';
182                                $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
183                                $cadenaXML.=' infonodo="'.$TbMsg[13].'"';
184                                $cadenaXML.='>';
185                                $swpub=true;
186                        }       
187                }
188                if ($rs->campos["tipoitem"]==$ITEM_PRIVADO){
189                        $contitempri++;
190                        if ($swpub) {
191                                $cadenaXML.='</ITEMSPUBLICOS>';
192                                $swpub=false;
193                        }
194                        if (!$swpriv) {
195                                $cadenaXML.='<ITEMSPRIVADOS';
196                                $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
197                                $cadenaXML.=' infonodo="'.$TbMsg[14].'"';
198                                $cadenaXML.='>';
199                                $swpriv=true;
200                        }       
201                }
202                switch($rs->campos["tipoaccion"]){
203                                case $EJECUCION_PROCEDIMIENTO :
204                                        $cmd->texto='SELECT  procedimientos.descripcion  FROM  procedimientos
205                                                  WHERE procedimientos.idprocedimiento='.$rs->campos["idtipoaccion"];
206                                        $urlimg="procedimiento.gif";
207                                        break;
208                                case $EJECUCION_TAREA :
209                                        $cmd->texto='SELECT  tareas.idtarea, tareas.descripcion FROM tareas
210                                                         WHERE tareas.idtarea='.$rs->campos["idtipoaccion"];
211                                        $urlimg="tareas.gif";
212                                        break;
213                }
214                if(!empty($rs->campos["idtipoaccion"]))
215                                $cadenaXML.= SubarbolXML_itemsmenus($cmd,$urlimg,$rs->campos);
216                $rs->Siguiente();
217        }
218        if ($swpub)
219                                $cadenaXML.='</ITEMSPUBLICOS>';
220        if ($swpriv)
221                                $cadenaXML.='</ITEMSPRIVADOS>';
222        $cadenaXML.='</ITEMS>';                         
223        $rs->Cerrar();
224        return($cadenaXML);
225}
226
227//________________________________________________________________________________________________________
228function SubarbolXML_itemsmenus($cmd,$urlimg,$campos){
229        global  $TbMsg;
230        global  $ITEM_PUBLICO;
231        global $ITEM_PRIVADO;
232        global $idcentro;
233
234        $cadenaXML="";
235        $rs=new Recordset;
236        $rs->Comando=&$cmd;
237        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
238        $rs->Primero();
239        while (!$rs->EOF){
240                                $cadenaXML.='<ITEM';
241                                $cadenaXML.=' imagenodo="../images/iconos/'.$urlimg.'"';
242                                $cadenaXML.=' infonodo="'.$campos["descripitem"].'"';
243                                $cadenaXML.='>';
244
245                                $contprop=0;
246
247                                $cadenaXML.='<PROPMENU';
248                                $cadenaXML.=' imagenodo="../images/iconos/propiedad.gif"';
249                                $cadenaXML.=' infonodo="[b]'.$TbMsg[20].':[/b] '.$campos["idaccionmenu"].'"';
250                                $cadenaXML.='>';
251                                $cadenaXML.='</PROPMENU>';
252
253                                $cadenaXML.='<PROPMENU';
254                                $cadenaXML.=' imagenodo="../images/iconos/propiedad.gif"';
255                                $cadenaXML.=' infonodo="[b]'.$TbMsg[15].':[/b] '.$campos["orden"].'"';
256                                $cadenaXML.='>';
257                                $cadenaXML.='</PROPMENU>';
258
259                                $cadenaXML.='<PROPMENU';
260                                $cadenaXML.=' imagenodo="../images/iconos/propiedad.gif"';
261                                $cadenaXML.=' infonodo="[b]'.$TbMsg[16].':[/b] '.$rs->campos["descripcion"].'"';
262                                $cadenaXML.='>';
263                                $cadenaXML.='</PROPMENU>';
264
265                                if(!empty($campos["urlimg"])) {
266                                        $cadenaXML.='<PROPMENU';
267                                        $cadenaXML.=' imagenodo="../images/iconos/propiedad.gif"';
268                                        $cadenaXML.=' infonodo="[b]'.$TbMsg[17].': [/b]'.$campos["urlimg"].'"';
269                                        $cadenaXML.='>';
270                                        $cadenaXML.='</PROPMENU>';
271                                }
272                $cadenaXML.='</ITEM>';
273                $rs->Siguiente();
274        }
275        return($cadenaXML);
276}
277
278?>
Note: See TracBrowser for help on using the repository browser.