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