| 64 |
jpm |
1 |
<?php
|
|
|
2 |
global $gBlock;
|
|
|
3 |
|
| 78 |
jpm |
4 |
function construireNomLatin($donnees)
|
| 64 |
jpm |
5 |
{
|
| 78 |
jpm |
6 |
// Constitution du nom:
|
| 64 |
jpm |
7 |
$nom = '';
|
|
|
8 |
$auteur_basio = '';
|
|
|
9 |
$auteur_modif = '';
|
|
|
10 |
if (!empty($donnees['en_nom_supra_generique'])) {
|
|
|
11 |
$nom .= $donnees['en_nom_supra_generique'];
|
|
|
12 |
} else if (!empty($donnees['en_epithete_infra_generique'])){
|
|
|
13 |
$nom .= $donnees['en_epithete_infra_generique'];
|
|
|
14 |
} else {
|
|
|
15 |
if (!empty($donnees['en_nom_genre'])) {
|
|
|
16 |
$nom .= $donnees['en_nom_genre'];
|
|
|
17 |
}
|
|
|
18 |
if (!empty($donnees['en_epithete_espece'])) {
|
|
|
19 |
$nom .= ' '.$donnees['en_epithete_espece'];
|
|
|
20 |
}
|
|
|
21 |
if (!empty($donnees['en_epithete_infra_specifique'])) {
|
|
|
22 |
if (!empty($donnees['enrg_abreviation_rang'])) {
|
|
|
23 |
$nom .= ' '.$donnees['enrg_abreviation_rang'];
|
|
|
24 |
}
|
|
|
25 |
$nom .= ' '.$donnees['en_epithete_infra_specifique'];
|
|
|
26 |
}
|
|
|
27 |
}
|
|
|
28 |
|
| 78 |
jpm |
29 |
if (!empty($donnees['intitule_abrege_auteur_basio_ex']) && $donnees['en_ce_auteur_basio_ex'] != 0) {
|
| 64 |
jpm |
30 |
$auteur_basio .= $donnees['intitule_abrege_auteur_basio_ex'];
|
|
|
31 |
if (!empty($donnees['intitule_abrege_auteur_basio'])) {
|
|
|
32 |
$auteur_basio .= ' ex '.$donnees['intitule_abrege_auteur_basio'];
|
|
|
33 |
}
|
| 78 |
jpm |
34 |
} else if (!empty($donnees['intitule_abrege_auteur_basio']) && $donnees['en_ce_auteur_basio'] != 0) {
|
|
|
35 |
|
| 64 |
jpm |
36 |
$auteur_basio .= $donnees['intitule_abrege_auteur_basio'];
|
|
|
37 |
}
|
| 78 |
jpm |
38 |
if (!empty($donnees['intitule_abrege_auteur_modif_ex']) && $donnees['en_ce_auteur_modif_ex'] != 0) {
|
| 64 |
jpm |
39 |
$auteur_modif .= $donnees['intitule_abrege_auteur_modif_ex'];
|
|
|
40 |
if (!empty($donnees['intitule_abrege_auteur_modif'])) {
|
|
|
41 |
$auteur_modif .= ' ex '.$donnees['intitule_abrege_auteur_modif'];
|
|
|
42 |
}
|
| 78 |
jpm |
43 |
} else if (!empty($donnees['intitule_abrege_auteur_modif']) && $donnees['en_ce_auteur_modif'] != 0) {
|
| 64 |
jpm |
44 |
$auteur_modif .= $donnees['intitule_abrege_auteur_modif'];
|
|
|
45 |
}
|
|
|
46 |
if (!empty($auteur_modif)) {
|
|
|
47 |
$nom .= ' ('.$auteur_basio.') ex '.$auteur_modif;
|
|
|
48 |
} else {
|
|
|
49 |
$nom .= ' '.$auteur_basio;
|
|
|
50 |
}
|
|
|
51 |
|
| 78 |
jpm |
52 |
return $nom;
|
|
|
53 |
}
|
|
|
54 |
|
|
|
55 |
function pattern1($donnees)
|
|
|
56 |
{
|
|
|
57 |
$retour = '';
|
|
|
58 |
//$retour .= '<pre>'.print_r($donnees, true).'</pre>';
|
|
|
59 |
//$retour .= '<br>';
|
|
|
60 |
$retour .= 'Numéro nomenclatural absolu : '.$donnees['en_id_nom']."\n";
|
|
|
61 |
$retour .= '<br />';
|
|
|
62 |
$retour .= 'Nom sélectionné précédemment : '.construireNomLatin($donnees).'<br />'."\n";
|
| 64 |
jpm |
63 |
return $retour;
|
|
|
64 |
}
|
|
|
65 |
|
| 78 |
jpm |
66 |
function pattern2($donnees)
|
|
|
67 |
{
|
|
|
68 |
$retour = '';
|
|
|
69 |
//$retour .= '<pre>'.print_r($donnees, true).'</pre>';
|
|
|
70 |
//$retour .= '<br>';
|
|
|
71 |
$retour .= '<option value="'.$donnees['eprv_id_version'].'">'.$donnees['eprv_nom'].' '.$donnees['epr_intitule_projet'].'</option>';
|
|
|
72 |
return $retour;
|
|
|
73 |
}
|
|
|
74 |
|
|
|
75 |
function pattern3($donnees)
|
|
|
76 |
{
|
|
|
77 |
$retour = '';
|
|
|
78 |
//$retour .= '<pre>'.print_r($donnees, true).'</pre>';
|
|
|
79 |
//$retour .= '<br>';
|
|
|
80 |
$retour .= '<li>'.$donnees['en_id_nom'].'</li>'."\n";
|
|
|
81 |
return $retour;
|
|
|
82 |
}
|
|
|
83 |
|
|
|
84 |
|
| 64 |
jpm |
85 |
class fiche_synthese_xhtml implements iVue {
|
|
|
86 |
|
|
|
87 |
protected $leBlock;
|
|
|
88 |
|
|
|
89 |
function __construct($unBlock)
|
|
|
90 |
{
|
|
|
91 |
$this->leBlock = $unBlock;
|
|
|
92 |
}
|
|
|
93 |
|
|
|
94 |
function serialiser()
|
|
|
95 |
{
|
| 78 |
jpm |
96 |
// La page xhtml :
|
|
|
97 |
$html_tete = '<?xml version="1.0" encoding="utf-8" ?>'."\n";
|
|
|
98 |
$html_tete .= '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "../../../commun/generique/dtd/xhtml1-strict.dtd">'."\n";
|
|
|
99 |
$html_tete .= '<html xmlns="http://w ww.w3.org/1999/xhtml" lang="fr" >'."\n";
|
| 64 |
jpm |
100 |
|
| 78 |
jpm |
101 |
$entete = '<head>'."\n";
|
|
|
102 |
$entete .= '<!-- BEGIN entete -->'."\n";
|
|
|
103 |
$entete .= '<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />'."\n";
|
|
|
104 |
$entete .= '<meta http-equiv="Content-style-type" content="text/css" />'."\n";
|
|
|
105 |
$entete .= '<meta http-equiv="Content-script-type" content="text/javascript />'."\n";
|
|
|
106 |
$entete .= '<meta http-equiv="Content-language" content="fr" />'."\n";
|
|
|
107 |
$entete .= '<title>Synthèse d\'un nom latin</title>'."\n";
|
|
|
108 |
$entete .= '<!-- END entete -->'."\n";
|
|
|
109 |
$entete .= '</head>'."\n";
|
| 64 |
jpm |
110 |
|
| 78 |
jpm |
111 |
$tab_corps[1] = '<body>'."\n";
|
|
|
112 |
$tab_corps[1] .= '<!-- BEGIN corps -->'."\n";
|
|
|
113 |
$tab_corps[1] .= '<h1>'.'Synthèse d\'un nom latin'.'</h1>'."\n";
|
|
|
114 |
$tab_corps[1] .= '<h2>'.'Informations sur le nom :'.'</h2>'."\n";
|
|
|
115 |
$tab_corps[1] .= '<p>'."\n";
|
|
|
116 |
$tab_block[1] = $this->leBlock->afficherPattern('FICHE_SYNTHESE>NOM_LATIN','pattern1');
|
|
|
117 |
$tab_corps[2] = '</p>'."\n";
|
|
|
118 |
$tab_corps[2] .= '<h2>'.'Présent dans : '.'</h2>'."\n";
|
|
|
119 |
$tab_corps[2] .= '<form id="eflore_form_projet" action="{UrlProjetChangement}" method="post">'."\n";
|
|
|
120 |
$tab_corps[2] .= '<select id="eflore_projet_version">';
|
|
|
121 |
$tab_block[2] = $this->leBlock->afficherPattern('FICHE_SYNTHESE>NOM_SELECTION','pattern2');
|
|
|
122 |
$tab_corps[3] .= '</select>';
|
|
|
123 |
$tab_corps[3] .= '<input type="submit" value="ok" />';
|
|
|
124 |
$tab_corps[3] .= '</form>'."\n";
|
|
|
125 |
$tab_corps[3] .= '<h2>'.'Synonymie : '.'</h2>'."\n";
|
|
|
126 |
$tab_corps[3] .= '<ol>'."\n";
|
|
|
127 |
$tab_block[3] = $this->leBlock->afficherPattern('FICHE_SYNTHESE>TAXON_NOMS','pattern3');
|
|
|
128 |
$tab_corps[4] .= '</ol>'."\n";
|
|
|
129 |
$tab_corps[4] .= '<!-- END corps -->'."\n";
|
|
|
130 |
$tab_corps[4] .= '</body>'."\n";
|
|
|
131 |
$html_pied = '</html>'."\n";
|
|
|
132 |
|
|
|
133 |
// Passage en utf8 du code xhtml
|
|
|
134 |
$retour = utf8_encode($html_tete);
|
|
|
135 |
$retour .= utf8_encode($entete);
|
|
|
136 |
foreach ($tab_corps as $cle => $val) {
|
|
|
137 |
$retour .= utf8_encode($val);
|
|
|
138 |
if (isset($tab_block[$cle])) {
|
|
|
139 |
$retour .= utf8_encode($tab_block[$cle]);
|
|
|
140 |
}
|
|
|
141 |
}
|
|
|
142 |
$retour .= utf8_encode($html_pied);
|
|
|
143 |
|
|
|
144 |
// Envoi au navigateur
|
| 64 |
jpm |
145 |
echo $retour;
|
|
|
146 |
}
|
|
|
147 |
}
|
|
|
148 |
?>
|