Subversion Repositories eFlore/Archives.chorologie

Compare Revisions

Ignore whitespace Rev 33 → Rev 34

/trunk/configuration/echoro_config.inc.php
21,7 → 21,7
// | along with Foobar; if not, write to the Free Software |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: echoro_config.inc.php,v 1.6 2005-05-19 07:37:47 jpm Exp $
// CVS : $Id: echoro_config.inc.php,v 1.7 2006-05-31 14:43:35 jp_milcent Exp $
/**
* Fichier de configuration de la chorologie d'eFlore.
*
34,7 → 34,7
//Autres auteurs :
*@author Aucun
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.6 $ $Date: 2005-05-19 07:37:47 $
*@version $Revision: 1.7 $ $Date: 2006-05-31 14:43:35 $
// +------------------------------------------------------------------------------------------------------+
*/
 
58,6 → 58,8
define('ECHORO_CHEMIN_ABSO_APPLI', PAP_CHEMIN_RACINE.GEN_CHEMIN_CLIENT.'eflore_chorologie/');
/** Constante stockant le chemin vers le dossier "autres" de l'API général de Papyrus.*/
define('ECHORO_CHEMIN_API_AUTRE', GEN_CHEMIN_API.'autres/');
/** Constante stockant le chemin vers le dossier "PEAR" de l'API général de Papyrus.*/
define('ECHORO_CHEMIN_API_PEAR', PAP_CHEMIN_API_PEAR);
/** Constante stockant le chemin vers le dossier "fragmenteur" de l'API.*/
define('ECHORO_CHEMIN_API_FRAGMENTEUR', GEN_CHEMIN_API.'fragmenteur/');
/** Constante stockant le chemin vers le dossier "formulaire" de l'API.*/
93,7 → 95,7
// +------------------------------------------------------------------------------------------------------+
// Définition de chemin d'accès et de nom de fichier pour la Cartographie
/** Constante stockant le chemin d'accès et le nom du fichier récupérant l'image de la carte et la renvoyant au client.*/
define('CAR_CHEMIN_CARTE', ECHORO_CHEMIN_BIBLIO_CARTO.'carto.php?session='.session_name());
define('CAR_CHEMIN_CARTE', ECHORO_CHEMIN_BIBLIO_CARTO.'carto.php?session_name='.session_name().ini_get('arg_separator.output').'session_id='.session_id());
/** Constante stockant le chemin d'accès et le nom du fichier récupérant l'image de la carte et la renvoyant au client.*/
define('CAR_CHEMIN_TMP', ECHORO_CHEMIN_ABSO_BIBLIO_CARTO.'cartes_tmp/');
 
146,8 → 148,8
//Il faut mettre dans la constante ci-dessous la même valeur que pour la constante
//BD_OFFICIEL si on ne veut pas mettre les tables de chorologie dans
//une base différente.
define('BD_BOTA','botanica');//Nom de la base des tables de chorologie
define('BD_GENERALE', 'testv4');//Nom de la base des tables de la carto (et éventuellement de chorologie)
define('BD_BOTA','tela_prod_botanica');//Nom de la base des tables de chorologie
define('BD_GENERALE', 'tela_prod_v4');//Nom de la base des tables de la carto (et éventuellement de chorologie)
 
/** Constante de message d'erreur lors du débogage d'application */
define('STYLE_REQUETE', 'text-align: left; font-weight: bold; font-size: 26px;');//Le style du titre des messages d'erreur des requetes
332,6 → 334,9
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.6 2005/05/19 07:37:47 jpm
* Correction des bogues et derniers réglages avant mise en ligne du site v4.
*
* Revision 1.5 2005/03/15 15:10:32 jpm
* Ajout du chemin vers l'API formulaire.
*
/trunk/bibliotheque/echoro_affichage_xhtml.fonct.php
21,7 → 21,7
// | along with Foobar; if not, write to the Free Software |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: echoro_affichage_xhtml.fonct.php,v 1.4 2005-05-31 13:45:22 jpm Exp $
// CVS : $Id: echoro_affichage_xhtml.fonct.php,v 1.5 2006-05-31 14:43:35 jp_milcent Exp $
/**
* Fichier permettant d'inclure les données dans du XHTML.
*
34,7 → 34,7
//Autres auteurs :
*@author Aucun
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.4 $ $Date: 2005-05-31 13:45:22 $
*@version $Revision: 1.5 $ $Date: 2006-05-31 14:43:35 $
// +------------------------------------------------------------------------------------------------------+
*/
 
62,6 → 62,12
'Aucune liste disponible pour l\'instant dans ce département !'.
inclusion_html('fin_ligne_alerte');
break;
case '03' :
$message_renvoyer =
inclusion_html('debut_ligne_alerte').
'Veuillez précisez le format pour l\'export !'.
inclusion_html('fin_ligne_alerte');
break;
}//fin du switch
$message_renvoyer = remplaceEntiteHTLM($message_renvoyer);
105,9 → 111,9
break;
case 'tab_ouvre_liste_taxon' :
if ($variable[0] == 'tous') {
$html_renvoyer ='<h2>Affichage de tous les taxons du département</h2>';
$html_renvoyer = '<h2>Affichage de tous les taxons du département</h2>';
} else {
$html_renvoyer ='<h2>Affichage des taxons commençant par la lettre : '.$variable[0].'</h2>';
$html_renvoyer = '<h2>Affichage des taxons commençant par la lettre : '.$variable[0].'</h2>';
}
$html_renvoyer .='<table id="echoro_resultat">
<colgroup>
210,6 → 216,25
$html_renvoyer .= '<li>'.$variable[0][$i].'</li>';
}
$html_renvoyer .= '</ul>';
 
// Gestion de l'export
$html_renvoyer .= '<h2>Télécharger les données : </h2>'."\n";
$url_export = clone $GLOBALS['_ECHORO_']['url'];
$url_export->addQueryString('image_x', $GLOBALS['image_x']);
$url_export->addQueryString('image_y', $GLOBALS['image_y']);
$url_export->addQueryString('lettre', $GLOBALS['lettre']);
$url_export->addQueryString('departement', $GLOBALS['departement']);
$url_export->addQueryString('nombre_taxon', $GLOBALS['nombre_taxon']);
$url_export->addQueryString('action', 'export');
$url_export->addQueryString('format', 'xls');
if ($GLOBALS['lettre'] != 'tous') {
$html_renvoyer .= '<p><a href="'.$url_export->getURL().'">Export au format excell des taxons du département commençant par la lettre '.$GLOBALS['lettre'].'.</a></p>';
} else {
$html_renvoyer .= '<p><a href="'.$url_export->getURL().'">Export au format excell de tous les taxons du département.</a></p>';
}
 
// Gestion du titre de la navigation
$html_renvoyer .= '<h2>Recherche et navigation dans les résultats : </h2>'."\n";
break;
case 'intro_contrib' :
239,6 → 264,9
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.4 2005/05/31 13:45:22 jpm
* Correction erreur xhtml.
*
* Revision 1.3 2005/02/23 17:29:57 jpm
* Amélioration du code html.
*
/trunk/bibliotheque/cartographie/carto.php
21,7 → 21,7
// | along with Foobar; if not, write to the Free Software |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: carto.php,v 1.3 2005-02-22 19:35:08 jpm Exp $
// CVS : $Id: carto.php,v 1.4 2006-05-31 14:43:35 jp_milcent Exp $
/**
* Fournie une image cartographique.
*
35,7 → 35,7
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
*@author Alexandre GRANIER <alexandre@tela-botanica.org>
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.3 $ $Date: 2005-02-22 19:35:08 $
*@version $Revision: 1.4 $ $Date: 2006-05-31 14:43:35 $
// +------------------------------------------------------------------------------------------------------+
*/
 
42,7 → 42,8
// +------------------------------------------------------------------------------------------------------+
// | ENTETE du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
session_name($_GET['session']);
session_name($_GET['session_name']);
session_id($_GET['session_id']);
session_start();
 
// +------------------------------------------------------------------------------------------------------+
50,8 → 51,11
// +------------------------------------------------------------------------------------------------------+
$image = imagecreatefrompng($_SESSION['chemin'].$_SESSION['fichier'].'.png');
if (!$image) {
echo session_name();
echo session_id();
echo '<pre>';
echo session_name()."\n";
echo session_id()."\n";
echo $_SESSION['chemin'].$_SESSION['fichier'].'.png'."\n";
echo '</pre>';
trigger_error($image);
} else {
header("Expires: Wen, 01 Dec 1999 01:00:00 GMT");// Date du passé
80,6 → 84,9
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.3 2005/02/22 19:35:08 jpm
* Fin de gestion des variables via les sessions.
*
* Revision 1.2 2005/02/22 16:35:16 jpm
* Mise en forme.
* Utilisation de constantes pour les chemins d'accès aux fichiers.
/trunk/eflore_chorologie.php
21,7 → 21,7
// | along with Foobar; if not, write to the Free Software |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: eflore_chorologie.php,v 1.9 2005-06-30 15:23:02 jpm Exp $
// CVS : $Id: eflore_chorologie.php,v 1.10 2006-05-31 14:43:35 jp_milcent Exp $
/**
* Affichage des listes de noms de plantes par zones géographiques.
*
34,7 → 34,7
//Autres auteurs :
*@author Aucun
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.9 $ $Date: 2005-06-30 15:23:02 $
*@version $Revision: 1.10 $ $Date: 2006-05-31 14:43:35 $
// +------------------------------------------------------------------------------------------------------+
*/
 
49,11 → 49,9
require_once ECHORO_CHEMIN_LANGUE.'echoro_langue_'.ECHORO_LANGUE.'.inc.php';
 
/** Inclusion de la bibliothèque PEAR de conception de formulaire.*/
require_once 'HTML/QuickForm.php';
require_once ECHORO_CHEMIN_API_PEAR.'HTML/QuickForm.php';
/** Inclusion de la bibliothèque PEAR de gestion des URL.*/
require_once 'Net/URL.php';
/** Inclusion de la classe PEAR d'abstraction de base de donnée. */
//require_once 'DB.php';
require_once ECHORO_CHEMIN_API_PEAR.'Net/URL.php';
 
// Ajout d'une feuille de style propre à eFlore.
GEN_stockerStyleExterne('echoro', ECHORO_CHEMIN_STYLE.'echoro.css');
404,18 → 402,104
' AND '.ECD_INDICE.' = '.ECS_ID.
' ORDER BY '.ENT_NOM_COMPLET_02.' ASC';
}
//Nous plaçons des données javascripts pour la gestion des infos bulles:
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
$res = inclusion_html('titre_liste', $tableau_inclusion);
$tableau_inclusion = array($tableau_infoDep['SOURCES'], $tableau_infoDep['CORRESPONDANTS']);
$res .= inclusion_html('info_dep', $tableau_inclusion);
$tablo_inclusion = array($lettre);
$res .= rechercheAlphabet($requete_03, $GLOBALS['_ECHORO_']['url']->getURL(), '&amp;departement='.$tableau_infoDep['NUMERO'].'&amp;nombre_taxon='.$nombre_taxon,
inclusion_html('tab_ouvre_liste_taxon', $tablo_inclusion), inclusion_html('tab_evol_ferme'), $tablo_formatLigne,
$tablo_formatResultat, $message_alerte, $fragmenteur);
return remplaceEntiteHTLM($res);
if (isset($_GET['action']) && $_GET['action'] == 'export') {
// Gestion de l'export XLS
$resultat_export = mysql_query($requete_03, $GLOBALS['_ECHORO_']['bdd']) or die('
<h2 style='.STYLE_REQUETE.'>Erreur de requête</h2>'.
'<b>Requete : </b>'.$requete_03.
'<br/><br/><b>Erreur : </b>'.mysql_error());
$i = 0;
if (isset($_GET['format']) && $_GET['format'] == 'xls') {
/** Inclusion de la classe PEAR de création de fichiers excell. */
require_once ECHORO_CHEMIN_API_PEAR.'Spreadsheet/Excel/Writer.php';
$workbook = new Spreadsheet_Excel_Writer();
$nom_feuille = 'Département '.$tableau_infoDep['NUMERO'];
$nom_fichier = 'Chorologie - '.$nom_feuille.'.xls';
$worksheet = $workbook->addWorksheet($nom_feuille);
$format_titre = $workbook->addFormat();
$format_titre->setBold(1);
$format_titre->setSize(16);
$format_intro = $workbook->addFormat();
$format_intro->setBold(1);
$format_intro->setSize(12);
$worksheet->mergeCells($i++, 0, $i, 8);
$titre = 'Export des taxons présents dans le département '.$tableau_infoDep['NUMERO'];
$worksheet->writeString(0, 0, $titre, $format_titre);
$worksheet->mergeCells(++$i, 0, $i, 8);
$titre_projet = 'Projet :';
$worksheet->writeString($i++, 0, $titre_projet, $format_intro);
$worksheet->mergeCells($i, 0, $i, 8);
$txt_projet = 'Phytochorologie départementale - Coordinateur : Philippe JULVE';
$worksheet->writeString($i++, 0, $txt_projet);
$worksheet->mergeCells($i, 0, $i, 8);
$titre_licence = 'Licence :';
$worksheet->writeString($i++, 0, $titre_licence, $format_intro);
$worksheet->mergeCells($i, 0, $i, 8);
$txt_licence = 'http://creativecommons.org/licenses/by-sa/2.0/fr/';
$worksheet->writeString($i++, 0, $txt_licence);
$worksheet->mergeCells($i, 0, $i, 8);
$titre_contributeur = 'Contributeurs :';
$worksheet->writeString($i++, 0, $titre_contributeur, $format_intro);
for ($j = 0; $j < count($tableau_infoDep['CORRESPONDANTS']); $j++){
if(ereg("[@]", $tableau_infoDep['CORRESPONDANTS'][$j]['COURRIEL'])){
$worksheet->writeString($i, 0, $tableau_infoDep['CORRESPONDANTS'][$j]['PRENOM']);
$worksheet->writeString($i, 1, $tableau_infoDep['CORRESPONDANTS'][$j]['NOM']);
$worksheet->writeString($i++, 2, $tableau_infoDep['CORRESPONDANTS'][$j]['COURRIEL']);
} else {
$worksheet->writeString($i, 0, $tableau_infoDep['CORRESPONDANTS'][$j]['PRENOM']);
$worksheet->writeString($i++, 1, $tableau_infoDep['CORRESPONDANTS'][$j]['NOM']);
}
}
$worksheet->mergeCells($i, 0, $i, 8);
$titre_source = 'Sources :';
$worksheet->writeString($i++, 0, $titre_source, $format_intro);
for ($j = 0; $j < count($tableau_infoDep['SOURCES']); $j++){
$worksheet->mergeCells($i, 0, $i, 8);
$worksheet->writeString($i++, 0, $tableau_infoDep['SOURCES'][$j]);
}
$worksheet->setColumn(0, 1, 20);
$worksheet->setColumn(2, 2, 60);
$worksheet->setColumn(3, 3, 20);
$worksheet->writeString($i, 0, 'N° taxonomique', $format_intro);
$worksheet->writeString($i, 1, 'N° nomenclatural', $format_intro);
$worksheet->writeString($i, 2, 'Nom complet', $format_intro);
$worksheet->writeString($i++, 3, 'Indice', $format_intro);
while ($ligne = mysql_fetch_array($resultat_export)) {
//echo '<pre>'.print_r($ligne).'</pre>';
$worksheet->writeNumber($i, 0, $ligne[ENT_NUM_TAXO]);
$worksheet->writeNumber($i, 1, $ligne[ENT_NUM_NOMEN]);
$worksheet->writeString($i, 2, $ligne[ENT_NOM_COMPLET_02]);
$worksheet->writeString($i++, 3, $ligne[ECS_INTITULE]);
}
$workbook->send($nom_fichier);
$workbook->close();
exit();
} else {
return remplaceEntiteHTLM(message_alerte('03'));
}
} else {
//Nous plaçons des données javascripts pour la gestion des infos bulles:
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
$res = inclusion_html('titre_liste', $tableau_inclusion);
$tableau_inclusion = array($tableau_infoDep['SOURCES'], $tableau_infoDep['CORRESPONDANTS']);
$res .= inclusion_html('info_dep', $tableau_inclusion);
$tablo_inclusion = array($lettre);
$res .= rechercheAlphabet($requete_03, $GLOBALS['_ECHORO_']['url']->getURL(), '&amp;departement='.$tableau_infoDep['NUMERO'].'&amp;nombre_taxon='.$nombre_taxon,
inclusion_html('tab_ouvre_liste_taxon', $tablo_inclusion), inclusion_html('tab_evol_ferme'), $tablo_formatLigne,
$tablo_formatResultat, $message_alerte, $fragmenteur);
return remplaceEntiteHTLM($res);
}
} else {
if (!$carte_france) {
//Affichage quand il n'y a plus de carte.
485,21 → 569,21
' AND '.ECD_INDICE.' = '.ECS_ID.
' ORDER BY '.ENT_NOM_COMPLET_02.' ASC';
}
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
$res = inclusion_html('titre_liste', $tableau_inclusion);
$tableau_inclusion = array($tableau_infoDep['SOURCES'], $tableau_infoDep['CORRESPONDANTS']);
$res .= inclusion_html('info_dep', $tableau_inclusion);
//La fonction gérant l'affichage de la liste alphabétique et
//de l'affichage suite à une seléction dans la liste.
$tablo_inclusion = array($lettre);
$res .= FRAG_rechercherAvecAlphabet($requete_04, $GLOBALS['_ECHORO_']['url']->getURL(), '&amp;departement='.$tableau_infoDep['NUMERO'].'&amp;nombre_taxon='.$nombre_taxon,
inclusion_html('tab_ouvre_liste_taxon', $tablo_inclusion), inclusion_html('tab_evol_ferme'), $tablo_formatLigne,
$tablo_formatResultat, $message_alerte, $fragmenteur);
return remplaceEntiteHTLM($res);
// Gestion de l'affichage XHTML
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
$res = inclusion_html('titre_liste', $tableau_inclusion);
$tableau_inclusion = array($tableau_infoDep['SOURCES'], $tableau_infoDep['CORRESPONDANTS']);
$res .= inclusion_html('info_dep', $tableau_inclusion);
//La fonction gérant l'affichage de la liste alphabétique et
//de l'affichage suite à une seléction dans la liste.
$tablo_inclusion = array($lettre);
$res .= FRAG_rechercherAvecAlphabet($requete_04, $GLOBALS['_ECHORO_']['url']->getURL(), '&amp;departement='.$tableau_infoDep['NUMERO'].'&amp;nombre_taxon='.$nombre_taxon,
inclusion_html('tab_ouvre_liste_taxon', $tablo_inclusion), inclusion_html('tab_evol_ferme'), $tablo_formatLigne,
$tablo_formatResultat, $message_alerte, $fragmenteur);
return remplaceEntiteHTLM($res);
} else {
//Affichage de la carte de france des départements.
//L'utilisateur arrive sur la page.
529,6 → 613,9
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.9 2005/06/30 15:23:02 jpm
* Utilisation d'un fichier javascript à part.
*
* Revision 1.8 2005/05/31 13:45:10 jpm
* Mise en place de la gestion entités html.
*