echo "<div style=\"float:right;\">";
echo "<button id=\"enregistrer1-add-button\">" . $lang[$lang_select]['enregistrer'] . "</button> ";
echo "<button id=\"retour1-button\">" . $lang[$lang_select]['liste_taxons'] . "</button> ";
echo "</div><br><br>";
echo "<br><br>";
echo "<div id=\"radio2\">";
echo "<input type=\"hidden\" name=\"etape\" id=\"etape2\" value=\"2\">";
/*------------------------------------------------------------------------------ AJOUT Fiche */
$rang = array('' => '', 'ES' => 'ES', 'SSES' => 'SSES', 'VAR' => 'VAR', 'SVAR' => 'SVAR', 'FO' => 'FO', 'SSFO' => 'SSFO', 'CAR' => 'CAR');
echo "<fieldset><LEGEND>Taxonomie</LEGEND>";
metaform_text("Code NOM.", "", "", "style=width:10em;", "cd_nom", "");
metaform_text("Famille", "", "", "style=width:30em;", "famille", "");
metaform_text("Nom scientifique", "", "", "style=width:30em;", "nom_complet", "");
metaform_text("Nom(s) vernaculaire(s)", "", "", "style=width:51em;", "nom_vern", "");
metaform_sel("Rang", "", "", $rang, "rang", "");
metaform_bout("Taxon hybride?", "", "hybride", "");
echo "</fieldset>";
echo "<fieldset><LEGEND>Rubrique</LEGEND>";
metaform_bool("Rub. CATNAT", "", "catnat", "f");
metaform_bool("Rub. Liste rouge", "", "liste_rouge", "f");
metaform_bool("Rub Liste EEE", "", "eee", "f");
echo "</fieldset>";
/*------------------------------------------------------------------------------ SAVE */
echo "<div style=\"float:right;\"><br>";
echo "<button id=\"enregistrer2-add-button\">" . $lang[$lang_select]['enregistrer'] . "</button> ";
echo "<button id=\"retour2-button\">" . $lang[$lang_select]['liste_taxons'] . "</button> ";
echo "</div>";
echo "</form>";
echo "</div>";
echo "<div id=\"exit-confirm\" title=\"Retour\">";
echo "<p><span class=\"ui-icon ui-icon-alert\" style=\"float:left; margin:0 7px 20px 0;\"></span>" . $lang[$lang_select]['retour_dialog'] . "</p>";
metaform_sel("Catégorie C1", $desc2, null, $ref[$champ_ref['cat_c1']], "cat_c1", pg_result($result, 0, "cat_c1"));
metaform_sel("Justification du critère C1", $desc2, null, $ref[$champ_ref['crit_c1']], "crit_c1", pg_result($result, 0, "crit_c1"));
echo "<br>";
metaform_sel("Catégorie C2", $desc2, null, $ref[$champ_ref['cat_c2']], "cat_c2", pg_result($result, 0, "cat_c2"));
metaform_sel("Justification du critère C2", $desc2, null, $ref[$champ_ref['crit_c2']], "crit_c2", pg_result($result, 0, "crit_c2"));
echo "</td><td width=290>";
echo "<br>";
metaform_sel("Catégorie D", $desc2, null, $ref[$champ_ref['cat_d']], "cat_d", pg_result($result, 0, "cat_d"));
metaform_text("Justification du critère D", $desc2, 10, null, "just_d", pg_result($result, 0, "just_d"));
echo "<br>";
metaform_sel("Catégorie D1", $desc2, null, $ref[$champ_ref['cat_d1']], "cat_d1", pg_result($result, 0, "cat_d1"));
metaform_text("Justification du critère D1", $desc2, 10, null, "crit_d1", pg_result($result, 0, "crit_d1"));
echo "<br>";
metaform_sel("Catégorie D2", $desc2, null, $ref[$champ_ref['cat_d2']], "cat_d2", pg_result($result, 0, "cat_d2"));
metaform_text("Justification du critère D2", $desc2, 26, null, "crit_d2", pg_result($result, 0, "crit_d2"));
metaform_bout("Menace directe", $desc2, "menace", pg_result($result, 0, "menace"));
echo "</td><td width=250>";
echo "<br>";
metaform_sel("Catégorie E", $desc2, null, $ref[$champ_ref['cat_e']], "cat_e", pg_result($result, 0, "cat_e"));
metaform_text("Justification du critère E", $desc2, 10, null, "just_e", pg_result($result, 0, "just_e"));
echo "</td></tr></table>";
echo "<hr>";
echo "<table border=0 width=\"100%\"><tr valign=top ><td width=250>";
echo "<br>";
metaform_text("Catégorie Préced", " bloque", 10, "", "cat_preced", $ref['categorie_final'][pg_result($result, 0, "cat_preced")]);
metaform_text("Critère(s) Préced", " bloque", 10, "", "just_preced", pg_result($result, 0, "just_preced"));
echo "</td><td width=250>";
echo "<br>";
metaform_text("Catégorie EU", " bloque", 10, "", "cat_euro", $ref['categorie_final'][pg_result($result, 0, "cat_euro")]);
metaform_text("Critère(s) EU", " bloque", 10, "", "just_euro", pg_result($result, 0, "just_euro"));
echo "</td><td width=100>";
$query = $query_module . $id . ";";
$result = pg_query($db, $query) or fatal_error("Erreur pgSQL : " . pg_result_error($result), false);
if (pg_num_rows($result)) {
echo "<br><br>";
echo "<input type=\"hidden\" name=\"zone\" id=\"zone1\" value=\"gl\">";
echo "<div id=\"radio2\">";
echo "<input type=\"hidden\" name=\"etape\" id=\"etape2\" value=\"2\">";
echo "<input type=\"hidden\" name=\"uid\" id=\"uid\" value=\"" . pg_result($result, 0, "uid") . "\">";
//------------------------------------------------------------------------------ EDIT LR GRP1
echo "<div id=\"radio2\">";
echo "<fieldset><LEGEND>" . $lang[$lang_select]['groupe_lr_1'] . "</LEGEND>";
echo "<table border=0 width=\"100%\"><tr valign=top >";
echo "<td style=\"width: 800px;\">";
metaform_text("Nom scientifique", " bloque", 100, "", "nom_sci", pg_result($result, 0, "nom_sci"));
metaform_text("Nom vernaculaire", " bloque", 100, "", "nom_vern", pg_result($result, 0, "nom_vern"));
metaform_bout("Taxon hybride?", " bloque", "hybride", pg_result($result, 0, "hybride"));
echo "</td><td style=\"width:300px;\">";
metaform_text("Code REF.", " bloque", 8, "", "cd_ref", pg_result($result, 0, "cd_ref"));
metaform_sel("Rang", " bloque", "", $ref[$champ_ref['lib_rang']], "lib_rang", pg_result($result, 0, "lib_rang"));
echo "</td><td>";
if ($niveau >= 128) {
echo "<a href = \"../refnat/index.php?m=edit&id={$id}\" class=edit id=\"modif_taxon\" ><img src=\"../../_GRAPH/psuiv.gif\" title=\"Accès rapide Refnat\" ></a>";
}
echo "</td></tr></table>";
echo "<br><label class=\"preField\">Commentaires sur le taxon</label><textarea name=\"commentaire\" style=\"width:70em;\" rows=\"2\" >" . sql_format_quote(pg_result($result, 0, "commentaire"), 'undo_html') . "</textarea><br><br>";
echo "</fieldset>";
echo "</div>";
//------------------------------------------------------------------------------ EDIT EEE GRP2
$questionnaire = array(1 => array("code" => "ag", "titre" => array(1 => "Correspondance climatique", 2 => "Statut de l'espèce en Europe", 3 => "Distribution en Europe", 4 => "Répartition mondiale")), 2 => array("code" => "bg", "titre" => array(5 => "viabilité des graines et reproduction", 6 => "Croissance végétative", 7 => "Mode dispersion", 8 => "Type biologique")), 3 => array("code" => "cg", "titre" => array(9 => "Mauvaise herbe agricole ailleurs", 10 => "Taxonomie", 11 => "Habitat de l'espèce", 12 => "Densité de la population")));
foreach ($questionnaire as $ooo => $info) {
echo "<div id=\"radio2\">";
echo "<a class=edit id=\"page_catnat\" href=\"../catnat/index.php?m=edit&id={$id}\"><img src=\"../../_GRAPH/psuiv.gif\" title=\"Accès rapide Catalogue National\"></a>";
}
echo "<BR>";
metaform_bool("Rubrique Liste rouge", $desc, "lr", pg_result($result, 0, "lr"));
if ($_SESSION['niveau_lr'] >= 128 and pg_result($result, 0, "lr") == 't') {
echo "<a class=edit id=\"page_lr\" href=\"../lr/index.php?m=edit&id={$id}\"><img src=\"../../_GRAPH/psuiv.gif\" title=\"Accès rapide Liste rouge\"></a>";
}
echo "<BR>";
metaform_bool("Rubrique Liste EEE", $desc, "eee", pg_result($result, 0, "eee"));
if ($_SESSION['niveau_eee'] >= 128 and pg_result($result, 0, "eee") == 't') {
echo "<a class=edit id=\"page_eee\" href=\"../eee/index.php?m=edit&id={$id}\"><img src=\"../../_GRAPH/psuiv.gif\" title=\"Accès rapide Liste EEE\"></a>";
}
echo "<BR>";
echo "</td><td valign=\"top\">";
echo "Informations supplémentaires sur le taxon : <BR>";
metaform_bout("Hybride", $desc, "hybride", pg_result($result, 0, "hybride"));
echo "</td></tr></table>";
echo "</fieldset>";
/*------------------------------------------------------------------------------ EDIT fieldset2*/
/*Requete référentiels*/
$cd_nom = pg_result($result, 0, "cd_nom");
$hybride = pg_result($result, 0, "hybride");
$flag = 0;
/*Nomenclature*/
$select_fcbn["Nomenclature"] = $select0["Nomenclature"] = $select1["Nomenclature"] = $select2["Nomenclature"] = $select3["Nomenclature"] = $select4["Nomenclature"] = " ,cd_nom::text, cd_ref::text, lb_nom, lb_auteur, nom_complet, nom_valide, nom_vern, nom_vern_eng";
/*Taxonomie*/
$select_fcbn["Taxonomie"] = $select0["Taxonomie"] = ", cd_sup::text, cd_taxsup::text, rang, regne, phylum, classe, ordre, famille";
$select1["Taxonomie"] = $select2["Taxonomie"] = $select3["Taxonomie"] = ", '-' as cd_sup, cd_taxsup::text, rang, regne, phylum, classe, ordre, famille";
$select4["Taxonomie"] = ", '-' as cd_sup, '-' as cd_taxsup, rang, regne, phylum, classe, ordre, famille";
/*Répartition*/
$select_fcbn["Répartition"] = $select0["Répartition"] = $select1["Répartition"] = $select2["Répartition"] = ", fr, gf, mar, gua, sm, sb, spm, may, epa, reu, taaf, pf, nc, wf, cli, habitat::text";
