-<body bgcolor="#FFFFFF" class="subtitulo" link="#003366" vlink="#660066" alink="#0066FF" topmargin="0">
-<?
- require_once '../local_lib/copete.php';
- $c = new Copete('sistemas');
- echo $c->toHTML();
-
- require_once '../local_lib/intranetdb.php';
- require_once 'MECON/HTML/Arbol/ArbolDB.php';
- $db = IntranetDB::connect();
- $dbdata = array(
- 'db' => $db,
- 'tabla' => 'sistema',
- 'id' => 'sistema',
- 'nombre' => 'sistema',
- 'link' => 'link');
- $arbol = new HTML_ArbolDB($dbdata, '/MECON/images/arbol_noticias.gif');
- echo $arbol->toHTML();
+<?php
+// vim: set binary expandtab ts=4 shiftwidth=4 textwidth=80:
+// $Id$
+
+require_once '../local_lib/HTML_DietMarco.php';
+require_once '../local_lib/intranetdb.php';
+require_once 'MECON/HTML/Arbol/ArbolDB.php';
+require_once 'HTML/Table.php';
+require_once 'HTML/Link.php';
+#require_once 'AI/DB.php';
+require_once 'DB.php';
+require_once 'AI/Sistema.php';
+
+define('COLUMNAS', 3);
+
+$t = new HTML_Table(
+ array(
+ 'width' => '100%',
+ 'cellspacing' => '0',
+ 'cellpadding' => '0',
+ 'border' => '0',
+ 'align' => 'left',
+ 'valign' => 'middle',
+ )
+);
+
+$db = IntranetDB::connect();
+$sistemas = AI_Sistema::getSistemas($db);
+
+$pct = intval(100/COLUMNAS) . '%';
+$sistema = @array_shift($sistemas);
+while ($sistema) {
+ $row = array();
+ for ($j = 0; $j < COLUMNAS; $j++) {
+ if ($sistema) {
+ $img = new HTML_Image(
+ "/sistemas/intranet/images/$sistema->icono",
+ $sistema->nombre,
+ array(
+ 'title' => $sistema->descripcion,
+ 'border' => 0,
+ 'align' => 'absmiddle',
+ )
+ );
+ $link = new HTML_Link(
+ $sistema->link,
+ $sistema->nombre,
+ array(),
+ array(
+ 'title' => $sistema->descripcion,
+ 'target' => '_blank',
+ )
+ );
+ $html = $img->toHtml() . $link->toHtml() . '<BR>'
+ . $sistema->descripcion;
+ if ($sistema->link_ayuda) {
+ $link = new HTML_Link(
+ $sistema->link_ayuda,
+ '(?)',
+ array(),
+ array('target' => '_blank')
+ );
+ $html .= $link->toHtml();
+ }
+ $row[] = $html;
+ $sistema = @array_shift($sistemas);
+ } else {
+ $row[] = ' ';
+ }
+ }
+ $t->addRow($row, array('width' => $pct));
+}
+
+$m = new HTML_DietMarco('sistemas');
+$m->addTitle('Sistemas');
+$m->addBodyContent($t);
+$m->display();
+
?>
-</body>