source: admin/WebConsole/varios/perfilcomponente_soft.php

qndtest
Last change on this file was 6694784, checked in by Ramón M. Gómez <ramongomez@…>, 5 years ago

#834: Fixing more code cleanup: CSS units, HTML tags; Javascript comparisons, and PHP variables.
  • Property mode set to 100644
File size: 5.2 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 2009-2010
6// Fecha Última modificación: Agosto-2010
7// Nombre del fichero: perfilcomponente_soft.php
8// Descripción :
9//              Administra los componentes software incluidos en un perfil software
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../idiomas/php/".$idioma."/perfilcomponente_soft_".$idioma.".php");
15//________________________________________________________________________________________________________
16$idperfilsoft=0; 
17$descripcionperfil=""; 
18if (isset($_GET["idperfilsoft"])) $idperfilsoft=$_GET["idperfilsoft"]; // Recoge parametros
19if (isset($_GET["descripcionperfil"])) $descripcionperfil=$_GET["descripcionperfil"]; // Recoge parametros
20
21$cmd=CreaComando($cadenaconexion);
22if (!$cmd)
23        Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D.
24//________________________________________________________________________________________________________
25?>
26<HTML>
27<HEAD>
28<TITLE>Administración web de aulas</TITLE>
29<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
30<LINK rel="stylesheet" type="text/css" href="../estilos.css">
31<SCRIPT language="javascript" src="../jscripts/perfilcomponente_soft.js"></SCRIPT>
32<SCRIPT language="javascript" src="../jscripts/opciones.js"></SCRIPT>
33<SCRIPT language="javascript" src="../clases/jscripts/HttpLib.js"></SCRIPT>
34<?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/perfilcomponente_soft_'.$idioma.'.js"></SCRIPT>'?>
35</HEAD>
36<BODY>
37<FORM name="fdatos"> 
38        <INPUT type=hidden value="<?php echo $idcentro?>" id=idcentro>   
39        <INPUT type=hidden value="<?php echo $idperfilsoft?>" id=idperfilsoft>   
40        <P align=center class=cabeceras><?php echo $TbMsg[0]?><BR>
41        <SPAN align=center class=subcabeceras><?php echo $TbMsg[1]?></SPAN>&nbsp;<IMG src="../images/iconos/confisoft.gif"></P>
42        <BR>
43        <DIV align=center id="Layer_componentes">
44                <P align=center><SPAN class=presentaciones><B><U><?php echo $TbMsg[2]?></U>:&nbsp;<?php echo $descripcionperfil?></B></SPAN></P>
45                <TABLE width="100%" class="tabla_listados" cellspacing=1 cellpadding=0 >
46                         <TR>
47                                <TH>&nbsp</TH>
48                                <TH>T</TH>
49                                <TH><?php echo $TbMsg[3]?></TH>
50                        </TR>
51                <?php
52                        $nombreso=false;
53                        $rs=new Recordset; 
54                        $cmd->texto='SELECT softwares.idsoftware,softwares.descripcion,tiposoftwares.descripcion as hdescripcion,tiposoftwares.urlimg, nombreso FROM softwares INNER JOIN perfilessoft_softwares ON softwares.idsoftware=perfilessoft_softwares.idsoftware INNER JOIN tiposoftwares ON softwares.idtiposoftware=tiposoftwares.idtiposoftware INNER JOIN perfilessoft USING (idperfilsoft) LEFT OUTER JOIN nombresos USING (idnombreso) WHERE perfilessoft_softwares.idperfilsoft='.$idperfilsoft.' ORDER BY tiposoftwares.idtiposoftware,softwares.descripcion';
55                        $rs->Comando=&$cmd; 
56                        if ($rs->Abrir()){ 
57                                $rs->Primero();
58                                if (!$nombreso && $rs->campos["nombreso"] != "") {
59                                        echo '<TR>';
60                                        echo '<TD></TD>';
61                                        echo '<TD align=center width="10%" ><img alt="'. $rs->campos["nombreso"].'" src="../images/iconos/so.gif"></TD>';
62                                        echo '<TD  width="80%" >&nbsp;'.$rs->campos["nombreso"].'</TD>';
63                                        echo '</TR>';
64                                        $nombreso=true;
65                                }
66                                $A_W=" WHERE ";
67                                $strex="";
68                                while (!$rs->EOF){
69                                                 echo '<TR>';
70                                                 echo '<TD align=center width="10%" ><INPUT type=checkbox onclick="gestion_componente('.$rs->campos["idsoftware"].',this)" checked ></INPUT></TD>';
71                                                 echo '<TD align=center width="10%" ><img alt="'. $rs->campos["hdescripcion"].'"src="'.$rs->campos["urlimg"].'"></TD>';
72                                                 echo '<TD  width="80%" >&nbsp;'.$rs->campos["descripcion"].'</TD>';
73                                                 echo '</TR>';
74                                                 $strex.= $A_W."softwares.idsoftware<>".$rs->campos["idsoftware"];
75                                                $A_W=" AND ";
76                                                $rs->Siguiente();
77                                }
78                        }
79                        $rs->Cerrar();
80                        $cmd->texto='SELECT softwares.idsoftware,softwares.descripcion,tiposoftwares.descripcion as hdescripcion,tiposoftwares.urlimg  FROM softwares  INNER JOIN tiposoftwares ON softwares.idtiposoftware=tiposoftwares.idtiposoftware  '.$strex.' AND softwares.idcentro='.$idcentro.' ORDER BY tiposoftwares.idtiposoftware,softwares.descripcion';
81                        $rs->Comando=&$cmd; 
82                        if ($rs->Abrir()){
83                                $rs->Primero();
84                                while (!$rs->EOF){
85                                                 echo '<TR>';
86                                                 echo '<TD align=center width="10%" ><INPUT type=checkbox onclick="gestion_componente('.$rs->campos["idsoftware"].',this)"  ></INPUT></TD>';
87                                                 echo '<TD align=center width="10%" ><img alt="'. $rs->campos["hdescripcion"].'"src="'.$rs->campos["urlimg"].'"></TD>';
88                                                 echo '<TD width="80%" >&nbsp;'.$rs->campos["descripcion"].'</TD>';
89                                                 echo '</TR>';
90                                                $rs->Siguiente();
91                                }
92                        }
93                        $rs->Cerrar();
94                ?>
95                </TABLE>
96        </DIV>         
97        <DIV id="Layer_nota" align=center >
98                <BR>
99                <SPAN align=center class=notas><I><?php echo $TbMsg[4]?></I></SPAN>
100        </DIV>
101</FORM>
102</BODY>
103</HTML>
Note: See TracBrowser for help on using the repository browser.