2 // vim: set binary expandtab ts=4 shiftwidth=4 textwidth=80:
4 require_once '../local_lib/HTML_DietMarco.php';
5 if(!isset($_SESSION['usuario']))
7 header('location: login?redirect=sistemas');
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';
18 define('COLUMNAS', 3);
31 $db = IntranetDB::connect();
32 $sistemas = AI_Sistema::getSistemas($db);
34 $pct = intval(100/COLUMNAS) . '%';
35 $sistema = @array_shift($sistemas);
38 for ($j = 0; $j < COLUMNAS; $j++) {
40 $img = new HTML_Image(
41 "/sistemas/intranet/images/$sistema->icono",
44 'title' => $sistema->descripcion,
46 'align' => 'absmiddle',
49 $link = new HTML_Link(
54 'title' => $sistema->descripcion,
58 $html = $img->toHtml() . $link->toHtml() . '<BR>'
59 . $sistema->descripcion;
60 if ($sistema->link_ayuda) {
61 $link = new HTML_Link(
65 array('target' => '_blank')
67 $html .= $link->toHtml();
70 $sistema = @array_shift($sistemas);
75 $t->addRow($row, array('width' => $pct));
78 $m = new HTML_DietMarco('sistemas');
79 $m->addTitle('Sistemas');
80 $m->addBodyContent($t);