]> git.llucax.com Git - mecon/intranet.git/blob - sistema/www/noticias.php
Se corrige un bug.
[mecon/intranet.git] / sistema / www / noticias.php
1 <?
2   require_once '../local_lib/HTML_DietMarco.php';
3   require_once '../local_lib/intranetdb.php';
4   require_once 'MECON/HTML/ArbolDB.php';
5   require_once '../local_lib/HTML_Titulares.php';
6
7   $m = new HTML_DietMarco('noticias');
8   $m->addTitle('Noticias');
9   
10   $noticias = new HTML_Table(array('width' => '760', 'border' => '0'));
11   if(isset($_GET['grupo']))
12   {
13       $grupo = $_GET['grupo'];
14       $dias = null;
15   }
16   else
17   {
18       $grupo = null;
19       $dias = 7;
20   }
21   //Esto va a cambiar...
22   $db = IntranetDB::connect();
23   $dbdata = array(
24                 'db' => $db,
25                 'tabla' => 'grupo_secciones',
26                 'id' => 'grupo',
27                 'id_activo' => $grupo,
28                 'nombre' => 'nombre',
29                 'id_padre' => 'grupo_padre',
30                 'prepend_link' => 'noticias.php?grupo=');
31   $arbol = new MECON_HTML_ArbolDB($dbdata, 'NOTICIAS');
32
33   $titulares = new HTML_Titulares($grupo, $dias);
34   $noticias->addRow(array($arbol,$titulares));
35   $m->addStyleSheet($arbol->getCSS());
36   $m->addStyleSheet($titulares->getCSS());
37   $noticias->updateCellAttributes(0, 0, array('valign'=>'top', 'width'=>'160'));
38   $noticias->updateCellAttributes(0, 1, array('valign'=>'top', 'width'=>'600'));
39
40   $m->addBodyContent($noticias);
41   $m->display();
42 ?>