Subversion Repositories eFlore/Archives.chorologie

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
21 jpm 1
<?php
2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3
// +------------------------------------------------------------------------------------------------------+
4
// | PHP version 4.3                                                                                      |
5
// +------------------------------------------------------------------------------------------------------+
6
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7
// +------------------------------------------------------------------------------------------------------+
8
// | This file is part of eFlore-chorologie.                                                              |
9
// |                                                                                                      |
10
// | Foobar is free software; you can redistribute it and/or modify                                       |
11
// | it under the terms of the GNU General Public License as published by                                 |
12
// | the Free Software Foundation; either version 2 of the License, or                                    |
13
// | (at your option) any later version.                                                                  |
14
// |                                                                                                      |
15
// | Foobar is distributed in the hope that it will be useful,                                            |
16
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
17
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
18
// | GNU General Public License for more details.                                                         |
19
// |                                                                                                      |
20
// | You should have received a copy of the GNU General Public License                                    |
21
// | along with Foobar; if not, write to the Free Software                                                |
22
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23
// +------------------------------------------------------------------------------------------------------+
24
// CVS : $Id: eflore_chorologie_contributeur.php,v 1.1 2005-02-23 17:30:35 jpm Exp $
25
/**
26
* Affichage des contributeurs aux listes chorologiques.
27
*
28
* Ce script fournit le code html permettant d'afficher les contributeurs aux listes chorologiques.
29
*
30
*@package eFlore
31
*@subpackage Chorologie
32
//Auteur original :
33
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
34
//Autres auteurs :
35
*@author        Aucun
36
*@copyright     Tela-Botanica 2000-2004
37
*@version       $Revision: 1.1 $ $Date: 2005-02-23 17:30:35 $
38
// +------------------------------------------------------------------------------------------------------+
39
*/
40
 
41
// +------------------------------------------------------------------------------------------------------+
42
// |                                            ENTÊTE du PROGRAMME                                       |
43
// +------------------------------------------------------------------------------------------------------+
44
/** Inclusion du fichier config de la base de données de l'application eflore-chorolgie. */
45
require_once GEN_CHEMIN_CLIENT.'eflore_chorologie/configuration/echoro_config_bdd.inc.php';
46
/** Inclusion du fichier config de l'application eflore-chorolgie. */
47
require_once GEN_CHEMIN_CLIENT.'eflore_chorologie/configuration/echoro_config.inc.php';
48
/** Inclusion du fichier de langue de l'application eflore-chorologie. */
49
require_once ECHORO_CHEMIN_LANGUE.'echoro_langue_'.ECHORO_LANGUE.'.inc.php';
50
 
51
// Ajout d'une feuille de style propre à eFlore.
52
GEN_stockerStyleExterne('echoro', ECHORO_CHEMIN_STYLE.'echoro.css');
53
 
54
/** Inclusion du fichier comportant des fonctions communes aux applis du package eFlore-chorologie.*/
55
include_once ECHORO_CHEMIN_BIBLIO.'echoro_information.fonct.php';
56
 
57
/** Inclusion du fichier gérant les fonctions d'encodage. */
58
include_once ECHORO_CHEMIN_BIBLIO.'echoro_encodage.fonct.php';
59
 
60
/** Inclusion du fichier gérant les fonctions fournissant l'affichage en XHTML. */
61
include_once ECHORO_CHEMIN_BIBLIO.'echoro_affichage_xhtml.fonct.php';
62
 
63
// +------------------------------------------------------------------------------------------------------+
64
// |                                            CORPS du PROGRAMME                                        |
65
// +------------------------------------------------------------------------------------------------------+
66
function afficherContenuNavigation()
67
{
68
    $sortie  = '';
69
    return $sortie;
70
}
71
 
72
function afficherContenuTete()
73
{
74
    $sortie  = '';
75
    return $sortie;
76
}
77
 
78
function afficherContenuCorps()
79
{
80
    // +--------------------------------------------------------------------------------------------------+
81
    // Initialisation
82
    $sortie = '';
83
 
84
    //Définition des attributs des de la balise <a> pour le lien sur le mail
85
    //Ce tableau est utilisé par la fonction choro_dep_possederCourriel.
86
    $tablo_formatLien['class']='eflore_lien';
87
    $tablo_formatLien['title']='Cliquer pour écrire un message';
88
 
89
    //Connection à la base
90
    $connexion = mysql_connect(ECHORO_BDD_SERVEUR, ECHORO_BDD_UTILISATEUR, ECHORO_BDD_MOT_DE_PASSE) or die (ER_CONNECT);
91
    mysql_select_db(BD_BOTA, $connexion) or die (ER_SEL_BD_BOTA);
92
 
93
    //Requête sql qui récupére les informations sur les correspondant présents dans chaque département.
94
    $requete_01 =
95
        'SELECT '.EZD_ID.', '.EZD_NOM.', '.ECC_ID.', '.ECC_PRENOM.', '.ECC_NOM.', '.ECC_COURRIEL.
96
        ' FROM '.ECC_BD_TABLE.', '.EZD_BD_TABLE.', '.ECDC_BD_TABLE.
97
        ' WHERE '.EZD_ID.' = '.ECDC_DEP.
98
        ' AND '.ECDC_CORRES.' = '.ECC_ID.
99
        ' ORDER BY '.EZD_ID.' ASC';
100
 
101
    $resultat_01 = mysql_query ($requete_01) or die('
102
    <H2 style='.STYLE_REQUETE.'>Erreur de requête</H2>'.
103
    '<b>Requete : </b>'.$requete_01.
104
    '<br/><br/><b>Erreur : </b>'.mysql_error());
105
 
106
    $num_dep = '';
107
    //Inclusion du tite et de l'ouverture du tableau qui permetra d'afficher les correspondants.
108
    $sortie .= inclusion_html('titre_contrib');
109
    $sortie .= inclusion_html('intro_contrib');
110
    //Boucle qui fournie les lignes du tableau.
111
    //Chaque ligne contient :
112
    //-soit le titre, càd numéro du département suivi de son nom
113
    //-soit un correspondant
114
    //-soit un message de recherche de correspondant
115
    while($resultat_corres = mysql_fetch_array($resultat_01)) {
116
        if ($num_dep != $resultat_corres[EZD_ID]){//Nous sommes dans le cas d'un nouveau département...
117
            $num_dep = $resultat_corres[EZD_ID]; //Nous récupérons le numéro du nouveau département
118
            // Nous fermons la liste du département précédent
119
            if ($num_dep != 1) {
120
                $sortie .= '</ul>'."\n";
121
            }
122
            //Nous affichons le titre
123
            $sortie .= '<h2>'.$resultat_corres[EZD_ID].'&nbsp;-&nbsp;'.$resultat_corres[EZD_NOM].'</h2>'."\n";
124
            $sortie .= '<ul>'."\n";
125
            // Nous testons si on est dans le cas d'une recherche de correspondant pour le département
126
            if ($resultat_corres[ECC_ID] == 0){
127
                $sortie .= '<li>'.$resultat_corres[ECC_NOM].'</li>'."\n";
128
            } else {
129
                //Nous avons un correspondant pour le département et nous l'affichons
130
                $sortie .= '<li>'.$resultat_corres[ECC_PRENOM].' '.strtoupper($resultat_corres[ECC_NOM]).' - ';
131
                $sortie .= echoro_possederCourriel($resultat_corres[ECC_COURRIEL], $tablo_formatLien).'</li>'."\n";
132
            }
133
        } else {
134
            //Nous sommes dans le cas où nous avons plus d'un correspondant pour le département
135
            $sortie .= '<li>'.$resultat_corres[ECC_PRENOM].' '.strtoupper($resultat_corres[ECC_NOM]).' - ';
136
            $sortie .= echoro_possederCourriel($resultat_corres[ECC_COURRIEL], $tablo_formatLien).'</li>'."\n";
137
        }
138
    }
139
    $sortie .= '</ul>'."\n";
140
 
141
    return $sortie;
142
}
143
 
144
function afficherContenuPied()
145
{
146
    return inclusion_html('pied_page');
147
}
148
 
149
// +------------------------------------------------------------------------------------------------------+
150
// |                                            PIED du PROGRAMME                                         |
151
// +------------------------------------------------------------------------------------------------------+
152
 
153
 
154
/* +--Fin du code ----------------------------------------------------------------------------------------+
155
*
156
* $Log: not supported by cvs2svn $
157
*
158
* +-- Fin du code ----------------------------------------------------------------------------------------+
159
*/
160
?>