sistema/www/servicios/agenda/agenda2.php

   1 <?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 foldmethod=marker:
   2 -------------------------------------------------------------------------------
   3                              Ministerio de Economía
   4                                     agenda
   5 -------------------------------------------------------------------------------
   6 This file is part of agenda.
   7
   8 agenda is free software; you can redistribute it and/or modify it under
   9 the terms of the GNU General Public License as published by the Free
  10 Software Foundation; either version 2 of the License, or (at your option)
  11 any later version.
  12
  13 agenda is distributed in the hope that it will be useful, but WITHOUT
  14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  15 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License; if not,
  18 write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
  19 Boston, MA  02111-1307  USA
  20 -------------------------------------------------------------------------------
  21 Creado: mié ago 13 13:17:35 ART 2003
  22 Autor:  Martin Marrese <mmarre@mecon.gov.ar>
  23 -------------------------------------------------------------------------------
  24 $Id$
  25 -----------------------------------------------------------------------------*/
  26 //REQUIRE ONCE {{{
  27 require_once 'Servicios/Agenda.php';
  28 require_once 'HTML/Table.php';
  29 require_once 'MECON/HTML/Tabla.php';
  30 require_once 'HTML_DietMarco.php';
  31 require_once 'MECON/HTML/Image.php';
  32 require_once 'MECON/HTML/Link.php';
  33 //}}}
  34 //CREO LOS OBJETOS NECESARIOS {{{
  35 $MARCO     = new HTML_DietMarco('servicios', 'Servicios');
  36 $AGENDA    = new Servicios_Agenda ($DB);
  37 $TABLA     = new HTML_Table('width="760" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF"');
  38 $LUPA      = new MECON_HTML_Image('../../images/servicios_lupa.gif');
  39 $MAIL      = new MECON_HTML_Image('../../images/servicios_mail.gif');
  40 $TELECO    = new MECON_HTML_Image('../../images/servicios_logo_telecomunicaciones.gif');
  41 $INFO      = new MECON_HTML_Image('../../images/servicios_info.gif');
  42 $NOTAS     = new MECON_HTML_Image('../../images/servicios_nota.gif');
  43 $V5        = new MECON_HTML_Image('../../images/servicios_flecha_naranja.gif');
  44
  45 $LINK_1    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', $MAIL);
  46 $LINK_2    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', 'Consultas', array(), array ('class' => 'servicios_agenda_txt2'));
  47 $LINK_3    = new MECON_HTML_Link('agenda1', 'Nueva búsqueda', array(), array ('class' => 'servicios_agenda_txt2'));
  48 $LINK_4    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', 'envíenos su consulta o reclamo', array(), array('class' => 'servicios_agenda_textoazul'));;
  49 //}}}
  50 //OBTENGO LOS DATOS DE LAS BASES {{{
  51     if (@$_POST['interno']) { $AGENDA->setInterno($_POST['interno']); }
  52     if (@$_POST['nombre']) { $AGENDA->setNombre($_POST['nombre']); }
  53     if (@$_POST['codep']) { $AGENDA->setCodep($_POST['codep']); }
  54     if (@$_POST['dependencia']) { $AGENDA->setDependencia($_POST['dependencia']); }
  55     if (@$_POST['edificio'] && $_POST['edificio'] != '-') { $AGENDA->setEdificio($_POST['edificio']); }
  56     if (@$_POST['piso']) { $AGENDA->setPiso($_POST['piso']); }
  57     if (@$_POST['oficina']) { $AGENDA->setOficina($_POST['oficina']); }
  58     if (@$_POST['Ordenado_por']['op1']) { $AGENDA->setOrdenar($_POST['Ordenado_por']['op1']); }
  59
  60     $resultado = $AGENDA->obtenerInfo();
  61 //}}}
  62 //ARMO LA TABLA {{{
  63     $TABLA->addRow(array($LINK_1->toHtml(), $LINK_2->toHtml(),
  64                          $LUPA->toHtml(), $LINK_3->toHtml(),
  65                          $TELECO->toHtml()));
  66
  67     $TABLA->updateColAttributes(0,'width="24"');
  68     $TABLA->updateColAttributes(1,'width="60"');
  69     $TABLA->updateColAttributes(2,'width="24"');
  70     $TABLA->updateColAttributes(3,'width="100"');
  71     $TABLA->updateColAttributes(4,'width="525" class="servicios_agenda_txt_derecha"');
  72
  73     //AGREGO LA INFORMACION {{{
  74     if (is_null($resultado)) {
  75         $TABLA->addRow(array('La búsqueda no produjo aciertos'));
  76         $TABLA->setRowAttributes(1,'colspan="5" align="center" class="servicios_agenda_txt_naranja"');
  77     }
  78     else {
  79         $TABLAN = new MECON_HTML_Tabla ('width="760"', 'claro');
  80         //Agrego el encabezado de la tabla interna
  81         $TABLAN->addRow(array($V5->toHtml().'Resultados de la búsqueda de Internos'), 'cabecera');
  82         $TABLAN->addRow(array('Interno','Usuario','Codep','Dependencia','Edificio','Piso','Oficina'), 'titulo');
  83         foreach ($resultado as $res) {
  84             $TABLAN->addRow($res);
  85         }
  86
  87         //ACOMODO LA TABLA {{{
  88         $TABLAN->updateColAttributes(0,'width="47"  height="25"');
  89         $TABLAN->updateColAttributes(1,'width="117" height="25"');
  90         $TABLAN->updateColAttributes(2,'width="76"  height="25"');
  91         $TABLAN->updateColAttributes(3,'width="263" height="25"');
  92         $TABLAN->updateColAttributes(4,'width="108" height="25"');
  93         $TABLAN->updateColAttributes(5,'width="50"  height="25"');
  94         $TABLAN->updateColAttributes(6,'width="83"  height="25"');
  95         $TABLAN->updateCellAttributes(0,0,'height="25" colspan="7" bgcolor="#FFFFFF"');
  96         //}}}
  97         $MARCO->addStyleSheet($TABLAN->getCss()); //Agrego el estilo de la tabla.
  98         $TABLA->addRow(array($TABLAN),'colspan="5"');
  99     }
 100     //}}}
 101
 102     $TABLA->addRow(array('&nbsp;'), 'colspan="5" align="center"');
 103     $TABLA->addRow(array($INFO->toHtml() , 'Información suministrada por el Área Telecomunicaciones del Ministerio de Economía'));
 104     $TABLA->addRow(array($NOTAS->toHtml(), 'NOTA: Si detecta algún error en los datos, '.$LINK_4->toHtml().'.'));
 105
 106     $TABLA->setCellAttributes(3,1,'colspan="4" class="servicios_agenda_textoazul"');
 107     $TABLA->setCellAttributes(4,1,'colspan="4" class="servicios_agenda_textoazul"');
 108 //}}}
 109 //MUESTRO LA INFO {{{
 110 $MARCO->addStyleSheet(PATH_RAIZ.'css/servicios_agenda.css');
 111 //$MARCO->addTitle('Agenda Telefonica');
 112 $MARCO->addBodyContent($TABLA);
 113 $MARCO->display();
 114 //}}}
 115 ?>