| Line 19... |
Line 19... |
| 19 |
// | |
|
19 |
// | |
|
| 20 |
// | You should have received a copy of the GNU General Public License |
|
20 |
// | You should have received a copy of the GNU General Public License |
|
| 21 |
// | along with Foobar; if not, write to the Free Software |
|
21 |
// | along with Foobar; if not, write to the Free Software |
|
| 22 |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
|
22 |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
|
| 23 |
// +------------------------------------------------------------------------------------------------------+
|
23 |
// +------------------------------------------------------------------------------------------------------+
|
| 24 |
// CVS : $Id: eflore_chorologie.php,v 1.9 2005-06-30 15:23:02 jpm Exp $
|
24 |
// CVS : $Id: eflore_chorologie.php,v 1.10 2006-05-31 14:43:35 jp_milcent Exp $
|
| 25 |
/**
|
25 |
/**
|
| 26 |
* Affichage des listes de noms de plantes par zones géographiques.
|
26 |
* Affichage des listes de noms de plantes par zones géographiques.
|
| 27 |
*
|
27 |
*
|
| 28 |
* Ce script fournit le code html correspondant aux listes de noms de plantes par zone géographique.
|
28 |
* Ce script fournit le code html correspondant aux listes de noms de plantes par zone géographique.
|
| 29 |
*
|
29 |
*
|
| Line 32... |
Line 32... |
| 32 |
//Auteur original :
|
32 |
//Auteur original :
|
| 33 |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
|
33 |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
|
| 34 |
//Autres auteurs :
|
34 |
//Autres auteurs :
|
| 35 |
*@author Aucun
|
35 |
*@author Aucun
|
| 36 |
*@copyright Tela-Botanica 2000-2004
|
36 |
*@copyright Tela-Botanica 2000-2004
|
| 37 |
*@version $Revision: 1.9 $ $Date: 2005-06-30 15:23:02 $
|
37 |
*@version $Revision: 1.10 $ $Date: 2006-05-31 14:43:35 $
|
| 38 |
// +------------------------------------------------------------------------------------------------------+
|
38 |
// +------------------------------------------------------------------------------------------------------+
|
| 39 |
*/
|
39 |
*/
|
| Line 40... |
Line 40... |
| 40 |
|
40 |
|
| 41 |
// +------------------------------------------------------------------------------------------------------+
|
41 |
// +------------------------------------------------------------------------------------------------------+
|
| Line 47... |
Line 47... |
| 47 |
require_once GEN_CHEMIN_CLIENT.'eflore_chorologie/configuration/echoro_config.inc.php';
|
47 |
require_once GEN_CHEMIN_CLIENT.'eflore_chorologie/configuration/echoro_config.inc.php';
|
| 48 |
/** Inclusion du fichier de langue de l'application eflore-chorologie. */
|
48 |
/** Inclusion du fichier de langue de l'application eflore-chorologie. */
|
| 49 |
require_once ECHORO_CHEMIN_LANGUE.'echoro_langue_'.ECHORO_LANGUE.'.inc.php';
|
49 |
require_once ECHORO_CHEMIN_LANGUE.'echoro_langue_'.ECHORO_LANGUE.'.inc.php';
|
| Line 50... |
Line 50... |
| 50 |
|
50 |
|
| 51 |
/** Inclusion de la bibliothèque PEAR de conception de formulaire.*/
|
51 |
/** Inclusion de la bibliothèque PEAR de conception de formulaire.*/
|
| 52 |
require_once 'HTML/QuickForm.php';
|
52 |
require_once ECHORO_CHEMIN_API_PEAR.'HTML/QuickForm.php';
|
| 53 |
/** Inclusion de la bibliothèque PEAR de gestion des URL.*/
|
53 |
/** Inclusion de la bibliothèque PEAR de gestion des URL.*/
|
| 54 |
require_once 'Net/URL.php';
|
- |
|
| 55 |
/** Inclusion de la classe PEAR d'abstraction de base de donnée. */
|
- |
|
| Line 56... |
Line 54... |
| 56 |
//require_once 'DB.php';
|
54 |
require_once ECHORO_CHEMIN_API_PEAR.'Net/URL.php';
|
| 57 |
|
55 |
|
| Line 58... |
Line 56... |
| 58 |
// Ajout d'une feuille de style propre à eFlore.
|
56 |
// Ajout d'une feuille de style propre à eFlore.
|
| Line 402... |
Line 400... |
| 402 |
' AND '.ECD_DEP.'='.$tableau_infoDep['NUMERO'].
|
400 |
' AND '.ECD_DEP.'='.$tableau_infoDep['NUMERO'].
|
| 403 |
' AND '.ECD_NUM_NOMEN.' = '.ENT_NUM_NOMEN.
|
401 |
' AND '.ECD_NUM_NOMEN.' = '.ENT_NUM_NOMEN.
|
| 404 |
' AND '.ECD_INDICE.' = '.ECS_ID.
|
402 |
' AND '.ECD_INDICE.' = '.ECS_ID.
|
| 405 |
' ORDER BY '.ENT_NOM_COMPLET_02.' ASC';
|
403 |
' ORDER BY '.ENT_NOM_COMPLET_02.' ASC';
|
| 406 |
}
|
404 |
}
|
| - |
|
405 |
if (isset($_GET['action']) && $_GET['action'] == 'export') {
|
| - |
|
406 |
// Gestion de l'export XLS
|
| - |
|
407 |
$resultat_export = mysql_query($requete_03, $GLOBALS['_ECHORO_']['bdd']) or die('
|
| - |
|
408 |
<h2 style='.STYLE_REQUETE.'>Erreur de requête</h2>'.
|
| - |
|
409 |
'<b>Requete : </b>'.$requete_03.
|
| - |
|
410 |
'<br/><br/><b>Erreur : </b>'.mysql_error());
|
| - |
|
411 |
|
| - |
|
412 |
$i = 0;
|
| - |
|
413 |
if (isset($_GET['format']) && $_GET['format'] == 'xls') {
|
| - |
|
414 |
/** Inclusion de la classe PEAR de création de fichiers excell. */
|
| - |
|
415 |
require_once ECHORO_CHEMIN_API_PEAR.'Spreadsheet/Excel/Writer.php';
|
| - |
|
416 |
$workbook = new Spreadsheet_Excel_Writer();
|
| - |
|
417 |
$nom_feuille = 'Département '.$tableau_infoDep['NUMERO'];
|
| - |
|
418 |
$nom_fichier = 'Chorologie - '.$nom_feuille.'.xls';
|
| - |
|
419 |
$worksheet = $workbook->addWorksheet($nom_feuille);
|
| - |
|
420 |
|
| - |
|
421 |
$format_titre = $workbook->addFormat();
|
| - |
|
422 |
$format_titre->setBold(1);
|
| - |
|
423 |
$format_titre->setSize(16);
|
| - |
|
424 |
|
| - |
|
425 |
$format_intro = $workbook->addFormat();
|
| - |
|
426 |
$format_intro->setBold(1);
|
| - |
|
427 |
$format_intro->setSize(12);
|
| - |
|
428 |
|
| - |
|
429 |
$worksheet->mergeCells($i++, 0, $i, 8);
|
| - |
|
430 |
$titre = 'Export des taxons présents dans le département '.$tableau_infoDep['NUMERO'];
|
| - |
|
431 |
$worksheet->writeString(0, 0, $titre, $format_titre);
|
| - |
|
432 |
|
| - |
|
433 |
$worksheet->mergeCells(++$i, 0, $i, 8);
|
| - |
|
434 |
$titre_projet = 'Projet :';
|
| - |
|
435 |
$worksheet->writeString($i++, 0, $titre_projet, $format_intro);
|
| - |
|
436 |
$worksheet->mergeCells($i, 0, $i, 8);
|
| - |
|
437 |
$txt_projet = 'Phytochorologie départementale - Coordinateur : Philippe JULVE';
|
| - |
|
438 |
$worksheet->writeString($i++, 0, $txt_projet);
|
| - |
|
439 |
|
| - |
|
440 |
$worksheet->mergeCells($i, 0, $i, 8);
|
| - |
|
441 |
$titre_licence = 'Licence :';
|
| - |
|
442 |
$worksheet->writeString($i++, 0, $titre_licence, $format_intro);
|
| - |
|
443 |
$worksheet->mergeCells($i, 0, $i, 8);
|
| - |
|
444 |
$txt_licence = 'http://creativecommons.org/licenses/by-sa/2.0/fr/';
|
| - |
|
445 |
$worksheet->writeString($i++, 0, $txt_licence);
|
| - |
|
446 |
|
| - |
|
447 |
$worksheet->mergeCells($i, 0, $i, 8);
|
| - |
|
448 |
$titre_contributeur = 'Contributeurs :';
|
| - |
|
449 |
$worksheet->writeString($i++, 0, $titre_contributeur, $format_intro);
|
| - |
|
450 |
for ($j = 0; $j < count($tableau_infoDep['CORRESPONDANTS']); $j++){
|
| - |
|
451 |
if(ereg("[@]", $tableau_infoDep['CORRESPONDANTS'][$j]['COURRIEL'])){
|
| - |
|
452 |
$worksheet->writeString($i, 0, $tableau_infoDep['CORRESPONDANTS'][$j]['PRENOM']);
|
| - |
|
453 |
$worksheet->writeString($i, 1, $tableau_infoDep['CORRESPONDANTS'][$j]['NOM']);
|
| - |
|
454 |
$worksheet->writeString($i++, 2, $tableau_infoDep['CORRESPONDANTS'][$j]['COURRIEL']);
|
| - |
|
455 |
} else {
|
| - |
|
456 |
$worksheet->writeString($i, 0, $tableau_infoDep['CORRESPONDANTS'][$j]['PRENOM']);
|
| - |
|
457 |
$worksheet->writeString($i++, 1, $tableau_infoDep['CORRESPONDANTS'][$j]['NOM']);
|
| - |
|
458 |
}
|
| - |
|
459 |
}
|
| - |
|
460 |
|
| - |
|
461 |
$worksheet->mergeCells($i, 0, $i, 8);
|
| - |
|
462 |
$titre_source = 'Sources :';
|
| - |
|
463 |
$worksheet->writeString($i++, 0, $titre_source, $format_intro);
|
| - |
|
464 |
for ($j = 0; $j < count($tableau_infoDep['SOURCES']); $j++){
|
| - |
|
465 |
$worksheet->mergeCells($i, 0, $i, 8);
|
| - |
|
466 |
$worksheet->writeString($i++, 0, $tableau_infoDep['SOURCES'][$j]);
|
| - |
|
467 |
}
|
| - |
|
468 |
|
| - |
|
469 |
$worksheet->setColumn(0, 1, 20);
|
| - |
|
470 |
$worksheet->setColumn(2, 2, 60);
|
| - |
|
471 |
$worksheet->setColumn(3, 3, 20);
|
| - |
|
472 |
$worksheet->writeString($i, 0, 'N° taxonomique', $format_intro);
|
| - |
|
473 |
$worksheet->writeString($i, 1, 'N° nomenclatural', $format_intro);
|
| - |
|
474 |
$worksheet->writeString($i, 2, 'Nom complet', $format_intro);
|
| - |
|
475 |
$worksheet->writeString($i++, 3, 'Indice', $format_intro);
|
| 407 |
|
476 |
|
| - |
|
477 |
while ($ligne = mysql_fetch_array($resultat_export)) {
|
| - |
|
478 |
//echo '<pre>'.print_r($ligne).'</pre>';
|
| - |
|
479 |
$worksheet->writeNumber($i, 0, $ligne[ENT_NUM_TAXO]);
|
| - |
|
480 |
$worksheet->writeNumber($i, 1, $ligne[ENT_NUM_NOMEN]);
|
| - |
|
481 |
$worksheet->writeString($i, 2, $ligne[ENT_NOM_COMPLET_02]);
|
| - |
|
482 |
$worksheet->writeString($i++, 3, $ligne[ECS_INTITULE]);
|
| - |
|
483 |
}
|
| - |
|
484 |
$workbook->send($nom_fichier);
|
| - |
|
485 |
$workbook->close();
|
| - |
|
486 |
exit();
|
| - |
|
487 |
} else {
|
| - |
|
488 |
return remplaceEntiteHTLM(message_alerte('03'));
|
| - |
|
489 |
}
|
| - |
|
490 |
} else {
|
| 408 |
//Nous plaçons des données javascripts pour la gestion des infos bulles:
|
491 |
//Nous plaçons des données javascripts pour la gestion des infos bulles:
|
| 409 |
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
|
492 |
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
|
| 410 |
$res = inclusion_html('titre_liste', $tableau_inclusion);
|
493 |
$res = inclusion_html('titre_liste', $tableau_inclusion);
|
| 411 |
$tableau_inclusion = array($tableau_infoDep['SOURCES'], $tableau_infoDep['CORRESPONDANTS']);
|
494 |
$tableau_inclusion = array($tableau_infoDep['SOURCES'], $tableau_infoDep['CORRESPONDANTS']);
|
| 412 |
$res .= inclusion_html('info_dep', $tableau_inclusion);
|
495 |
$res .= inclusion_html('info_dep', $tableau_inclusion);
|
| 413 |
|
496 |
|
| 414 |
$tablo_inclusion = array($lettre);
|
497 |
$tablo_inclusion = array($lettre);
|
| 415 |
$res .= rechercheAlphabet($requete_03, $GLOBALS['_ECHORO_']['url']->getURL(), '&departement='.$tableau_infoDep['NUMERO'].'&nombre_taxon='.$nombre_taxon,
|
498 |
$res .= rechercheAlphabet($requete_03, $GLOBALS['_ECHORO_']['url']->getURL(), '&departement='.$tableau_infoDep['NUMERO'].'&nombre_taxon='.$nombre_taxon,
|
| 416 |
inclusion_html('tab_ouvre_liste_taxon', $tablo_inclusion), inclusion_html('tab_evol_ferme'), $tablo_formatLigne,
|
499 |
inclusion_html('tab_ouvre_liste_taxon', $tablo_inclusion), inclusion_html('tab_evol_ferme'), $tablo_formatLigne,
|
| 417 |
$tablo_formatResultat, $message_alerte, $fragmenteur);
|
500 |
$tablo_formatResultat, $message_alerte, $fragmenteur);
|
| 418 |
return remplaceEntiteHTLM($res);
|
501 |
return remplaceEntiteHTLM($res);
|
| - |
|
502 |
}
|
| 419 |
} else {
|
503 |
} else {
|
| 420 |
if (!$carte_france) {
|
504 |
if (!$carte_france) {
|
| 421 |
//Affichage quand il n'y a plus de carte.
|
505 |
//Affichage quand il n'y a plus de carte.
|
| 422 |
//Dans notre cas l'utilisateur a cliqué sur un département.
|
506 |
//Dans notre cas l'utilisateur a cliqué sur un département.
|
| 423 |
//Nous appelons la fonction javascript à insérer dans l'entête.
|
507 |
//Nous appelons la fonction javascript à insérer dans l'entête.
|
| Line 483... |
Line 567... |
| 483 |
//' AND '.ECD_NUM_TAXO.' = '.ENT_NUM_TAXO.
|
567 |
//' AND '.ECD_NUM_TAXO.' = '.ENT_NUM_TAXO.
|
| 484 |
' AND '.ECD_NUM_NOMEN.' = '.ENT_NUM_NOMEN.
|
568 |
' AND '.ECD_NUM_NOMEN.' = '.ENT_NUM_NOMEN.
|
| 485 |
' AND '.ECD_INDICE.' = '.ECS_ID.
|
569 |
' AND '.ECD_INDICE.' = '.ECS_ID.
|
| 486 |
' ORDER BY '.ENT_NOM_COMPLET_02.' ASC';
|
570 |
' ORDER BY '.ENT_NOM_COMPLET_02.' ASC';
|
| 487 |
}
|
571 |
}
|
| 488 |
|
- |
|
| - |
|
572 |
// Gestion de l'affichage XHTML
|
| 489 |
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
|
573 |
$tableau_inclusion = array($tableau_infoDep['NOM'], $nombre_taxon);
|
| 490 |
$res = inclusion_html('titre_liste', $tableau_inclusion);
|
574 |
$res = inclusion_html('titre_liste', $tableau_inclusion);
|
| 491 |
|
575 |
|
| 492 |
$tableau_inclusion = array($tableau_infoDep['SOURCES'], $tableau_infoDep['CORRESPONDANTS']);
|
576 |
$tableau_inclusion = array($tableau_infoDep['SOURCES'], $tableau_infoDep['CORRESPONDANTS']);
|
| 493 |
$res .= inclusion_html('info_dep', $tableau_inclusion);
|
577 |
$res .= inclusion_html('info_dep', $tableau_inclusion);
|
| 494 |
|
578 |
|
| 495 |
//La fonction gérant l'affichage de la liste alphabétique et
|
579 |
//La fonction gérant l'affichage de la liste alphabétique et
|
| 496 |
//de l'affichage suite à une seléction dans la liste.
|
580 |
//de l'affichage suite à une seléction dans la liste.
|
| 497 |
$tablo_inclusion = array($lettre);
|
581 |
$tablo_inclusion = array($lettre);
|
| 498 |
$res .= FRAG_rechercherAvecAlphabet($requete_04, $GLOBALS['_ECHORO_']['url']->getURL(), '&departement='.$tableau_infoDep['NUMERO'].'&nombre_taxon='.$nombre_taxon,
|
582 |
$res .= FRAG_rechercherAvecAlphabet($requete_04, $GLOBALS['_ECHORO_']['url']->getURL(), '&departement='.$tableau_infoDep['NUMERO'].'&nombre_taxon='.$nombre_taxon,
|
| 499 |
inclusion_html('tab_ouvre_liste_taxon', $tablo_inclusion), inclusion_html('tab_evol_ferme'), $tablo_formatLigne,
|
583 |
inclusion_html('tab_ouvre_liste_taxon', $tablo_inclusion), inclusion_html('tab_evol_ferme'), $tablo_formatLigne,
|
| 500 |
$tablo_formatResultat, $message_alerte, $fragmenteur);
|
584 |
$tablo_formatResultat, $message_alerte, $fragmenteur);
|
| 501 |
|
585 |
|
| 502 |
return remplaceEntiteHTLM($res);
|
586 |
return remplaceEntiteHTLM($res);
|
| 503 |
} else {
|
587 |
} else {
|
| 504 |
//Affichage de la carte de france des départements.
|
588 |
//Affichage de la carte de france des départements.
|
| 505 |
//L'utilisateur arrive sur la page.
|
589 |
//L'utilisateur arrive sur la page.
|
| 506 |
$tableau_inclusion = array($nbre_liste);
|
590 |
$tableau_inclusion = array($nbre_liste);
|
| 507 |
$res = inclusion_html('titre_carte', $tableau_inclusion);//Le titre dans une ligne de tableau
|
591 |
$res = inclusion_html('titre_carte', $tableau_inclusion);//Le titre dans une ligne de tableau
|
| Line 527... |
Line 611... |
| 527 |
|
611 |
|
| 528 |
|
612 |
|
| 529 |
/* +--Fin du code ----------------------------------------------------------------------------------------+
|
613 |
/* +--Fin du code ----------------------------------------------------------------------------------------+
|
| - |
|
614 |
*
|
| - |
|
615 |
* $Log: not supported by cvs2svn $
|
| - |
|
616 |
* Revision 1.9 2005/06/30 15:23:02 jpm
|
| 530 |
*
|
617 |
* Utilisation d'un fichier javascript à part.
|
| 531 |
* $Log: not supported by cvs2svn $
|
618 |
*
|
| 532 |
* Revision 1.8 2005/05/31 13:45:10 jpm
|
619 |
* Revision 1.8 2005/05/31 13:45:10 jpm
|
| 533 |
* Mise en place de la gestion entités html.
|
620 |
* Mise en place de la gestion entités html.
|
| 534 |
*
|
621 |
*
|