";
do {
$getcontenido = pg_fetch_row($queryname, $rownumber);
echo $getcontenido[2];
$rownumber++;
} while ($rownumber < $rowcount);
echo "";
}
}
function showadjuntos($queryname) {
$rowcount = pg_numrows($queryname);
if ($rowcount > 0) {
$rownumber = 0;
do {
$getadjuntos = pg_fetch_row($queryname, $rownumber);
echo "$getadjuntos[1] ($getadjuntos[2] kb)
";
$rownumber++;
} while ($rownumber < $rowcount);
echo "";
}
}
function showtrads($fieldname, $queryname) {
GLOBAL $PHP_SELF, $docid;
if (pg_numrows($queryname) > 0) {
$fieldrow = 0;
do {
$getfield = pg_fetch_row($queryname, $fieldrow);
if (($fieldrow == 0) || (pg_numrows($queryname) == 0)) {
if ($docid) {
echo "
Traducciones: ";
}
echo "$getfield[1]";
} else {
echo ", $getfield[1]";
}
$fieldrow++;
} while ($fieldrow < pg_numrows($queryname));
}
}
function showdata($fieldname, $queryname) {
if (pg_numrows($queryname) > 0) {
$fieldrow = 0;
do {
$getfield = pg_fetch_row($queryname, $fieldrow);
if (($fieldrow == 0) || (pg_numrows($queryname) == 0)) {
echo "
$fieldname: $getfield[1]";
$$fieldname = $getfield[1];
} else {
echo ", $getfield[1]";
$$fieldname = $$fieldname.$getfield[1];
}
$fieldrow++;
} while ($fieldrow < pg_numrows($queryname));
}
}
function showspecial($fieldname, $queryname) {
GLOBAL $$fieldname;
$fieldrow = 0;
do {
$getfield = pg_fetch_row($queryname, $fieldrow);
if (($fieldrow == 0) || (pg_numrows($queryname) == 0)) {
$$fieldname = $getfield[1];
} else {
$$fieldname = $$fieldname.", ".$getfield[1];
}
$fieldrow++;
} while ($fieldrow < pg_numrows($queryname));
}
if ($sort) {
if ($sort == "fecha") {
$sort = "p.fechadecreacion DESC";
}
if ($sort == "autor") {
$sort = "a.autorid";
}
if ($sort == "titulo") {
$sort = "p.titulo";
}
if ($sort == "lengua") {
$sort = "l.lenguaid";
}
}
if ($sort && $titulo == "all") {
$sort = "p.titulo";
}
if (!$sort) {
$sort = "p.fechadecreacion DESC";
}
if ($docid) {
$querydocinfo = pg_exec($conn, "SELECT p.docid, p.titulo, l.lengua, p.descripcion, p.fechadecreacion, p.fechamod, p.lugar, p.editorial, p.conferencia, p.conveniocon, e.estatus_es, p.especial, t.tipo_es, p.kb FROM principal p, lenguas l, estatuses e, tipos t WHERE p.lengua=l.lenguaid AND t.tipoid=p.tipo AND e.estatusid=p.estatus AND p.docid='$docid'");
$queryregiones = pg_exec($conn, "SELECT r.docid, rl.region_es FROM regiones r, regionlista rl WHERE r.regionid=rl.regionid AND r.docid='$docid'");
$querytemas = pg_exec($conn, "SELECT t.docid, tl.tema_es FROM temas t, temalista tl WHERE t.temaid=tl.temaid AND t.docid='$docid'");
$queryautores = pg_exec($conn, "SELECT a.docid, al.autor FROM autores a, autorlista al WHERE a.docid='$docid' AND a.autorid=al.autorid");
$queryautoressec = pg_exec($conn, "SELECT ac.docid, al.autor FROM autoressecundarios ac, autorlista al WHERE ac.docid='$docid' AND ac.autorid=al.autorid");
$queryproyectos = pg_exec($conn, "SELECT p.docid, pl.proyecto FROM proyectos p, proyectolista pl WHERE p.proyectoid=pl.proyectoid AND p.docid='$docid'");
$querytraducciones = pg_exec($conn, "SELECT t.docid, l.lengua, t.traduccionid FROM traducciones t, lenguas l, principal p WHERE t.traduccionid=p.docid AND l.lenguaid=p.lengua AND t.docid='$docid'");
$querycontenido = pg_exec($conn, "SELECT * FROM contenido WHERE docid='$docid' ORDER BY chunkid");
$queryadjuntos = pg_exec($conn, "SELECT * FROM adjuntos WHERE docid='$docid'");
$getdocinfo = pg_fetch_row($querydocinfo, 0);
showspecial("autores", $queryautores);
if (pg_numrows($queryautoressec) > 0) {
showspecial("autoressec", $queryautoressec);
}
showspecial("regiones", $queryregiones);
showspecial("temas", $querytemas);
$descripcion = $getdocinfo[3];
$titulo = $getdocinfo[1];
$fechadecreacion = $getdocinfo[4];
$fechamod = $getdocinfo[5];
$tamano = $getdocinfo[13];
include("header.php3");
echo "
FUNREDES : REFERENCIAS DE DOCUMENTOS : $getdocinfo[12]
"; echo "
"; echo "Autor principal: $autores"; if (pg_numrows($queryautoressec) > 0) { echo "
Autores secundarios: $autoressec"; } echo "
Fecha de creación: $fechadecreacion"; echo "
Fecha de modificación de HTML: $fechamod"; echo "
Lengua original: $getdocinfo[2]"; showtrads("Traducciones", $querytraducciones); showdata("Regiones", $queryregiones); showdata("Temas", $querytemas); showdata("Proyectos relacionados", $queryproyectos); showmoredata("Estatus del proyecto", "10"); showmoredata("Lugar", "6"); showmoredata("Editorial", "7"); showmoredata("Conferencia", "8"); showmoredata("Convenio entre Funredes y", "9"); showmoredata("Tipo de documento", "12"); if (pg_numrows($queryadjuntos) > 0) { echo "Documentos adjuntos:
"; showadjuntos($queryadjuntos); } showcontenido($querycontenido); } if ($titulo == "all") { include("header.php3"); $tipoid = 1; echo ""; echo " "; //display all titles $querytitles = pg_exec($conn, "SELECT p.docid, p.titulo, l.lengua, p.descripcion, al.autor, p.especial, p.fechadecreacion, p.kb FROM principal p, lenguas l, autorlista al, autores a WHERE al.autorid=a.autorid AND a.docid=p.docid AND l.lenguaid=p.lengua AND tipo='$tipoid' ORDER BY p.titulo"); $row = 0; include("../incluir/espanoldisplaydata.inc"); } if ($fecha == "all") { include("header.php3"); $tipoid = 1; echo "
FUNREDES : REFERENCIAS DE DOCUMENTOS : alfabético por título
"; echo "ver documentos por: fecha de creación | título | lengua original | autor"; echo "
"; echo " "; //display all titles $querytitles = pg_exec($conn, "SELECT p.docid, p.titulo, l.lengua, p.descripcion, al.autor, p.especial, p.fechadecreacion, p.kb FROM principal p, lenguas l, autorlista al, autores a WHERE al.autorid=a.autorid AND a.docid=p.docid AND l.lenguaid=p.lengua AND tipo='$tipoid' ORDER BY p.fechadecreacion DESC, p.docid, p.titulo"); $row = 0; include("../incluir/espanoldisplaydata.inc"); } if ($lengua == "all") { include("header.php3"); $tipoid = 1; echo "
FUNREDES : REFERENCIAS DE DOCUMENTOS : por fecha de creación
"; echo "ver todos los documentos por: fecha de creación | título | lengua original | autor"; echo "
"; echo " "; //display all titles $querytitles = pg_exec($conn, "SELECT p.docid, p.titulo, l.lengua, p.descripcion, al.autor, p.especial, p.fechadecreacion, p.kb FROM principal p, lenguas l, autorlista al, autores a WHERE al.autorid=a.autorid AND a.docid=p.docid AND p.lengua=l.lenguaid AND tipo='$tipoid' ORDER BY p.lengua, p.fechadecreacion DESC, p.docid"); $row = 0; include("../incluir/espanoldisplaydata.inc"); } if ($autor == "all") { include("header.php3"); $tipoid = 1; echo "
FUNREDES : REFERENCIAS DE DOCUMENTOS : por lengua original
"; echo "ver todos los documentos por: fecha de creación | título | lengua original | autor"; echo "
"; echo " "; //display all titles $querytitles = pg_exec($conn, "SELECT p.docid, p.titulo, l.lengua, p.descripcion, al.autor, p.especial, p.fechadecreacion, p.kb FROM principal p, lenguas l, autorlista al, autores a WHERE al.autorid=a.autorid AND a.docid=p.docid AND l.lenguaid=p.lengua AND tipo='$tipoid' ORDER BY a.autorid, p.fechadecreacion DESC, p.titulo"); $row = 0; include("../incluir/espanoldisplaydata.inc"); } if ($regionid) { include("header.php3"); $tipoid = 1; $regionquery = pg_exec($conn, "SELECT region_es FROM regionlista WHERE regionid='$regionid'"); $getregiones = pg_fetch_row($regionquery, 0); $querytitles = pg_exec($conn, "SELECT p.docid, p.titulo, l.lengua, p.descripcion, al.autor, p.especial, p.fechadecreacion, p.kb FROM principal p, lenguas l, autorlista al, autores a, regionlista rl, regiones r WHERE al.autorid=a.autorid AND a.docid=p.docid AND l.lenguaid=p.lengua AND tipo='$tipoid' AND rl.regionid='$regionid' AND rl.regionid=r.regionid AND r.docid=p.docid ORDER BY $sort"); $totalrows = pg_numrows($querytitles); $row = 0; if ($totalrows > 0) { echo "
FUNREDES : REFERENCIAS DE DOCUMENTOS : por autor
"; echo "ver todos los documentos por: fecha de creación | título | lengua original | autor"; echo "
"; echo " "; include("../incluir/espanoldisplaydata.inc"); } else { echo "Actualmente no hay documentos de FUNREDES relevantes a la region de $getregiones[0]
FUNREDES : REFERENCIAS DE DOCUMENTOS : $getregiones[0]
"; echo "ver documentos por: fecha de creación | título | lengua original | autor"; echo "
"; } } if ($temaid) { include("header.php3"); $tipoid = 1; $temaquery = pg_exec($conn, "SELECT tema_es FROM temalista WHERE temaid='$temaid'"); $gettemas = pg_fetch_row($temaquery, 0); $querytitles = pg_exec($conn, "SELECT p.docid, p.titulo, l.lengua, p.descripcion, al.autor, p.especial, p.fechadecreacion, p.kb FROM principal p, lenguas l, autorlista al, autores a, temalista tl, temas t WHERE al.autorid=a.autorid AND a.docid=p.docid AND l.lenguaid=p.lengua AND tipo='$tipoid' AND tl.temaid='$temaid' AND tl.temaid=t.temaid AND t.docid=p.docid ORDER BY $sort"); $totalrows = pg_numrows($querytitles); $row = 0; if ($totalrows > 0) { echo ""; echo " "; include("../incluir/espanoldisplaydata.inc"); } else { echo "Actualmente no hay documentos de FUNREDES relevantes al tema de $gettemas[0]
FUNREDES : REFERENCIAS DE DOCUMENTOS : $gettemas[0]
"; echo "ver documentos por: fecha de creación | título | lengua original | autor"; echo "
"; } } if ($noenlinea == "all") { include("header.php3"); $tipoid = 7; $tipoquery = pg_exec($conn, "SELECT tipo_$lang FROM tipos WHERE tipoid='$tipoid'"); $gettipo = pg_fetch_row($tipoquery, 0); $querytitles = pg_exec($conn, "SELECT p.docid, p.titulo, l.lengua, p.descripcion, al.autor, p.especial, p.fechadecreacion, p.kb, p.tipo FROM principal p, lenguas l, autorlista al, autores a WHERE al.autorid=a.autorid AND a.docid=p.docid AND l.lenguaid=p.lengua AND tipo='$tipoid' ORDER BY $sort"); $totalrows = pg_numrows($querytitles); $row = 0; if ($totalrows > 0) { echo ""; echo " "; include("../incluir/espanoldisplaydata.inc"); } else { echo "Actualmente no hay documentos de FUNREDES relevantes al tema de $gettemas[0]
FUNREDES : REFERENCIAS DE DOCUMENTOS : $gettipo[0]
"; echo "ver documentos por: fecha de creación | título | lengua original | autor"; echo "
"; } } if (!$docid && ($titulo != "all") && !$temaid && !$regionid && ($fecha != "all") && ($autor != "all") && ($lengua != "all") && ($noenlinea != "all")) { $queryregiones = pg_exec($conn, "SELECT * FROM regionlista ORDER BY regionid"); $regionrow = 0; $querytemas = pg_exec($conn, "SELECT * FROM temalista ORDER BY temaid"); $temarow = 0; $titulo = "Documentos de referencia"; include("header.php3"); ?>
Documentos de referencia:
la biblioteca de nuestras investigacionesFunredes pone a su disposición todos sus documentos de referencia, incluyendo sus documentos internos, publicaciones, conferencias (co)organizadas, conferencias con participación, proyectos y convenios.
Se puede ver la lista de estos documentos por
Región: $getregiones[1]
"; $regionrow++; } while ($regionrow < pg_numrows($queryregiones)); ?>Tema: $gettemas[1]
"; $temarow++; } while ($temarow < pg_numrows($querytemas)); ?>Otro: título (orden alfabeético)
fecha de creación
lengua original
autor
Ver una lista de las publicaciones e investigaciones que NO están en-línea