<?php 

if (strstr($PATH_INFO, "/")) {
	$p = substr($PATH_INFO, 1);
	$e_path = explode("/", $p);
	$i = 0;
	while ($i < count($e_path)) {
		$name = $e_path[$i];
		$val = $e_path[$i+1];
		$$name = $val;
		$i = $i+2;
	}
}

if (strstr($REQUEST_URI, "/espanol/")) {
	$lang = "es";
	$dir = "espanol";
} 
if (strstr($REQUEST_URI, "/francais/")) {
	$lang = "fr";
	$dir = "francais";
} 
if (strstr($REQUEST_URI, "/english/")) {
	$lang = "en";
	$dir = "english";
} 

// descripcion por idioma

if ($lang == "es") {
	$label_seccion = "DOCUMENTOS CONEXOS";
	$label_titulo = "Publicaciones de FUNREDES";
	$label_descripcion = "Los documentos conexos al documento";
	$label_regresar = "Regresar al documento";
	$label_verconexos = "Ver documentos conexos";
	$label_lista = "LOS DOCUMENTOS";
	$label_editorialnodisponible = "editorial no disponible";
	$label_campo_trads = "Traducciones";
} else if ($lang == "fr") {
	$label_seccion = "DOCUMENTS CONNEXES";
	$label_titulo = "Publications de FUNREDES";
	$label_descripcion = "Les documents connexes au document";
	$label_regresar = "Retour au document";
	$label_verconexos = "Voir les documents connexes";
	$label_lista = "LES DOCUMENTS";
	$label_editorialnodisponible = "editorial non disponible";
	$label_campo_trads = "Traductions";
} else if ($lang == "en") {
	$label_seccion = "RELATED ARTICLES";
	$label_titulo = "FUNREDES' Publications";
	$label_descripcion = "Articles related to the document";
	$label_regresar = "Return to the original article";
	$label_verconexos = "See Related Articles";
	$label_lista = "FULL ARTICLE";
	$label_editorialnodisponible = "publisher not available";
	$label_campo_trads = "Translations";
}

// termina descripcion por idioma

// functions

function showtrads($fieldname, $queryname) {
	GLOBAL $SCRIPT_NAME, $docid, $label_campo_trads;
	if (pg_numrows($queryname) > 0) {
	$fieldrow = 0;
	do {
		$getfield = pg_fetch_row($queryname, $fieldrow);
		if (($fieldrow == 0) || (pg_numrows($queryname) == 0)) {
			if ($docid) {
				echo "<br><b>$label_campo_trads:  </b>";
			}
			echo "<a href=\"".$SCRIPT_NAME."/docid/$getfield[2]\">$getfield[1]</a>";	
		} else {
			echo ", <a href=\"".$SCRIPT_NAME."/docid/$getfield[2]\">$getfield[1]</a>";
		}
		$fieldrow++;
	} while ($fieldrow < pg_numrows($queryname));
	}
}


// end functions


$conn = pg_pconnect("dbname=sif user=mike");

	$querydocinfo = pg_exec($conn, "SELECT p.docid, p.titulo_$lang, tp.tipo_$lang FROM principal p, tipos tp WHERE p.tipo=tp.tipoid AND p.docid=$docid");
	$getdocinfo = pg_fetch_row($querydocinfo, 0);
	$queryregiones = pg_exec($conn, "SELECT r.regionid, rl.region_$lang FROM regionlista rl, regiones r WHERE rl.regionid=r.regionid AND r.docid=$docid");
	$querytemas = pg_exec($conn, "SELECT t.temaid, tl.tema_$lang FROM temalista tl, temas t WHERE tl.temaid=t.temaid AND t.docid=$docid");
	$titulo = "DOCUMENTOS CONEXOS : $getdocinfo[1]";

include("header.php3");

	$short_title = $getdocinfo[1];
	if (strlen($short_title) > 34) {
		$short_title = substr($short_title, 0, 34);
		$short_title = $short_title."...";
	}

	echo "<br><font size=-1 face=\"verdana, arial, helvetica\"><a href=\"/\">FUNREDES</a><b> : </b><a href=\"javascript:history.go(-1)\">$label_seccion</a> <b>: $short_title</b></font><p>";
	echo "<font size=-1 color=black>";
	echo "<blockquote>";
	echo "$label_descripcion:  <br><b><i>$getdocinfo[1]</i></b><p>";
	
	$sorter = "p.titulo_$lang";

	$i = 0;
	while ($i < pg_numrows($queryregiones)) {
		$getregions = pg_fetch_row($queryregiones, $i);
		if (!$regionids) {
			$regionids = "AND (r.regionid=$getregions[0]";
		} else {
			$regionids = $regionids." OR r.regionid=$getregions[0]";
		}
		$i++;
	}
	$regionids = $regionids.")";

	$j = 0;
	while ($f < pg_numrows($querytemas)) {
		$gettemas = pg_fetch_row($querytemas, $f);
		if (!$temaids) {
			$temaids = "AND (t.temaid=$gettemas[0]";
		} else {
			$temaids = $temaids." OR t.temaid=$gettemas[0]";
		}
		$f++;
	}
	$temaids = $temaids.")";

	
	//display all publicaciones

	$tipoid = 1;

do {	
	include("../incluir/filepathandname.inc");
	
	$querytipos = pg_exec($conn, "SELECT * FROM tipos WHERE tipoid>0");
	
	$query = "select p.docid, p.titulo_$lang, p.descripcion_$lang, p.conferencia_$lang, tp.tipo_$lang, p.kb FROM principal p, regiones r, temas t, tipos tp where r.docid=p.docid and t.docid=p.docid and p.tipo=tp.tipoid $regionids $temaids AND p.tipo=$tipoid AND p.docid!=$docid order by $sorter";
	$querytitles = pg_exec($conn, $query);
		
	if (pg_numrows($querytitles) > 0) {
		$gettipo = pg_fetch_row($querytitles, 0);
		$row = 0;
		echo "$gettipo[4]<blockquote>";
		while ($row < pg_numrows($querytitles)) {
			$gettitles = pg_fetch_row($querytitles, $row);
			echo "<p><a href=\"/$dir/$filepathandname[$tipoid]/docid/$gettitles[0]\">";
			if ($tipoid != 3 || $tipoid != 4) {
			echo $gettitles[1];
			} else {
			echo $gettitles[3];
			}
			echo "</a>  $gettitles[5]KB<br>";
			if ($gettitles[2]) {
				echo "<i>$gettitles[2]</i><br>";
			}
			$row++;
		}
		echo "</blockquote>";
	}
	$tipoid++;
} while ($tipoid <= pg_numrows($querytipos));




include("footer.php3");
?>
