]> git.llucax.com Git - mecon/samurai.git/blob - sistema/www/usuarios/usuarios-abm.php
Modificaciones para los usuarios.
[mecon/samurai.git] / sistema / www / usuarios / usuarios-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:  mié jul 16 13:37:33 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->setSistema($_SESSION['samurai']['id_sistema']);
26     $SAMURAI_PERM->chequear(SAMURAI_PERM_USUARIO_ALTA, SAMURAI_PERM_USUARIO_BAJA, SAMURAI_PERM_USUARIO_MODIF, SAMURAI_PERM_DEVELOPER);
27 }
28 $MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
29 //}}}
30
31 //XXX OBTENGO LA ACCION {{{
32 switch ($_REQUEST['accion']) {
33     case 'm':
34         $b_accion = 'Modificar';
35         $accion = 'm';
36         break;
37     case 'e':
38         $b_accion = 'Eliminar';
39         $accion = 'e';
40         break;
41     default:
42         $b_accion = 'Grabar';
43         $accion = '';
44         break;
45 }
46 //}}}
47 //REQUIRE ONCE {{{
48     //MECON {{{
49     require_once 'MECON/HTML/QuickForm.php';
50     require_once 'MECON/HTML/Tabla.php';
51     require_once 'MECON/HTML/Error.php';
52     //}}}
53     //SAMURAI {{{
54     require_once 'SAMURAI/Perfil.php';
55     require_once 'SAMURAI/Usuario.php';
56     require_once 'SAMURAI/Sistema.php';
57     //}}}
58     require_once 'MECON/HTML/Image.php';
59 // }}}
60 //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
61 if (!@$_SESSION['samurai']['id_sistema']) {
62     header('Location: ./../sel-sistema?redirect=usuarios/usuarios');    
63 }
64 // }}}   
65 //CREO LOS OBJETOS NECESARIOS {{{
66     if (@$_GET['login']) {
67         $login = $_GET['login'];
68         $validar = 0;
69     }
70     else {
71         $validar = 1;
72         $login = null;
73     }
74
75
76     $TABLA   = new MECON_HTML_Tabla ('cellspacing=0');
77     $FORM    = new MECON_HTML_QuickForm ('usuarios_abm','post','usuarios-abm');
78     $FORM->renderer->updateAttributes('width="400"');
79     $SISTEMA = new SAMURAI_Sistema($DB, $_SESSION['samurai']['id_sistema']);
80     $USUARIO = new SAMURAI_Usuario($DB, $login, $_SESSION['samurai']['id_sistema']);
81 // }}}
82 //OBTENGO LOS DATOS DE LA BASE {{{
83     $tmps = SAMURAI_Perfil::getPerfiles($DB, null, $_SESSION['samurai']['id_sistema']);
84     foreach ($tmps as $tmp) {
85         $PERFILES[$tmp->getId()] = $tmp->getDescripcion();
86     }
87 //}}}
88 //AGREGO LOS DATOS A LAS TABLAS {{{
89     $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
90     $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
91     $TABLA->addRow($row,'align=left');    
92 //}}}
93 //AGREGO LOS ELEMENTOS DEL FORM {{{
94     if (@$PERFILES) {
95         $FORM->addElement ('header', 'cabecera'   , 'ABM Usuarios');
96         if ($login) { //Si esta el login solo permito modificar los perfiles asociados
97             $FORM->addElement ('static', 'login2', 'Login@Organismo' , $login );
98             $FORM->addElement ('hidden', 'login' , $login );
99             $FORM->addElement ('static', 'nombre', 'Nombre', $USUARIO->getNombre());
100         }
101         else {
102             $FORM->addElement ('text'  , 'login' , 'Login@Organismo' , array( 'value' => $login , 'size' => '20'));
103         }
104         $FORM->addElement ('select', 'perfiles'   , 'Perfiles', $PERFILES, array('size' => '5', 'multiple' => 'true'));
105         $FORM->addElement ('hidden', 'responsable', $_SESSION['usuario']);
106         $FORM->addElement ('hidden', 'accion', $accion);
107         $group[] = HTML_QuickForm::createElement('submit', 'aceptar', $b_accion);
108         $group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location = \'usuarios\';return false;'));
109         $FORM->addGroup($group,'botones');
110     }
111     else {
112         $ERROR = new MECON_HTML_Error('El sistema no posee perfiles.');
113     }
114 // }}}
115 //AGREO LAS REGLAS DE VALIDACION {{{
116     if (@$PERFILES) {
117         if (@$validar) {
118             $FORM->addRule ('login', 'Se debe ingresar el login del usuario', 'required');
119         }
120         $FORM->addRule ('perfiles', 'Se debe seleccionar al menos un perfil', 'required');
121     }
122 // }}}
123 //SETEO LOS PERFILES SELECCIONADOS {{{
124     if (isset($_GET['accion']) && $_GET['accion'] != '') {
125         $perfiles =& $FORM->getElement  ('perfiles');
126         $group    =& $FORM->getElement  ('botones' );
127         $group    =& $group->getElements('aceptar' );
128         $aceptar  =& $group[0];
129         
130         $perfiles->setSelected($USUARIO->getPerfiles());
131         
132         //Modifico el valor del boton
133         $aceptar->setValue('Modificar');
134             
135         //ELIMINACION -> modifico el valor del boton
136         if ($_GET['accion'] == 'e') {
137             $aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
138             $aceptar->setValue('Eliminar');
139             $FORM->freeze();
140         }
141     }
142 // }}}
143 //VALIDO EL FORMULARIO {{{
144     if ($FORM->validate()) {
145         // VEO SI SE CANCELO {{{
146         $botones = $FORM->getSubmitValue('botones');
147         if (@$botones['cancelar']) {
148             header('Location: usuarios');
149         }
150         // }}}
151         else {
152             $login2   =& $FORM->getElement  ('login'   ); 
153             $nombre   =& $FORM->getElement  ('nombre'  );
154             $perfiles =& $FORM->getElement  ('perfiles');
155             $group    =& $FORM->getElement  ('botones' );
156             $group    =& $group->getElements('aceptar' );
157             $aceptar  =& $group[0];
158             $res = '';
159
160             if ($login) {
161                 $login3 = $login2->_text;
162             }
163             else {
164                 $login3 = $login2->getValue();
165             }
166             $USUARIO->setLogin($login3);
167             
168             $res  = $USUARIO->verificarLogin();
169             if ($aceptar->getValue() == 'Grabar') {
170                 $res2 = $USUARIO->verificarAsociacionExistente();
171             }
172             if (@PEAR::isError($res)) {
173                 $ERROR = new MECON_HTML_Error($res->getMessage());
174             }
175             elseif (@PEAR::isError($res2)) {
176                 $ERROR =new MECON_HTML_Error($res2->getMessage());
177             }
178             else {
179                 $USUARIO->setPerfiles($perfiles->getSelected());
180                 
181                 $res = $USUARIO->guardarDatos($aceptar->getValue());
182
183                 if (PEAR::isError($res)) {
184                     $ERROR = new MECON_HTML_Error($res->getMessage());
185                     if ($aceptar->getValue() == 'Eliminar') {
186                         $FORM->freeze();
187                     }
188                 }
189                 else {
190                     $FORM->freeze();
191                     header('Location: usuarios');
192                 }
193             }
194         }
195     }
196 // }}}
197 //DIBUJO LA PAGINA {{{
198     $MARCO->addBody($TABLA);
199     if (isset($ERROR)) {
200         $MARCO->addBody($ERROR);
201     }
202     $MARCO->addBody($FORM);
203     $MARCO->display();
204 // }}}
205 //FIN
206 ?>