]> git.llucax.com Git - mecon/intranet.git/blob - sistema/www/sistemas.php
0bebcda6a37aeb3d4b705ddb0678879aecda7ca1
[mecon/intranet.git] / sistema / www / sistemas.php
1 <?php
2
3 // $Id$
4
5 require_once '../local_lib/HTML_DietMarco.php';
6 require_once '../local_lib/intranetdb.php';
7 require_once 'MECON/HTML/Arbol/ArbolDB.php';
8 require_once 'HTML/Table.php';
9 #require_once 'AI/DB.php';
10 require_once 'DB.php';
11 require_once 'AI/Sistema.php';
12
13 define('COLUMNAS', 3);
14
15 $t = new HTML_Table(
16     array(
17         'width'         => '100%',
18         'cellspacing'   => '0',
19         'cellpadding'   => '0',
20         'border'        => '0',
21         'align'         => 'left',
22         'valign'        => 'middle',
23     )
24 );
25
26 $db = IntranetDB::connect();
27 $sistemas = AI_Sistema::getSistemas($db);
28
29 $pct = intval(100/COLUMNAS) . '%';
30 $sistema = @array_shift($sistemas);
31 while ($sistema) {
32     $row = array();
33     for ($j = 0; $j < COLUMNAS; $j++) {
34         if ($sistema) {
35             $img = new HTML_Image(
36                     "/sistemas/intranet/images/$sistema->icono",
37                     $sistema->nombre,
38                     array(
39                         'title'  => $sistema->descripcion,
40                         'border' => 0,
41                         'align'  => 'absmiddle',
42                     )
43             );
44             $row[] = $img->toHtml().' <A href="'.$sistema->link.'" title="'
45                 . $sistema->descripcion.'" target="_blank">'.$sistema->nombre
46                 . '</A><BR>' . $sistema->descripcion
47                 . ($sistema->link_ayuda
48                     ? (' <A href="'.$sistema->link_ayuda.'" target="_blank" alt="Ayuda">(?)</A>')
49                     : '');
50             $sistema = @array_shift($sistemas);
51         } else {
52             $row[] = '&nbsp;';
53         }
54     }
55     $t->addRow($row, array('width' => $pct));
56 }
57
58 $m = new HTML_DietMarco('sistemas');
59 $m->addTitle('Sistemas');
60 $m->addBodyContent($t);
61 $m->display();
62     
63 ?>