]> git.llucax.com Git - mecon/samurai.git/blob - sistema/www/sistemas/sistemas-permisos.php
Acomodo para que funcione con los nuevos cambios en QuickForm
[mecon/samurai.git] / sistema / www / sistemas / sistemas-permisos.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: mar may 27 15:16:38 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->chequear(SAMURAI_PERM_DEVELOPER);
26 }
27 $MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
28 //}}}
29
30 //REQUIRE_ONCE {{{
31     //MECON {{{
32     require_once 'MECON/HTML/Tabla.php';
33     // }}}
34     //SAMURAI {{{
35     require_once 'SAMURAI/Sistema.php';
36     require_once 'SAMURAI/Permiso.php';
37     // }}}
38 // }}}
39 //OBTENGO EL ID DEL SISTEMA {{{
40     //El id de sistema viene por get o por post, no hay otra posibilidad
41     $idSistema = 0;
42     if (isset($_GET['idSistema'])) {
43         $idSistema = $_GET['idSistema'];
44     }
45     elseif (isset($_POST['idSistema'])) {
46         $idSistema = $_POST['idSistema'];
47     }
48     $_SESSION['samurai']['id_sistema'] = $idSistema;
49 // }}}
50 //CREO LOS OBJETO NECESARIOS {{{
51     $SISTEMA   = new SAMURAI_Sistema ($DB, $idSistema);
52     $TABLASIST = new MECON_HTML_Tabla ('cellpadding=2');
53     $TABLAPERM = new MECON_HTML_Tabla ('cellpadding=2');
54     $SISTEMA->setResponsable($_SESSION['usuario']);
55 // }}}
56 //AGREGO LA INFORMACION DEL SISTEMA {{{
57     $row = array ('Datos del sistema');
58     $TABLASIST->addRow($row, 'cabecera colspan=3');
59     $row = array ('Id', 'Nombre', 'Descripción');
60     $TABLASIST->addRow($row, 'titulo');
61     $row = array ($SISTEMA->getId(), $SISTEMA->getNombre(), $SISTEMA->getDescripcion());
62     $TABLASIST->addRow($row, 'comun');
63 // }}}
64 //AGREGO LA INFORMACION DE LAS ASOCIACIONES {{{
65     $aHref      = '<a href="sistemas-permisos-abm?accion=##ACCION##&idPermiso=##PERMISO##&observacion=##OBS##&idSistema='.$idSistema.'">';
66     $aHrefModif = $aHref.'<img src="/MECON/images/general_modificar.gif" border="0" alt="Modificar"></a>';
67     $aHrefElim  = $aHref.'<img src="/MECON/images/general_eliminar.gif"  border="0" alt="Eliminar" ></a>';
68
69     $TABLA2 = new MECON_HTML_Tabla ('cellspacing=0');
70     $tt = ereg_replace ('##ACCION##' , 'n', $aHref);
71     $tt = ereg_replace ('##PERMISO##', 'p', $tt   );
72     $tt = ereg_replace ('##OBS##'    , 'o', $tt   );
73     $row = array ($tt.'<img src="/MECON/images/general_nuevo.gif" border="0">Asociar nuevo permiso al sistema</a>');
74     $TABLA2->addRow($row, 'align=right');
75
76     $row = array ('Permisos Asociados al Sistema');
77     $TABLAPERM->addRow($row, 'cabecera colspan=4');
78     $row = array ('Nombre', 'Observación', 'Modif.', 'Elim.');
79     $TABLAPERM->addRow($row, 'titulo');
80     
81     $asocs = $SISTEMA->getAsociaciones();
82
83     foreach ($asocs as $asoc) {
84         $obs = ereg_replace(' ' , '%20', $asoc['obs']); //Cambio los espacios por %20 para que funcione bien con el netscape
85         $estilo = 'comun';
86         $permiso = new SAMURAI_Permiso($DB, $asoc['id']);
87         $Modif = ereg_replace('##PERMISO##', $asoc['id'] , $aHrefModif);
88         $Elim  = ereg_replace('##PERMISO##', $asoc['id'] , $aHrefElim );
89         $Modif = ereg_replace('##OBS##'    , $obs        , $Modif     );
90         $Elim  = ereg_replace('##OBS##'    , $obs        , $Elim      );
91         $Modif = ereg_replace('##ACCION##' , 'm'         , $Modif     );
92         $Elim  = ereg_replace('##ACCION##' , 'e'         , $Elim      );
93         $row = array ($permiso->getDescripcion(), $asoc['obs'], $Modif, $Elim);
94         $TABLAPERM->addRow($row, $estilo);
95     }
96
97 // }}}
98 //OPCION VOLVER {{{
99     $TABLAVOLVER = new MECON_HTML_Tabla ('cellspacing=0');
100     $row = array ('<a href="sistemas" alt="Volver a la lista de Sistemas" ><img src="/MECON/images/general_volver4.gif" border="0">&nbsp;Volver a Sistemas</a>');
101     $TABLAVOLVER->addRow($row,'align=left');
102 // }}}
103 //DIBUJO LA PAGINA {{{
104     $MARCO->addBody($TABLAVOLVER);
105     $MARCO->addTitle('Asociar Permisos y Sistemas');
106     //AGREGO LA TABLA DEL SISTEMA
107     $MARCO->addBody($TABLASIST);
108     $MARCO->addBody('<BR>');
109     //AGREGO LA TABLA DE PERMISOS
110     $MARCO->addBody($TABLA2);
111     $MARCO->addBody($TABLAPERM);
112     $MARCO->display();
113 // }}}
114 //FIN
115
116 ?>