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 12:51:57 ART 2003
17 // | Author: Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
23 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
24 $SAMURAI_PERM->chequear(SAMURAI_ALTA_USUARIO, SAMURAI_BAJA_USUARIO, SAMURAI_MODI_USUARIO, SAMURAI_DEVELOPER);
27 require_once 'MECON/HTML/Tabla.php';
28 require_once 'SAMURAI/Usuario.php';
29 require_once 'SAMURAI/Sistema.php';
30 require_once 'MECON/HTML/Image.php';
33 $aHrefPopup = '<a href="" onClick="window.open(\'usuarios-datos?login=##LOGIN##\',\'usuariosdatos\',\'height=300,width=400,scrollbars=yes\');return false;">';
34 $aHref = '<a href="usuarios-abm?accion=##ACCION##&login=##NUEVO##">';
35 $aHrefModif = $aHref.'<img src="/MECON/images/general_modificar.gif" border="0" alt="Modificar Usuario"></a>';
36 $aHrefElim = $aHref.'<img src="/MECON/images/general_eliminar.gif" border="0" alt="Eliminar Usuario" ></a>';
38 //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
39 if (!@$_SESSION['samurai']['id_sistema']) {
40 header('Location: ./../sel-sistema');
43 //CREO LOS OBJETOS NECESARIOS {{{
44 $TABLA2 = new MECON_HTML_Tabla ('cellspacing=0');
45 $TABLA = new MECON_HTML_Tabla ('cellpadding=2');
46 $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
47 $SISTEMA = new SAMURAI_Sistema($DB, $_SESSION['samurai']['id_sistema']);
49 //OBTENGO LA INFORMACION DE LA BASE {{{
50 $usuarios = SAMURAI_Usuario::getUsuarios($DB, $_SESSION['samurai']['id_sistema']);
52 //AGREGO LOS DATOS A LAS TABLAS {{{
53 $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
54 $row = array ($imagen->toHtml().' <b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
55 $TABLA3->addRow($row,'align=left');
57 //Agrego el link a nuevo
58 if ($SAMURAI_PERM->tiene(SAMURAI_ALTA_USUARIO)) {
59 $row = array ($aHref.'<img src="/MECON/images/general_nuevo.gif" border="0">Agregar Nuevo Usuario</a>');
60 $TABLA2->addRow($row,'align=right');
62 //Genero la cabecera de la tabla
63 $row = array ('Login','Nombre');
64 if ($SAMURAI_PERM->tiene(SAMURAI_MODI_USUARIO)) {
67 if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_USUARIO)) {
70 $TABLA->addRow($row,'cabecera');
71 foreach ($usuarios as $usuario) {
72 $Popup = ereg_replace('##LOGIN##' , $usuario->getLogin(), $aHrefPopup);
73 $Modif = ereg_replace('##NUEVO##' , $usuario->getLogin(), $aHrefModif);
74 $Elim = ereg_replace('##NUEVO##' , $usuario->getLogin(), $aHrefElim );
75 $Popup = $Popup.$usuario->getLogin().'</a>';
76 $Modif = ereg_replace('##ACCION##', 'm' , $Modif );
77 $Elim = ereg_replace('##ACCION##', 'e' , $Elim );
78 $row = array ( $Popup, $usuario->getNombre());
79 if ($SAMURAI_PERM->tiene(SAMURAI_MODI_USUARIO)) {
82 if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_USUARIO)) {
89 //DIBUJO LA PAGINA {{{
90 $MARCO->addBody($TABLA3);
91 $MARCO->addBody($TABLA2->toHtml(1));
92 $MARCO->addBody($TABLA);