2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
3 // +----------------------------------------------------------------------+
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 // +----------------------------------------------------------------------+
23 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
24 if (!$SAMURAI_PERM->tiene(SAMURAI_DEVELOPER)) {
25 // header('Location: error')
30 require_once 'MECON/HTML/QuickForm.php';
31 require_once 'MECON/HTML/Tabla.php';
32 require_once 'MECON/HTML/Error.php';
35 require_once 'SAMURAI/Permiso.php';
38 //CREO LOS OBJETO NECESARIOS {{{
39 $FORM = new MECON_HTML_QuickForm ('permisos_abm','post','permisos-abm');
41 //AGREGO LOS ELEMENTOS DEL FORM {{{
42 $FORM->addElement ('header', 'cabecera', 'ABM Permisos');
43 $FORM->addElement ('hidden', 'id_permiso');
44 $FORM->addElement ('text' , 'desc_permiso', 'Descripcion', array('size'=>'50'));
45 $FORM->addElement ('hidden', 'responsable' , $_SESSION['samurai']['login']);
46 $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar');
47 $group[] = HTML_QuickForm::createElement('button', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:history.go(-1);return true;'));
48 $FORM->addGroup($group,'botones');
50 //AGREGO LAS REGLAS DE VALIDACION DE LOS ELEMENTOS {{{
51 $FORM->addRule('desc_permiso', 'El campo descripcion es obligatorio', 'required', '', 'client');
53 //CREO EL OBJETO PERMISO {{{
54 //Obtengo el id del permiso.
55 $idPermiso =& $FORM->getElement('id_permiso');
56 if (isset($_GET['accion']) && $_GET['accion'] != '') {
57 //Viene en el get es -> modificar o eliminar, me ocupo yo.
58 $id_permiso = $_GET['idPermiso'];
59 $idPermiso->setValue($id_permiso);
62 //Viene en el post, no me ocupo yo.
63 $id_permiso = $idPermiso->getValue();
65 $PERMISO = new SAMURAI_Permiso ($DB, $id_permiso);
67 //SETEO LOS VALORES DE LOS ELEMENTOS DEL OBJETO FORM {{{
68 if (isset($_GET['accion']) && $_GET['accion'] != '') {
69 //MODIFICACION -> agrego la info a los elementos
70 $desc_permiso =& $FORM->getElement ('desc_permiso');
71 $responsable =& $FORM->getElement ('responsable' );
72 $group =& $FORM->getElement ('botones' );
73 $group =& $group->getElements('aceptar' );
74 $aceptar =& $group[0];
76 $desc_permiso->setValue ($PERMISO->getDescripcion());
78 if ($PERMISO->getResponsable() != '') {
79 $responsable->setValue($PERMISO->getResponsable());
82 $aceptar->setValue('Modificar');
84 //ELIMINACION -> modifico el valor del boton
85 if ($_GET['accion'] == 'e') {
86 $aceptar->setValue('Eliminar');
87 $aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
92 //VALIDO EL FORMULARIO {{{
93 if ($FORM->validate()) {
94 // VEO SI SE CANCELO {{{
95 $botones = $FORM->getSubmitValue('botones');
96 if (@$botones['cancelar']) {
97 header('Location: permisos');
100 $desc_permiso =& $FORM->getElement ('desc_permiso');
101 $responsable =& $FORM->getElement ('responsable' );
102 $group =& $FORM->getElement ('botones' );
103 $group =& $group->getElements('aceptar' );
104 $aceptar =& $group[0];
106 $PERMISO->setDescripcion($desc_permiso->getValue());
107 $PERMISO->setResponsable($responsable->getValue());
109 //Verifico si se produjo algun error
110 $res = $PERMISO->guardarDatos($aceptar->getValue());
112 if (PEAR::isError($res)) {
113 $ERROR = new MECON_HTML_Error(traducir($res->getMessage()));
114 if ($aceptar->getValue() == 'Eliminar') {
120 header('Location: permisos');
124 //DIBUJO LA PAGINA {{{
125 $MARCO->addTitle('ABM Permisos');
127 $MARCO->addBody($ERROR);
129 $MARCO->addBody($FORM);