]> git.llucax.com Git - mecon/samurai.git/blob - sistema/www/permisos/permisos-abm.php
Acomodo para que funcione con los nuevos cambios en QuickForm
[mecon/samurai.git] / sistema / www / permisos / permisos-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: 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/QuickForm.php';
33     require_once 'MECON/HTML/Tabla.php';
34     require_once 'MECON/HTML/Error.php';
35     // }}}
36     //SAMURAI {{{
37     require_once 'SAMURAI/Permiso.php';
38     //}}}
39 //}}}
40 //CREO LOS OBJETO NECESARIOS {{{
41     $FORM = new MECON_HTML_QuickForm ('permisos_abm','post','permisos-abm');
42 // }}}
43 //AGREGO LOS ELEMENTOS DEL FORM {{{
44     $FORM->addElement ('header', 'cabecera', 'ABM Permisos');
45     $FORM->addElement ('hidden', 'id_permiso');
46     $FORM->addElement ('text'  , 'desc_permiso', 'Descripción', array('size'=>'50'));
47     $FORM->addElement ('hidden', 'responsable' , $_SESSION['usuario']);
48     $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar');
49     $group[] = HTML_QuickForm::createElement('button', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:history.go(-1);return true;'));
50     $FORM->addGroup($group,'botones');
51 // }}}
52 //AGREGO LAS REGLAS DE VALIDACION DE LOS ELEMENTOS {{{
53     $FORM->addRule('desc_permiso', 'El campo descripción es obligatorio', 'required', '', 'client');
54 // }}}
55 //CREO EL OBJETO PERMISO {{{
56     //Obtengo el id del permiso.
57     $idPermiso =& $FORM->getElement('id_permiso');
58     if (isset($_GET['accion']) && $_GET['accion'] != '') {
59         //Viene en el get es -> modificar o eliminar, me ocupo yo.
60         $id_permiso = $_GET['idPermiso'];
61         $idPermiso->setValue($id_permiso);
62     }
63     else {
64         //Viene en el post, no me ocupo yo.
65         $id_permiso = $idPermiso->getValue();
66     }
67     $PERMISO = new SAMURAI_Permiso ($DB, $id_permiso);
68 // }}}
69 //SETEO LOS VALORES DE LOS ELEMENTOS DEL OBJETO FORM {{{
70     if (isset($_GET['accion']) && $_GET['accion'] != '') {
71         //MODIFICACION -> agrego la info a los elementos
72         $desc_permiso =& $FORM->getElement  ('desc_permiso');
73         $responsable  =& $FORM->getElement  ('responsable' );
74         $group        =& $FORM->getElement  ('botones'     );
75         $group        =& $group->getElements('aceptar'     );
76         $aceptar      =& $group[0];
77
78         $desc_permiso->setValue ($PERMISO->getDescripcion());
79         
80         if ($PERMISO->getResponsable() != '') {
81             $responsable->setValue($PERMISO->getResponsable());
82         }
83         
84         $aceptar->setValue('Modificar');
85         
86         //ELIMINACION -> modifico el valor del boton
87         if ($_GET['accion'] == 'e') {
88             $aceptar->setValue('Eliminar');
89             $aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
90             $FORM->freeze();
91         }
92     }
93 // }}}
94 //VALIDO EL FORMULARIO {{{
95     if ($FORM->validate()) {
96        // VEO SI SE CANCELO {{{
97         $botones = $FORM->getSubmitValue('botones');
98         if (@$botones['cancelar']) {
99             header('Location: permisos');
100         }
101         // }}}
102         $desc_permiso =& $FORM->getElement  ('desc_permiso');
103         $responsable  =& $FORM->getElement  ('responsable' );
104         $group        =& $FORM->getElement  ('botones'     );
105         $group        =& $group->getElements('aceptar'     );
106         $aceptar      =& $group[0];
107         
108         $PERMISO->setDescripcion($desc_permiso->getValue());
109         $PERMISO->setResponsable($responsable->getValue());
110         
111         //Verifico si se produjo algun error
112         $res = $PERMISO->guardarDatos($aceptar->getValue());
113
114         if (PEAR::isError($res)) {
115             $ERROR = new MECON_HTML_Error(traducir($res->getMessage()));
116             if ($aceptar->getValue() == 'Eliminar') {
117                 $FORM->freeze();
118             }
119         }
120         else {
121             $FORM->freeze();
122             header('Location: permisos');
123         }
124     }
125 // }}}
126 //DIBUJO LA PAGINA {{{
127     $MARCO->addTitle('ABM Permisos');
128     if (isset($ERROR)) {
129         $MARCO->addBody($ERROR);
130     }
131     $MARCO->addBody($FORM);
132     $MARCO->display();
133 // }}}
134 //FIN
135 ?>