source: admin/WebConsole/varios/perfilcomponente_soft.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: 4.8 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: 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<LINK rel="stylesheet" type="text/css" href="../estilos.css">
29<SCRIPT language="javascript" src="../jscripts/perfilcomponente_soft.js"></SCRIPT>
30<SCRIPT language="javascript" src="../jscripts/opciones.js"></SCRIPT>
31<? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/perfilcomponente_soft_'.$idioma.'.js"></SCRIPT>'?>
32</HEAD>
33<BODY>
34<FORM name="fdatos"> 
35        <INPUT type=hidden value="<? echo $idcentro?>" id=idcentro>     
36        <INPUT type=hidden value="<? echo $idperfilsoft?>" id=idperfilsoft>     
37        <P align=center class=cabeceras><?echo $TbMsg[0]?><BR>
38        <SPAN align=center class=subcabeceras><?echo $TbMsg[1]?></SPAN>&nbsp;<IMG src="../images/iconos/confisoft.gif"></P>
39        <BR>
40        <DIV align=center id="Layer_componentes">
41                <SPAN align=center class=presentaciones><B><U><?echo $TbMsg[2]?></U>:&nbsp;<? echo $descripcionperfil?></B></SPAN></P>
42                <TABLE width="100%" class="tabla_listados" cellspacing=1 cellpadding=0 >
43                         <TR>
44                                <TH>&nbsp</TH>
45                                <TH>T</TH>
46                                <TH><?echo $TbMsg[3]?></TH>
47                        </TR>
48                <?
49                        $rs=new Recordset;
50                        $cmd->texto='SELECT softwares.idsoftware,softwares.descripcion,tiposoftwares.descripcion as hdescripcion,tiposoftwares.urlimg FROM softwares INNER JOIN perfilessoft_softwares ON softwares.idsoftware=perfilessoft_softwares.idsoftware INNER JOIN tiposoftwares ON softwares.idtiposoftware=tiposoftwares.idtiposoftware WHERE perfilessoft_softwares.idperfilsoft='.$idperfilsoft.' ORDER BY tiposoftwares.idtiposoftware,softwares.descripcion';
51                        $rs->Comando=&$cmd;
52                        if ($rs->Abrir()){
53                                $rs->Primero();
54                                $A_W=" WHERE ";
55                                $strex="";
56                                while (!$rs->EOF){
57                                                 echo '<TR>';
58                                                 echo '<TD align=center width="10%" ><INPUT type=checkbox onclick="gestion_componente('.$rs->campos["idsoftware"].',this)" checked ></INPUT></TD>';
59                                                 echo '<TD align=center width="10%" ><img alt="'. $rs->campos["hdescripcion"].'"src="'.$rs->campos["urlimg"].'"></TD>';
60                                                 echo '<TD  width="80%" >&nbsp;'.$rs->campos["descripcion"].'</TD>';
61                                                 echo '</TR>';
62                                                 $strex.= $A_W."softwares.idsoftware<>".$rs->campos["idsoftware"];
63                                                $A_W=" AND ";
64                                                $rs->Siguiente();
65                                }
66                        }
67                        $rs->Cerrar();
68                        $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';
69                        $rs->Comando=&$cmd;
70                        if ($rs->Abrir()){
71                                $rs->Primero();
72                                while (!$rs->EOF){
73                                                 echo '<TR>';
74                                                 echo '<TD align=center width="10%" ><INPUT type=checkbox onclick="gestion_componente('.$rs->campos["idsoftware"].',this)"  ></INPUT></TD>';
75                                                 echo '<TD align=center width="10%" ><img alt="'. $rs->campos["hdescripcion"].'"src="'.$rs->campos["urlimg"].'"></TD>';
76                                                 echo '<TD width="80%" >&nbsp;'.$rs->campos["descripcion"].'</TD>';
77                                                 echo '</TR>';
78                                                $rs->Siguiente();
79                                }
80                        }
81                        $rs->Cerrar();
82                ?>
83                </TABLE>
84        </DIV>         
85        <DIV id="Layer_nota" align=center >
86                <BR>
87                <SPAN align=center class=notas><I><?echo $TbMsg[4]?></I></SPAN>
88        </DIV>
89</FORM>
90<?
91//________________________________________________________________________________________________________
92include_once("../includes/iframecomun.php");
93//________________________________________________________________________________________________________
94?>
95</BODY>
96</HTML>
Note: See TracBrowser for help on using the repository browser.