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 require_once '../../../local_lib/HTML_Institucional.php';
  34 //}}}
  35 //CREO LOS OBJETOS NECESARIOS {{{
  36 $MARCO     = new HTML_DietMarco('servicios', 'Servicios');
  37 $AGENDA    = new Servicios_Agenda ($DB);
  38 $TABLA     = new HTML_Table('width="760" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF"');
  39 $LUPA      = new MECON_HTML_Image('../../images/servicios_lupa.gif');
  40 $MAIL      = new MECON_HTML_Image('../../images/servicios_mail.gif');
  41 $TELECO    = new MECON_HTML_Image('../../images/servicios_logo_telecomunicaciones.gif');
  42 $INFO      = new MECON_HTML_Image('../../images/servicios_info.gif');
  43 $NOTAS     = new MECON_HTML_Image('../../images/servicios_nota.gif');
  44 $V5        = new MECON_HTML_Image('../../images/servicios_flecha_naranja.gif');
  45
  46 $LINK_1    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', $MAIL);
  47 $LINK_2    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', 'Consultas', array(), array ('class' => 'servicios_agenda_txt2'));
  48 $LINK_3    = new MECON_HTML_Link('agenda1', 'Nueva búsqueda', array(), array ('class' => 'servicios_agenda_txt2'));
  49 $LINK_4    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', 'envíenos su consulta o reclamo', array(), array('class' => 'servicios_agenda_textoazul'));;
  50 $TABLA_INSTITUCIONAL = new HTML_Table('border="0" width="760" align="left"');
  51 $INST = new HTML_Institucional ('/sistemas/intranet/servicios/estatico/institucionales/dto/dto_areas.php',
  52                                         'Institucional de la D. Técnica Operativa',300,550,500);
  53 $TABLA_INSTITUCIONAL->addRow(array($INST), 'align="center"');
  54 //}}}
  55 //OBTENGO LOS DATOS DE LAS BASES {{{
  56     if (@$_POST['interno']) { $AGENDA->setInterno($_POST['interno']); }
  57     if (@$_POST['nombre']) { $AGENDA->setNombre($_POST['nombre']); }
  58     if (@$_POST['codep']) { $AGENDA->setCodep($_POST['codep']); }
  59     if (@$_POST['dependencia']) { $AGENDA->setDependencia($_POST['dependencia']); }
  60     if (@$_POST['edificio'] && $_POST['edificio'] != '-') { $AGENDA->setEdificio($_POST['edificio']); }
  61     if (@$_POST['piso']) { $AGENDA->setPiso($_POST['piso']); }
  62     if (@$_POST['oficina']) { $AGENDA->setOficina($_POST['oficina']); }
  63     if (@$_POST['Ordenado_por']['op1']) { $AGENDA->setOrdenar($_POST['Ordenado_por']['op1']); }
  64
  65     $resultado = $AGENDA->obtenerInfo();
  66 //}}}
  67 //ARMO LA TABLA {{{
  68     $TABLA->addRow(array($LINK_1->toHtml(), $LINK_2->toHtml(),
  69                          $LUPA->toHtml(), $LINK_3->toHtml(),
  70                          $TELECO->toHtml()));
  71
  72     $TABLA->updateColAttributes(0,'width="24"');
  73     $TABLA->updateColAttributes(1,'width="60"');
  74     $TABLA->updateColAttributes(2,'width="24"');
  75     $TABLA->updateColAttributes(3,'width="100"');
  76     $TABLA->updateColAttributes(4,'width="525" class="servicios_agenda_txt_derecha"');
  77
  78     //AGREGO LA INFORMACION {{{
  79     if (is_null($resultado)) {
  80         $TABLA->addRow(array('La búsqueda no produjo aciertos'));
  81         $TABLA->setRowAttributes(1,'colspan="5" align="center" class="servicios_agenda_txt_naranja"');
  82     }
  83     else {
  84         $TABLAN = new MECON_HTML_Tabla ('width="760"', 'claro');
  85         //Agrego el encabezado de la tabla interna
  86         $TABLAN->addRow(array($V5->toHtml().'Resultados de la búsqueda de Internos'), 'cabecera');
  87         $TABLAN->addRow(array('Interno','Usuario','Codep','Dependencia','Edificio','Piso','Oficina'), 'titulo');
  88         foreach ($resultado as $res) {
  89             $TABLAN->addRow($res);
  90         }
  91
  92         //ACOMODO LA TABLA {{{
  93         $TABLAN->updateColAttributes(0,'width="47"  height="25"');
  94         $TABLAN->updateColAttributes(1,'width="117" height="25"');
  95         $TABLAN->updateColAttributes(2,'width="76"  height="25"');
  96         $TABLAN->updateColAttributes(3,'width="263" height="25"');
  97         $TABLAN->updateColAttributes(4,'width="108" height="25"');
  98         $TABLAN->updateColAttributes(5,'width="50"  height="25"');
  99         $TABLAN->updateColAttributes(6,'width="83"  height="25"');
 100         $TABLAN->updateCellAttributes(0,0,'height="25" colspan="7" bgcolor="#FFFFFF"');
 101         //}}}
 102         $MARCO->addStyleSheet($TABLAN->getCss()); //Agrego el estilo de la tabla.
 103         $TABLA->addRow(array($TABLAN),'colspan="5"');
 104     }
 105     //}}}
 106
 107     $TABLA->addRow(array('&nbsp;'), 'colspan="5" align="center"');
 108     $TABLA->addRow(array($INFO->toHtml() , 'Información suministrada por el Área Telecomunicaciones del Ministerio de Economía'));
 109     $TABLA->addRow(array($NOTAS->toHtml(), 'NOTA: Si detecta algún error en los datos, '.$LINK_4->toHtml().'.'));
 110
 111     $TABLA->setCellAttributes(3,1,'colspan="4" class="servicios_agenda_textoazul"');
 112     $TABLA->setCellAttributes(4,1,'colspan="4" class="servicios_agenda_textoazul"');
 113 //}}}
 114 //MUESTRO LA INFO {{{
 115 $MARCO->addStyleSheet(PATH_RAIZ.'css/servicios_agenda.css');
 116 //$MARCO->addTitle('Agenda Telefonica');
 117 $MARCO->addBodyContent($TABLA);
 118 $MARCO->addBodyContent('<br>');
 119 $MARCO->addBodyContent($TABLA_INSTITUCIONAL);
 120 $MARCO->display();
 121 //}}}
 122 ?>