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 if (!$SAMURAI_PERM->tiene(SAMURAI_DEVELOPER)) {
25 // header('Location: error')
29 require_once 'MECON/HTML/Tabla.php';
30 require_once 'SAMURAI/Usuario.php';
31 require_once 'SAMURAI/Sistema.php';
32 require_once 'HTML/Image.php';
35 $aHrefPopup = '<a href="" onClick="window.open(\'usuarios-datos?login=##LOGIN##\',\'usuariosdatos\',\'height=300,width=400,scrollbars=yes\');return false;">';
36 $aHref = '<a href="usuarios-abm?accion=##ACCION##&login=##NUEVO##">';
37 $aHrefModif = $aHref.'<img src="/MECON/images/general_modificar.gif" border="0" alt="Modificar Usuario"></a>';
38 $aHrefElim = $aHref.'<img src="/MECON/images/general_eliminar.gif" border="0" alt="Eliminar Usuario" ></a>';
40 //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
41 if (!@$_SESSION['samurai']['id_sistema'] || !@$_SESSION['samurai']['login']) {
42 header('Location: ./../sel-sistema');
45 //CREO LOS OBJETOS NECESARIOS {{{
46 $TABLA2 = new MECON_HTML_Tabla ('cellspacing=0');
47 $TABLA = new MECON_HTML_Tabla ('cellpadding=2');
48 $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
49 $SISTEMA = new SAMURAI_Sistema($DB, $_SESSION['samurai']['id_sistema']);
51 //OBTENGO LA INFORMACION DE LA BASE {{{
52 $usuarios = SAMURAI_Usuario::getUsuarios($DB, $_SESSION['samurai']['id_sistema']);
54 //AGREGO LOS DATOS A LAS TABLAS {{{
55 $imagen = new HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
56 $row = array ($imagen->toHtml().' <b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
57 $TABLA3->addRow($row,'align=left');
59 //Agrego el link a nuevo
60 if ($SAMURAI_PERM->tiene(SAMURAI_ALTA_USUARIO)) {
61 $row = array ($aHref.'<img src="/MECON/images/general_nuevo.gif" border="0">Agregar Nuevo Usuario</a>');
62 $TABLA2->addRow($row,'align=right');
64 //Genero la cabecera de la tabla
65 $row = array ('Login','Nombre');
66 if ($SAMURAI_PERM->tiene(SAMURAI_MODI_USUARIO)) {
69 if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_USUARIO)) {
72 $TABLA->addRow($row,'cabecera');
73 foreach ($usuarios as $usuario) {
74 $Popup = ereg_replace('##LOGIN##' , $usuario->getLogin(), $aHrefPopup);
75 $Modif = ereg_replace('##NUEVO##' , $usuario->getLogin(), $aHrefModif);
76 $Elim = ereg_replace('##NUEVO##' , $usuario->getLogin(), $aHrefElim );
77 $Popup = $Popup.$usuario->getLogin().'</a>';
78 $Modif = ereg_replace('##ACCION##', 'm' , $Modif );
79 $Elim = ereg_replace('##ACCION##', 'e' , $Elim );
80 $row = array ( $Popup, $usuario->getNombre());
81 if ($SAMURAI_PERM->tiene(SAMURAI_MODI_USUARIO)) {
84 if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_USUARIO)) {
91 //DIBUJO LA PAGINA {{{
92 $MARCO->addBody($TABLA3);
93 $MARCO->addBody($TABLA2->toHtml(1));
94 $MARCO->addBody($TABLA);