source: admin/WebConsole/varios/informacion_trabajos.php @ dbc9bab

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 dbc9bab was 1b92629, checked in by ramon <ramongomez@…>, 16 years ago

Reorganización directorios OpenGNSys Admin.

git-svn-id: https://opengnsys.es/svn/trunk@455 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 8.4 KB
Line 
1<?
2// *************************************************************************************************************************************************
3// Aplicación WEB: ogAdmWebCon
4// Copyright 200-2005 José Manuel Alonso. Todos los derechos reservados.
5// Fecha Creación: Año 2003-2004
6// Fecha Última modificación: Febrero-2005
7// Nombre del fichero: informacion_tareas.php
8// Descripción :
9//              Muestra las tareas, sus comandos y valores, que forman parte de un trabajo
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/constantes.php");
14include_once("../includes/comunes.php");
15include_once("../includes/CreaComando.php");
16include_once("../includes/TomaDato.php");
17include_once("../idiomas/php/".$idioma."/informacion_trabajos_".$idioma.".php");
18//________________________________________________________________________________________________________
19$idtrabajo="";
20$descripciontrabajo="";
21
22if (isset($_GET["idtrabajo"]))  $idtrabajo=$_GET["idtrabajo"];
23if (isset($_GET["descripciontrabajo"])) $descripciontrabajo=$_GET["descripciontrabajo"];
24//________________________________________________________________________________________________________
25?>
26<HTML>
27<TITLE>Administración web de aulas</TITLE>
28<HEAD>
29        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
30        <SCRIPT language="javascript" src="../jscripts/comunes.js"></SCRIPT>
31</HEAD>
32<BODY>
33        <?
34        $cmd=CreaComando($cadenaconexion);
35        if ($cmd){
36                $rs=new Recordset;
37                $cmd->texto="SELECT idtarea FROM trabajos_tareas  WHERE idtrabajo=".$idtrabajo. " ORDER BY trabajos_tareas.orden";
38                $rs->Comando=&$cmd;
39                if ($rs->Abrir()){
40                                echo '<br><p align=center><IMG src="../images/iconos/trabajos.gif">&nbsp;&nbsp;<U><span class="supercabeceras">'.$TbMsg[0].'</span></U><br><span class="sobrecabeceras">'.$descripciontrabajo.'</span></p>';
41                        while (!$rs->EOF){
42                                pintatareas($cmd,$rs->campos["idtarea"]);
43                                $rs->Siguiente();
44                        }
45                }
46        }
47        ?>
48</BODY>
49</HTML>
50<?
51// *************************************************************************************************************************************************
52function pintatareas($cmd,$idtarea){
53                global $TbMsg;
54                $rs=new Recordset;
55                $cmd->texto="SELECT idtareacomando FROM tareas_comandos  WHERE idtarea=".$idtarea. " ORDER BY idtareacomando,orden";
56                $rs->Comando=&$cmd;
57                if ($rs->Abrir()){
58                                $descripciontarea=TomaDato($cmd,0,"tareas",$idtarea,"idtarea","descripcion");
59                                echo '<br><br><p align=center><IMG style="cursor:hand" onclick="abre_tablaparametros('.$idtarea.')" src="../images/iconos/tareas.gif">&nbsp;&nbsp;<U><span class=cabeceras>'.$TbMsg[1].'</span></U><br><span class=subcabeceras>'.$descripciontarea.'</span></p>';
60                                echo '<TABLE align=center  border=0 cellspacing=1 cellpadding=0 id=tablaparametros-'.$idtarea.' style="display:block"  width="90%">'.chr(13);
61                                echo '<TR><TD>';
62                                $tabla_parametros=""; // Tabla  para localizar parametros
63                                $cont_parametros=0; // Contador de la tabla
64                                CreaTablaParametros($cmd); // Crea tabla  especificaciones de parametros
65                                while (!$rs->EOF){
66                                        pintacomandos($cmd,$rs->campos["idtareacomando"]);
67                                        $rs->Siguiente();
68                                }
69                                echo '</TD></TR></TABLE>';
70                }
71        }
72//________________________________________________________________________________________________________
73function pintacomandos($cmd,$idtareacomando){
74        global $TbMsg;
75        global $AMBITO_CENTROS;
76        global $AMBITO_GRUPOSAULAS;
77        global $AMBITO_AULAS;
78        global $AMBITO_GRUPOSORDENADORES;
79        global $AMBITO_ORDENADORES;
80        global  $tabla_parametros;
81        global  $cont_parametros;
82
83        $rs=new Recordset;
84        $cmd->texto="SELECT tareas_comandos.*, comandos.visuparametros FROM tareas_comandos ";
85        $cmd->texto.=" INNER JOIN comandos ON comandos.idcomando=tareas_comandos.idcomando";
86        $cmd->texto.=" WHERE tareas_comandos.idtareacomando=".$idtareacomando;
87        $rs->Comando=&$cmd;
88        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
89        if ($rs->EOF) return("");
90
91        $HTMLparametros='<TABLE class="tabla_parametros" align=center  border=0 cellspacing=1 cellpadding=0 width="100%">'.chr(13);
92        $HTMLparametros.='<TR>'.chr(13);
93        $HTMLparametros.=  '<TH>&nbsp;'.$TbMsg[2].'&nbsp;</TH>'.chr(13);
94        $HTMLparametros.=  '<TH>&nbsp;'.$TbMsg[3].'</TH>&nbsp;'.chr(13);
95        $HTMLparametros.=  '</TR>'.chr(13);
96
97        $textambito="";
98        $urlimg="";
99
100        switch($rs->campos["ambito"]){
101                case $AMBITO_CENTROS :
102                        $urlimg='../images/iconos/centros.gif';
103                        $textambito="Centros";
104                        $nombre=TomaDato($cmd,0,'centros',$rs->campos["idambito"],'idcentro','nombrecentro');
105                        break;
106                case $AMBITO_GRUPOSAULAS :
107                        $urlimg='../images/iconos/carpeta.gif';
108                        $textambito="Grupos de aulas";
109                        $nombre=TomaDato($cmd,0,'grupos',$rs->campos["idambito"],'idgrupo','nombregrupo');
110                        break;
111                case $AMBITO_AULAS :
112                        $urlimg='../images/iconos/aula.gif';
113                        $textambito="Aulas";
114                        $nombre=TomaDato($cmd,0,'aulas',$rs->campos["idambito"],'idaula','nombreaula');
115                        break;
116                case $AMBITO_GRUPOSORDENADORES :
117                        $urlimg='../images/iconos/carpeta.gif';
118                        $textambito="Grupos de ordenadores";
119                        $nombre=TomaDato($cmd,0,'gruposordenadores',$rs->campos["idambito"],'idgrupo','nombregrupoordenador');
120                        break;
121                case $AMBITO_ORDENADORES :
122                        $urlimg='../images/iconos/ordenador.gif';
123                        $textambito="Ordenadores";
124                        $nombre=TomaDato($cmd,0,'ordenadores',$rs->campos["idambito"],'idordenador','nombreordenador');
125                        break;
126        }
127        $HTMLparametros.= '<TD>&nbsp;'.$TbMsg[4].'&nbsp;</TD>'.chr(13);
128        $HTMLparametros.= '<TD>&nbsp;'.$textambito.'&nbsp;';
129        $HTMLparametros.= '<IMG src="'.$urlimg.'">&nbsp;</TD>'.chr(13);
130        $HTMLparametros.=       '</TR><TR>';
131        $HTMLparametros.= '<TD>&nbsp;'.$TbMsg[5].'&nbsp;</TD>'.chr(13);
132
133        $HTMLparametros.= '<TD>&nbsp;'.$nombre.'&nbsp;</TD>'.chr(13);
134        $HTMLparametros.=       '</TR>';
135
136        $auxVP=split(";",$rs->campos["visuparametros"]); // Parametros visualizables
137        $auxP=split(chr(13),$rs->campos["parametros"]); // Recorre parametros para visualizar los que así sean
138        for ($i=0;$i<sizeof($auxP);$i++){
139                $dualparam=split("=",$auxP[$i]);
140                for ($k=0;$k<sizeof($auxVP);$k++){
141                         if($auxVP[$k]==$dualparam[0]){
142                                $posp=busca_indicebinariodual($dualparam[0],$tabla_parametros,$cont_parametros); // Busca datos del parámetro en la tabla cargada previamentre con todos los parámetros
143                                if ($posp>=0){
144                                        $auxtabla_parametros=$tabla_parametros[$posp][1];
145                                        $HTMLparametros.='<TR>'.chr(13);
146                                        $HTMLparametros.=  '<TD>&nbsp;'.$auxtabla_parametros["descripcion"].'&nbsp;</TD>'.chr(13);
147                                        if($auxtabla_parametros["tipopa"]==1){
148                                        $valor=TomaDato($cmd,0,$auxtabla_parametros["nomtabla"],$dualparam[1],$auxtabla_parametros["nomidentificador"],$auxtabla_parametros["nomliteral"]);
149                                        }else
150                                                $valor=$dualparam[1];
151                                        if($dualparam[0]!="iph")
152                                                        $HTMLparametros.=  '<TD>&nbsp;'.$valor.'&nbsp;</TD>'.chr(13);
153                                        else{
154                                                        $tablaipes=PintaOrdenadores($cmd,$valor);
155                                                        $HTMLparametros.=  '<TD>&nbsp;'.$tablaipes.'&nbsp;</TD>'.chr(13);
156                                        }
157                                        $HTMLparametros.=  '</TR>'.chr(13);
158                                }
159                        }
160                }
161        }
162        $HTMLparametros.=  '</TABLE>'.chr(13);
163        $descripcioncomando=TomaDato($cmd,0,"comandos",$rs->campos["idcomando"],"idcomando","descripcion");
164        echo '<br><p align=center><IMG src="../images/iconos/comandos.gif">&nbsp;&nbsp;<span class=presentaciones>'.$descripcioncomando.'</span>';
165        echo $HTMLparametros;
166        echo '</p>';
167}
168//________________________________________________________________________________________________________
169function PintaOrdenadores($cmd,$cadenaip){
170        $auxP=split(";",$cadenaip);
171        if(sizeof($auxP)<1) return("");
172        $clauslaIN="'".$auxP[0]."'";
173        for ($i=1;$i<sizeof($auxP);$i++)
174                $clauslaIN.=",'".$auxP[$i]."'";
175        $rs=new Recordset;
176        $contor=0;
177        $maxord=7; // Máximos ordenadores por linea
178        $cmd->texto=" SELECT nombreordenador,ip FROM ordenadores  INNER JOIN aulas ON aulas.idaula=ordenadores.idaula WHERE ip IN(".$clauslaIN.") ORDER by nombreaula,nombreordenador";
179        $rs->Comando=&$cmd;
180        if (!$rs->Abrir()) return(""); // Error al abrir recordset
181        $tablaHtml='<TABLE align=left border=0><TR>';
182        while (!$rs->EOF){
183                $contor++;
184                $tablaHtml.= '<TD align=center style="BACKGROUND-COLOR: #b5daad;FONT-FAMILY: Arial, Helvetica, sans-serif;      BORDER-BOTTOM:#000000 none;FONT-SIZE: 8px"><IMG src="../images/iconos/ordenador.gif"><br><span style="FONT-SIZE:9px" >'.$rs->campos["nombreordenador"].'</TD>';
185                if($contor>$maxord){
186                        $contor=0;
187                        $tablaHtml.='</TR><TR>';
188                }
189                $rs->Siguiente();
190        }
191        $tablaHtml.='</TR>';
192        $tablaHtml.= '</TR></TABLE>';
193        return($tablaHtml);
194}
195?>
Note: See TracBrowser for help on using the repository browser.