+<?
+require_once 'HTML/Page.php';
+require_once 'MECON/HTML/Image.php';
+require_once 'MECON/HTML/Link.php';
+require_once 'MECON/Dependencia.php';
+require_once 'BandasNovedades/AgenteBanda.php';
+require_once 'MECON/HTML/Tabla.php';
+require_once 'HTML/Table.php';
+
+if(!isset($_SESSION['documento']))
+{
+ die ('El usuario no se encuentra logueado en la Intranet');
+}
+
+//CREO LA CONEXION A LA BASE DE DATOS
+$dbh = DB::connect("mysql://intranet:intranet@bal747f/bandas",true);
+if (DB::isError($dbh)) {
+ die ($DB->getMessage());
+}
+
+$nrodoc = $_SESSION['documento'];
+$fecha = $_GET['fecha'];
+
+//CREO LOS OBJETOS NECESARIOS
+$agente =& new BandasNovedades_AgenteBanda($nrodoc,new date($fecha),$dbh);
+$pagina =& new HTML_Page(array( 'doctype'=>'HTML 4.01 Transitional',
+ 'charset'=>'iso-8859-1'));
+$tabla =& new MECON_HTML_Tabla(array('width'=>'400'),'medio');
+$IMG =& new MECON_HTML_Image('../../images/servicios_flecha_naranja.gif');
+$titulo =& new HTML_Table(array('width'=>'400','border'=>'0','class'=>'titulo'));
+
+$pagina->addStyleSheet($tabla->getCSS());
+
+/* Armo el copete*/
+$row = array($IMG->toHtml().' '.$agente->getNombre());
+$titulo->addRow($row,array('align'=>'left'));
+
+/* Armo la tabla */
+$row = array('Fecha','Hora','Tipo de acceso','Puerta');
+$tabla->addRow($row,array('titulo'=>1));
+
+$fondo = '#FFFFFF';
+$dia = 0;
+$i = 0;
+$tipo_acceso_anterior = 0;
+foreach ($agente->getAccesos() as $a)
+{
+ $i++;
+ ($a['tipo_acceso']=='E')?$tipo_acceso='Entrada':$tipo_acceso='Salida';
+ $row = array($a['fecha'],$a['hora'],$tipo_acceso,$a['descripcion']);
+ $tabla->addRow($row,'comun');
+ if(!($dia == $a['fecha']))
+ {
+ ($fondo=='#CCCCCC')?$fondo='#FFFFFF':$fondo='#CCCCCC';
+ }
+ (($tipo_acceso_anterior != 0) and ($a['tipo_acceso']==$tipo_acceso_anterior))?$tabla->updateRowAttributes($i,array('bgcolor'=>'red')):$tabla->updateRowAttributes($i,array('bgcolor'=>$fondo));
+ $dia = $a['fecha'];
+ $tipo_acceso_anterior = $a['tipo_acceso'];
+}
+
+/* Genero la página */
+$pagina->addBodyContent($tabla);
+
+$pagina->display();
+?>