]> git.llucax.com Git - mecon/samurai.git/blob - sistema/www/perfiles/perfiles-abm.php
Acomodo para que funcione con los nuevos cambios en QuickForm
[mecon/samurai.git] / sistema / www / perfiles / perfiles-abm.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: lun jul  7 13:30:05 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_PERFIL_ALTA,SAMURAI_PERM_PERFIL_BAJA,SAMURAI_PERM_PERFIL_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 'MECON/HTML/QuickForm.php';
33     require_once 'MECON/HTML/Tabla.php';
34     require_once 'MECON/HTML/Error.php';
35     require_once 'SAMURAI/Perfil.php';
36     require_once 'SAMURAI/Permiso.php';
37     require_once 'SAMURAI/Sistema.php';
38     require_once 'MECON/HTML/Image.php';
39 // }}}
40 //CREO LOS OBJETO NECESARIOS {{{
41     if (@$_GET['id_perfil']) {
42         $id_perfil = $_GET['id_perfil'];
43     }
44     elseif (@$_POST['id_perfil']) {
45         $id_perfil = $_POST['id_perfil'];
46     }
47     else {
48         $id_perfil = null;
49     }
50     $FORM = new MECON_HTML_QuickForm ('perfiles_abm','post','perfiles-abm');
51     $SISTEMA = new SAMURAI_Sistema ($DB, $_SESSION['samurai']['id_sistema']);
52     $PERFIL = new SAMURAI_Perfil ($DB, $id_perfil,
53             $_SESSION['samurai']['id_sistema']);
54
55     if ($PERFIL->getResponsable()) {
56         $responsable = $PERFIL->getResponsable();
57     }
58     else {
59         $responsable = $_SESSION['usuario'];
60     }
61     
62     if (!@$_GET['id_perfil']) {
63         if (@$_GET['desc_perfil']) {
64             $PERFIL->setDescripcion(@$_GET['desc_perfil']);
65         }
66         else {
67             $PERFIL->setDescripcion(@$_POST['desc_ant']);
68         }
69     }
70     $descripcion = $PERFIL->getDescripcion();
71 // }}}
72 //OBTENGO LOS PERMISOS DEL SISTEMA {{{
73     $ASOCIACIONES = $SISTEMA->getAsociaciones();
74     $PERMISOS = array ();
75     foreach ($ASOCIACIONES as $as) {
76         $clave = $as['id'].'##'.$as['obs'];
77         $texto = ($as['obs'] != '') ? $as['desc'].' - '.$as['obs']: $as['desc'];
78         $PERMISOS[$clave] = $texto;
79     }
80 // }}}
81 //AGREGO LOS ELEMENTOS DEL FORM {{{
82     if (@$PERMISOS) {
83         $FORM->addElement ('header', 'cabecera', 'ABM Perfiles');
84         $FORM->addElement ('hidden', 'id_perfil', $id_perfil);
85         $FORM->addElement ('hidden', 'desc_ant'   , $descripcion);
86         $FORM->addElement ('static', 'desc_perfil', 'Descripción', $descripcion);
87         $FORM->addElement ('select', 'permisos'   , 'Permisos'   , $PERMISOS, array('size' => '5', 'multiple' => 'true'));
88         $FORM->addElement ('hidden', 'responsable', $responsable);
89         $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar');
90         $group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location=\'perfiles\';return false;'));
91         $FORM->addGroup($group,'botones');
92     }
93     else {
94         $ERROR = new MECON_HTML_Error('El sistema no posee permisos asociados.');
95     }
96 // }}}
97 //AGREGO LAS REGLAS DE VALIDACION {{{
98     $FORM->addRule ('permisos', 'Se debe seleccionar al menos un permiso', 'required');
99 // }}}
100 //CARGO LOS DATOS SI YA EXISTEN EN BASE {{{
101     if (isset($_GET['accion']) && $_GET['accion'] != '') {
102         //MODIFICACION
103         $id_perfil    =& $FORM->getElement  ('id_perfil'  );
104         $desc_perfil  =& $FORM->getElement  ('desc_perfil');
105         $permisos     =& $FORM->getElement  ('permisos'   );
106         $responsable  =& $FORM->getElement  ('responsable');
107         $group        =& $FORM->getElement  ('botones'    );
108         $group        =& $group->getElements('aceptar'    );
109         $aceptar      =& $group[0];
110
111         $permisos->setSelected($PERFIL->getPermisos());
112         
113         if ($PERFIL->getResponsable() != '') {
114             $responsable->setValue($PERFIL->getResponsable());
115         }
116
117         //Modifico el valor del boton
118         $aceptar->setValue('Modificar');
119             
120         //ELIMINACION -> modifico el valor del boton
121         if ($_GET['accion'] == 'e') {
122             $aceptar->setValue('Eliminar');
123             $aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
124             $FORM->freeze();
125         }
126     }
127 // }}}
128 //VALIDO EL FORMULARIO {{{
129     if ($FORM->validate()) {
130         // VEO SI SE CANCELO {{{
131         $botones = $FORM->getSubmitValue('botones');
132         if (@$botones['cancelar']) {
133             header('Location: perfiles');
134         }
135         // }}}
136         else {
137             $id_perfil    =& $FORM->getElement  ('id_perfil'  );
138             $desc_perfil  =& $FORM->getElement  ('desc_perfil');
139             $permisos     =& $FORM->getElement  ('permisos'   );
140             $responsable  =& $FORM->getElement  ('responsable');
141             $group        =& $FORM->getElement  ('botones'    );
142             $group        =& $group->getElements('aceptar'    );
143             $aceptar      =& $group[0];
144       
145             $PERFIL->setDescripcion($desc_perfil->_text     );
146             $PERFIL->setResponsable($responsable->getValue());
147             $PERFIL->setPermisos   ($permisos->getSelected()); //Le asigno al perfil los permisos seleccionados
148             
149             //Grabo y verifico si se produjo algun error
150             $res = $PERFIL->guardarDatos($aceptar->getValue());
151
152             if (PEAR::isError($res)) {
153                 $ERROR = new MECON_HTML_Error($res->getMessage());
154                 if ($aceptar->getValue() == 'Eliminar') {
155                     $FORM->freeze();
156                 }
157             }
158             else {
159                 $FORM->freeze();
160                 header('Location: perfiles');
161             }
162         }
163     }
164 // }}}
165 //DIBUJO LA PAGINA {{{
166     $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
167     $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
168     $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
169     $TABLA3->addRow($row,'align=left');    
170
171     $MARCO->addTitle('ABM Perfil');
172     $MARCO->addBody($TABLA3);
173     if (isset($ERROR)) {
174         $MARCO->addBody($ERROR);
175     }
176     $MARCO->addBody($FORM);
177     $MARCO->display();
178 //
179 //FIN
180 ?>