Subversion Repositories eFlore/Archives.eflore-consultation-v2

<?php
/*vim: set expandtab tabstop=4 shiftwidth=4: */ 
// +------------------------------------------------------------------------------------------------------+
// | PHP version 5.0.3                                                                                    |
// +------------------------------------------------------------------------------------------------------+
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
// +------------------------------------------------------------------------------------------------------+
// | This file is part of eRibo.                                                                          |
// |                                                                                                      |
// | 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: info_taxon_sup_xml.php,v 1.1 2005-07-01 18:31:30 jp_milcent Exp $
/**
* Vue affichant la liste des taxons d'un projet.
*
* Permet de retourner le xhtml correspondant à une liste hiérarchisées des taxons d'un projet.
*
*@package eFlore
*@subpackage Vues
//Auteur original :
*@author        Frédéric LEGENS <flegens@free.fr>
//Autres auteurs :
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
*@copyright     Tela-Botanica 2000-2004
*@version       $Revision: 1.1 $ $Date: 2005-07-01 18:31:30 $
// +------------------------------------------------------------------------------------------------------+
*/

// +------------------------------------------------------------------------------------------------------+
// |                                            ENTETE du PROGRAMME                                       |
// +------------------------------------------------------------------------------------------------------+
require_once EFSE_CHEMIN_FONCTION.'eribo_encodage.fonct.php';

// +------------------------------------------------------------------------------------------------------+
// |                                            CLASSE de la VUE                                          |
// +------------------------------------------------------------------------------------------------------+
class recherche_taxon_sup_xml implements iVue {
    
    protected $leBlock;
    
    function __construct($unBlock)
    {
        $this->leBlock = $unBlock;
    }
    
    function serialiser()
    {
        
        $retour = '<?xml version="1.0" encoding="UTF-8" standalone="yes" ?>'."\n";
        $retour .= '<!DOCTYPE taxon ['."\n";
        $retour .= '  <!ELEMENT taxon (#PCDATA)>'."\n";
        $retour .= ']>'."\n";
        $retour .= $this->leBlock->afficherPattern('FICHE_TAXON_SUPERIEUR>TAXON_SUPERIEUR','afficherInfoTaxon');
        
        // Envoi au navigateur après encodage en entité des caractères posant problème
        header('Content-Type: text/xml');
        echo utf8_encode($retour);
    }
}

// +------------------------------------------------------------------------------------------------------+
// |                                            LISTE des FONCTIONS                                       |
// +------------------------------------------------------------------------------------------------------+
function afficherInfoTaxon($donnees)
{
    $retour = '';
    $retour .= '<taxon>'."\n";
    $retour .= '  <etr_id_t2>'.$donnees['etr_id_taxon_2'].'</etr_id_t2>'."\n";
    $retour .= '  <etr_id_vpt2>'.$donnees['etr_id_version_projet_taxon_2'].'</etr_id_vpt2>'."\n";
    $retour .= '  <en_ce_r>'.$donnees['en_ce_rang'].'</en_ce_r>'."\n";
    $retour .= '  <en_id_n>'.$donnees['en_id_nom'].'</en_id_n>'."\n";
    $retour .= '</taxon>'."\n";
    return $retour;
}


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


/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.1  2005/06/30 15:25:07  jpm
* Début des modifications pour ajout de l'arborescence de la classif.
*
*
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
?>