source: admin/WebConsole/gestores/gestor_trabajostareas.php @ e02f9b4

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 e02f9b4 was 6e9cc32, checked in by ramon <ramongomez@…>, 16 years ago

Borrar caracteres BOM de UTF-8 en ficheros PHP de WebConsole?.

git-svn-id: https://opengnsys.es/svn/trunk@514 a21b9725-9963-47de-94b9-378ad31fedc9

  • Property mode set to 100644
File size: 6.0 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_trabajostareas.php
8// Descripción :
9//              Gestiona el mantenimiento de la tabla de trabajos_tareas
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../includes/opciones.php");
15//________________________________________________________________________________________________________
16$opcion=0; // Inicializa parametros
17$idtrabajo=0;
18$idtarea=0;
19$orden=0;
20
21if (isset($_GET["opcion"])) $opcion=$_GET["opcion"]; // Recoge parametros
22if (isset($_GET["idtrabajo"])) $idtrabajo=$_GET["idtrabajo"];
23if (isset($_GET["idtarea"])) $idtarea=$_GET["idtarea"];
24if (isset($_GET["orden"])) $orden=$_GET["orden"];
25
26$idtrabajotarea=0;
27$tablanodo=""; // Arbol para nodos insertados
28
29$cmd=CreaComando($cadenaconexion); // Crea objeto comando
30$resul=false;
31if ($cmd){
32        $resul=Gestiona();
33        $cmd->Conexion->Cerrar();
34}
35//________________________________________________________________________________________________________
36?>
37<HTML>
38<HEAD>
39<BODY>
40<?
41        $literal="";
42        switch($opcion){
43                case $op_alta :
44                        $literal="resultado_insertar_trabajostareas";
45                        break;
46                case $op_modificacion :
47                        $literal="resultado_modificar_trabajostareas";
48                        break;
49                case $op_eliminacion :
50                        $literal="resultado_eliminar_trabajostareas";
51                        break;
52                default:
53                        break;
54        }
55if ($resul){
56        echo '<SCRIPT language="javascript">'.chr(13);
57        if ($opcion==$op_alta )
58                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idtrabajotarea.");".chr(13);
59        else
60                echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()." ',".$idtrabajotarea.");".chr(13);
61        echo '</SCRIPT>';
62}
63else{
64        echo '<SCRIPT language="javascript">';
65        echo "  window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."',".$idtrabajotarea.")";
66        echo '</SCRIPT>';
67}
68?>
69</BODY>
70</HTML>
71<?
72// *************************************************************************************************************************************************
73function Gestiona(){
74        global  $cmd;
75        global  $opcion;
76        global  $idtrabajo;
77        global  $idtarea;
78        global  $idtrabajotarea;
79        global   $urlimgth;
80        global  $op_alta;
81        global  $op_modificacion;
82        global  $op_eliminacion;
83        global  $tablanodo;
84        global  $orden;
85
86        $cmd->CreaParametro("@idtrabajo",$idtrabajo,1);
87        $cmd->CreaParametro("@idtarea",$idtarea,1);
88        $cmd->CreaParametro("@orden",$orden,1);
89
90        switch($opcion){
91                case $op_alta :
92                        $cmd->texto="INSERT INTO trabajos_tareas (idtrabajo,idtarea,orden) VALUES (@idtrabajo,@idtarea,@orden)";
93                        $resul=$cmd->Ejecutar();
94                        if ($resul){ // Crea una tabla nodo para devolver a la página que llamó ésta
95                                $idtrabajotarea=$cmd->Autonumerico();
96                                $resul=actualiza_ambitoparametros($idtrabajotarea);
97                        }
98                        break;
99                case $op_modificacion :
100                        $cmd->texto='UPDATE trabajos_tareas set orden=@orden WHERE idtrabajo='.$idtrabajo.' AND  idtarea='.$idtarea;
101                        $resul=$cmd->Ejecutar();
102                        break;
103                case $op_eliminacion :
104                        $idtrabajotarea=toma_idtrabajotarea($cmd,$idtrabajo,$idtarea);
105                        $cmd->texto='DELETE  FROM trabajos_tareas WHERE idtrabajo='.$idtrabajo.' AND  idtarea='.$idtarea;
106                        $resul=$cmd->Ejecutar();
107                        if($resul)
108                                $resul=actualiza_ambitoparametros($idtrabajotarea);
109                        break;
110                default:
111                        break;
112        }
113        return($resul);
114}
115//________________________________________________________________________________________________________
116function toma_idtrabajotarea($cmd,$idtrabajo,$idtarea){
117        $rs=new Recordset;
118        $cmd->texto="SELECT idtrabajotarea FROM trabajos_tareas WHERE idtrabajo=".$idtrabajo." AND idtarea=".$idtarea;
119        $rs->Comando=&$cmd;
120        if (!$rs->Abrir()) return(0); // Error al abrir recordset
121        if (!$rs->EOF) return($rs->campos["idtrabajotarea"]);
122        return(0);
123}
124//________________________________________________________________________________________________________
125function actualiza_ambitoparametros($idtrabajotarea){
126        global $idtrabajo;
127        global $cmd;
128        $rs=new Recordset;
129        // Recorre trabajos_tareas
130        $cmd->texto="SELECT idtrabajotarea,idtarea,ambitskwrk FROM trabajos_tareas WHERE idtrabajo=".$idtrabajo;
131        $cmd->texto.=" ORDER BY idtrabajotarea";
132        $rs->Comando=&$cmd;
133        if (!$rs->Abrir()) return(false); // Error al abrir recordset
134        $rs->Primero();
135        if ($rs->EOF) return(true); // No hay registros
136
137        // Recorre trabajos-tareas
138        while (!$rs->EOF){
139                $resul=tomando_ambito($rs->campos["idtarea"],&$ambitrabajo,&$paramtrabajo);
140                if (!$resul) return(false);
141                $rs->Siguiente();
142        }
143        $rs->Cerrar();
144        //Creación parametros para inserción
145        $cmd->CreaParametro("@ambitskwrk",$ambitrabajo,0);
146        $cmd->CreaParametro("@parametros",$paramtrabajo,0);     
147        $cmd->texto="UPDATE trabajos_tareas SET ambitskwrk=@ambitskwrk,parametros=@parametros WHERE idtrabajotarea=".$idtrabajotarea;
148        $resul=$cmd->Ejecutar();
149        return($resul);
150}
151//________________________________________________________________________________________________________
152function tomando_ambito($idtarea,$ambitarea,$paramtarea){
153        global  $cmd;
154        $ambitarea="";
155        $paramtarea="cmd=";
156        $rs=new Recordset;
157        $cmd->texto="SELECT * FROM tareas_comandos WHERE idtarea=".$idtarea;
158        $cmd->texto.=" ORDER by idtareacomando";
159        $rs->Comando=&$cmd;
160        if (!$rs->Abrir()) return(false); // Error al abrir recordset
161        $rs->Primero();
162        // Recorre tareas-comandos
163        while (!$rs->EOF){
164                        $ambitarea.=$rs->campos["ambito"].":".$rs->campos["idambito"].";";
165                        $paramtarea.=$rs->campos["idtareacomando"].";";
166
167                        $rs->Siguiente();
168        }
169        $rs->Cerrar();
170        $ambitarea=substr($ambitarea,0,strlen($ambitarea)-1); // Quita la coma final
171        $paramtarea=substr($paramtarea,0,strlen($paramtarea)-1); // Quita la coma final
172        return(true);
173}
174?>
Note: See TracBrowser for help on using the repository browser.