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     if (!$SAMURAI_PERM->tiene(SAMURAI_DEVELOPER)) {
  25 //        header('Location: error')
  26     }
  27 //}}}
  28 //REQUIRE ONCE {{{
  29     //MECON {{{
  30     require_once 'MECON/HTML/QuickForm.php';
  31     require_once 'MECON/HTML/Tabla.php';
  32     require_once 'MECON/HTML/Error.php';
  33     //}}}
  34     //SAMURAI {{{
  35     require_once 'SAMURAI/Perfil.php';
  36     require_once 'SAMURAI/Usuario.php';
  37     require_once 'SAMURAI/Sistema.php';
  38     //}}}
  39     require_once 'HTML/Image.php';
  40 // }}}
  41 //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
  42 if (!@$_SESSION['samurai']['id_sistema'] || !@$_SESSION['samurai']['login']) {
  43     header('Location: ./../sel-sistema');
  44 }
  45 // }}}
  46 //CREO LOS OBJETOS NECESARIOS {{{
  47     if (@$_GET['login']) {
  48         $login = $_GET['login'];
  49         $validar = 0;
  50     }
  51     else {
  52         $validar = 1;
  53         $login = null;
  54     }
  55     $TABLA   = new 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);
  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 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['samurai']['login']);
  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: perfiles');
 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 ?>