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: lun jul 7 13:30:05 ART 2003
17 // | Author: Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
24 require_once 'MECON/HTML/QuickForm.php';
25 require_once 'MECON/HTML/Tabla.php';
26 require_once 'SAMURAI/Perfil.php';
27 require_once 'SAMURAI/Permiso.php';
28 require_once 'SAMURAI/Sistema.php';
30 //CREO LOS OBJETO NECESARIOS {{{
31 if (@$_GET['id_perfil']) {
32 $id_perfil = $_GET['id_perfil'];
34 elseif (@$_POST['id_perfil']) {
35 $id_perfil = $_POST['id_perfil'];
40 $FORM = new MECON_HTML_QuickForm ('perfiles_abm','post','perfiles-abm');
41 $SISTEMA = new SAMURAI_Sistema ($DB, $_SESSION['samurai']['id_sistema']);
42 $PERFIL = new SAMURAI_Perfil ($DB, $id_perfil);
44 if ($PERFIL->getResponsable()) {
45 $responsable = $PERFIL->getResponsable();
48 $responsable = $_SESSION['samurai']['login'];
51 if (!@$_GET['id_perfil']) {
52 if (@$_GET['desc_perfil']) {
53 $PERFIL->setDescripcion(@$_GET['desc_perfil']);
56 $PERFIL->setDescripcion(@$_POST['desc_ant']);
59 $descripcion = $PERFIL->getDescripcion();
61 //OBTENGO LOS PERMISOS DEL SISTEMA {{{
62 $ASOCIACIONES = $SISTEMA->getAsociaciones();
64 foreach ($ASOCIACIONES as $as) {
65 $clave = $as['id'].'##'.$as['obs'];
66 $texto = ($as['obs'] != '') ? $as['desc'].' - '.$as['obs']: $as['desc'];
67 $PERMISOS[$clave] = $texto;
70 //AGREGO LOS ELEMENTOS DEL FORM {{{
71 $FORM->addElement ('header', 'cabecera', 'ABM Perfiles');
72 $FORM->addElement ('hidden', 'id_perfil', $id_perfil);
73 $FORM->addElement ('hidden', 'desc_ant' , $descripcion);
74 $FORM->addElement ('static', 'desc_perfil', 'Descripcion', $descripcion);
75 $FORM->addElement ('select', 'permisos' , 'Permisos' , $PERMISOS, array('size' => '5', 'multiple' => 'true'));
76 $FORM->addElement ('select', 'tipo_perfil', 'Tipo Perfil', array('E' => 'Externo', 'I' => 'Interno', 'D' => 'Dios'), array ('size' => '1'));
77 $FORM->addElement ('static', 'responsable', 'Responsable', $responsable);
78 $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar');
79 $group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:history.go(-1);return true;'));
80 $FORM->addGroup($group,'botones');
82 //AGREGO LAS REGLAS DE VALIDACION {{{
83 $FORM->addRule ('permisos', 'Se debe seleccionar al menos un permiso', 'required');
85 //CARGO LOS DATOS SI YA EXISTEN EN BASE {{{
86 // TODO Terminar de armar la parte de modificacion y eliminacion
87 if (isset($_GET['accion']) && $_GET['accion'] != '') {
89 $id_perfil =& $FORM->getElement ('id_perfil' );
90 $desc_perfil =& $FORM->getElement ('desc_perfil');
91 $permisos =& $FORM->getElement ('permisos' );
92 $tipo_perfil =& $FORM->getElement ('tipo_perfil');
93 $responsable =& $FORM->getElement ('responsable');
94 $group =& $FORM->getElement ('botones' );
95 $group =& $group->getElements('aceptar' );
96 $aceptar =& $group[0];
98 $permisos->setSelected($PERFIL->getPermisos());
99 $tipo_perfil->setSelected($PERFIL->getTipo());
101 if ($PERFIL->getResponsable() != '') {
102 $responsable->setValue($PERFIL->getResponsable());
105 //Modifico el valor del boton
106 $aceptar->setValue('Modificar');
108 //ELIMINACION -> modifico el valor del boton
109 if ($_GET['accion'] == 'e') {
110 $aceptar->setValue('Eliminar');
115 //VALIDO EL FORMULARIO {{{
116 if ($FORM->validate()) {
117 // VEO SI SE CANCELO {{{
118 $botones = $FORM->getSubmitValue('botones');
119 if (@$botones['cancelar']) {
120 header('Location: perfiles');
124 $id_perfil =& $FORM->getElement ('id_perfil' );
125 $desc_perfil =& $FORM->getElement ('desc_perfil');
126 $permisos =& $FORM->getElement ('permisos' );
127 $tipo_perfil =& $FORM->getElement ('tipo_perfil');
128 $tipo_perfil_tmp = $tipo_perfil->getSelected();
129 $responsable =& $FORM->getElement ('responsable');
130 $group =& $FORM->getElement ('botones' );
131 $group =& $group->getElements('aceptar' );
132 $aceptar =& $group[0];
134 $PERFIL->setDescripcion($desc_perfil->_text );
135 $PERFIL->setResponsable($responsable->_text ); //TODO URGENTE Modificar esto. No tiene metodo static::getValue()
136 $PERFIL->setPermisos ($permisos->getSelected()); //Le asigno al perfil los permisos seleccionados
137 $PERFIL->setTipo ($tipo_perfil_tmp['0'] );
139 //Grabo y verifico si se produjo algun error
140 $res = $PERFIL->guardarDatos($aceptar->getValue());
142 if (PEAR::isError($res)) {
143 $TABLA = new Tabla ('cellspacing=0');
144 $row = array ('<font color="red"><b>'.$res->getMessage().'</b></font>');
145 $TABLA->addRow($row,'align=left');
146 if ($aceptar->getValue() == 'Eliminar') {
152 header('Location: perfiles');
157 //DIBUJO LA PAGINA {{{
158 $TABLA3 = new Tabla ('cellspacing=0');
159 $row = array ('<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
160 $TABLA3->addRow($row,'titulo align=left');
162 $MARCO = new Marco ('../../conf/confSecciones.php');
163 $MARCO->addTitle('ABM Perfil');
164 $MARCO->addBody($TABLA3);
166 $MARCO->addBody($TABLA);
168 $MARCO->addBody($FORM);