]> git.llucax.com Git - mecon/samurai.git/blob - sistema/www/usuarios/usuarios.php
Acomodo para que funcione con los nuevos cambios en QuickForm
[mecon/samurai.git] / sistema / www / usuarios / usuarios.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 12:51:57 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 //REQUIRE ONCE {{{
31     require_once 'MECON/HTML/Tabla.php';
32     require_once 'SAMURAI/Usuario.php';
33     require_once 'SAMURAI/Sistema.php';
34     require_once 'MECON/HTML/Image.php';
35 // }}}
36 //LINKS {{{
37     $aHrefPopup = '<a href="" onClick="window.open(\'usuarios-datos?login=##LOGIN##\',\'usuariosdatos\',\'height=300,width=400,scrollbars=yes\');return false;">';
38     $aHref      = '<a href="usuarios-abm?accion=##ACCION##&login=##NUEVO##">';
39     $aHrefModif = $aHref.'<img src="/MECON/images/general_modificar.gif" border="0" alt="Modificar Usuario"></a>';
40     $aHrefElim  = $aHref.'<img src="/MECON/images/general_eliminar.gif"  border="0" alt="Eliminar Usuario" ></a>';
41 // }}}
42 //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
43 if (!@$_SESSION['samurai']['id_sistema']) {
44     header('Location: ./../sel-sistema?redirect=usuarios/usuarios');    
45 }
46 // }}}   
47 //CREO LOS OBJETOS NECESARIOS {{{
48     $TABLA2 = new MECON_HTML_Tabla ('cellspacing=0');
49     $TABLA  = new MECON_HTML_Tabla ('cellpadding=2');
50     $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
51     $SISTEMA = new SAMURAI_Sistema($DB, $_SESSION['samurai']['id_sistema']);
52 // }}}
53 //OBTENGO LA INFORMACION DE LA BASE {{{
54     $usuarios = SAMURAI_Usuario::getUsuarios($DB, $_SESSION['samurai']['id_sistema']);
55 // }}}
56 //AGREGO LOS DATOS A LAS TABLAS {{{
57     $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
58     $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
59     $TABLA3->addRow($row,'align=left');    
60
61     //Agrego el link a nuevo
62     if ($SAMURAI_PERM->tiene(SAMURAI_PERM_USUARIO_ALTA)) {
63         $row   = array ($aHref.'<img src="/MECON/images/general_nuevo.gif" border="0">Agregar Nuevo Usuario</a>');
64         $TABLA2->addRow($row,'align=right');    
65     }
66     //Genero la cabecera de la tabla
67     $row  = array ('Login','Nombre');
68     if ($SAMURAI_PERM->tiene(SAMURAI_PERM_USUARIO_MODIF)) {
69         $row[] = 'Modif.';
70     }
71     if ($SAMURAI_PERM->tiene(SAMURAI_PERM_USUARIO_BAJA)) {
72         $row[] = 'Elim.';
73     }
74     $TABLA->addRow($row,'cabecera');
75     foreach ($usuarios as $usuario) {
76         $Popup = ereg_replace('##LOGIN##' , $usuario->getLogin(), $aHrefPopup);
77         $Modif = ereg_replace('##NUEVO##' , $usuario->getLogin(), $aHrefModif);
78         $Elim  = ereg_replace('##NUEVO##' , $usuario->getLogin(), $aHrefElim );
79         $Popup = $Popup.$usuario->getLogin().'</a>';
80         $Modif = ereg_replace('##ACCION##', 'm'                 , $Modif     );
81         $Elim  = ereg_replace('##ACCION##', 'e'                 , $Elim      );
82         $row = array (  $Popup, $usuario->getNombre());
83         if ($SAMURAI_PERM->tiene(SAMURAI_PERM_USUARIO_MODIF)) {
84             $row[] = $Modif;
85         }
86         if ($SAMURAI_PERM->tiene(SAMURAI_PERM_USUARIO_BAJA)) {
87             $row[] = $Elim;
88         }
89
90         $TABLA->addRow($row);
91     }
92 // }}}
93 //DIBUJO LA PAGINA {{{
94     $MARCO->addBody($TABLA3);
95     $MARCO->addBody($TABLA2->toHtml(1));
96     $MARCO->addBody($TABLA);
97     $MARCO->display();
98 // }}}
99 //FIN
100 ?>