sistema/www/sistemas/sistemas-datos.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: jue jul 17 16:29:54 ART 2003
  17 // | Author:  Martin Marrese <mmarre@mecon.gov.ar>
  18 // +----------------------------------------------------------------------+
  19 //
  20 // $Id$
  21 //
  22
  23
  24 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
  25 $SAMURAI_PERM->setSistema(SAMURAI_PERM);
  26 if (!$SAMURAI_PERM->tiene(SAMURAI_PERM_DEVELOPER)) {
  27     $SAMURAI_PERM->chequear(SAMURAI_PERM_DEVELOPER);
  28 }
  29 $MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
  30 //}}}
  31
  32 //REQUIRE ONCE {{{
  33     //MECON {{{
  34     require_once 'MECON/HTML/QuickForm.php';
  35     require_once 'MECON/HTML/Error.php';
  36     //}}}
  37     //SAMURAI {{{
  38     require_once 'SAMURAI/Sistema.php';
  39     //}}}
  40     require_once 'MECON/HTML/Image.php';
  41     require_once 'HTML/Page.php';
  42 // }}}
  43
  44 //CREO LOS OBJETOS NECESARIOS {{{
  45     if (!@$_GET['id_sistema']) {
  46         $FORM    = new MECON_HTML_Error('No hay un perfil seleccionado');
  47     }
  48     else {
  49         $PAGE    = new HTML_Page(array ('doctype'  => 'HTML 4.01 Transitional',
  50                                         'charset'  => 'iso-8859-1',
  51                                         'lineend'  => 'unix',
  52                                         'language' => 'es',
  53                                         'cache'    => 'false',
  54                                         'simple'   => 'true'));
  55         $PAGE->addStyleSheet('/MECON/css/marco.css');
  56         $FORM    = new MECON_HTML_QuickForm ('sistemas_datos','post','sistemas-datos');
  57         $SISTEMA = new SAMURAI_Sistema ($DB, $_GET['id_sistema']);
  58     }
  59 // }}}
  60
  61
  62 //AGREGO LOS ELEMENTOS AL FORM {{{
  63     $fecha_inicio           = $SISTEMA->getFechaInicio();
  64     $fecha_fin              = $SISTEMA->getFechaFin();
  65     $fecha_implementacion   = $SISTEMA->getFechaImplementacion();
  66     $fecha_inicio           = $fecha_inicio         ? $fecha_inicio->format("%d-%m-%Y") : '--';
  67     $fecha_fin              = $fecha_fin            ? $fecha_fin->format("%d-%m-%Y") : '--';
  68     $fecha_implementacion   = $fecha_implementacion ? $fecha_implementacion->format("%d-%m-%Y") : '--';
  69
  70     $FORM->addElement ('static', 'id_sistema' , 'Id Sistema'          , $SISTEMA->getId()         );
  71     $FORM->addElement ('static', 'nombre'     , 'Nombre'              , $SISTEMA->getNombre()     );
  72     $FORM->addElement ('static', 'descripcion', 'Descripción'         , $SISTEMA->getDescripcion());
  73     $FORM->addElement ('static', 'fch_inicio' , 'Fecha Inicio'        , $fecha_inicio             );
  74     $FORM->addElement ('static', 'fch_fin'    , 'Fecha Fin'           , $fecha_fin                );
  75     $FORM->addElement ('static', 'fch_imple'  , 'Fecha Implementación', $fecha_implementacion     );
  76     $FORM->addElement ('static', 'contacto'   , 'Contacto'            , $SISTEMA->getContacto()   );
  77     $FORM->freeze();
  78 // }}}
  79
  80 //DIBUJO LA PAGINA {{{
  81     $PAGE->addBodyContent($FORM);
  82     $imagen = new MECON_HTML_Image('/MECON/images/general_cerrar.gif');
  83     $PAGE->addBodyContent('<a href="" onClick=\'self.close();return false;\'>'.$imagen->toHtml().'</a>');
  84     $PAGE->setTitle('Datos del Sistema');
  85     $PAGE->display();
  86 // }}}
  87 //FIN
  88 ?>