sistema/www/sistemas/sistemas-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
  23 //REQUIRE_ONCE {{{
  24     //MECON {{{
  25     require_once 'MECON/HTML/QuickForm.php';
  26     require_once 'MECON/HTML/Tabla.php';
  27     require_once 'MECON/HTML/Error.php';
  28     // }}}
  29     //SAMURAI {{{
  30     require_once 'SAMURAI/Sistema.php';
  31     require_once 'SAMURAI/Permiso.php';
  32     // }}}
  33 // }}}
  34 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
  35 $SAMURAI_PERM->chequear(SAMURAI_DEVELOPER);
  36 //}}}
  37 //OBTENGO EL ID DEL SISTEMA {{{
  38     //El id de sistema viene por get o por post, no hay otra posibilidad
  39     $idSistema = 0;
  40     if (isset($_GET['idSistema'])) {
  41         $idSistema = $_GET['idSistema'];
  42     }
  43     elseif (isset($_POST['idSistema'])) {
  44         $idSistema = $_POST['idSistema'];
  45     }
  46 // }}}
  47 //CREO LOS OBJETO NECESARIOS {{{
  48     $SISTEMA   = new SAMURAI_Sistema ($DB, $idSistema);
  49     $TABLASIST = new MECON_HTML_Tabla ('cellpadding=2');
  50     $SISTEMA->setResponsable($_SESSION['usuario']);
  51     $FORM = new MECON_HTML_QuickForm ('sistemas_permisos_abm','post','sistemas-permisos-abm');
  52 // }}}
  53 //AGREGO LA INFORMACION DEL SISTEMA {{{
  54     $row = array ('Datos del sistema');
  55     $TABLASIST->addRow($row, 'cabecera colspan=3');
  56     $row = array ('Id', 'Nombre', 'Descripcion');
  57     $TABLASIST->addRow($row, 'titulo');
  58     $row = array ($SISTEMA->getId(), $SISTEMA->getNombre(), $SISTEMA->getDescripcion());
  59     $TABLASIST->addRow($row, 'comun');
  60 // }}}
  61 //DEFINO CUAL ES LA ACCION Y LA OBSERVACION, CARGO LOS PERMISOS{{{
  62     if (@$_GET['accion']) {
  63         switch (@$_GET['accion']) {
  64             case 'n': $accion     = 'Grabar';
  65                       $obs        = '';
  66                       $PERMISOS   = SAMURAI_Permiso::getArrayPermisos($DB);
  67                       $id_permiso = '';
  68                     break;
  69             case 'm': $accion     = 'Modificar';
  70                       $id_permiso = $_GET['idPermiso'];
  71                       $PERMISOS   = new SAMURAI_Permiso($DB, $id_permiso);
  72                       $obs        = $_GET['observacion'];
  73                       $obs_ant    = $_GET['observacion'];
  74                     break;
  75             case 'e': $accion     = 'Eliminar';
  76                       $id_permiso = $_GET['idPermiso'];
  77                       $PERMISOS   = new SAMURAI_Permiso($DB, $id_permiso);
  78                       $obs        = $_GET['observacion'];
  79                     break;
  80         }
  81     }
  82     else{
  83         switch (@$_POST['accion']) {
  84             case 'Grabar': $accion     = 'Grabar';
  85                            $obs        = '';
  86                            $id_permiso = '';
  87                            $PERMISOS   = SAMURAI_Permiso::getArrayPermisos($DB);
  88                         break;
  89             case 'Modificar':$accion     = 'Modificar';
  90                              $id_permiso = $_POST['idPermiso'];
  91                              $PERMISOS   = new SAMURAI_Permiso($DB, $id_permiso);
  92                              $obs        = $_POST['observacion'];
  93                              $obs_ant    = $_POST['obs_ant'];
  94                         break;
  95             case 'Eliminar':$accion     = 'Eliminar';
  96                             $id_permiso = $_POST['idPermiso'];
  97                             $PERMISOS   = new SAMURAI_Permiso($DB, $id_permiso);
  98                             $obs        = $_POST['observacion'];
  99                         break;
 100         }
 101     }
 102 // }}}
 103 //AGREGO LOS ELEMENTOS DEL FORM {{{
 104     $FORM->addElement('header', 'cabecera', $accion.' Asociacion');
 105     $f_sistema =& $FORM->addElement('hidden', 'idSistema', $idSistema);
 106     $f_accion  =& $FORM->addElement('hidden', 'accion'   , $accion);
 107     if ($accion == 'Grabar') {
 108         $f_permisos   =& $FORM->addElement('select', 'permisos'  , 'Permisos', $PERMISOS);
 109         $f_id_permiso =& $FORM->addElement('hidden', 'idPermiso', $id_permiso);
 110     }
 111     else {
 112         $f_permisos   =& $FORM->addElement('static', 'permisos' , 'Permisos', $PERMISOS->getDescripcion());
 113         $f_id_permiso =& $FORM->addElement('hidden', 'idPermiso', $id_permiso);
 114     }
 115     if ($accion == 'Modificar') {
 116         $f_obs_ant    =& $FORM->addElement('hidden', 'obs_ant'  , $obs_ant);
 117     }
 118     $f_observacion =& $FORM->addElement('text'  , 'observacion', 'Observacion', array ('value' => $obs));
 119     $f_aceptar     =& HTML_QuickForm::createElement('submit', 'aceptar' , $accion);
 120     $f_cancelar    =& HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location = \'sistemas-permisos?idSistema='.$idSistema.'\';return false;'));
 121     $group = array ($f_aceptar, $f_cancelar);
 122     $f_group       =& $FORM->addGroup($group,'botones', '', ',&nbsp;');
 123
 124     if ($accion == 'Eliminar') {
 125         $f_aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
 126         $FORM->freeze();
 127     }
 128 // }}}
 129 //VALIDO EL FORMULARIO {{{
 130     if ($FORM->validate()) {
 131         $botones = $FORM->getSubmitValue('botones');
 132         if (@$botones['cancelar']) {
 133             header('Location: sistemas-permisos?idSistema='.$idSistema);
 134         }
 135
 136         if ($accion == 'Grabar') {
 137             $tmp = $f_permisos->getSelected();
 138             $f_id_permiso->setValue($tmp['0']);
 139             $res = $SISTEMA->guardarAsociacion($tmp['0'], $f_observacion->getValue());
 140         }
 141         elseif ($accion == 'Modificar') {
 142             $res = $SISTEMA->modificarAsociacion($f_id_permiso->getValue(), $f_observacion->getValue(), $f_obs_ant->getValue());
 143         }
 144         elseif ($accion == 'Eliminar') {
 145             $res = $SISTEMA->eliminarAsociacion($f_id_permiso->getValue(), $f_observacion->getValue());
 146         }
 147         else {
 148             $ERROR = new MECON_HTML_Error('No se reconoce la accion seleccionada');
 149         }
 150         if (PEAR::isError($res)) {
 151             $ERROR = new MECON_HTML_Error($res->getMessage());
 152         }
 153         else {
 154             header('Location: sistemas-permisos?idSistema='.$idSistema);
 155         }
 156     }
 157 // }}}
 158 //DIBUJO LA PAGINA {{{
 159     $MARCO->addBody($TABLASIST);
 160     $MARCO->addBody('<BR>');
 161     if (@$ERROR) {
 162         $MARCO->addBody($ERROR);
 163     }
 164     $MARCO->addBody($FORM);
 165     $MARCO->display();
 166 // }}}
 167 //FIN
 168
 169 ?>