source: admin/WebConsole/gestores/gestor_procedimientos.php

lgromero-new-oglive
Last change on this file was b6ec162, checked in by Ramón M. Gómez <ramongomez@…>, 6 years ago

#834: Remove all redundant PHP closing tags.
  • Property mode set to 100644
File size: 5.9 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: gestor_procedimientos.php
8// Descripción :
9//              Gestiona el mantenimiento de la tabla de procedimientos
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/constantes.php");
17include_once("../includes/opciones.php");
18include_once("./relaciones/procedimientos_eliminacion.php");
19//________________________________________________________________________________________________________
20$opcion=0; // Inicializa parametros
21
22$idprocedimiento=0;
23$descripcion="";
24$grupoid=0;
25$comentarios="";
26
27if (isset($_POST["opcion"])) $opcion=$_POST["opcion"]; // Recoge parametros
28
29if (isset($_POST["idprocedimiento"])) $idprocedimiento=$_POST["idprocedimiento"];
30if (isset($_POST["descripcion"])) $descripcion=$_POST["descripcion"];
31if (isset($_POST["grupoid"])) $grupoid=$_POST["grupoid"];
32if (isset($_POST["comentarios"])) $comentarios=$_POST["comentarios"];
33if (isset($_POST["identificador"])) $idprocedimiento=$_POST["identificador"];
34
35$tablanodo=""; // Arbol para nodos insertados
36//________________________________________________________________________________________________________
37$cmd=CreaComando($cadenaconexion); // Crea objeto comando
38$resul=false;
39if ($cmd){
40        $resul=Gestiona();
41        $cmd->Conexion->Cerrar();
42}
43if($opcion!=$op_movida){
44        echo '<HTML>';
45        echo '<HEAD>';
46        echo '  <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">';
47        echo '<BODY>';
48        echo '<P><SPAN style="visibility:hidden" id="arbol_nodo">'.$tablanodo.'</SPAN></P>';
49        echo '  <SCRIPT language="javascript" src="../jscripts/propiedades_procedimientos.js"></SCRIPT>';
50        echo '<SCRIPT language="javascript">'.chr(13);
51        if ($resul){
52                echo 'var oHTML'.chr(13);
53                echo 'var cTBODY=document.getElementsByTagName("TBODY");'.chr(13);
54                echo 'o=cTBODY.item(1);'.chr(13);
55        }
56}
57        $literal="";
58        switch($opcion){
59                case $op_alta :
60                        $literal="resultado_insertar_procedimientos";
61                        break;
62                case $op_modificacion:
63                        $literal="resultado_modificar_procedimientos";
64                        break;
65                case $op_eliminacion :
66                        $literal="resultado_eliminar_procedimientos";
67                        break;
68                case $op_movida :
69                        $literal="resultado_mover";
70                        break;
71                default:
72                        break;
73        }
74if ($resul){
75        if ($opcion==$op_alta )
76                echo $literal."(1,'".$cmd->DescripUltimoError()." ',".$idprocedimiento.",o.innerHTML);".chr(13);
77        else
78                echo $literal."(1,'".$cmd->DescripUltimoError()." ','".$descripcion."');".chr(13);
79}
80else
81        echo $literal."(0,'".$cmd->DescripUltimoError()."',".$idprocedimiento.")";
82
83if($opcion!=$op_movida){
84        echo '  </SCRIPT>';
85        echo '</BODY>   ';
86        echo '</HTML>';
87}
88/**************************************************************************************************************************************************
89        Inserta, modifica o elimina datos en la tabla procedimientos
90________________________________________________________________________________________________________*/
91function Gestiona(){
92        global $EJECUCION_PROCEDIMIENTO;
93        global  $cmd;
94        global  $opcion;
95
96        global  $idcentro;
97        global  $idprocedimiento;
98        global  $descripcion;
99        global  $grupoid;
100        global  $comentarios;
101
102        global  $op_alta;
103        global  $op_modificacion;
104        global  $op_eliminacion;
105        global  $op_movida;
106
107        global  $tablanodo;
108
109        $cmd->CreaParametro("@idcentro",$idcentro,1);
110        $cmd->CreaParametro("@idprocedimiento",$idprocedimiento,1);
111        $cmd->CreaParametro("@descripcion",$descripcion,0);
112        $cmd->CreaParametro("@grupoid",$grupoid,1);
113        $cmd->CreaParametro("@comentarios",$comentarios,0);
114
115        switch($opcion){
116                case $op_alta :
117                        $cmd->texto="INSERT INTO procedimientos (descripcion,comentarios,idcentro,grupoid) VALUES (@descripcion,@comentarios,@idcentro,@grupoid)";
118                        $resul=$cmd->Ejecutar();
119                        if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta
120                                $idprocedimiento=$cmd->Autonumerico();
121                                $arbolXML=SubarbolXML_procedimientos($idprocedimiento,$descripcion);
122                                $baseurlimg="../images/signos"; // Url de las procedimientos de signo
123                                $clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol
124                                $arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault);
125                                $tablanodo=$arbol->CreaArbolVistaXML();
126                        }
127                        break;
128                case $op_modificacion:
129                        $cmd->texto="UPDATE procedimientos SET descripcion=@descripcion, comentarios=@comentarios WHERE idprocedimiento=@idprocedimiento";
130                        $resul=$cmd->Ejecutar();
131                        break;
132                case $op_eliminacion :
133                        $resul=EliminaProcedimientos($cmd,$idprocedimiento,"idprocedimiento");
134                        break;
135                case $op_movida :
136                        $cmd->texto="UPDATE procedimientos SET  grupoid=@grupoid WHERE idprocedimiento=@idprocedimiento";
137                        $resul=$cmd->Ejecutar();
138                        break;
139                default:
140                        break;
141        }
142        return($resul);
143}
144/*________________________________________________________________________________________________________
145        Crea un arbol XML para el nuevo nodo insertado
146________________________________________________________________________________________________________*/
147function SubarbolXML_procedimientos($idprocedimiento,$descripcion){
148        global $LITAMBITO_PROCEDIMIENTOS;
149        $cadenaXML='<PROCEDIMIENTO';
150        // Atributos
151        $cadenaXML.=' imagenodo="../images/iconos/procedimiento.gif"';
152        $cadenaXML.=' infonodo="'.$descripcion.'"';
153        $cadenaXML.=' nodoid='.$LITAMBITO_PROCEDIMIENTOS.'-'.$idprocedimiento;
154        $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PROCEDIMIENTOS."'" .')"';
155        $cadenaXML.='>';
156        $cadenaXML.='</PROCEDIMIENTO>';
157        return($cadenaXML);
158}
159
Note: See TracBrowser for help on using the repository browser.