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: jue may 29 13:41:29 ART 2003
17 // | Author: Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
25 require_once 'MECON/HTML/QuickForm.php';
26 require_once 'MECON/HTML/Error.php';
27 require_once 'MECON/HTML/Tabla.php';
30 require_once 'SAMURAI/Sistema.php';
31 require_once 'SAMURAI/Permiso.php';
35 //XXX OBTENGO LA ACCION {{{
36 switch ($_REQUEST['accion']) {
38 $b_accion = 'Modificar';
42 $b_accion = 'Eliminar';
51 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
52 $SAMURAI_PERM->setSistema(SAMURAI_PERM);
53 if (!$SAMURAI_PERM->tiene(SAMURAI_PERM_DEVELOPER)) {
54 $SAMURAI_PERM->chequear(SAMURAI_PERM_DEVELOPER);
56 $MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
58 //CREO LOS OBJETO NECESARIOS {{{
59 $FORM = new MECON_HTML_QuickForm ('sistemas_abm','post','sistemas-abm');
61 //OBTENGO LA LISTA DE PERMISOS {{{
62 $PERMISOS = SAMURAI_Permiso::getArrayPermisos($DB);
64 //AGREGO LOS ELEMENTOS DEL FORM {{{
65 $FORM->addElement ('header' , 'cabecera' , 'ABM Sistemas');
66 $FORM->addElement ('hidden' , 'id_sistema');
67 $FORM->addElement ('text' , 'nombre_sistema' , 'Nombre' , array('size' => '30'));
68 $FORM->addElement ('textarea', 'desc_sistema' ,
69 'Descripción' , array('rows' => '2','cols'=>'50', 'wrap'=>'virtual'));
71 //xdebug_start_trace();
73 $FORM->addElement ('mdate' , 'fecha_inicio' , 'Fecha Inicio' );
75 //xdebug_dump_function_trace();
78 $FORM->addElement ('mdate' , 'fecha_fin' , 'Fecha Fin' );
79 $FORM->addElement ('mdate' , 'fecha_implementacion', 'Fecha Implementación');
80 $FORM->addElement ('textarea', 'contacto' , 'Contacto' , array('rows' => '2','cols'=>'50'));
81 $FORM->addElement ('select' , 'permisos' , 'Permisos' , $PERMISOS, array('size' => '5', 'multiple' => 'multiple'));
82 $FORM->addElement ('hidden' , 'responsable' , $_SESSION['usuario']);
83 $FORM->addElement ('hidden', 'accion', $accion);
84 $group[] = HTML_QuickForm::createElement('submit', 'aceptar', $b_accion);
85 $group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location =\'sistemas\';return false;'));
86 $FORM->addGroup($group,'botones');
88 //AGREGO LAS REGLAS DE VALIDACION DE LOS ELEMENTOS {{{
89 $botones = $FORM->getSubmitValue('botones');
90 if (!@$botones['cancelar']) {
91 $FORM->addRule('nombre_sistema' , 'El campo nombre es obligatorio' , 'required');
92 $FORM->addRule('desc_sistema' , 'El campo descripción es obligatorio' , 'required');
93 $FORM->addRule('fecha_inicio' , 'El campo fecha inicio es obligatorio', 'required');
94 // if (isset($_GET['accion']) && $_GET['accion'] != 'e') {
95 $FORM->addRule('fecha_inicio' , 'La fecha no es válida', 'fecha');
96 $FORM->addRule('fecha_fin' , 'La fecha no es válida', 'fecha');
97 $FORM->addRule('fecha_implementacion', 'La fecha no es válida', 'fecha');
99 $FORM->addRule('contacto', 'El campo contacto es obligatorio', 'required');
102 //CREO EL OBJETO SISTEMA {{{
103 //Obtengo el id del sistema.
104 $idSistema =& $FORM->getElement('id_sistema');
106 if (isset($_GET['accion']) && $_GET['accion'] != '') {
107 //Viene en el get es -> modificar o eliminar, me ocupo yo.
108 $id_sistema = $_GET['idSistema'];
109 $idSistema->setValue($id_sistema);
112 //Viene en el post, no me ocupo yo.
113 $id_sistema = $idSistema->getValue();
116 $SISTEMA = new SAMURAI_Sistema ($DB, $id_sistema);
118 //SETEO LOS VALORES DE LOS ELEMENTOS DEL OBJETO FORM {{{
119 if (isset($_GET['accion']) && $_GET['accion'] != '') {
120 //MODIFICACION -> agrego la info a los elementos
121 $nombre_sistema =& $FORM->getElement ('nombre_sistema' );
122 $desc_sistema =& $FORM->getElement ('desc_sistema' );
123 $fecha_inicio =& $FORM->getElement ('fecha_inicio' );
124 $fecha_fin =& $FORM->getElement ('fecha_fin' );
125 $fecha_implementacion =& $FORM->getElement ('fecha_implementacion');
126 $contacto =& $FORM->getElement ('contacto' );
127 $permisos =& $FORM->getElement ('permisos' );
128 $responsable =& $FORM->getElement ('responsable' );
129 $group =& $FORM->getElement ('botones' );
130 $group =& $group->getElements('aceptar' );
131 $aceptar =& $group[0];
133 $nombre_sistema->setValue($SISTEMA->getNombre());
134 $desc_sistema->setValue ($SISTEMA->getDescripcion());
135 $contacto->setValue ($SISTEMA->getContacto());
137 if ($SISTEMA->getIdPermisos() != '') {
138 $permisos->setSelected($SISTEMA->getIdPermisos());
140 if ($SISTEMA->getResponsable() != '') {
141 $responsable->setValue($SISTEMA->getResponsable());
144 if ($tmp = $SISTEMA->getFechaInicio()) {
145 $fecha_inicio->setValue(array( 'd' => $tmp->format("%d"),
146 'F' => $tmp->format("%m"),
147 'Y' => $tmp->format("%Y"),
151 $fecha_inicio->setValue(array( 'd' => '',
158 if ($tmp = $SISTEMA->getFechaFin()) {
159 $fecha_fin->setValue(array( 'd' => $tmp->format("%d"),
160 'F' => $tmp->format("%m"),
161 'Y' => $tmp->format("%Y"),
165 $fecha_fin->setValue(array( 'd' => '',
171 if ($tmp = $SISTEMA->getFechaImplementacion()) {
172 $fecha_implementacion->setValue(array( 'd' => $tmp->format("%d"),
173 'F' => $tmp->format("%m"),
174 'Y' => $tmp->format("%Y"),
178 $fecha_implementacion->setValue(array( 'd' => '',
184 $aceptar->setValue('Modificar');
186 //ELIMINACION -> modifico el valor del boton
187 if ($_GET['accion'] == 'e') {
188 $aceptar->setValue('Eliminar');
193 //VALIDO EL FORMULARIO {{{
194 if ($FORM->validate()) {
195 $nombre_sistema =& $FORM->getElement ('nombre_sistema' );
196 $desc_sistema =& $FORM->getElement ('desc_sistema' );
197 $fecha_inicio =& $FORM->getElement ('fecha_inicio' );
198 $fecha_fin =& $FORM->getElement ('fecha_fin' );
199 $fecha_implementacion =& $FORM->getElement ('fecha_implementacion');
200 $contacto =& $FORM->getElement ('contacto' );
201 $permisos =& $FORM->getElement ('permisos' );
202 $responsable =& $FORM->getElement ('responsable' );
203 $group =& $FORM->getElement ('botones' );
204 $group =& $group->getElements('aceptar' );
205 $aceptar =& $group[0];
207 $SISTEMA->setNombre ($nombre_sistema->getValue());
208 $SISTEMA->setDescripcion($desc_sistema->getValue());
210 $f1 =& $fecha_inicio->getValue();
211 $f2 =& $fecha_fin->getValue();
212 $f3 =& $fecha_implementacion->getValue();
216 $SISTEMA->setFechaInicio($f1->format("%Y-%m-%d"));
219 $SISTEMA->setFechaInicio();
222 $SISTEMA->setFechaFin($f2->format("%Y-%m-%d"));
225 $SISTEMA->setFechaFin();
228 $SISTEMA->setFechaImplementacion($f3->format("%Y-%m-%d"));
231 $SISTEMA->setFechaImplementacion();
233 $SISTEMA->setContacto($contacto->getValue());
234 $SISTEMA->setPermisos($permisos->getSelected());
235 $SISTEMA->setResponsable($responsable->getValue());
236 $botones = $FORM->getSubmitValue('botones');
237 if (@$botones['cancelar']) {
238 header ('Location: sistemas');
241 $res = $SISTEMA->guardarDatos($aceptar->getValue());
242 if ($aceptar->getValue() != 'Eliminar') {
243 $_SESSION['samurai']['id_sistema'] = $SISTEMA->getId();
245 if (PEAR::isError($res)) {
246 $ERROR = new MECON_HTML_Error(traducir($res->getMessage()));
250 header('Location: sistemas');
256 //DIBUJO LA PAGINA {{{
257 $MARCO->addTitle('ABM Sistema');
259 $MARCO->addBody($ERROR);
261 $MARCO->addBody($FORM);