]> git.llucax.com Git - mecon/intranet.git/blob - sistema/www/sistemas.php
Correccion en los estilos
[mecon/intranet.git] / 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 'MECON/HTML/Arbol/ArbolDB.php';
12 require_once 'HTML/Table.php';
13 require_once 'HTML/Link.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 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 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 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 ?>