

<?php

$conn=pg_pconnect("dbname=emecmistica user=postgres"); 

//stats1
include "foo.php3";
include "tete.php3";
$queryview = pg_exec($conn,"select apellido_miembro, nombre_miembro, institucion, id_pais, sexo, id_campo, edad, e_mail_miembro, URL_pagina_institucion, communidad.id_miembro from communidad where communidad.id_miembro>'2' order by apellido_miembro");
?>
<H1>Datos de los soci@s de la Communidad Virtual</H1><br>
<table>
<tr><strong><td>ID</td><td>APELLIDO</td><td>NOMBRE</td><td>INSTITUCION</td><td>PAIS</td><td>SEXO</td><td>CAMPO DE ACTIVIDAD</td><td>FECHA DE NACIMIENTO</td><td>DIRECCION ELECTRONICA</td><td>URL DE LA PAGINA DE LA INSTITUCION</td><td>FECHA DE SUSCRIPCION</td><td>FECHA DE UNSUSCRIPCION</td></strong><tr>
<?
for($n=0;$n<pg_numrows($queryview); $n++) {  	
$get = pg_fetch_row($queryview,$n);
$get[0]=stripslashes($get[0]);
$prek="$get[0] $get[1]";
$k=foo($prek);
$k=strtolower($k);
$get[0]=ucwords($get[0]);
$get[1]=stripslashes($get[1]);
$autortab=explode ("-", $get[0]);
for ($erx=0; $erx<count($autortab); $erx++) {
$autortab[$erx]=ucwords($autortab[$erx]);
}
$get[0]=implode ("-", $autortab);
$get[2]=stripslashes($get[2]);
$get[7]=stripslashes($get[7]);
$get[8]=stripslashes($get[8]);

$longpa=strlen($get[3]);
if ($longpa !=0) {
$q2=pg_exec($conn, "select pais_es from pais where id_pais='$get[3]'");
$zpais=pg_fetch_row($q2, 0);
$pais=$zpais[0];
$pais=stripslashes($pais);
$pais=ucwords($pais);
}
$longca=strlen($get[5]);
if ($longca !=0) {
$q3=pg_exec($conn, "select campo_es from campo where id_campo='$get[5]'");
$zcas=pg_fetch_row($q3, 0);
$campo=$zcas[0];
$campo=stripslashes($campo);
}
$queryunsus=pg_exec($conn, "select communidad.id_miembro from communidad where id_miembro='$get[9]' and id_miembro in (select id_miembro from members)");

if (pg_numrows($queryunsus)!=0) {
$fechunsus=" ";
$susunsus=pg_exec($conn, "select min(fecha_suscripcion) from suscripcion where suscripcion.id_miembro='$get[9]'");
$getsus=pg_fetch_row($susunsus, 0);
$fechsus=$getsus[0];

}
else {
$susunsus=pg_exec($conn, "select min(fecha_suscripcion), max(fecha_unsuscripcion) from suscripcion where suscripcion.id_miembro='$get[9]'");
$getsus=pg_fetch_row($susunsus, 0);
$fechunsus=$getsus[1];
$fechsus=$getsus[0];
}

$arrcom[$k]=array("u1"=>"$get[9]", "u2"=>"$get[0]", "u3"=>"$get[1]", "u4"=>"$get[2]", "u5"=>"$pais", "u6"=>"$get[4]", "u7"=>"$campo", "u8"=>"$get[6]", "u9"=>"$get[7]", "u10"=>"$get[8]", "u11"=>"$fechsus", "u12"=>"$fechunsus");
}
ksort($arrcom);

for (reset($arrcom); $key=key($arrcom); next($arrcom)) {
$e1=$arrcom[$key]["u1"];
$e2=$arrcom[$key]["u2"];
$e3=$arrcom[$key]["u3"];
$e4=$arrcom[$key]["u4"];
$e5=$arrcom[$key]["u5"];
$e6=$arrcom[$key]["u6"];
$e7=$arrcom[$key]["u7"];
$e8=$arrcom[$key]["u8"];
$e9=$arrcom[$key]["u9"];
$e10=$arrcom[$key]["u10"];
$e11=$arrcom[$key]["u11"];
$e12=$arrcom[$key]["u12"];

echo "<tr><td>$e1</td><td>$e2</td> <td>$e3</td><td>$e4</td><td>$e5</td><td>$e6</td><td>$e7</td><td>$e8</td> <td>$e9</td> <td>$e10</td><td>$e11</td><td> $e12</td></tr>";
}
?>
</table>  


