source: admin/WebConsole/gestores/gestor_procedimientos.php @ 10023eb

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 10023eb was b0dc2e4, checked in by alonso <alonso@…>, 16 years ago

git-svn-id: https://opengnsys.es/svn/trunk@489 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 5.7 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_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($_GET["opcion"])) $opcion=$_GET["opcion"]; // Recoge parametros
28
29if (isset($_GET["idprocedimiento"])) $idprocedimiento=$_GET["idprocedimiento"];
30if (isset($_GET["descripcion"])) $descripcion=$_GET["descripcion"];
31if (isset($_GET["grupoid"])) $grupoid=$_GET["grupoid"];
32if (isset($_GET["comentarios"])) $comentarios=$_GET["comentarios"];
33if (isset($_GET["identificador"])) $idprocedimiento=$_GET["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}
43// *************************************************************************************************************************************************
44?>
45<HTML>
46<HEAD>
47<BODY>
48<?
49        $literal="";
50        switch($opcion){
51                case $op_alta :
52                        $literal="resultado_insertar_procedimientos";
53                        break;
54                case $op_modificacion:
55                        $literal="resultado_modificar_procedimientos";
56                        break;
57                case $op_eliminacion :
58                        $literal="resultado_eliminar_procedimientos";
59                        break;
60                case $op_movida :
61                        $literal="resultado_mover";
62                        break;
63                default:
64                        break;
65        }
66echo '<p><span id="arbol_nodo">'.$tablanodo.'</span></p>';
67if ($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()." ',".$idprocedimiento.",o.innerHTML);";
74        else
75                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ','".$descripcion."');";
76        echo '</SCRIPT>';
77}
78else{
79        echo '<SCRIPT language="javascript">';
80        echo "  window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."',".$idprocedimiento.")";
81        echo '</SCRIPT>';
82}
83?>
84</BODY>
85</HTML>
86<?
87/**************************************************************************************************************************************************
88        Inserta, modifica o elimina datos en la tabla procedimientos
89________________________________________________________________________________________________________*/
90function Gestiona(){
91        global $EJECUCION_PROCEDIMIENTO;
92        global  $cmd;
93        global  $opcion;
94
95        global  $idcentro;
96        global  $idprocedimiento;
97        global  $descripcion;
98        global  $grupoid;
99        global  $comentarios;
100
101        global  $op_alta;
102        global  $op_modificacion;
103        global  $op_eliminacion;
104        global  $op_movida;
105
106        global  $tablanodo;
107
108        $cmd->CreaParametro("@idcentro",$idcentro,1);
109        $cmd->CreaParametro("@idprocedimiento",$idprocedimiento,1);
110        $cmd->CreaParametro("@descripcion",$descripcion,0);
111        $cmd->CreaParametro("@grupoid",$grupoid,1);
112        $cmd->CreaParametro("@comentarios",$comentarios,0);
113
114        switch($opcion){
115                case $op_alta :
116                        $cmd->texto="INSERT INTO procedimientos (descripcion,comentarios,idcentro,grupoid) VALUES (@descripcion,@comentarios,@idcentro,@grupoid)";
117                        $resul=$cmd->Ejecutar();
118                        if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta
119                                $idprocedimiento=$cmd->Autonumerico();
120                                $arbolXML=SubarbolXML_procedimientos($idprocedimiento,$descripcion);
121                                $baseurlimg="../images/signos"; // Url de las procedimientos de signo
122                                $clasedefault="texto_arbol"; // Hoja de estilo (Clase por defecto) del árbol
123                                $arbol=new ArbolVistaXML($arbolXML,0,$baseurlimg,$clasedefault);
124                                $tablanodo=$arbol->CreaArbolVistaXML();
125                        }
126                        break;
127                case $op_modificacion:
128                        $cmd->texto="UPDATE procedimientos SET descripcion=@descripcion, comentarios=@comentarios WHERE idprocedimiento=@idprocedimiento";
129                        $resul=$cmd->Ejecutar();
130                        break;
131                case $op_eliminacion :
132                        $resul=EliminaProcedimientos($cmd,$idprocedimiento,"idprocedimiento");
133                        break;
134                case $op_movida :
135                        $cmd->texto="UPDATE procedimientos SET  grupoid=@grupoid WHERE idprocedimiento=@idprocedimiento";
136                        $resul=$cmd->Ejecutar();
137                        break;
138                default:
139                        break;
140        }
141        return($resul);
142}
143/*________________________________________________________________________________________________________
144        Crea un arbol XML para el nuevo nodo insertado
145________________________________________________________________________________________________________*/
146function SubarbolXML_procedimientos($idprocedimiento,$descripcion){
147        global $LITAMBITO_PROCEDIMIENTOS;
148        $cadenaXML='<PROCEDIMIENTO';
149        // Atributos
150        $cadenaXML.=' imagenodo="../images/iconos/procedimiento.gif"';
151        $cadenaXML.=' infonodo="'.$descripcion.'"';
152        $cadenaXML.=' nodoid='.$LITAMBITO_PROCEDIMIENTOS.'-'.$idprocedimiento;
153        $cadenaXML.=' clickcontextualnodo="menu_contextual(this,' ."'flo_".$LITAMBITO_PROCEDIMIENTOS."'" .')"';
154        $cadenaXML.='>';
155        $cadenaXML.='</PROCEDIMIENTO>';
156        return($cadenaXML);
157}
158?>
Note: See TracBrowser for help on using the repository browser.