2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
3 // +----------------------------------------------------------------------+
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 // +----------------------------------------------------------------------+
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);
28 $MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
31 //OBTENGO LA ACCION {{{
32 switch ($_REQUEST['accion']) {
34 $b_accion = 'Modificar';
38 $b_accion = 'Eliminar';
50 require_once 'MECON/HTML/QuickForm.php';
51 require_once 'MECON/HTML/Tabla.php';
52 require_once 'MECON/HTML/Image.php';
53 require_once 'MECON/HTML/Error.php';
56 require_once 'SAMURAI/Perfil.php';
57 require_once 'SAMURAI/Usuario.php';
58 require_once 'SAMURAI/Sistema.php';
62 //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
63 if (!@$_SESSION['samurai']['id_sistema']) {
64 header('Location: ./../sel-sistema?redirect=usuarios/usuarios');
68 //CREO LOS OBJETOS NECESARIOS {{{
70 $login = @$_GET['_login'];
78 $TABLA = new MECON_HTML_Tabla ('cellspacing=0');
79 $FORM = new MECON_HTML_QuickForm ('usuarios_abm','post','usuarios-abm');
80 $FORM->renderer->updateAttributes('width="400"');
81 $USUARIO = new SAMURAI_Usuario($DB, $login, $_SESSION['samurai']['id_sistema']);
84 //VIÑETA CON EL SISTEMA EN EL CUAL SE ESTA TRABAJANDO {{{
85 $SISTEMA =& new SAMURAI_Sistema($DB, $_SESSION['samurai']['id_sistema']);
86 $tmp =& new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif', '>>');
87 $VINETA = '<div align="left">'. $tmp->toHTML() .' <b>SISTEMA: '.
88 $SISTEMA->getNombre().'</b></div>';
91 //OBTENGO LOS DATOS DE LA BASE {{{
92 $tmps = SAMURAI_Perfil::getPerfiles($DB, null, $_SESSION['samurai']['id_sistema']);
93 foreach ($tmps as $tmp) {
94 $PERFILES[$tmp->getId()] = $tmp->getDescripcion();
98 //AGREGO LOS ELEMENTOS DEL FORM {{{
100 $FORM->addElement ('header', 'cabecera' , 'ABM Usuarios');
101 if ($login) { //Si esta el login solo permito modificar los perfiles asociados
102 $FORM->addElement ('static', 'login2', 'Login@Organismo' , $login );
103 $FORM->addElement ('hidden', 'login' , $login );
104 $FORM->addElement ('static', 'nombre', 'Nombre', $USUARIO->getNombre());
107 $FORM->addElement ('text' , 'login' , 'Login@Organismo' , array( 'value' => $login , 'size' => '20'));
109 $FORM->addElement ('select', 'perfiles' , 'Perfiles', $PERFILES, array('size' => '5', 'multiple' => 'true'));
110 $FORM->addElement ('hidden', 'responsable', $_SESSION['usuario']);
111 $FORM->addElement ('hidden', 'accion', $accion);
112 $group[] = HTML_QuickForm::createElement('submit', 'aceptar', $b_accion);
113 $group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location = \'usuarios\';return false;'));
114 $FORM->addGroup($group,'botones');
117 $ERROR = new MECON_HTML_Error('El sistema no posee perfiles.');
121 //AGREO LAS REGLAS DE VALIDACION {{{
124 $FORM->addRule ('login', 'Se debe ingresar el login del usuario', 'required');
126 $FORM->addRule ('perfiles', 'Se debe seleccionar al menos un perfil', 'required');
130 //SETEO LOS PERFILES SELECCIONADOS {{{
131 if (isset($_GET['accion']) && $accion != '') {
132 $perfiles =& $FORM->getElement ('perfiles');
133 $group =& $FORM->getElement ('botones' );
134 $group =& $group->getElements('aceptar' );
135 $aceptar =& $group[0];
137 $perfiles->setSelected($USUARIO->getPerfiles());
139 //Modifico el valor del boton
140 $aceptar->setValue('Modificar');
142 //ELIMINACION -> modifico el valor del boton
143 if ($_GET['accion'] == 'e') {
144 $aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
145 $aceptar->setValue('Eliminar');
151 //VALIDO EL FORMULARIO {{{
152 if ($FORM->validate()) {
153 // VEO SI SE CANCELO {{{
154 $botones = $FORM->getSubmitValue('botones');
155 if (@$botones['cancelar']) {
156 header('Location: usuarios');
160 $login2 =& $FORM->getElement ('login' );
161 $nombre =& $FORM->getElement ('nombre' );
162 $perfiles =& $FORM->getElement ('perfiles');
163 $group =& $FORM->getElement ('botones' );
164 $group =& $group->getElements('aceptar' );
165 $aceptar =& $group[0];
169 $login3 = $login2->_text;
172 $login3 = $login2->getValue();
174 $USUARIO->setLogin($login3);
176 $res = $USUARIO->verificarLogin();
177 if ($aceptar->getValue() == 'Grabar') {
178 $res2 = $USUARIO->verificarAsociacionExistente();
180 if (@PEAR::isError($res)) {
181 $ERROR = new MECON_HTML_Error($res->getMessage());
183 elseif (@PEAR::isError($res2)) {
184 $ERROR =new MECON_HTML_Error($res2->getMessage());
187 $USUARIO->setPerfiles($perfiles->getSelected());
189 $res = $USUARIO->guardarDatos($aceptar->getValue());
191 if (PEAR::isError($res)) {
192 $ERROR = new MECON_HTML_Error($res->getMessage());
193 if ($aceptar->getValue() == 'Eliminar') {
199 header('Location: usuarios');
206 //DIBUJO LA PAGINA {{{
207 $MARCO->addBody($VINETA);
208 $MARCO->addBody($TABLA);
210 $MARCO->addBody($ERROR);
212 $MARCO->addBody($FORM);