Enlace no valido / non valid link / lien non valide"; if (is_numeric($docid)){ $enviara = "siferror@funredes.org"; $temamail = "Enlace Malo"; $mensaje = "Problema en la pagina : $HTTP_REFERER \nhay un enlace a : $PHP_SELF"; $extra = "From: Chequeo auto\n"; mail($enviara, $temamail, $mensaje, $extra); // echo $mensaje; } } } if ($docid){ if (is_numeric($docid)){ }else{ $docid = ""; } } if (strstr($REQUEST_URI, "/espanol/")) { $lang = "es"; $dir = "espanol"; $lenguaid = "1"; } if (strstr($REQUEST_URI, "/francais/")) { $lang = "fr"; $dir = "francais"; $lenguaid = "2"; } if (strstr($REQUEST_URI, "/english/")) { $lang = "en"; $dir = "english"; $lenguaid = "3"; } if (strstr($REQUEST_URI, "/texto/")) { $dir = "texto/".$dir; } // descripcion por idioma if ($lang == "es") { $label_mensaje_trad = "

El documento solicitado no esta disponible en español entonces se lo monstramos en su idioma original"; $label_enlace_trad = "Existe también una version de este documento en :
"; $label_seccion = "LA INSTITUCIÓN"; $label_titulo = "Documentos Internos de FUNREDES"; $label_descripcion = "Esta es una lista de los documentos relacionados a la formación de la organización de FUNREDES, desde la conceptualización de la fundación hasta la fecha."; $label_verdocs = "ver todos los documentos por"; $label_sortfecha = "fecha de creación"; $label_sorttitulo = "título"; $label_sortautor = "autor"; $label_sortlengua = "lengua original"; $label_sortpor = "por"; $label_verconexos = "Ver documentos relacionados"; $label_campo_lengua = "Lengua original"; $label_campo_trads = "Traducciones"; $label_campo_autorprinc = "Autores principales"; $label_campo_autoressec = "Autores secundarios"; $label_campo_fechadecreacion = "Fecha de creación"; $label_campo_fechamod = "Fecha de modificación de HTML"; $label_campo_regiones = "Regiones"; $label_campo_temas = "Temas"; $label_campo_proyectos = "Proyectos relacionados"; $label_campo_estatus = "Estatus del proyecto"; $label_campo_lugar = "Lugar"; $label_campo_editorial = "Editorial"; $label_campo_conferencia = "Conferencia"; $label_campo_convenio = "Convenio entre FUNREDES y"; $label_campo_tipo = "Tipo de documento"; $label_campo_adjuntos = "Documentos adjuntos"; } else if ($lang == "fr") { $label_mensaje_trad = "
Le document que vous avez sollicité n'est pas disponible en français, nous vous le proposons donc dans sa langue originale."; $label_enlace_trad = "Il existe également une traduction de ce document en :
"; $label_seccion = "L'INSTITUTION"; $label_titulo = "Documents Internes de FUNREDES"; $label_descripcion = "Ceci est une liste des documents reliés à la formation de l'organisation de de FUNREDES, depuis la conception de l'association jusqu'à aujourd'hui."; $label_verdocs = "voir les documents par"; $label_sortfecha = "date de création"; $label_sorttitulo = "titre"; $label_sortautor = "auteur"; $label_sortlengua = "langue d'origine"; $label_sortpor = "par"; $label_verconexos = "Voir les documents connexes"; $label_campo_lengua = "Langue d'origine"; $label_campo_trads = "Traductions"; $label_campo_autorprinc = "Auteurs principaux"; $label_campo_autoressec = "Auteurs secondaires"; $label_campo_fechadecreacion = "Date de publication"; $label_campo_fechamod = "Date d'actualization du HTML"; $label_campo_regiones = "Régions"; $label_campo_temas = "Sujets"; $label_campo_proyectos = "Projets connexes"; $label_campo_lugar = "Lieu"; $label_campo_editorial = "Maison de publication"; $label_campo_tipo = "Typo de document"; $label_campo_adjuntos = "Documents attachés"; } else if ($lang == "en") { $label_mensaje_trad = "
This document is not available in English so we displayed it in its original form."; $label_enlace_trad = "You can find another traduction of this document in:
"; $label_seccion = "OUR INSTITUTION"; $label_titulo = "Internal Documents of FUNREDES"; $label_descripcion = "Following is a list of documents related to the formation of FUNREDES, from the conception of the foundation to date."; $label_verdocs = "sort documents by"; $label_sortfecha = "date of creation"; $label_sorttitulo = "title"; $label_sortautor = "author"; $label_sortlengua = "original language"; $label_sortpor = "by"; $label_verconexos = "See Related Articles"; $label_campo_lengua = "Original Language"; $label_campo_trads = "Translations"; $label_campo_autorprinc = "Principal Authors"; $label_campo_autoressec = "Secondary Authors"; $label_campo_fechadecreacion = "Date of Creation"; $label_campo_fechamod = "Date of HTML Modification"; $label_campo_regiones = "Regions"; $label_campo_temas = "Subjects"; $label_campo_proyectos = "Related Projects"; $label_campo_lugar = "Place of Publication"; $label_campo_editorial = "Publishing House"; $label_campo_tipo = "Type of Document"; $label_campo_adjuntos = "Attachments"; } if (!$docid) { $titulo = $label_titulo; } // termina descripcion por idioma echo ""; $conn = pg_pconnect("dbname=sif user=mike"); function showmoredata($fieldname, $numero) { GLOBAL $getdocinfo; if (strlen($getdocinfo[$numero]) > 0) { echo "
$fieldname: $getdocinfo[$numero]"; } } function showcontenido($queryname) { $rowcount = pg_numrows($queryname); if ($rowcount > 0) { $rownumber = 0; echo "
"; 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 $SCRIPT_NAME, $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) { if (pg_numrows($queryname) != 0) { 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 ($docid) { $querydocinfo = pg_exec($conn, "SELECT p.docid, p.titulo_$lang, l.lengua, p.descripcion_$lang, p.fechadecreacion, p.fechamod, p.lugar_$lang, p.editorial_$lang, p.conferencia_$lang, p.conveniocon, e.estatus_$lang, p.especial, t.tipo_$lang, p.kb, p.lengua 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_$lang, r.regionid FROM regiones r, regionlista rl WHERE r.regionid=rl.regionid AND r.docid='$docid'"); $querytemas = pg_exec($conn, "SELECT t.docid, tl.tema_$lang, t.temaid 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'"); $queryadjuntos = pg_exec($conn, "SELECT * FROM adjuntos WHERE docid='$docid'"); $getdocinfo = pg_fetch_row($querydocinfo, 0); include("../header.php3"); // si la pagina no esta en el idioma selectado : $lenguacont = $lenguaid; $querycontlang = pg_exec($conn, "SELECT lenguaid FROM contenido WHERE docid='$docid' AND lenguaid='$lenguacont'"); if (pg_numrows($querycontlang) == 0) { $mensaje_trad = $label_mensaje_trad; $querynblang = pg_exec($conn, "SELECT lenguaid FROM lenguas"); $y = $z = 0; for ($x=1; $x<(pg_numrows($querynblang))+1; $x++) { $querycontlang2 = pg_exec($conn, "SELECT lenguaid FROM contenido WHERE docid='$docid' AND lenguaid='$x'"); if (pg_numrows($querycontlang2) != 0) { if ($x==$getdocinfo[14]){ $lenguacont = $x; $y = 1; } else{ $l = $l + $ltemp; $ltemp = "$ltemp"."X"."$x"; $z = $x; } } } if ($y==1){ $l = $ltemp; } else{ $lenguacont = $z; if ($z==0){ $mensaje_trad = ""; } } if ($l){ $enlace_trad = $label_enlace_trad; $ltab = explode("X", $l); $lcnt = count($ltab); for ($i=1; $i$getenlace[1] "; break; case 2 : $enlace_trad = $enlace_trad."$getenlace[1] "; break; case 3 : $enlace_trad = $enlace_trad."$getenlace[1] "; break; default : $enlace_trad = $enlace_trad."$getenlace[1] "; break; } } $enlace_trad = $enlace_trad."
"; } } $querycontenido = pg_exec($conn, "SELECT * FROM contenido WHERE docid='$docid' AND lenguaid='$lenguacont' ORDER BY chunkid"); 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]; echo "
FUNREDES : $label_seccion : $label_titulo
"; echo "
$getdocinfo[1]"; echo ""; echo "
"; echo "$label_campo_autorprinc: $autores"; if (pg_numrows($queryautoressec) > 0) { echo "
$label_campo_autoressec: $autoressec"; } echo "
$label_campo_fechadecreacion: $fechadecreacion"; echo "
$label_campo_fechamod: $fechamod"; echo "
$label_campo_lengua: $getdocinfo[2]"; showtrads($label_campo_trads, $querytraducciones); showdata($label_campo_regiones, $queryregiones); showdata($label_campo_temas, $querytemas); showdata($label_campo_proyectos, $queryproyectos); showmoredata($label_campo_estatus, "10"); showmoredata($label_campo_lugar, "6"); showmoredata($label_campo_editorial, "7"); showmoredata($label_campo_conferencia, "8"); showmoredata($label_campo_convenio, "9"); showmoredata($label_campo_tipo, "12"); echo "
$label_verconexos
"; if (pg_numrows($queryadjuntos) > 0) { echo "
$label_campo_adjuntos:
"; showadjuntos($queryadjuntos); } if ($mensaje_trad && $enlace_trad){ echo "
$mensaje_trad"; echo "
$enlace_trad
"; } if ($mensaje_trad && !$enlace_trad){ echo "
$mensaje_trad
"; } showcontenido($querycontenido); } // empieza informacion basica $tipoid = 2; if (!$sort || $sort == "titulo") { $query = "SELECT p.docid, p.titulo_$lang, l.lengua, p.descripcion_$lang, 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_$lang"; $label_sorter = $label_sorttitulo; } if ($sort == "fecha") { $query = "SELECT p.docid, p.titulo_$lang, l.lengua, p.descripcion_$lang, 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_$lang"; $label_sorter = $label_sortfecha; } if ($sort == "autor") { $query = "SELECT p.docid, p.titulo_$lang, l.lengua, p.descripcion_$lang, 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_$lang"; $label_sorter = $label_sortautor; } if ($sort == "lengua") { $query = "SELECT p.docid, p.titulo_$lang, l.lengua, p.descripcion_$lang, 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"; $label_sorter = $label_sortlengua; } if (!$docid) { include("../header.php3"); echo ""; echo "
FUNREDES : $label_seccion : $label_titulo : $label_sortpor $label_sorter
"; echo "$label_verdocs: $label_sortfecha | $label_sorttitulo | $label_sortlengua | $label_sortautor
"; echo "
"; echo "
$label_descripcion
"; //display all titles $querytitles = pg_exec($conn, $query); $row = 0; include("displaydocumentosinternos.inc"); } include("../footer.php3"); ?>