source: pmb4.2/trunk/fuentes/pmb/autorites/subjects/thes_form.inc.php @ 815

Last change on this file since 815 was 815, checked in by jrpelegrina, 4 years ago

Initial release of pmb 4.2

  • Property svn:executable set to *
File size: 3.2 KB
Line 
1<?php
2// +-------------------------------------------------+
3// © 2002-2004 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
4// +-------------------------------------------------+
5// $Id: thes_form.inc.php,v 1.10 2009-12-18 11:18:25 mbertin Exp $
6
7if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) die("no access");
8
9// inclusions diverses
10include_once("$include_path/templates/thesaurus.tpl.php");
11require_once("$class_path/thesaurus.class.php");
12require_once("$class_path/XMLlist.class.php");
13
14if(!$id_thes) $id_thes = 0;
15$update_url = "./autorites.php?categ=categories&sub=thes_update&id_thes=".$id_thes;
16$delete_url = "./autorites.php?categ=categories&sub=thes_delete&id_thes=".$id_thes;
17$cancel_url = "./autorites.php?categ=categories&sub=thes"; 
18
19
20//Récuperation de la liste des langues définies pour l'interface
21$langages = new XMLlist("$include_path/messages/languages.xml", 1);
22$langages->analyser();
23$lg = $langages->table;
24
25//Récuperation de la liste des langues définies pour les thésaurus
26$thes_liste_trad = thesaurus::getTranslationsList();
27$lg1 = array();
28foreach($thes_liste_trad as $dummykey=>$item) {
29        if ($lg[$item]!= '') $lg1[$item] = $lg[$item];
30}
31
32
33if($id_thes) {  //modification
34       
35        $title = $msg[thes_modification];
36        $delete_button = "<input type='button' class='bouton' value='$msg[63]' onClick=\"confirm_delete();\">";
37                       
38        // on récupère les données du thesaurus
39        $thes = new thesaurus($id_thes);
40       
41        $identifiant_thesaurus = "<div class='row'><label class='etiquette' >".$msg[38]."</label></div>";
42        $identifiant_thesaurus.= "<div class='row'><input type='text' class='saisie-5emd' id='numero_thesaurus' name='numero_thesaurus' readonly='readonly' value='".$id_thes."' /></div>";
43
44        $libelle_thesaurus = $thes->libelle_thesaurus; 
45
46        $langue_defaut = htmlentities(addslashes($lg[$thes->langue_defaut]),ENT_QUOTES, $charset);
47               
48} else {        //creation
49       
50               
51        $title = $msg[thes_creation];
52        $delete_button = '';
53       
54        $identifiant_thesaurus = '';
55        $libelle_thesaurus = '';
56       
57        $langue_defaut = "<select class='saisie-30em' id='langue_defaut' name='langue_defaut' >";
58        foreach($lg1 as $key=>$value){
59                $langue_defaut.= "<option value='".$key."' ";
60                if($key == $lang)$langue_defaut.= " selected ";
61                $langue_defaut.= " >".htmlentities(addslashes($value),ENT_QUOTES, $charset)."</option>";
62        }
63        $langue_defaut.= "</select>";
64       
65}
66
67if(($id_thes) && thesaurus::hasCateg($id_thes)){
68        $thes_form = str_replace('!!thesaurus_as_categ!!', "oui", $thes_form);
69}else{
70        $thes_form = str_replace('!!thesaurus_as_categ!!', "non", $thes_form);
71}
72
73$thes_form = str_replace('!!id_thes!!', $id_thes, $thes_form);
74$thes_form = str_replace('!!form_title!!', $title, $thes_form);
75$thes_form = str_replace('!!identifiant_thesaurus!!', $identifiant_thesaurus, $thes_form);
76$thes_form = str_replace('!!libelle_thesaurus!!', $libelle_thesaurus, $thes_form);
77$thes_form = str_replace('!!langue_defaut!!', $langue_defaut, $thes_form);
78$thes_form = str_replace('!!update_url!!', $update_url, $thes_form);
79$thes_form = str_replace('!!delete_url!!', $delete_url, $thes_form);
80$thes_form = str_replace('!!cancel_url!!', $cancel_url, $thes_form);
81
82$thes_form = str_replace('!!delete_button!!', $delete_button, $thes_form);
83
84
85print $thes_form;
Note: See TracBrowser for help on using the repository browser.