Subversion Repositories eFlore/Archives.chorologie

Compare Revisions

Ignore whitespace Rev 10 → Rev 11

/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.1 2005-02-21 19:36:57 jpm Exp $
// CVS : $Id: eflore_chorologie.php,v 1.2 2005-02-22 16:39:20 jpm 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.1 $ $Date: 2005-02-21 19:36:57 $
*@version $Revision: 1.2 $ $Date: 2005-02-22 16:39:20 $
// +------------------------------------------------------------------------------------------------------+
*/
 
41,10 → 41,10
// +------------------------------------------------------------------------------------------------------+
// | ENTÊTE du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
/** Inclusion du fichier config de la base de données de l'application eflore-chorolgie. */
require_once GEN_CHEMIN_CLIENT.'eflore_chorologie/configuration/echoro_config_bdd.inc.php';
/** Inclusion du fichier config de l'application eflore-chorolgie. */
require_once GEN_CHEMIN_CLIENT.'eflore_chorologie/configuration/echoro_config.inc.php';
/** Inclusion du fichier config de la base de données de l'application eflore-chorolgie. */
require_once GEN_CHEMIN_CLIENT.'eflore_chorologie/configuration/echoro_config_bdd.inc.php';
/** Inclusion du fichier de langue de l'application eflore-chorologie. */
require_once ECHORO_CHEMIN_LANGUE.'echoro_langue_'.ECHORO_LANGUE.'.inc.php';
 
56,7 → 56,7
//require_once 'DB.php';
 
// Ajout d'une feuille de style propre à eFlore.
GEN_stockerStyleExterne('echoro', EFLORE_CHEMIN_STYLE.'echoro.css');
GEN_stockerStyleExterne('echoro', ECHORO_CHEMIN_STYLE.'echoro.css');
 
/** Inclusion du fichier gérant les fonctions javascripts. */
include_once ECHORO_CHEMIN_BIBLIO.'echoro_javascript.fonct.php';
63,7 → 63,17
//Nous appelons la fonction javascript à insérer dans l'entête.
GEN_stockerCodeScript(ajouterInfoBulleJs());
 
/** Inclusion de l'API Fragmenteur. */
/** Inclusion de la classe "Form" présente dans le dossier "autres".
Devrait être supprimer!*/
include_once ECHORO_CHEMIN_API_AUTRE.'lib.form.php';
 
/** Inclusion de la classe "Fragmenteur" de l'API Fragmenteur. */
require_once ECHORO_CHEMIN_API_FRAGMENTEUR.'FRAG_Fragmenteur.class.php';
 
/** Inclusion de la classe "Fragmenteur Session" de l'API Fragmenteur. */
require_once ECHORO_CHEMIN_API_FRAGMENTEUR.'FRAG_Fragmenteur_Session.class.php';
 
/** Inclusion des fonctions de l'API Fragmenteur. */
require_once ECHORO_CHEMIN_API_FRAGMENTEUR.'FRAG_fragmenteur.fonct.php';
 
/** Inclue la bibliothèque gérant les textes.
145,22 → 155,22
$tab_valeur_colonne_nom_complet[7] = array(
'type' => 'texte',
'valeur' => ' </b> ');
// Création de l'url pour obtenir les fiches
//Implémentation du tableau contenant les informations pour
//l'affichage des résultats.
$tablo_formatResultat[0]=array(
'Col_nom' => $tab_valeur_colonne_nom_complet,
'Col_width' => 450,
'Col_class' => 'texte_tb2 texte_i',
'Col_lien_href' => BASE_URL.'nn',
'Col_lien_href_param' => ENT_NUM_NOMEN,
'Col_lien_target' => '_blank',
'Col_lien_class' => 'eflore_lien',
'Col_lien_title' => 'Voir la fiche correspondante dans l\'index des plantes');
$tablo_formatResultat[0] = array(
'Col_nom' => $tab_valeur_colonne_nom_complet,
'Col_width' => 450,
'Col_class' => 'texte_tb2 texte_i',
'Col_lien_href' => $GLOBALS['_ECHORO_']['url_base']->getURL().'nn',
'Col_lien_href_param' => ENT_NUM_NOMEN,
'Col_lien_target' => '_blank',
'Col_lien_class' => 'eflore_lien',
'Col_lien_title' => 'Voir la fiche correspondante dans l\'index des plantes');
if ($departement == 971 || $departement == 972 ) {
$tablo_formatResultat[0]['Col_lien_href'] = BASE_URL.'bdnfgm_nn';
$tablo_formatResultat[0]['Col_lien_href'] = $GLOBALS['_ECHORO_']['url_base']->getURL().'bdnfgm_nn';
} elseif ($departement == 974) {
$tablo_formatResultat[0]['Col_lien_href'] = BASE_URL.'bdnfr_nn';
$tablo_formatResultat[0]['Col_lien_href'] = $GLOBALS['_ECHORO_']['url_base']->getURL().'bdnfr_nn';
}
$tablo_formatResultat[1]=array(
'Col_nom' => ECS_INTITULE,
187,13 → 197,13
//On ne sélectionne donc pas de base.
/** Definition de la variable globale stokant la connexion à la base de données. */
//$GLOBALS['_ECHORO_']['bdd'] = DB::connect(ECHORO_DSN_SANS_BDD);
$connexion = mysql_connect(ECHORO_BDD_SERVEUR, ECHORO_BDD_UTILISATEUR, ECHORO_BDD_MOT_DE_PASSE ) or die (ER_CONNECT.mysql_error());
$GLOBALS['_ECHORO_']['bdd'] = mysql_connect(ECHORO_BDD_SERVEUR, ECHORO_BDD_UTILISATEUR, ECHORO_BDD_MOT_DE_PASSE ) or die (ER_CONNECT.mysql_error());
}
else{
//Nous sommes dans le cas où l'on a une seule base.
//$GLOBALS['_ECHORO_']['bdd'] = DB::connect(ECHORO_DSN);
$connexion = mysql_connect(ECHORO_BDD_SERVEUR, ECHORO_BDD_UTILISATEUR, ECHORO_BDD_MOT_DE_PASSE ) or die (ER_CONNECT.mysql_error());
mysql_select_db(BD_GENERALE, $connexion) or die (ER_SEL_BD_GENERALE);
$GLOBALS['_ECHORO_']['bdd'] = mysql_connect(ECHORO_BDD_SERVEUR, ECHORO_BDD_UTILISATEUR, ECHORO_BDD_MOT_DE_PASSE ) or die (ER_CONNECT.mysql_error());
mysql_select_db(BD_GENERALE, $GLOBALS['_ECHORO_']['bdd']) or die (ER_SEL_BD_GENERALE);
}
//Requète fournisant le nombre de taxon pour chaque département. Nous récupérons aussi grâce à
272,29 → 282,39
}
}
//Toutes les informations pour réaliser la carte de France des départements
//sont stockées dans le tableau : $info_couleur_france.
//Ce tableau récupére le nom de la table et les noms des champs de la table stockant
//les valeurs des couleurs RVB.
//Il prend aussi le tableau du nombre de taxons par département.
// Instanciation du tableau contenant les infos sur la table des zones géo.
$info_table_zg['nom_table_zone'] = CD_BD_TABLE;
$info_table_zg['nom_chp_id_zone'] = CD_ID;
$info_table_zg['nom_chp_nom_zone'] = CD_NOM;
$info_table_zg['nom_chp_rouge'] = CD_R;
$info_table_zg['nom_chp_vert'] = CD_V;
$info_table_zg['nom_chp_bleu'] = CD_B;
$info_table_zg['nom_chp_zone_sup'] = CD_PAYS;
$info_table_zg['tableau_valeurs_zone'] = $tableau_dep_taxons;
$info_france['nom_table_zone'] = CD_BD_TABLE;
$info_france['nom_chp_id_zone'] = CD_ID;
$info_france['nom_chp_nom_zone'] = CD_NOM;
$info_france['nom_chp_rouge'] = CD_R;
$info_france['nom_chp_vert'] = CD_V;
$info_france['nom_chp_bleu'] = CD_B;
$info_france['nom_chp_zone_sup'] = CD_PAYS;
$info_france['tableau_valeurs_zone'] = $tableau_dep_taxons;
// Instanciation du tableau contenant les champs de la table action
$info_table_action['nom_table_action'] = CA_BD_TABLE;
$info_table_action['nom_chp_id_carte'] = CA_CARTE;
$info_table_action['nom_chp_id_zg_action'] = CA_ZG;
$info_table_action['nom_chp_type_zg'] = CA_TYPE_ZG;
$info_table_action['nom_chp_action'] = CA_ACTION;
$info_table_action['nom_chp_id_carte_destination'] = CA_CARTE_DESTINATION;
// +--------------------------------------------------------------------------------------------------+
// CRÉATION DES OBJETS CARTE ET ACTION
//Nous commençons par vider la chaine renvoyée par la fonction putFrame().
$res='';
$res = '';
//Nous créons un nouvel objet carte.
$france = new Carto_Carte(ID_CARTE_FR_DPT, ID_ZONE_GEO_CARTE_FR_DPT, NOM_CARTE_FR_DPT, FICHIER_MASQUE_FR_DPT, FICHIER_CARTE_FR_DPT, CHEMIN_CARTO, $info_france);
$france = new Carto_Carte( ID_CARTE_FR_DPT,
ID_ZONE_GEO_CARTE_FR_DPT,
NOM_CARTE_FR_DPT,
ECHORO_FICHIER_CARTE_FR_DPT_MASQUE,
ECHORO_FICHIER_CARTE_FR_DPT,
ECHORO_CHEMIN_CARTE,
$info_table_zg,
$info_table_action);
//Les valeurs de coordonnées x et y du clic sur l'image,
//sont renvoyée automatiquement par le formulaire de la carte.
//A la première exécution du script ces variables sont vides.
303,7 → 323,7
$france->image_x = $image_x;
$france->image_y = $image_y;
$france->liste_zone_carte = $liste_zone_carte;
$france->url = URL_DOCUMENT;
$france->url = $GLOBALS['_ECHORO_']['url']->getURL();
//Nous définissons les couleurs de la carte:
$france->definirCouleurs (
339,7 → 359,7
//sur un département.
//Nous récupérons toutes les infos sur le département :
$tableau_infoDep = choro_dep_infoDep($departement);
$tableau_infoDep = echoro_recupererInfoDep($departement);
//Nous affectons les messages d'erreur
if($nombre_taxon != 0){
356,7 → 376,7
ENT_NOM_COMPLET_02.', '.ECS_INTITULE.
' FROM '.EAC_BD_TABLE.', '.EANT_BD_TABLE.', '.ECS_BD_TABLE.
' WHERE ';
if ($lettre != "tous"){
if ($lettre != 'tous'){
$requete_03 .= ENT_NOM_COMPLET_02.' LIKE "'.$lettre.'%"';
} else {
$requete_03 .= ENT_NOM_COMPLET_02.' LIKE "%"';
363,7 → 383,6
}
$requete_03 .=
' AND '.EAC_DEP.'='.$tableau_infoDep['NUMERO'].
//' AND '.EAC_NUM_TAXO.' = '.ENT_NUM_TAXO.
' AND '.EAC_NUM_NOMEN.' = '.ENT_NUM_NOMEN.
' AND '.EAC_STATUT.' = '.ECS_ID.
' ORDER BY '.ENT_NOM_COMPLET_02.' ASC';
380,7 → 399,6
}
$requete_03 .=
' AND '.ERC_DEP.'='.$tableau_infoDep['NUMERO'].
//' AND '.ERC_NUM_TAXO.' = '.ENT_NUM_TAXO.
' AND '.ERC_NUM_NOMEN.' = '.ENT_NUM_NOMEN.
' AND '.ERC_STATUT.' = '.ECS_ID.
' ORDER BY '.ENT_NOM_COMPLET_02.' ASC';
397,7 → 415,6
}
$requete_03 .=
' AND '.ECD_DEP.'='.$tableau_infoDep['NUMERO'].
//' AND '.ECD_NUM_TAXO.' = '.ENT_NUM_TAXO.
' AND '.ECD_NUM_NOMEN.' = '.ENT_NUM_NOMEN.
' AND '.ECD_INDICE.' = '.ECS_ID.
' ORDER BY '.ENT_NOM_COMPLET_02.' ASC';
404,11 → 421,6
}
//Nous plaçons des données javascripts pour la gestion des infos bulles:
/*$res = '<!-- appel à l\'initialisation des infos bulles (laisser dans le BODY) -->';
$res .= '<SCRIPT language="JavaScript">InitBulle("navy","#FFCC66","orange",1);';
$res .= '//// InitBulle(couleur de texte, couleur de fond, couleur de contour taille contour)';
$res .='</SCRIPT>';
*/
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
$res = inclusion_html('titre_liste', $tableau_inclusion);
$tableau_inclusion = array($tableau_infoDep['SOURCES'], $tableau_infoDep['CORRESPONDANTS']);
415,7 → 427,7
$res .= inclusion_html('info_dep', $tableau_inclusion);
$tablo_inclusion = array($lettre);
$res .= rechercheAlphabet($requete_03, URL_DOCUMENT, '&amp;departement='.$tableau_infoDep['NUMERO'].'&amp;nombre_taxon='.$nombre_taxon,
$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 $res;
430,13 → 442,12
$tableau_departement = explode ('*',$france->historique);
//Nous récupérons toutes les infos sur le département :
$tableau_infoDep = choro_dep_infoDep($tableau_departement[1]);
$tableau_infoDep = echoro_recupererInfoDep($tableau_departement[1]);
if ($tableau_infoDep['NUMERO'] == 971 || $tableau_infoDep['NUMERO'] == 972) {
$tablo_formatResultat[0]['Col_lien_href'] = BASE_URL.'bdnfgm_nn';
$tablo_formatResultat[0]['Col_lien_href'] = $GLOBALS['_ECHORO_']['url_base']->getURL().'bdnfgm_nn';
} elseif ($tableau_infoDep['NUMERO'] == 974) {
$tablo_formatResultat[0]['Col_lien_href'] = BASE_URL.'bdnfr_nn';
$tablo_formatResultat[0]['Col_lien_href'] = $GLOBALS['_ECHORO_']['url_base']->getURL().'bdnfr_nn';
}
//Nous récupérons le nombre de taxons présent dans le département
488,12 → 499,13
' 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:
/*$res = '<!-- appel à l\'initialisation des infos bulles (laisser dans le BODY) -->';
$res .= '<SCRIPT language="JavaScript">InitBulle("navy","#FFCC66","orange",1);';
$res .= '//// InitBulle(couleur de texte, couleur de fond, couleur de contour, taille contour)';
$res .= '</SCRIPT>';
*/
*/
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
$res = inclusion_html('titre_liste', $tableau_inclusion);
504,15 → 516,14
//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 .= rechercheAlphabet($requete_04, URL_DOCUMENT, '&amp;departement='.$tableau_infoDep['NUMERO'].'&amp;nombre_taxon='.$nombre_taxon,
$res .= rechercheAlphabet($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 $res;
}
else{
//Affichage de la carte de france des départements.
//L'utilisateur arrive sur la page.
} else {
//Affichage de la carte de france des départements.
//L'utilisateur arrive sur la page.
$tableau_inclusion = array($nbre_liste);
$res = inclusion_html('titre_carte', $tableau_inclusion);//Le titre dans une ligne de tableau
$res .= inclusion_html('tab_ouvre');//Ouverture d'un tableau dans une ligne de tableau
543,7 → 554,10
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.1 2005/02/21 19:36:57 jpm
* Ajout du code de l'appli de tela v3.
*
*
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
?>