]> git.llucax.com Git - mecon/samurai.git/blob - sistema/www/sistemas/sistemas-permisos-abm.php
Se agrega la funcionalidad de migración de un sistema completo de un host a otro...
[mecon/samurai.git] / sistema / www / sistemas / sistemas-permisos-abm.php
1 <?php
2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
3 // +----------------------------------------------------------------------+
4 // | PHP Version 4                                                        |
5 // +----------------------------------------------------------------------+
6 // | Copyright (c) 1997-2003 The PHP Group                                |
7 // +----------------------------------------------------------------------+
8 // | This source file is subject to version 2.02 of the PHP license,      |
9 // | that is bundled with this package in the file LICENSE, and is        |
10 // | available at through the world-wide-web at                           |
11 // | http://www.php.net/license/2_02.txt.                                 |
12 // | If you did not receive a copy of the PHP license and are unable to   |
13 // | obtain it through the world-wide-web, please send a note to          |
14 // | license@php.net so we can mail you a copy immediately.               |
15 // +----------------------------------------------------------------------+
16 // | Created: mar may 27 15:16:38 ART 2003
17 // | Author:  Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
19 //
20 // $Id$
21 // 
22 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
23 $SAMURAI_PERM->setSistema(SAMURAI_PERM);
24 if (!$SAMURAI_PERM->tiene(SAMURAI_PERM_DEVELOPER)) {
25     $SAMURAI_PERM->chequear(SAMURAI_PERM_DEVELOPER);
26 }
27 $MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
28 //}}}
29
30 //REQUIRE_ONCE {{{
31     //MECON {{{
32     require_once 'MECON/HTML/QuickForm.php';
33     require_once 'MECON/HTML/Tabla.php';
34     require_once 'MECON/HTML/Error.php';
35     // }}}
36     //SAMURAI {{{
37     require_once 'SAMURAI/Sistema.php';
38     require_once 'SAMURAI/Permiso.php';
39     // }}}
40 // }}}
41 //OBTENGO EL ID DEL SISTEMA {{{
42     //El id de sistema viene por get o por post, no hay otra posibilidad
43     $idSistema = 0;
44     if (isset($_GET['idSistema'])) {
45         $idSistema = $_GET['idSistema'];
46     }
47     elseif (isset($_POST['idSistema'])) {
48         $idSistema = $_POST['idSistema'];
49     }
50 // }}}
51 //CREO LOS OBJETO NECESARIOS {{{
52     $SISTEMA   = new SAMURAI_Sistema ($DB, $idSistema);
53     $TABLASIST = new MECON_HTML_Tabla ('cellpadding=2');
54     $SISTEMA->setResponsable($_SESSION['usuario']);
55     $FORM = new MECON_HTML_QuickForm ('sistemas_permisos_abm','post','sistemas-permisos-abm');
56     $FORM->renderer->updateAttributes('width="400"');
57 // }}}
58 //AGREGO LA INFORMACION DEL SISTEMA {{{
59     $row = array ('Datos del sistema');
60     $TABLASIST->addRow($row, 'cabecera colspan=3');
61     $row = array ('Id', 'Nombre', 'Descripción');
62     $TABLASIST->addRow($row, 'titulo');
63     $row = array ($SISTEMA->getId(), $SISTEMA->getNombre(), $SISTEMA->getDescripcion());
64     $TABLASIST->addRow($row, 'comun');
65 // }}}
66 //DEFINO CUAL ES LA ACCION Y LA OBSERVACION, CARGO LOS PERMISOS{{{
67     if (@$_GET['accion']) {
68         switch (@$_GET['accion']) {
69             case 'n': $accion     = 'Grabar';
70                       $obs        = '';
71                       $PERMISOS   = SAMURAI_Permiso::getArrayPermisos($DB);
72                       $id_permiso = '';
73                     break;
74             case 'm': $accion     = 'Modificar';
75                       $id_permiso = $_GET['idPermiso'];
76                       $PERMISOS   = new SAMURAI_Permiso($DB, $id_permiso);
77                       $obs        = $_GET['observacion'];
78                       $obs_ant    = $_GET['observacion'];
79                     break;
80             case 'e': $accion     = 'Eliminar';
81                       $id_permiso = $_GET['idPermiso'];
82                       $PERMISOS   = new SAMURAI_Permiso($DB, $id_permiso);
83                       $obs        = $_GET['observacion'];
84                     break;
85         }        
86     }
87     else{
88         switch (@$_POST['accion']) {
89             case 'Grabar': $accion     = 'Grabar';
90                            $obs        = '';
91                            $id_permiso = '';
92                            $PERMISOS   = SAMURAI_Permiso::getArrayPermisos($DB);
93                         break;
94             case 'Modificar':$accion     = 'Modificar';            
95                              $id_permiso = $_POST['idPermiso'];
96                              $PERMISOS   = new SAMURAI_Permiso($DB, $id_permiso);
97                              $obs        = $_POST['observacion'];
98                              $obs_ant    = $_POST['obs_ant'];
99                         break;
100             case 'Eliminar':$accion     = 'Eliminar';
101                             $id_permiso = $_POST['idPermiso'];
102                             $PERMISOS   = new SAMURAI_Permiso($DB, $id_permiso);
103                             $obs        = $_POST['observacion'];
104                         break;
105         }        
106     }
107 // }}}
108 //AGREGO LOS ELEMENTOS DEL FORM {{{
109     $FORM->addElement('header', 'cabecera', $accion.' Asociación');
110     $f_sistema =& $FORM->addElement('hidden', 'idSistema', $idSistema);
111     $f_accion  =& $FORM->addElement('hidden', 'accion'   , $accion);
112     if ($accion == 'Grabar') {
113         $f_permisos   =& $FORM->addElement('select', 'permisos'  , 'Permisos', $PERMISOS);
114         $f_id_permiso =& $FORM->addElement('hidden', 'idPermiso', $id_permiso);
115     }
116     else {
117         $f_permisos   =& $FORM->addElement('static', 'permisos' , 'Permisos', $PERMISOS->getDescripcion());
118         $f_id_permiso =& $FORM->addElement('hidden', 'idPermiso', $id_permiso);
119     }
120     if ($accion == 'Modificar') {
121         $f_obs_ant    =& $FORM->addElement('hidden', 'obs_ant'  , $obs_ant);
122     }
123     $f_observacion =& $FORM->addElement('text'  , 'observacion', 'Observación', array ('value' => $obs));     
124     $f_aceptar     =& HTML_QuickForm::createElement('submit', 'aceptar' , $accion);
125     $f_cancelar    =& HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location = \'sistemas-permisos?idSistema='.$idSistema.'\';return false;'));
126     $group = array ($f_aceptar, $f_cancelar);
127     $f_group       =& $FORM->addGroup($group,'botones', '', ',&nbsp;');
128
129     if ($accion == 'Eliminar') {
130         $f_aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
131         $FORM->freeze();
132     }
133 // }}}
134 //VALIDO EL FORMULARIO {{{
135     if ($FORM->validate()) {
136         $botones = $FORM->getSubmitValue('botones');
137         if (@$botones['cancelar']) {
138             header('Location: sistemas-permisos?idSistema='.$idSistema);
139         }
140         
141         if ($accion == 'Grabar') {
142             $tmp = $f_permisos->getSelected();
143             $f_id_permiso->setValue($tmp['0']);
144             $res = $SISTEMA->guardarAsociacion($tmp['0'], $f_observacion->getValue());
145         }
146         elseif ($accion == 'Modificar') {
147             $res = $SISTEMA->modificarAsociacion($f_id_permiso->getValue(), $f_observacion->getValue(), $f_obs_ant->getValue());
148         }
149         elseif ($accion == 'Eliminar') {
150             $res = $SISTEMA->eliminarAsociacion($f_id_permiso->getValue(), $f_observacion->getValue());
151         }
152         else {
153             $ERROR = new MECON_HTML_Error('No se reconoce la acción seleccionada');
154         }
155         if (PEAR::isError($res)) {           
156             $ERROR = new MECON_HTML_Error($res->getMessage());
157         }
158         else {
159             header('Location: sistemas-permisos?idSistema='.$idSistema);    
160         }
161     }
162 // }}}
163 //DIBUJO LA PAGINA {{{
164     $MARCO->addBody($TABLASIST);
165     $MARCO->addBody('<BR>');
166     if (@$ERROR) {
167         $MARCO->addBody($ERROR);
168     }
169     $MARCO->addBody($FORM);
170     $MARCO->display();
171 // }}}
172 //FIN
173
174 ?>