source: admin/WebConsole/varios/ejecutaracciones.php

lgromero-new-oglive
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: 8.4 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 2003-2005
6// Fecha Última modificación: Abril-2005
7// Nombre del fichero: ejecutaracciones.php
8// Descripción :
9//              Administra procedimientos,tareas y trabajos de un determinado Centro
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../clases/XmlPhp.php");
14include_once("../clases/ArbolVistaXML.php");
15include_once("../clases/MenuContextual.php");
16include_once("../includes/constantes.php");
17include_once("../includes/CreaComando.php");
18include_once("../idiomas/php/".$idioma."/ejecutaracciones_".$idioma.".php");
19//________________________________________________________________________________________________________
20$ambito=0;
21$idambito=0;
22$nombreambito="";
23
24if (isset($_GET["ambito"]))     $ambito=$_GET["ambito"];
25if (isset($_GET["idambito"]))   $idambito=$_GET["idambito"];
26if (isset($_GET["nombreambito"]))       $nombreambito=$_GET["nombreambito"];
27
28//________________________________________________________________________________________________________
29$cmd=CreaComando($cadenaconexion);
30if (!$cmd)
31        Header('Location: '.$pagerror.'?herror=2');  // Error de conexión con servidor B.D.
32else
33        $arbolXML=CreaArbol($cmd,$idcentro); // Crea el arbol XML con todos los datos de las acciones registradas en el Centro
34
35// Creación del árbol
36$baseurlimg="../images/tsignos"; // Url de las imágenes de signo
37$clasedefault="tabla_listados_sin";
38$titulotabla=$TbMsg[8]; 
39$arbol=new ArbolVistaXml($arbolXML,0,$baseurlimg,$clasedefault,1,20,100,1,$titulotabla);
40
41//________________________________________________________________________________________________________
42?>
43<HTML>
44<TITLE>Administración web de aulas</TITLE>
45<HEAD>
46        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
47        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
48        <SCRIPT language="javascript" src="../clases/jscripts/ArbolVistaXML.js"></SCRIPT>
49        <SCRIPT language="javascript" src="../clases/jscripts/MenuContextual.js"></SCRIPT>
50        <SCRIPT language="javascript" src="../jscripts/comunes.js"></SCRIPT>
51        <SCRIPT language="javascript" src="../jscripts/constantes.js"></SCRIPT>
52        <SCRIPT language="javascript" src="../clases/jscripts/HttpLib.js"></SCRIPT>             
53        <SCRIPT language="javascript" src="../jscripts/ejecutaracciones.js"></SCRIPT>
54        <?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comunes_'.$idioma.'.js"></SCRIPT>'?>
55        <?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/ejecutaracciones_'.$idioma.'.js"></SCRIPT>'?>
56</HEAD>
57<BODY OnContextMenu="return false">
58<FORM name="fdatos"> 
59        <INPUT type=hidden name=ambito value=<?php echo $ambito?>>
60        <INPUT type=hidden name=idambito value=<?php echo $idambito?>>
61</FORM>
62
63<?php
64switch($ambito){
65                case $AMBITO_CENTROS :
66                        $urlimg='../images/iconos/centros.gif';
67                        $textambito=$TbMsg[0];
68                        break;
69                case $AMBITO_GRUPOSAULAS :
70                        $urlimg='../images/iconos/carpeta.gif';
71                        $textambito=$TbMsg[1];
72                        break;
73                case $AMBITO_AULAS :
74                        $urlimg='../images/iconos/aula.gif';
75                        $textambito=$TbMsg[2];
76                        break;
77                case $AMBITO_GRUPOSORDENADORES :
78                        $urlimg='../images/iconos/carpeta.gif';
79                        $textambito=$TbMsg[3];
80                        break;
81                case $AMBITO_ORDENADORES :
82                        $urlimg='../images/iconos/ordenador.gif';
83                        $textambito=$TbMsg[4];
84                        break;
85        }
86        echo '<p align=center><span class=cabeceras>'.$TbMsg[5].'&nbsp;</span><br>';
87        echo '<IMG src="'.$urlimg.'">&nbsp;&nbsp;<span align=center class=subcabeceras><U>'.$TbMsg[6].': '.$textambito.','.$nombreambito.'</U></span>&nbsp;&nbsp;</span></p>';
88?>
89<BR>
90<BR>
91<?php
92//________________________________________________________________________________________________________
93echo $arbol->CreaArbolVistaXML();        // Crea árbol (HTML) a partir del XML
94$flotante=new MenuContextual();                  // Crea objeto MenuContextual
95
96// Crea contextual de los procedimientos
97$XMLcontextual=CreacontextualXMLProcedimiento(); // Procedimientos
98echo $flotante->CreaMenuContextual($XMLcontextual);
99?>
100</BODY>
101</HTML>
102<?php
103// *************************************************************************************************************************************************
104//      Devuelve una cadena con formato XML con toda la información de las acciones registradas en un Centro concreto
105//      Parametros: PROCEDIMIENTO
106//              - cmd:Una comando ya operativo ( con conexión abierta) 
107//              - idcentro: El identificador del centro
108//________________________________________________________________________________________________________
109function CreaArbol($cmd,$idcentro){
110        global $TbMsg;
111        global $LITAMBITO_PROCEDIMIENTOS;
112
113        $cadenaXML='<PROCEDIMIENTOS';
114        // Atributos
115        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
116        $cadenaXML.=' infonodo="'.$TbMsg[7].'"';
117        $cadenaXML.=' nodoid=Raizpro'.$LITAMBITO_PROCEDIMIENTOS;
118        $cadenaXML.='>';
119        $cadenaXML.=SubarbolXML_grupos_procedimientos($cmd,$idcentro,0);
120        $cadenaXML.='</PROCEDIMIENTOS>';
121
122        return($cadenaXML);
123}
124//________________________________________________________________________________________________________
125function SubarbolXML_grupos_procedimientos($cmd,$idcentro,$grupoid){
126        global $AMBITO_GRUPOSPROCEDIMIENTOS;
127        global $LITAMBITO_GRUPOSPROCEDIMIENTOS;
128        $cadenaXML="";
129        $rs=new Recordset;
130        $cmd->texto="SELECT idgrupo,nombregrupo,grupoid FROM grupos WHERE grupoid=".$grupoid." AND idcentro=".$idcentro." AND tipo=".$AMBITO_GRUPOSPROCEDIMIENTOS." ORDER BY nombregrupo";
131        $rs->Comando=&$cmd;
132        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
133        $rs->Primero();
134        while (!$rs->EOF){
135                $cadenaXML.='<GRUPOSPROCEDIMIENTOS';
136                // Atributos
137                $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
138                $cadenaXML.=' infonodo="'.$rs->campos["nombregrupo"].'"';
139                $cadenaXML.=' nodoid='.$LITAMBITO_GRUPOSPROCEDIMIENTOS.'-'.$rs->campos["idgrupo"];
140                $cadenaXML.='>';
141                $cadenaXML.=SubarbolXML_grupos_procedimientos($cmd,$idcentro,$rs->campos["idgrupo"]);
142                $cadenaXML.='</GRUPOSPROCEDIMIENTOS>';
143                $rs->Siguiente();
144        }
145        $rs->Cerrar();
146        $cadenaXML.=SubarbolXML_Procedimientos($cmd,$idcentro,$grupoid);
147        return($cadenaXML);
148}
149//________________________________________________________________________________________________________
150function SubarbolXML_Procedimientos($cmd,$idcentro,$grupoid){
151        global $LITAMBITO_PROCEDIMIENTOS;
152        $cadenaXML="";
153        $rs=new Recordset;
154        $cmd->texto="SELECT idprocedimiento,descripcion  FROM procedimientos WHERE idcentro=".$idcentro." AND grupoid=".$grupoid." ORDER BY descripcion";
155        $rs->Comando=&$cmd;
156        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
157        $rs->Primero();
158        while (!$rs->EOF){
159                $cadenaXML.='<PROCEDIMIENTO';
160                // Atributos
161                $cadenaXML.=' imagenodo="../images/iconos/procedimiento.gif"';
162                $cadenaXML.=' infonodo="'.$rs->campos["descripcion"].'"';
163                $cadenaXML.=' nodoid='.$LITAMBITO_PROCEDIMIENTOS.'-'.$rs->campos["idprocedimiento"];
164                $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PROCEDIMIENTOS."'" .')"';
165                $cadenaXML.='>';
166                $cadenaXML.='</PROCEDIMIENTO>';
167                $rs->Siguiente();
168        }
169        $rs->Cerrar();
170        return($cadenaXML);
171}
172//________________________________________________________________________________________________________
173//
174//      Menús Contextuales
175//________________________________________________________________________________________________________
176function CreacontextualXMLProcedimiento(){
177        global $EJECUCION_PROCEDIMIENTO;
178        global $AMBITO_PROCEDIMIENTOS;
179        global $LITAMBITO_PROCEDIMIENTOS;
180        global $EJECUCION_AUTOEXEC;
181        global $TbMsg;
182
183        $layerXML='<MENUCONTEXTUAL';
184        $layerXML.=' idctx="flo_'.$LITAMBITO_PROCEDIMIENTOS.'"';
185        $layerXML.=' maxanchu=150';
186        $layerXML.=' swimg=1';
187        $layerXML.='>';
188
189        $layerXML.='<ITEM';
190        $layerXML.=' alpulsar="gestion('.$EJECUCION_PROCEDIMIENTO.')"';
191        $layerXML.=' imgitem="../images/iconos/comandos.gif"';
192        $layerXML.=' textoitem='.$TbMsg[9];
193        $layerXML.='></ITEM>';
194       
195        $layerXML.='<SEPARADOR>';
196        $layerXML.='</SEPARADOR>';
197       
198        $layerXML.='<ITEM';
199        $layerXML.=' alpulsar="gestion('.$EJECUCION_AUTOEXEC.')"';
200        $layerXML.=' imgitem="../images/iconos/hidra.gif"';
201        $layerXML.=' textoitem='.$TbMsg[10];
202        $layerXML.='></ITEM>';
203       
204        $layerXML.='</MENUCONTEXTUAL>';
205        return($layerXML);
206}
207?>
Note: See TracBrowser for help on using the repository browser.