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