Rev 59 | Rev 127 | 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-consultation. |// | |// | 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_recherche_nomenclature.inc.php,v 1.2 2005-01-03 19:44:40 jpm Exp $/*** Affichage du moteur de recherche nomenclatural et de ses résultats.** Ce script fournit le code html correspondant aux moteurs de recherche nomenclatural et ses résultats.**@package eFlore//Auteur original :*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>//Autres auteurs :*@author Aucun*@copyright Tela-Botanica 2000-2004*@version $Revision: 1.2 $ $Date: 2005-01-03 19:44:40 $// +------------------------------------------------------------------------------------------------------+*/// +------------------------------------------------------------------------------------------------------+// | ENTÊTE du PROGRAMME |// +------------------------------------------------------------------------------------------------------+// +------------------------------------------------------------------------------------------------------+// | CORPS du PROGRAMME |// +------------------------------------------------------------------------------------------------------+$sortie .= '<h2>'.EFLORE_LG_RECH_NOM_TITRE.'</h2>';// --------------------------------------------------------------------------------------------------------// Création du formulaire$sortie .= '<ul>';// Ajout du paramêtre action à l'url courante.$GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ACTION, EFLORE_LG_URL_ACTION_RECH_NOM);// Notes : Quickform semble remplacer les & des & à nouveau par des & solution utiliser str_replace()...$form =& new HTML_QuickForm('eflore_form_nomenclature', 'post', str_replace('&', '&', $GLOBALS['_EFLORE_']['url']->getUrl()));$tab_index = EFLORE_RECH_NOM_FORM_TAB;$squelette =& $form->defaultRenderer();$squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'{content}'."\n".'</form>');$squelette->setElementTemplate( '<li>'."\n".'{label}'."\n".'{element}'."\n".'<!-- BEGIN required --><span class="symbole_obligatoire">'.MORE_LG_FORM_SYMBOLE_OBLIGATOIRE.'</span><!-- END required -->'."\n".'<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".'</li>'."\n");//$squelette->setRequiredNoteTemplate("\n".'<p><span class="symbole_obligatoire">'.MORE_LG_FORM_SYMBOLE_OBLIGATOIRE.'</span> {requiredNote}</p>'."\n");$partie_menu_debut = '<fieldset>'."\n".'<legend>'.EFLORE_LG_RECH_NOM_FORM_TITRE.'</legend>'."\n";$form->addElement('html', $partie_menu_debut);$id = 'eflore_nom';$aso_attributs = array( 'id'=>$id, 'class' => 'champ', 'tabindex' => $tab_index++,'size' => EFLORE_RECH_NOM_FORM_NOM_SIZE,'maxlength' => EFLORE_RECH_NOM_FORM_NOM_MAXLENGTH,'onclick' => "javascript: this.value='';");$label = '<label for="'.$id.'">'.EFLORE_LG_RECH_NOM_FORM_NOM.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$liste_type_nom_debut = '<ul>'."\n";$form->addElement('html', $$liste_type_nom_debut);$id = 'eflore_type_nom';$valeur = 'nom_scientifique';$aso_attributs = array( 'id'=> $id, 'tabindex' => $tab_index++);$label = '';$form->addElement('radio', $id, $label, EFLORE_LG_RECH_NOM_FORM_TYPE_NOM_SCI, $valeur, $aso_attributs);$valeur = 'nom_vernaculaire';$aso_attributs = array( 'id'=> $id, 'tabindex' => $tab_index++);$label = '';$form->addElement('radio', $id, $label, EFLORE_LG_RECH_NOM_FORM_TYPE_NOM_VER, $valeur, $aso_attributs);if (isset($_REQUEST[$id])) {switch ($_REQUEST[$id]) {case 'nom_scientifique':$form->setDefaults(array($id => 'nom_scientifique'));break;case 'nom_vernaculaire':$form->setDefaults(array($id => 'nom_vernaculaire'));break;}} else {$form->setDefaults(array($id => 'nom_scientifique'));}$liste_type_nom_fin = '</ul>'."\n";$form->addElement('html', $$liste_type_nom_fin);$id = 'eflore_valider';$aso_attributs = array('id'=> $id, 'class' => 'champ', 'tabindex' => $tab_index++);$form->addElement('submit', $id, EFLORE_LG_RECH_NOM_FORM_VALIDER, $aso_attributs);$partie_entete_fin = "\n".'</fieldset>';$form->addElement('html', $partie_entete_fin);// Instanciation avec les valeur par défaut$form->setDefaults($_SESSION['_MOTEUR_RECHERCHE_']['rechercher']);// Transformation en XHTML du formulaire$sortie .= $form->toHTML()."\n";$sortie .= '</ul>';// --------------------------------------------------------------------------------------------------------// Lancement de la rechercheif (isset($_REQUEST['eflore_nom']) && $_REQUEST['eflore_nom'] != '') {if ($_REQUEST['eflore_type_nom'] == 'nom_scientifique') {// Recherche sur les noms scientifiques$contenu = file_get_contents(sprintf(EFLORE_URL_LISTE_NOM_LATIN, $_REQUEST['eflore_nom']));//Analyse du squeletterequire_once 'HTML/Template/IT.php';$squelette = new HTML_Template_IT();$squelette->setTemplate($contenu, true, true);// Indique l'url pour obtenir fiche d'un nom$squelette->setCurrentBlock('corps');// Ajout du paramêtre action à l'url courante.$GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ACTION, EFLORE_LG_URL_ACTION_FICHE);$GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ONGLET, EFLORE_LG_URL_ONGLET_SYNTHESE);$GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_NN, '');$squelette->setVariable('UrlFicheNom', $GLOBALS['_EFLORE_']['url']->getURL());$squelette->parseCurrentBlock('corps');// Récupère le bloc "corps"$sortie .= $squelette->get();} else if ($_REQUEST['eflore_type_nom'] == 'nom_vernaculaire') {// Recherche sur les noms vernaculaires}}/* +--Fin du code ----------------------------------------------------------------------------------------+** $Log: not supported by cvs2svn $* Revision 1.1 2004/12/23 20:05:17 jpm* Début prise en maine eflore-consultation.*** +-- Fin du code ----------------------------------------------------------------------------------------+*/?>