source: admin/WebConsole/varios/ejecutarprocedimientos.php @ b6906f7

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 b6906f7 was b0dc2e4, checked in by alonso <alonso@…>, 16 years ago

git-svn-id: https://opengnsys.es/svn/trunk@489 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 8.1 KB
Line 
1<?
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: ejecutarprocedimientos.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."/ejecutarprocedimientos_".$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        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
47        <SCRIPT language="javascript" src="../clases/jscripts/ArbolVistaXML.js"></SCRIPT>
48        <SCRIPT language="javascript" src="../clases/jscripts/MenuContextual.js"></SCRIPT>
49        <SCRIPT language="javascript" src="../jscripts/comunes.js"></SCRIPT>
50        <SCRIPT language="javascript" src="../jscripts/ejecutarprocedimientos.js"></SCRIPT>
51        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comunes_'.$idioma.'.js"></SCRIPT>'?>
52        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/ejecutarprocedimientos_'.$idioma.'.js"></SCRIPT>'?>
53</HEAD>
54<BODY OnContextMenu="return false">
55<FORM name="fdatos"> 
56        <INPUT type=hidden name=ambito value=<?=$ambito?>>
57        <INPUT type=hidden name=idambito value=<?=$idambito?>>
58</FORM>
59
60<?
61switch($ambito){
62                case $AMBITO_CENTROS :
63                        $urlimg='../images/iconos/centros.gif';
64                        $textambito=$TbMsg[0];
65                        break;
66                case $AMBITO_GRUPOSAULAS :
67                        $urlimg='../images/iconos/carpeta.gif';
68                        $textambito=$TbMsg[1];
69                        break;
70                case $AMBITO_AULAS :
71                        $urlimg='../images/iconos/aula.gif';
72                        $textambito=$TbMsg[2];
73                        break;
74                case $AMBITO_GRUPOSORDENADORES :
75                        $urlimg='../images/iconos/carpeta.gif';
76                        $textambito=$TbMsg[3];
77                        break;
78                case $AMBITO_ORDENADORES :
79                        $urlimg='../images/iconos/ordenador.gif';
80                        $textambito=$TbMsg[4];
81                        break;
82        }
83        echo '<p align=center><span class=cabeceras>'.$TbMsg[5].'&nbsp;</span><br>';
84        echo '<IMG src="'.$urlimg.'">&nbsp;&nbsp;<span align=center class=subcabeceras><U>'.$TbMsg[6].': '.$textambito.','.$nombreambito.'</U></span>&nbsp;&nbsp;</span></p>';
85?>
86<BR>
87<BR>
88<?
89//________________________________________________________________________________________________________
90echo $arbol->CreaArbolVistaXML();        // Crea árbol (HTML) a partir del XML
91$flotante=new MenuContextual();                  // Crea objeto MenuContextual
92
93// Crea contextual de los procedimientos
94$XMLcontextual=CreacontextualXMLProcedimiento(); // Procedimientos
95echo $flotante->CreaMenuContextual($XMLcontextual);
96//________________________________________________________________________________________________________
97include_once("../includes/iframecomun.php");
98//________________________________________________________________________________________________________
99?>
100</BODY>
101</HTML>
102<?
103// *************************************************************************************************************************************************
104//      Devuelve una cadena con formato XML con toda la información de las acciones registradas en un Centro concreto
105//      Parametros:
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 $TbMsg;
181
182        $layerXML='<MENUCONTEXTUAL';
183        $layerXML.=' idctx="flo_'.$LITAMBITO_PROCEDIMIENTOS.'"';
184        $layerXML.=' maxanchu=170';
185        $layerXML.=' swimg=1';
186        $layerXML.='>';
187
188        $layerXML.='<ITEM';
189        $layerXML.=' alpulsar="EjecutarProcedimiento()"';
190        $layerXML.=' imgitem="../images/iconos/comandos.gif"';
191        $layerXML.=' textoitem='.$TbMsg[9];
192        $layerXML.='></ITEM>';
193       
194        $layerXML.='</MENUCONTEXTUAL>';
195        return($layerXML);
196}
197?>
Note: See TracBrowser for help on using the repository browser.