source: admin/WebConsole/varios/ejecutarprocedimientos.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@…>, 15 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: 8.2 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        <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/ejecutarprocedimientos.js"></SCRIPT>
52        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comunes_'.$idioma.'.js"></SCRIPT>'?>
53        <? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/ejecutarprocedimientos_'.$idioma.'.js"></SCRIPT>'?>
54</HEAD>
55<BODY OnContextMenu="return false">
56<FORM name="fdatos"> 
57        <INPUT type=hidden name=ambito value=<?=$ambito?>>
58        <INPUT type=hidden name=idambito value=<?=$idambito?>>
59</FORM>
60
61<?
62switch($ambito){
63                case $AMBITO_CENTROS :
64                        $urlimg='../images/iconos/centros.gif';
65                        $textambito=$TbMsg[0];
66                        break;
67                case $AMBITO_GRUPOSAULAS :
68                        $urlimg='../images/iconos/carpeta.gif';
69                        $textambito=$TbMsg[1];
70                        break;
71                case $AMBITO_AULAS :
72                        $urlimg='../images/iconos/aula.gif';
73                        $textambito=$TbMsg[2];
74                        break;
75                case $AMBITO_GRUPOSORDENADORES :
76                        $urlimg='../images/iconos/carpeta.gif';
77                        $textambito=$TbMsg[3];
78                        break;
79                case $AMBITO_ORDENADORES :
80                        $urlimg='../images/iconos/ordenador.gif';
81                        $textambito=$TbMsg[4];
82                        break;
83        }
84        echo '<p align=center><span class=cabeceras>'.$TbMsg[5].'&nbsp;</span><br>';
85        echo '<IMG src="'.$urlimg.'">&nbsp;&nbsp;<span align=center class=subcabeceras><U>'.$TbMsg[6].': '.$textambito.','.$nombreambito.'</U></span>&nbsp;&nbsp;</span></p>';
86?>
87<BR>
88<BR>
89<?
90//________________________________________________________________________________________________________
91echo $arbol->CreaArbolVistaXML();        // Crea árbol (HTML) a partir del XML
92$flotante=new MenuContextual();                  // Crea objeto MenuContextual
93
94// Crea contextual de los procedimientos
95$XMLcontextual=CreacontextualXMLProcedimiento(); // Procedimientos
96echo $flotante->CreaMenuContextual($XMLcontextual);
97//________________________________________________________________________________________________________
98include_once("../includes/iframecomun.php");
99//________________________________________________________________________________________________________
100?>
101</BODY>
102</HTML>
103<?
104// *************************************************************************************************************************************************
105//      Devuelve una cadena con formato XML con toda la información de las acciones registradas en un Centro concreto
106//      Parametros:
107//              - cmd:Una comando ya operativo ( con conexión abierta) 
108//              - idcentro: El identificador del centro
109//________________________________________________________________________________________________________
110function CreaArbol($cmd,$idcentro){
111        global $TbMsg;
112        global $LITAMBITO_PROCEDIMIENTOS;
113
114        $cadenaXML='<PROCEDIMIENTOS';
115        // Atributos
116        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
117        $cadenaXML.=' infonodo="'.$TbMsg[7].'"';
118        $cadenaXML.=' nodoid=Raizpro'.$LITAMBITO_PROCEDIMIENTOS;
119        $cadenaXML.='>';
120        $cadenaXML.=SubarbolXML_grupos_procedimientos($cmd,$idcentro,0);
121        $cadenaXML.='</PROCEDIMIENTOS>';
122
123        return($cadenaXML);
124}
125//________________________________________________________________________________________________________
126function SubarbolXML_grupos_procedimientos($cmd,$idcentro,$grupoid){
127        global $AMBITO_GRUPOSPROCEDIMIENTOS;
128        global $LITAMBITO_GRUPOSPROCEDIMIENTOS;
129        $cadenaXML="";
130        $rs=new Recordset;
131        $cmd->texto="SELECT idgrupo,nombregrupo,grupoid FROM grupos WHERE grupoid=".$grupoid." AND idcentro=".$idcentro." AND tipo=".$AMBITO_GRUPOSPROCEDIMIENTOS." ORDER BY nombregrupo";
132        $rs->Comando=&$cmd;
133        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
134        $rs->Primero();
135        while (!$rs->EOF){
136                $cadenaXML.='<GRUPOSPROCEDIMIENTOS';
137                // Atributos
138                $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
139                $cadenaXML.=' infonodo="'.$rs->campos["nombregrupo"].'"';
140                $cadenaXML.=' nodoid='.$LITAMBITO_GRUPOSPROCEDIMIENTOS.'-'.$rs->campos["idgrupo"];
141                $cadenaXML.='>';
142                $cadenaXML.=SubarbolXML_grupos_procedimientos($cmd,$idcentro,$rs->campos["idgrupo"]);
143                $cadenaXML.='</GRUPOSPROCEDIMIENTOS>';
144                $rs->Siguiente();
145        }
146        $rs->Cerrar();
147        $cadenaXML.=SubarbolXML_Procedimientos($cmd,$idcentro,$grupoid);
148        return($cadenaXML);
149}
150//________________________________________________________________________________________________________
151function SubarbolXML_Procedimientos($cmd,$idcentro,$grupoid){
152        global $LITAMBITO_PROCEDIMIENTOS;
153        $cadenaXML="";
154        $rs=new Recordset;
155        $cmd->texto="SELECT idprocedimiento,descripcion  FROM procedimientos WHERE idcentro=".$idcentro." AND grupoid=".$grupoid." ORDER BY descripcion";
156        $rs->Comando=&$cmd;
157        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
158        $rs->Primero();
159        while (!$rs->EOF){
160                $cadenaXML.='<PROCEDIMIENTO';
161                // Atributos
162                $cadenaXML.=' imagenodo="../images/iconos/procedimiento.gif"';
163                $cadenaXML.=' infonodo="'.$rs->campos["descripcion"].'"';
164                $cadenaXML.=' nodoid='.$LITAMBITO_PROCEDIMIENTOS.'-'.$rs->campos["idprocedimiento"];
165                $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PROCEDIMIENTOS."'" .')"';
166                $cadenaXML.='>';
167                $cadenaXML.='</PROCEDIMIENTO>';
168                $rs->Siguiente();
169        }
170        $rs->Cerrar();
171        return($cadenaXML);
172}
173//________________________________________________________________________________________________________
174//
175//      Menús Contextuales
176//________________________________________________________________________________________________________
177function CreacontextualXMLProcedimiento(){
178        global $EJECUCION_PROCEDIMIENTO;
179        global $AMBITO_PROCEDIMIENTOS;
180        global $LITAMBITO_PROCEDIMIENTOS;
181        global $TbMsg;
182
183        $layerXML='<MENUCONTEXTUAL';
184        $layerXML.=' idctx="flo_'.$LITAMBITO_PROCEDIMIENTOS.'"';
185        $layerXML.=' maxanchu=170';
186        $layerXML.=' swimg=1';
187        $layerXML.='>';
188
189        $layerXML.='<ITEM';
190        $layerXML.=' alpulsar="EjecutarProcedimiento()"';
191        $layerXML.=' imgitem="../images/iconos/comandos.gif"';
192        $layerXML.=' textoitem='.$TbMsg[9];
193        $layerXML.='></ITEM>';
194       
195        $layerXML.='</MENUCONTEXTUAL>';
196        return($layerXML);
197}
198?>
Note: See TracBrowser for help on using the repository browser.