sistema/www/sistemas.php

   1 <?php
   2 // vim: set binary expandtab ts=4 shiftwidth=4 textwidth=80:
   3 // $Id$
   4 require_once '../local_lib/HTML_DietMarco.php';
   5 if(!isset($_SESSION['usuario']))
   6 {
   7   header('location: login?redirect=sistemas');
   8   exit;
   9 }
  10 require_once '../local_lib/intranetdb.php';
  11 require_once 'HTML/Table.php';
  12 require_once 'MECON/HTML/Link.php';
  13 require_once 'MECON/HTML/Image.php';
  14 #require_once 'AI/DB.php';
  15 require_once 'DB.php';
  16 require_once 'AI/Sistema.php';
  17
  18 define('COLUMNAS', 3);
  19
  20 $t = new HTML_Table(
  21     array(
  22         'width'         => '100%',
  23         'cellspacing'   => '0',
  24         'cellpadding'   => '0',
  25         'border'        => '0',
  26         'align'         => 'left',
  27         'valign'        => 'middle',
  28     )
  29 );
  30
  31 $db = IntranetDB::connect();
  32 $sistemas = AI_Sistema::getSistemas($db);
  33
  34 $pct = intval(100/COLUMNAS) . '%';
  35 $sistema = @array_shift($sistemas);
  36 while ($sistema) {
  37     $row = array();
  38     for ($j = 0; $j < COLUMNAS; $j++) {
  39         if ($sistema) {
  40             $img = new MECON_HTML_Image(
  41                     "/sistemas/intranet/images/$sistema->icono",
  42                     $sistema->nombre,
  43                     array(
  44                         'title'  => $sistema->descripcion,
  45                         'border' => 0,
  46                         'align'  => 'absmiddle',
  47                     )
  48             );
  49                         $link = new MECON_HTML_Link(
  50                                 $sistema->link,
  51                                 $sistema->nombre,
  52                                 array(),
  53                         array(
  54                                     'title'  => $sistema->descripcion,
  55                                     'target' => '_blank',
  56                                 )
  57                     );
  58             $html = $img->toHtml() . $link->toHtml() . '<BR>'
  59                         . $sistema->descripcion;
  60                 if ($sistema->link_ayuda) {
  61                         $link = new MECON_HTML_Link(
  62                                         $sistema->link_ayuda,
  63                                         '(?)',
  64                                         array(),
  65                                         array('target' => '_blank')
  66                                 );
  67                                 $html .= $link->toHtml();
  68                         }
  69             $row[] = $html;
  70             $sistema = @array_shift($sistemas);
  71         } else {
  72             $row[] = '&nbsp;';
  73         }
  74     }
  75     $t->addRow($row, array('width' => $pct));
  76 }
  77
  78 $m = new HTML_DietMarco('sistemas');
  79 $m->addTitle('Sistemas');
  80 $m->addBodyContent($t);
  81 $m->display();
  82
  83 ?>