source: admin/WebConsole/gestores/gestor_componentesoftwares.php @ 1a22cd2

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

Borrar caracteres BOM de UTF-8 en ficheros PHP de WebConsole?.

git-svn-id: https://opengnsys.es/svn/trunk@514 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 6.3 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-2004
6// Fecha Última modificación: Marzo-2005
7// Nombre del fichero: gestor_componentesoftwares.php
8// Descripción :
9//              Gestiona el mantenimiento de la tabla de softwares
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../clases/XmlPhp.php");
14include_once("../clases/ArbolVistaXML.php");
15include_once("../includes/CreaComando.php");
16include_once("../includes/TomaDato.php");
17include_once("../includes/constantes.php");
18include_once("../includes/opciones.php");
19include_once("./relaciones/softwares_eliminacion.php");
20//________________________________________________________________________________________________________
21$opcion=0; // Inicializa parametros
22
23$idsoftware=0;
24$descripcion="";
25$idtiposoftware=0;
26$idtiposo=0;
27$grupoid=0;
28
29$urlimgth=""; // Url de la imagen del tipo de software al que pertenece el componente
30
31if (isset($_GET["opcion"])) $opcion=$_GET["opcion"]; // Recoge parametros
32
33if (isset($_GET["idsoftware"])) $idsoftware=$_GET["idsoftware"];
34if (isset($_GET["descripcion"])) $descripcion=$_GET["descripcion"];
35if (isset($_GET["idtiposoftware"])) $idtiposoftware=$_GET["idtiposoftware"];
36if (isset($_GET["idtiposo"])) $idtiposo=$_GET["idtiposo"];
37if (isset($_GET["grupoid"])) $grupoid=$_GET["grupoid"];
38if (isset($_GET["identificador"])) $idsoftware=$_GET["identificador"];
39
40$tablanodo=""; // Arbol para nodos insertados
41
42$cmd=CreaComando($cadenaconexion); // Crea objeto comando
43$resul=false;
44if ($cmd){
45        $resul=Gestiona();
46        $cmd->Conexion->Cerrar();
47}
48// *************************************************************************************************************************************************
49?>
50<HTML>
51<HEAD>
52<BODY>
53<?
54        $literal="";
55        switch($opcion){
56                case $op_alta :
57                        $literal="resultado_insertar_componentesoftwares";
58                        break;
59                case $op_modificacion:
60                        $literal="resultado_modificar_componentesoftwares";
61                        break;
62                case $op_eliminacion :
63                        $literal="resultado_eliminar_componentesoftwares";
64                        break;
65                case $op_movida :
66                        $literal="resultado_mover";
67                        break;
68                default:
69                        break;
70        }
71echo '<p><span id="arbol_nodo">'.$tablanodo.'</span></p>';
72if ($resul){
73        echo '<SCRIPT language="javascript">'.chr(13);
74        echo 'var oHTML'.chr(13);
75        echo 'var cTBODY=document.getElementsByTagName("TBODY");'.chr(13);
76        echo 'o=cTBODY.item(1);'.chr(13);
77        if ($opcion==$op_alta )
78                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idsoftware.",o.innerHTML);".chr(13);
79        else
80                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ','".$descripcion."');".chr(13);
81        echo '</SCRIPT>';
82}
83else{
84        echo '<SCRIPT language="javascript">';
85        echo "  window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."',".$idsoftware.")";
86        echo '</SCRIPT>';
87}
88?>
89</BODY>
90</HTML>
91<?
92/**************************************************************************************************************************************************
93        Inserta, modifica o elimina datos en la tabla softwares
94________________________________________________________________________________________________________*/
95function Gestiona(){
96        global  $cmd;
97        global  $opcion;
98
99        global  $idcentro;
100        global  $idsoftware;
101        global  $descripcion;
102        global  $idtiposoftware;
103        global  $idtiposo;
104        global  $grupoid;
105
106        global $urlimgth;
107
108        global  $op_alta;
109        global  $op_modificacion;
110        global  $op_eliminacion;
111        global  $op_movida;
112
113        global  $tablanodo;
114
115        $cmd->CreaParametro("@idcentro",$idcentro,1);
116        $cmd->CreaParametro("@idsoftware",$idsoftware,1);
117        $cmd->CreaParametro("@descripcion",$descripcion,0);
118        $cmd->CreaParametro("@idtiposoftware",$idtiposoftware,1);
119        $cmd->CreaParametro("@idtiposo",$idtiposo,1);
120        $cmd->CreaParametro("@grupoid",$grupoid,1);
121
122        switch($opcion){
123                case $op_alta :
124                        $cmd->texto="INSERT INTO softwares (descripcion,idtiposoftware,idtiposo,idcentro,grupoid) VALUES (@descripcion,@idtiposoftware,@idtiposo,@idcentro,@grupoid)";
125                        $resul=$cmd->Ejecutar();
126                        if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta
127                                $idsoftware=$cmd->Autonumerico();
128                                $arbolXML=SubarbolXML_Componentesoftwares($cmd,$idsoftware,$descripcion,$idtiposoftware);
129                                $baseurlimg="../images/signos"; // Url de las imagenes de signo
130                                $clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol
131                                $arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault);
132                                $tablanodo=$arbol->CreaArbolVistaXML();
133                        }
134                        break;
135                case $op_modificacion:
136                        $cmd->texto="UPDATE softwares SET descripcion=@descripcion,idtiposoftware=@idtiposoftware,idtiposo=@idtiposo WHERE idsoftware=@idsoftware";
137                        $resul=$cmd->Ejecutar();
138                        if ($resul) // Toma la imagen del tipo de componente software
139                                        $urlimgth=TomaDato($cmd,0,'tiposoftwares',$idtiposoftware,'idtiposoftware','urlimg');
140                        break;
141                case $op_eliminacion :
142                        $resul=EliminaSoftwares($cmd,$idsoftware,"idsoftware");
143                        break;
144                case $op_movida :
145                        $cmd->texto="UPDATE softwares SET  grupoid=@grupoid WHERE idsoftware=@idsoftware";
146                        $resul=$cmd->Ejecutar();
147                        break;
148                default:
149                        break;
150        }
151        return($resul);
152}
153/*________________________________________________________________________________________________________
154        Crea un arbol XML para el nuevo nodo insertado
155________________________________________________________________________________________________________*/
156function SubarbolXML_Componentesoftwares($cmd,$idsoftware,$descripcion,$idtiposoftware){
157                global $LITAMBITO_COMPONENTESSOFT;
158                $urlimg=TomaDato($cmd,0,'tiposoftwares',$idtiposoftware,'idtiposoftware','urlimg');
159                $cadenaXML='<COMPONENTESOFTWARES';
160                // Atributos
161                if      (!empty($urlimg))
162                                $cadenaXML.=' imagenodo="'.$urlimg.'"';
163                        else
164                                $cadenaXML.=' imagenodo="../images/iconos/confisoft.gif"';     
165                $cadenaXML.=' infonodo="'.$descripcion.'"';
166                $cadenaXML.=' nodoid='.$LITAMBITO_COMPONENTESSOFT.'-'.$idsoftware;
167                $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_COMPONENTESSOFT."'" .')"';
168                $cadenaXML.='>';
169                $cadenaXML.='</COMPONENTESOFTWARES>';
170                return($cadenaXML);
171}
172?>
Note: See TracBrowser for help on using the repository browser.