Subversion Repositories eFlore/Archives.chorologie

Rev

Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

<?php
/*vim: set expandtab tabstop=4 shiftwidth=4: */ 
// +------------------------------------------------------------------------------------------------------+
// | PHP version 4.3                                                                                      |
// +------------------------------------------------------------------------------------------------------+
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
// +------------------------------------------------------------------------------------------------------+
// | This file is part of eFlore-chorologie.                                                              |
// |                                                                                                      |
// | Foobar is free software; you can redistribute it and/or modify                                       |
// | it under the terms of the GNU General Public License as published by                                 |
// | the Free Software Foundation; either version 2 of the License, or                                    |
// | (at your option) any later version.                                                                  |
// |                                                                                                      |
// | Foobar is distributed in the hope that it will be useful,                                            |
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
// | GNU General Public License for more details.                                                         |
// |                                                                                                      |
// | You should have received a copy of the GNU General Public License                                    |
// | 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_source.php,v 1.1 2005-02-23 17:30:41 jpm Exp $
/**
* Affichage des sources biblio utilisées pour les listes chorologiques.
*
* Ce script fournit le code html permettant d'afficher les sources biblio des listes chorologiques.
*
*@package eFlore
*@subpackage Chorologie
//Auteur original :
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
//Autres auteurs :
*@author        Aucun
*@copyright     Tela-Botanica 2000-2004
*@version       $Revision: 1.1 $ $Date: 2005-02-23 17:30:41 $
// +------------------------------------------------------------------------------------------------------+
*/

// +------------------------------------------------------------------------------------------------------+
// |                                            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 de langue de l'application eflore-chorologie. */
require_once ECHORO_CHEMIN_LANGUE.'echoro_langue_'.ECHORO_LANGUE.'.inc.php';

// Ajout d'une feuille de style propre à eFlore.
GEN_stockerStyleExterne('echoro', ECHORO_CHEMIN_STYLE.'echoro.css');

/** Inclusion du fichier comportant des fonctions communes aux applis du package eFlore-chorologie.*/
include_once ECHORO_CHEMIN_BIBLIO.'echoro_information.fonct.php';

/** Inclusion du fichier gérant les fonctions d'encodage. */
include_once ECHORO_CHEMIN_BIBLIO.'echoro_encodage.fonct.php';

/** Inclusion du fichier gérant les fonctions fournissant l'affichage en XHTML. */
include_once ECHORO_CHEMIN_BIBLIO.'echoro_affichage_xhtml.fonct.php';

// +------------------------------------------------------------------------------------------------------+
// |                                            CORPS du PROGRAMME                                        |
// +------------------------------------------------------------------------------------------------------+
function afficherContenuNavigation()
{
    $sortie  = '';
    return $sortie;
}

function afficherContenuTete()
{
    $sortie  = '';
    return $sortie;
}

function afficherContenuCorps()
{
    // +--------------------------------------------------------------------------------------------------+
    // Initialisation
    $sortie = '';
    
    //Connection à la base
    $connexion = mysql_connect(ECHORO_BDD_SERVEUR, ECHORO_BDD_UTILISATEUR, ECHORO_BDD_MOT_DE_PASSE) or die (ER_CONNECT);
    mysql_select_db(BD_BOTA, $connexion) or die (ER_SEL_BD_BOTA);
    
    //Requête récupérant les infos sur les sources pour tous les départements
    $requete_01 = 
    'SELECT '.EZD_ID.', '.EZD_NOM.', '.ECSO_REF.
    ' FROM '.ECSO_BD_TABLE.', '.EZD_BD_TABLE.', '.ECDS_BD_TABLE.
    ' WHERE '.EZD_ID.' = '.ECDS_DEP.' AND '.ECDS_SOURCE.' = '.ECSO_ID.
    ' ORDER BY '.EZD_ID.' ASC';
    
    $resultat_01 = mysql_query ($requete_01) or die('
    <H2 style='.STYLE_REQUETE.'>Erreur de requête</H2>'.
    '<b>Requete : </b>'.$requete_01.
    '<br/><br/><b>Erreur : </b>'.mysql_error());
    
    $num_dep = ''; 
    
    //Nous ajoutons un titre à la page
    $sortie .= inclusion_html('titre_sources');
    
    //Boucle affichant les lignres de résultats
    while($resultat_source = mysql_fetch_array($resultat_01)) {
        //Dans le cas d'un nouveau département, nous devons afficher le titre...
        if ($num_dep != $resultat_source[EZD_ID]){
            //Nous stockons la nouvelle valeur du numéro de département.
            $num_dep = $resultat_source[EZD_ID];
            // Nous fermons la liste du département précédent
            if ($num_dep != 1) {
                $sortie .= '</ul>'."\n";
            }
            // Ligne de titre.
            $sortie .= '<h2>'.$resultat_source[EZD_ID].'&nbsp;-&nbsp;'.$resultat_source[EZD_NOM].'</h2>'."\n";
            // Ligne de résultat.
            $sortie .= '<ul>'."\n";
            $sortie .= '<li>'.$resultat_source[ECSO_REF].'</li>'."\n";
        } else {
            //Nous sommes dans le même département nous affichons juste la nouvelle ligne de résultat.
            $sortie .= '<li>'.$resultat_source[ECSO_REF].'</li>'."\n";
        }
    }
    $sortie .= '</ul>'."\n";
    
    return $sortie;
}

function afficherContenuPied()
{
    return inclusion_html('pied_page');
}

// +------------------------------------------------------------------------------------------------------+
// |                                            PIED du PROGRAMME                                         |
// +------------------------------------------------------------------------------------------------------+


/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
*
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
?>