source: admin/WebConsole/gestores/gestor_procedimientos.php @ dc00c0f

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 dc00c0f was a6b881e, checked in by alonso <alonso@…>, 15 years ago

primeros archivos de administración

git-svn-id: https://opengnsys.es/svn/trunk@520 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 5.8 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        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
48<BODY>
49<?
50        $literal="";
51        switch($opcion){
52                case $op_alta :
53                        $literal="resultado_insertar_procedimientos";
54                        break;
55                case $op_modificacion:
56                        $literal="resultado_modificar_procedimientos";
57                        break;
58                case $op_eliminacion :
59                        $literal="resultado_eliminar_procedimientos";
60                        break;
61                case $op_movida :
62                        $literal="resultado_mover";
63                        break;
64                default:
65                        break;
66        }
67echo '<p><span id="arbol_nodo">'.$tablanodo.'</span></p>';
68if ($resul){
69        echo '<SCRIPT language="javascript">'.chr(13);
70        echo 'var oHTML'.chr(13);
71        echo 'var cTBODY=document.getElementsByTagName("TBODY");'.chr(13);
72        echo 'o=cTBODY.item(1);'.chr(13);
73        if ($opcion==$op_alta )
74                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idprocedimiento.",o.innerHTML);";
75        else
76                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ','".$descripcion."');";
77        echo '</SCRIPT>';
78}
79else{
80        echo '<SCRIPT language="javascript">';
81        echo "  window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."',".$idprocedimiento.")";
82        echo '</SCRIPT>';
83}
84?>
85</BODY>
86</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.