]> git.llucax.com Git - mecon/intranet.git/blob - sistema/www/servicios/bandas/nov_dia.php
- Modificacion en la documentacion de instalacion de los permisos de las BD de los...
[mecon/intranet.git] / sistema / www / servicios / bandas / nov_dia.php
1 <?
2 require_once 'HTML/Page.php';
3 require_once 'MECON/HTML/Image.php';
4 require_once 'MECON/HTML/Link.php';
5 require_once 'MECON/Dependencia.php';
6 require_once 'MECON/NovedadesDia.php';
7 require_once 'BandasNovedades/AgenteBanda.php';
8 require_once 'MECON/HTML/Tabla.php';
9
10 if(!isset($_SESSION['documento'])) {
11     header('Location: ../../login?redirect='.urlencode($_SERVER['REQUEST_URI']));
12     exit;
13 }
14
15 $nrodoc = $_SESSION['documento'];
16 $fecha = $_GET['fecha'];
17
18 $novedad =& new MECON_NovedadesDia($nrodoc,new date($fecha));
19 $agente =& new BandasNovedades_AgenteBanda($nrodoc,new date($fecha),$DB);
20 $IMG =& new MECON_HTML_Image('../../images/servicios_flecha_naranja.gif');
21 $tabla =& new MECON_HTML_Tabla(array('width'=>'200'),'medio');
22
23 /* Armo la tabla */
24 $row = array($IMG->toHtml().' Detalle de la novedad');
25 $tabla->addRow($row,array('cabecera'=>1));
26
27 $k = 0;
28 $pos = 0;
29 foreach ($novedad->novedades as $nov)
30 {
31         ($nov->codigo!='15b')?$pos=$k:0;
32         $k++;
33 }
34
35 $row = array($novedad->novedades[$pos]->descripcion);
36 $tabla->addRow($row,array('titulo'=>1));
37 $row = array($fecha);
38 $tabla->addRow($row,'comun');
39
40 /* Genero la página */
41 $pagina =& new HTML_Page(array( 'doctype'=>'HTML 4.01 Transitional',
42                                                                 'charset'=>'iso-8859-1'));
43 $pagina->addStyleSheet($tabla->getCSS());
44 $pagina->setTitle('Intranet');
45 $pagina->addBodyContent($tabla);
46
47 $pagina->display();
48 ?>