source: admin/WebConsole/gestores/gestor_inclusionacciones.php @ 5d05b06

Last change on this file since 5d05b06 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: 6.0 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_inclusionacciones.php
8// Descripción :
9//              Gestiona el mantenimiento de la tabla de procedimientos_acciones y tareas_acciones
10// ********************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../includes/constantes.php");
15//________________________________________________________________________________________________________
16
17$tipoaccion=0;
18$idtipoaccion=0;
19$altas="";
20$bajas="";
21$modificaciones="";
22
23if (isset($_POST["tipoaccion"])) $tipoaccion=$_POST["tipoaccion"];
24if (isset($_POST["idtipoaccion"])) $idtipoaccion=$_POST["idtipoaccion"];
25
26if (isset($_POST["altas"])) $altas=$_POST["altas"]; // Recoge parametros
27if (isset($_POST["bajas"])) $bajas=$_POST["bajas"];
28if (isset($_POST["modificaciones"])) $modificaciones=$_POST["modificaciones"];
29
30
31$cmd=CreaComando($cadenaconexion); // Crea objeto comando
32$resul=false;
33if ($cmd){
34        $resul=Gestiona();
35        $cmd->Conexion->Cerrar();
36}
37$literal="resultado_gestion_inclusionacciones";
38
39if ($resul)
40        echo $literal."(1,'".$cmd->DescripUltimoError()."');";
41else
42        echo $literal."(0,'".$cmd->DescripUltimoError()."');";
43
44// *************************************************************************************************************************************************
45function Gestiona()
46{
47        global $cmd;
48        global $tipoaccion;
49        global $idtipoaccion;
50        global $altas; 
51        global $bajas;
52        global $modificaciones;
53        global $AMBITO_PROCEDIMIENTOS;
54        global $AMBITO_TAREAS;
55       
56        switch($tipoaccion){
57                case $AMBITO_PROCEDIMIENTOS:
58                        $cmd->CreaParametro("@idprocedimientoaccion",0,1);
59                        $cmd->CreaParametro("@idprocedimiento",0,1);
60                        $cmd->CreaParametro("@orden",0,1);
61                        $cmd->CreaParametro("@idcomando",0,1);
62                        $cmd->CreaParametro("@parametros","",0);
63                        $cmd->CreaParametro("@procedimientoid",0,1);
64                        break;                                                 
65                case $AMBITO_TAREAS:
66                        $cmd->CreaParametro("@idtareaaccion",0,1);
67                        $cmd->CreaParametro("@idtarea",0,1);
68                        $cmd->CreaParametro("@orden",0,1);
69                        $cmd->CreaParametro("@idprocedimiento",0,1);
70                        $cmd->CreaParametro("@tareaid",0,1);   
71                        break;                                 
72        }       
73
74        /* Altas */
75        if(!empty($altas)){
76                $altas=substr($altas,0,strlen($altas)-1); // Quita el último ";"
77                $tbAltas=explode(";",$altas);
78                for($i=0;$i<sizeof($tbAltas);$i++){
79                        /* Toma datos  altas */
80                        list($identificador,$orden,$ambito)=explode(",",$tbAltas[$i]);
81                        switch($tipoaccion){
82                                case $AMBITO_PROCEDIMIENTOS:
83                                        $cmd->ParamSetValor("@idprocedimiento",$idtipoaccion);
84                                        $cmd->ParamSetValor("@orden",$orden);
85                                        $cmd->ParamSetValor("@procedimientoid",$identificador);
86                                        $cmd->texto="INSERT INTO procedimientos_acciones
87                                                                (idprocedimiento,orden,idcomando,parametros,procedimientoid)
88                                                                VALUES (@idprocedimiento,@orden,@idcomando,@parametros,@procedimientoid)";
89                                        break;                                                 
90                                case $AMBITO_TAREAS:
91                                        switch($ambito){
92                                                case $AMBITO_TAREAS:
93                                                        $cmd->ParamSetValor("@idtarea",$idtipoaccion);
94                                                        $cmd->ParamSetValor("@orden",$orden);
95                                                        $cmd->ParamSetValor("@tareaid",$identificador);
96                                                        $cmd->ParamSetValor("@idprocedimiento",0);
97                                                        $cmd->texto="INSERT INTO tareas_acciones
98                                                                                (idtarea,orden,idprocedimiento,tareaid)
99                                                                                VALUES (@idtarea,@orden,@idprocedimiento,@tareaid)";
100                                                break; 
101                                                case $AMBITO_PROCEDIMIENTOS:
102                                                        $cmd->ParamSetValor("@idtarea",$idtipoaccion);
103                                                        $cmd->ParamSetValor("@orden",$orden);
104                                                        $cmd->ParamSetValor("@tareaid",0);
105                                                        $cmd->ParamSetValor("@idprocedimiento",$identificador);
106                                                        $cmd->texto="INSERT INTO tareas_acciones
107                                                                                (idtarea,orden,idprocedimiento,tareaid)
108                                                                                VALUES (@idtarea,@orden,@idprocedimiento,@tareaid)";
109                                                        break;                                                 
110                                        }       
111                                        break;                                 
112                        }       
113                        $resul=$cmd->Ejecutar();       
114                        //echo $cmd->texto;
115                        if(!$resul)
116                                return(false);         
117                }
118        }
119       
120        /* Bajas */
121        if(!empty($bajas)){
122                $bajas=substr($bajas,0,strlen($bajas)-1); // Quita el último ";"
123                $tbBajas=explode(";",$bajas);
124                for($i=0;$i<sizeof($tbBajas);$i++){
125                        switch($tipoaccion){
126                                case $AMBITO_PROCEDIMIENTOS:
127                                        list($idprocedimientoaccion)=explode(",",$tbBajas[$i]);
128                                        $cmd->ParamSetValor("@idprocedimientoaccion",$idprocedimientoaccion);
129                                        $cmd->texto="DELETE FROM procedimientos_acciones
130                                                                WHERE idprocedimientoaccion=@idprocedimientoaccion";
131                                        break;                                                 
132                                case $AMBITO_TAREAS:
133                                        list($idtareaaccion)=explode(",",$tbBajas[$i]);
134                                        $cmd->ParamSetValor("@idtareaaccion",$idtareaaccion);
135                                        $cmd->texto="DELETE FROM tareas_acciones
136                                                                WHERE idtareaaccion=@idtareaaccion";                           
137                                        break;                                 
138                        }       
139                        $resul=$cmd->Ejecutar();       
140                        //echo $cmd->texto;
141                        if(!$resul)
142                                return(false);         
143                }       
144        }
145       
146        /* Modificaciones */
147        if(!empty($modificaciones)){
148                $modificaciones=substr($modificaciones,0,strlen($modificaciones)-1); // Quita el último ";"
149                $tbModificaciones=explode(";",$modificaciones);
150                for($i=0;$i<sizeof($tbModificaciones);$i++){
151                        switch($tipoaccion){
152                                case $AMBITO_PROCEDIMIENTOS:
153                                        list($idprocedimientoaccion,$orden)=explode(",",$tbModificaciones[$i]);
154                                        $cmd->ParamSetValor("@idprocedimientoaccion",$idprocedimientoaccion);
155                                        $cmd->ParamSetValor("@orden",$orden);
156                                        $cmd->texto="UPDATE procedimientos_acciones SET orden=@orden
157                                                                 WHERE idprocedimientoaccion=@idprocedimientoaccion";
158                                        break;                                                 
159                                case $AMBITO_TAREAS:
160                                        list($idtareaaccion,$orden)=explode(",",$tbModificaciones[$i]);                         
161                                        $cmd->ParamSetValor("@idtareaaccion",$idtareaaccion);
162                                        $cmd->ParamSetValor("@orden",$orden);
163                                        $cmd->texto="UPDATE tareas_acciones SET orden=@orden
164                                                                 WHERE idtareaaccion=@idtareaaccion";                           
165                                        break;                                 
166                        }       
167                        $resul=$cmd->Ejecutar();       
168                        //echo $cmd->texto;
169                        if(!$resul)
170                                return(false);                                 
171                }
172        }
173        return(true);
174}
175
Note: See TracBrowser for help on using the repository browser.