]> git.llucax.com Git - mecon/samurai.git/blob - sistema/www/permisos/permisos.php
71e59ba7502a371b1ea41ddac3bf3fb3f79283f5
[mecon/samurai.git] / sistema / www / permisos / 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 require_once 'MECON/HTML/Image.php';
32 require_once 'MECON/HTML/Link.php';
33 require_once 'MECON/HTML/TablaDB.php';
34 require_once 'SAMURAI/Permiso.php';
35 //}}}
36
37 //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
38 if (!@$_SESSION['samurai']['id_sistema']) {
39     header('Location: ./../sel-sistema?redirect=permisos/permisos');    
40 }
41 //}}}   
42
43 //OBTENGO LA INFORMACION DE LA BASE {{{
44 $res = SAMURAI_Permiso::getPermisosPager($DB);
45 if (PEAR::isError($res)) {
46     trigger_error('Error: ' . $res->getMessage() . "\n", E_USER_ERROR);
47 }
48
49 // }}}
50
51 //CREO LA TABLA DE PERMISOS {{{
52 $TABLA =& new MECON_HTML_TablaDB ('Permisos');
53 $TABLA->addLink(
54         'nuevo', 
55         new MECON_HTML_Link(
56             'permisos-abm', 'Nuevo Permiso', 
57             array (
58                 'accion' => '##ACCION##',
59                 'idPermiso' => '##NUEVO##'
60                 )
61             )
62         );
63 $TABLA->addRow(array('Id', 'DescripciĆ³n', 'Modif.', 'Elimn.'), 'cabecera');
64 $pager = $TABLA->addPager($res, null, new MECON_HTML_Link ('permisos', null), 25);
65
66 //Agrego las columnas de modificacion y eliminacion {{{
67 //Modificar {{{
68 $TABLA->addRowsData('%s',
69             array (
70                 array (
71                     array (
72                         'id_permiso',
73                         'cuenta'
74                         ),
75                     'modificar_callback'
76                     )
77                 )
78         );
79
80 function modificar_callback($param) {
81     if ($param['cuenta']) {
82         //DesHabilitado
83         $tmp =& new MECON_HTML_Image (
84                 '/MECON/images/general_modificar_des.gif',
85                 '(-)'
86                 );
87         return $tmp->toHtml();
88     }
89     else {
90         //Habilitado
91         $tmp =& new MECON_HTML_Link (
92                 'permisos-abm',
93                 new MECON_HTML_Image (
94                     '/MECON/images/general_modificar.gif',
95                     '(M)'
96                     ),
97                 array (
98                     'accion' => 'm',
99                     'idPermiso' => $param['id_permiso'] 
100                     )
101                 );
102         return $tmp->toHtml();
103     }
104 }
105 //}}}
106 //Eliminar {{{
107 $TABLA->addRowsData('%s',
108             array (
109                 array (
110                     array (
111                         'id_permiso',
112                         'cuenta'
113                         ),
114                     'eliminar_callback'
115                     )
116                 )
117         );
118
119 function eliminar_callback($param) {
120     if ($param['cuenta']) {
121         //DesHabilitado
122         $tmp =& new MECON_HTML_Image (
123                 '/MECON/images/general_eliminar_des.gif',
124                 '(-)'
125                 );
126         return $tmp->toHtml();
127     }
128     else {
129         //Habilitado
130         $tmp =& new MECON_HTML_Link (
131                 'permisos-abm',
132                 new MECON_HTML_Image (
133                     '/MECON/images/general_eliminar.gif',
134                     '(E)'
135                     ),
136                 array (
137                     'accion' => 'e',
138                     'idPermiso' => $param['id_permiso'] 
139                     )
140                 );
141         return $tmp->toHtml();
142     }
143 }
144 //}}}
145 //}}}
146
147 $TABLA->addRows($pager, array ('id_permiso', 'desc_permiso'));
148 $TABLA->updateColAttributes(0,'width="10%" ');
149 $TABLA->updateColAttributes(1,'width="70%"');
150 $TABLA->updateColAttributes(2,'width="10%"');
151 $TABLA->updateColAttributes(3,'width="10%"');
152 //}}}
153
154 //DIBUJO LA PAGINA {{{
155     $MARCO->addBody($TABLA);
156     $MARCO->display();
157 //}}}
158 ?>