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 // +----------------------------------------------------------------------+
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);
27 $MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
32 require_once 'MECON/HTML/QuickForm.php';
33 require_once 'MECON/HTML/Tabla.php';
34 require_once 'MECON/HTML/Error.php';
37 require_once 'SAMURAI/Permiso.php';
40 //CREO LOS OBJETO NECESARIOS {{{
41 $FORM = new MECON_HTML_QuickForm ('permisos_abm','post','permisos-abm');
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');
52 //AGREGO LAS REGLAS DE VALIDACION DE LOS ELEMENTOS {{{
53 $FORM->addRule('desc_permiso', 'El campo descripción es obligatorio', 'required', '', 'client');
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);
64 //Viene en el post, no me ocupo yo.
65 $id_permiso = $idPermiso->getValue();
67 $PERMISO = new SAMURAI_Permiso ($DB, $id_permiso);
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];
78 $desc_permiso->setValue ($PERMISO->getDescripcion());
80 if ($PERMISO->getResponsable() != '') {
81 $responsable->setValue($PERMISO->getResponsable());
84 $aceptar->setValue('Modificar');
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;'));
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');
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];
108 $PERMISO->setDescripcion($desc_permiso->getValue());
109 $PERMISO->setResponsable($responsable->getValue());
111 //Verifico si se produjo algun error
112 $res = $PERMISO->guardarDatos($aceptar->getValue());
114 if (PEAR::isError($res)) {
115 $ERROR = new MECON_HTML_Error(traducir($res->getMessage()));
116 if ($aceptar->getValue() == 'Eliminar') {
122 header('Location: permisos');
126 //DIBUJO LA PAGINA {{{
127 $MARCO->addTitle('ABM Permisos');
129 $MARCO->addBody($ERROR);
131 $MARCO->addBody($FORM);