]> git.llucax.com Git - mecon/samurai.git/blob - sistema/www/usuarios/usuarios.php
BugFix.
[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
31 //REQUIRE ONCE {{{
32 require_once 'SAMURAI/Sistema.php';
33 require_once 'MECON/HTML/Image.php';
34 require_once 'MECON/HTML/TablaDB.php';
35 require_once 'SAMURAI/Usuario.php';
36 //}}}
37
38 //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
39 if (!@$_SESSION['samurai']['id_sistema']) {
40     header('Location: ./../sel-sistema?redirect=usuarios/usuarios');    
41 }
42 //}}}   
43
44 //VIÑETA CON EL SISTEMA EN EL CUAL SE ESTA TRABAJANDO {{{
45 $SISTEMA =& new SAMURAI_Sistema($DB, $_SESSION['samurai']['id_sistema']);
46 $tmp =& new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif', '>>');
47 $VINETA = '<div align="left">'. $tmp->toHTML() .'&nbsp;<b>SISTEMA: '. 
48     $SISTEMA->getNombre().'</b></div>';
49 //}}}
50
51 //OBTENGO LA INFORMACION DE LOS USUARIOS {{{
52 $res = SAMURAI_Usuario::getUsuariosPager($DB, $_SESSION['samurai']['id_sistema']);
53 //}}}
54
55 //CREO LA TABLA DE USUARIOS {{{
56 $TABLA =& new MECON_HTML_TablaDB ('Usuarios');
57 $TABLA->addLink(
58         'nuevo', 
59         new MECON_HTML_Link(
60             'usuarios-abm', 'Nuevo Usuario', 
61             array (
62                 'accion' => '##ACCION##',
63                 '_login' => '##NUEVO##'
64                 )
65             )
66         );
67 $TABLA->addLink(
68         'volver', 
69         new MECON_HTML_Link(
70             './../sel-sistema?redirect=usuarios/usuarios', 
71             'Seleccionar otro sistema para trabajar'
72             )
73         );
74
75
76 //Agrego las columnas de modificacion y eliminacion {{{
77 $link = new MECON_HTML_Link ('usuarios-abm', null, array('accion' => 'm'));
78 if ($SAMURAI_PERM->tiene(SAMURAI_PERM_USUARIO_MODIF)) {
79     $TABLA->addRowsIcon('modificar', 'login', $link);
80 }
81 if ($SAMURAI_PERM->tiene(SAMURAI_PERM_USUARIO_BAJA)) {
82     $link->setGetVar('accion', 'e');
83     $TABLA->addRowsIcon('eliminar', 'login', $link);
84 }
85 //}}}
86
87 $TABLA->addRow(array('Login', 'Nombre', 'Modif.', 'Elimn.'), 'cabecera');
88 $pager = $TABLA->addPager($res, null, new MECON_HTML_Link ('usuarios', null), 25);
89 $TABLA->addRows($pager, array ('login', 'nombre'));
90 //}}}
91
92 //DIBUJO LA PAGINA {{{
93 $MARCO->addBody($VINETA);
94 $MARCO->addBody($TABLA);
95 $MARCO->display();
96 //}}}
97 ?>