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_perfilsoftwares.php |
---|
8 | // Descripción : |
---|
9 | // Gestiona el mantenimiento de la tabla de perfilessoft |
---|
10 | // ************************************************************************************************************************************************* |
---|
11 | include_once("../includes/ctrlacc.php"); |
---|
12 | include_once("../clases/AdoPhp.php"); |
---|
13 | include_once("../clases/XmlPhp.php"); |
---|
14 | include_once("../clases/ArbolVistaXML.php"); |
---|
15 | include_once("../includes/CreaComando.php"); |
---|
16 | include_once("../includes/constantes.php"); |
---|
17 | include_once("../includes/opciones.php"); |
---|
18 | include_once("./relaciones/perfilessoft_eliminacion.php"); |
---|
19 | //________________________________________________________________________________________________________ |
---|
20 | $opcion=0; // Inicializa parametros |
---|
21 | |
---|
22 | $idperfilsoft=0; |
---|
23 | $descripcion=""; |
---|
24 | $comentarios=""; |
---|
25 | $grupoid=0; |
---|
26 | |
---|
27 | if (isset($_GET["opcion"])) $opcion=$_GET["opcion"]; // Recoge parametros |
---|
28 | |
---|
29 | if (isset($_GET["idperfilsoft"])) $idperfilsoft=$_GET["idperfilsoft"]; |
---|
30 | if (isset($_GET["descripcion"])) $descripcion=$_GET["descripcion"]; |
---|
31 | if (isset($_GET["comentarios"])) $comentarios=$_GET["comentarios"]; |
---|
32 | if (isset($_GET["grupoid"])) $grupoid=$_GET["grupoid"]; |
---|
33 | if (isset($_GET["identificador"])) $idperfilsoft=$_GET["identificador"]; |
---|
34 | |
---|
35 | $tablanodo=""; // Arbol para nodos insertados |
---|
36 | |
---|
37 | $cmd=CreaComando($cadenaconexion); // Crea objeto comando |
---|
38 | $resul=false; |
---|
39 | if ($cmd){ |
---|
40 | $resul=Gestiona(); |
---|
41 | $cmd->Conexion->Cerrar(); |
---|
42 | } |
---|
43 | // ************************************************************************************************************************************************* |
---|
44 | ?> |
---|
45 | <HTML> |
---|
46 | <HEAD> |
---|
47 | <BODY> |
---|
48 | <? |
---|
49 | $literal=""; |
---|
50 | switch($opcion){ |
---|
51 | case $op_alta : |
---|
52 | $literal="resultado_insertar_perfilsoftwares"; |
---|
53 | break; |
---|
54 | case $op_modificacion: |
---|
55 | $literal="resultado_modificar_perfilsoftwares"; |
---|
56 | break; |
---|
57 | case $op_eliminacion : |
---|
58 | $literal="resultado_eliminar_perfilsoftwares"; |
---|
59 | break; |
---|
60 | case $op_movida : |
---|
61 | $literal="resultado_mover"; |
---|
62 | break; |
---|
63 | default: |
---|
64 | break; |
---|
65 | } |
---|
66 | echo '<p><span id="arbol_nodo">'.$tablanodo.'</span></p>'; |
---|
67 | if ($resul){ |
---|
68 | echo '<SCRIPT language="javascript">'.chr(13); |
---|
69 | echo 'var oHTML'.chr(13); |
---|
70 | echo 'var cTBODY=document.getElementsByTagName("TBODY");'.chr(13); |
---|
71 | echo 'o=cTBODY.item(1);'.chr(13); |
---|
72 | if ($opcion==$op_alta ) |
---|
73 | echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idperfilsoft.",o.innerHTML);"; |
---|
74 | else |
---|
75 | echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ','".$descripcion."');"; |
---|
76 | echo '</SCRIPT>'; |
---|
77 | } |
---|
78 | else{ |
---|
79 | echo '<SCRIPT language="javascript">'; |
---|
80 | echo " window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."',".$idperfilsoft.")"; |
---|
81 | echo '</SCRIPT>'; |
---|
82 | } |
---|
83 | ?> |
---|
84 | </BODY> |
---|
85 | </HTML> |
---|
86 | <? |
---|
87 | /************************************************************************************************************************************************** |
---|
88 | Inserta, modifica o elimina datos en la tabla perfilessoft |
---|
89 | ________________________________________________________________________________________________________*/ |
---|
90 | function Gestiona(){ |
---|
91 | global $cmd; |
---|
92 | global $opcion; |
---|
93 | |
---|
94 | global $idcentro; |
---|
95 | global $idperfilsoft; |
---|
96 | global $descripcion; |
---|
97 | global $comentarios; |
---|
98 | global $grupoid; |
---|
99 | |
---|
100 | global $op_alta; |
---|
101 | global $op_modificacion; |
---|
102 | global $op_eliminacion; |
---|
103 | global $op_movida; |
---|
104 | |
---|
105 | global $tablanodo; |
---|
106 | |
---|
107 | $cmd->CreaParametro("@idcentro",$idcentro,1); |
---|
108 | $cmd->CreaParametro("@idperfilsoft",$idperfilsoft,1); |
---|
109 | $cmd->CreaParametro("@descripcion",$descripcion,0); |
---|
110 | $cmd->CreaParametro("@comentarios",$comentarios,0); |
---|
111 | $cmd->CreaParametro("@grupoid",$grupoid,1); |
---|
112 | |
---|
113 | switch($opcion){ |
---|
114 | case $op_alta : |
---|
115 | $cmd->texto="INSERT INTO perfilessoft (descripcion,comentarios,idcentro,grupoid) VALUES (@descripcion,@comentarios,@idcentro,@grupoid)"; |
---|
116 | $resul=$cmd->Ejecutar(); |
---|
117 | if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta |
---|
118 | $idperfilsoft=$cmd->Autonumerico(); |
---|
119 | $arbolXML=SubarbolXML_perfilessoft($idperfilsoft,$descripcion); |
---|
120 | $baseurlimg="../images/signos"; // Url de las imagenes de signo |
---|
121 | $clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol |
---|
122 | $arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault); |
---|
123 | $tablanodo=$arbol->CreaArbolVistaXML(); |
---|
124 | } |
---|
125 | break; |
---|
126 | case $op_modificacion: |
---|
127 | $cmd->texto="UPDATE perfilessoft SET descripcion=@descripcion,comentarios=@comentarios WHERE idperfilsoft=@idperfilsoft"; |
---|
128 | $resul=$cmd->Ejecutar(); |
---|
129 | break; |
---|
130 | case $op_eliminacion : |
---|
131 | $resul=EliminaPerfilessoft($cmd,$idperfilsoft,"idperfilsoft"); |
---|
132 | break; |
---|
133 | case $op_movida : |
---|
134 | $cmd->texto="UPDATE perfilessoft SET grupoid=@grupoid WHERE idperfilsoft=@idperfilsoft"; |
---|
135 | $resul=$cmd->Ejecutar(); |
---|
136 | break; |
---|
137 | default: |
---|
138 | break; |
---|
139 | } |
---|
140 | return($resul); |
---|
141 | } |
---|
142 | /*________________________________________________________________________________________________________ |
---|
143 | Crea un arbol XML para el nuevo nodo insertado |
---|
144 | ________________________________________________________________________________________________________*/ |
---|
145 | function SubarbolXML_perfilessoft($idperfilsoft,$descripcion){ |
---|
146 | global $LITAMBITO_PERFILESSOFT; |
---|
147 | $cadenaXML='<PERFILESSOFTWARES '; |
---|
148 | // Atributos |
---|
149 | $cadenaXML.=' imagenodo="../images/iconos/perfilsoftware.gif"'; |
---|
150 | $cadenaXML.=' infonodo="' .$descripcion.'"'; |
---|
151 | $cadenaXML.=' nodoid='.$LITAMBITO_PERFILESSOFT.'-'.$idperfilsoft; |
---|
152 | $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PERFILESSOFT."'" .')"'; |
---|
153 | $cadenaXML.='>'; |
---|
154 | $cadenaXML.='</PERFILESSOFTWARES>'; |
---|
155 | return($cadenaXML); |
---|
156 | } |
---|
157 | ?> |
---|