]> git.llucax.com Git - mecon/samurai.git/blob - sistema/www/sel-sistema.php
Se agrego la funcionalidad que permite bajar la definicion de constantes para utiliza...
[mecon/samurai.git] / sistema / www / sel-sistema.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: lun jul  7 10:39:58 ART 2003
17 // | Author:  Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
19 //
20 // $Id$
21 // 
22     require_once 'MECON/HTML/QuickForm.php';
23     require_once 'MECON/HTML/Tabla.php';
24     require_once 'SAMURAI/Sistema.php';
25
26
27 //CREO LOS OBJETOS NECESARIOS {{{
28     $FORM     = new MECON_HTML_QuickForm ('sel_sistema','post','sel-sistema');
29     $SISTEMAS = SAMURAI_Sistema::getArraySistemas($DB);
30 // }}}
31 //AGREGO LOS ELEMENTOS DEL FORM {{{
32     $FORM->addElement ('header', 'cabecera', 'Seleccione el sistema con el cual quiere trabajar');
33     $FORM->addElement ('select', 'sistemas', 'Sistemas', $SISTEMAS, array('size' => '1'));
34     if (@$_GET['redirect']) {
35         $redirect = $_GET['redirect'];
36     }
37     elseif (@$_POST['redirect']) {
38         $redirect = $_POST['redirect'];
39     }
40     else {
41         $redirect = 'index';
42     }
43     $FORM->addElement ('hidden', 'redirect', $redirect);
44     $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Seleccionar');
45     $FORM->addGroup($group,'botones', '', ',&nbsp;');
46 // }}}
47 //VALIDO EL FORMULARIO {{{
48     if ($FORM->validate()) {
49         $sistema =& $FORM->getElement ('sistemas');
50         $tmp     =  $sistema->getSelected();
51         $_SESSION['samurai']['id_sistema'] = $tmp['0'];
52         
53         if ($FORM->elementExists('responsable')) {
54             $responsable =& $FORM->getElement ('responsable');
55             $_SESSION['usuario'] = $responsable->getValue();
56         }
57         header('Location: '.$_POST['redirect']);
58     }
59 // }}}
60 // DIBUJO LA PAGINA {{{
61     $MARCO->habilitarLinks(false); //MODIFICAR ESTO CUANDO SE HAGA LA FUNCION DESHABILITAR LINKS
62     $MARCO->addBody($FORM);
63     $MARCO->display();
64 // }}}
65 ?>