Subversion Repositories Applications.papyrus

Rev

Rev 110 | Rev 130 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
7 jpm 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
8 
// | This library is free software; you can redistribute it and/or                                        |
9 
// | modify it under the terms of the GNU Lesser General Public                                           |
10 
// | License as published by the Free Software Foundation; either                                         |
11 
// | version 2.1 of the License, or (at your option) any later version.                                   |
12 
// |                                                                                                      |
13 
// | This library is distributed in the hope that it will be useful,                                      |
14 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
15 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
16 
// | Lesser General Public License for more details.                                                      |
17 
// |                                                                                                      |
18 
// | You should have received a copy of the GNU Lesser General Public                                     |
19 
// | License along with this library; if not, write to the Free Software                                  |
20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21 
// +------------------------------------------------------------------------------------------------------+
128 jpm 22 
// CVS : $Id: adme_menu_classique.fonct.php,v 1.5 2004-11-04 19:11:38 jpm Exp $
7 jpm 23 
/**
24 
* Fonctions de gestion des menus classiques
25 
*
26 
* Permet de lister, d'ajouter, de modifier, et de déplacer des menus classiques.
27 
* Par menus classiques nous entendons tous les menus devant paraitre dans l'arborescences
28 
* des menus disponibles pour le site courant.
29 
*
25 jpm 30 
*@package Admin_menu
7 jpm 31 
*@subpackage Fonctions
32 
//Auteur original :
33 
*@author        Laurent COUDOUNEAU <lc@gsite.org>
34 
//Autres auteurs :
35 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
36 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
37 
*@copyright     Tela-Botanica 2000-2004
128 jpm 38 
*@version       $Revision: 1.5 $ $Date: 2004-11-04 19:11:38 $
7 jpm 39 
// +------------------------------------------------------------------------------------------------------+
40 
*/
41 
 
42 
// +------------------------------------------------------------------------------------------------------+
43 
// |                                            ENTÊTE du PROGRAMME                                       |
44 
// +------------------------------------------------------------------------------------------------------+
45 
 
46 
 
47 
// +------------------------------------------------------------------------------------------------------+
48 
// |                                           LISTE de FONCTIONS                                         |
49 
// +------------------------------------------------------------------------------------------------------+
110 jpm 50 
 
128 jpm 51 
/** Fonction ADME_ajouterMenuClassique() - Ajoute un sous menu au menu courant
7 jpm 52 
*
128 jpm 53 
* Ancien nom : addMenu()
54 
*
7 jpm 55 
*   @param  string  Le projet courant
56 
*   @param  string  La langue courante
57 
*   @return void le menu classique est ajouté à la base de données.
58 
*/
128 jpm 59 
function ADME_ajouterMenuClassique($db, $auth, $adme_site_id, $adme_menu_id)
7 jpm 60 
{
61 
    //----------------------------------------------------------------------------
62 
    // Récupération d'infos sur le site principal.
128 jpm 63 
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
64 
    if ($objet_site == false) {
7 jpm 65 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
128 jpm 66 
            'ID du site : '.$adme_site_id.'<br />'.
7 jpm 67 
            'Ligne n° : '. __LINE__ .'<br />'.
68 
            'Fichier n° : '. __FILE__ .'<br />');
69 
    }
70 
 
71 
    $nouveau_id_menu = SQL_obtenirNouveauId($db, 'gen_menu', 'gm_id_menu');
128 jpm 72 
    $auteur = $auth->getAuthData('ga_prenom').' '.$auth->getAuthData('ga_nom');
7 jpm 73 
 
74 
    //----------------------------------------------------------------------------
75 
    // Ajout du nouveau menu
76 
    $requete =  'INSERT INTO gen_menu '.
77 
                'SET gm_id_menu = '.$nouveau_id_menu.', '.
128 jpm 78 
                'gm_ce_site = '.$adme_site_id.', '.
79 
                'gm_ce_i18n = "'.$objet_site->gs_ce_i18n.'", '.
7 jpm 80 
                'gm_ce_application = 0, '.
81 
                'gm_code_num = '.$nouveau_id_menu.', '.
82 
                'gm_code_alpha = "menu_'.$nouveau_id_menu.'", '.
83 
                'gm_nom = "menu_'.$nouveau_id_menu.'", '.
128 jpm 84 
                'gm_titre = "menu_'.$nouveau_id_menu.'", '.
85 
                'gm_description_resume = "menu_'.$nouveau_id_menu.'", '.
7 jpm 86 
                'gm_auteur = "'.$auteur.'", '.
128 jpm 87 
                'gm_editeur = "'.$objet_site->gs_auteur.'", '.
7 jpm 88 
                'gm_date_creation = "'.date('Y-m-d H:i:s').'", '.
89 
                'gm_date_soumission = "'.date('Y-m-d H:i:s').'", '.
90 
                'gm_date_acceptation = "'.date('Y-m-d H:i:s').'", '.
91 
                'gm_date_publication = "'.date('Y-m-d H:i:s').'", '.
92 
                'gm_date_debut_validite = "'.date('Y-m-d H:i:s').'", '.
93 
                'gm_date_copyright = "'.date('Y-00-00 00:00:00').'", '.
94 
                'gm_categorie = "menu", '.
128 jpm 95 
                'gm_ce_admin = '.$auth->getAuthData('ga_id_administrateur').' '
7 jpm 96 
                ;
97 
 
128 jpm 98 
    $resultat = $db->query($requete);
99 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 100 
 
101 
    //----------------------------------------------------------------------------
102 
    // Ajout de la relation "père"
103 
 
128 jpm 104 
    if (!isset($adme_menu_id) && empty($adme_menu_id)) {
105 
        $adme_menu_id = 0 ;// Identifiant du père
7 jpm 106 
    }
107 
    //----------------------------------------------------------------------------
108 
    // Récupération d'infos sur la hierarchie du menu
109 
    $requete =  'SELECT * '.
110 
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
128 jpm 111 
                'WHERE GMR01.gmr_id_menu_02 = '.$adme_menu_id.' '.
7 jpm 112 
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
113 
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
114 
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
115 
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
116 
                'ORDER BY GMR01.gmr_ordre DESC';
117 
 
128 jpm 118 
    $resultat = $db->query($requete);
119 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 120 
 
128 jpm 121 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
122 
    $nouveau_ordre_menu = $ligne->gmr_ordre + 1;
123 
    $resultat->free();
7 jpm 124 
 
125 
    $requete =  'INSERT INTO gen_menu_relation '.
128 jpm 126 
                'SET gmr_id_menu_02 = '.$adme_menu_id.', '.
7 jpm 127 
                'gmr_id_menu_01 = '.$nouveau_id_menu.', '.
128 
                'gmr_id_valeur = 1, '.
129 
                'gmr_ordre = '.$nouveau_ordre_menu;
130 
 
128 jpm 131 
    $resultat = $db->query($requete);
132 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 133 
 
134 
    //----------------------------------------------------------------------------
135 
    // Ajout de la relation-type "menu classique"
136 
 
137 
    // Récupération d'infos sur la hierarchie du menu
138 
    $requete =  'SELECT * '.
139 
                'FROM gen_menu_relation, gen_menu '.
140 
                'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.
141 
                'AND gmr_id_valeur = 100 '.// 10 = type menu "classique"
142 
                'AND gmr_id_menu_01 = gm_id_menu '.
128 jpm 143 
                'AND gm_ce_site = '.$adme_site_id.' '.
7 jpm 144 
                'ORDER BY gmr_ordre DESC';
145 
 
128 jpm 146 
    $resultat = $db->query($requete);
147 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 148 
 
128 jpm 149 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
150 
    $nouveau_ordre_menu_classique = $ligne->gmr_ordre + 1;
151 
    $resultat->free();
7 jpm 152 
 
153 
    $requete =  'INSERT INTO gen_menu_relation '.
154 
                'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.
155 
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
156 
                'gmr_id_valeur = 100, '.
157 
                'gmr_ordre = '.$nouveau_ordre_menu_classique;
158 
 
159 
    $result = $db->query($requete);
160 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
161 
}
162 
 
128 jpm 163 
/** Fonction ADME_afficherFormMenuClassique() - Affiche le formulaire de saisie d'un menu
7 jpm 164 
*
128 jpm 165 
* Ancien nom : showMenu()
7 jpm 166 
*
167 
*   @return  string  Le HTML
168 
*/
128 jpm 169 
function ADME_afficherFormMenuClassique($db, $url, $adme_site_id, $adme_menu_id, $aso_valeurs, $adme_menu_ouvert)
7 jpm 170 
{
171 
    // Initialisation de variable
128 jpm 172 
    $url->addQueryString('adme_site_id', $adme_site_id);
173 
    $url->addQueryString('adme_menu_id', $adme_menu_id);
174 
    $url->addQueryString('adme_menu_ouvert', $adme_menu_ouvert);
7 jpm 175 
 
128 jpm 176 
    // Nous sommes toujours en modification car un menu est ajouter automatiquement!
177 
    // Récupération des informations du menu concerné.
178 
    $aso_valeurs = GEN_lireInfoMenu($db, $adme_menu_id, DB_FETCHMODE_ASSOC);
179 
    if ($aso_valeurs == false) {
180 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du menu.<br />'.
181 
            'Idenitifiant du menu n° : '. $adme_menu_id .'<br />'.
7 jpm 182 
            'Ligne n° : '. __LINE__ .'<br />'.
183 
            'Fichier n° : '. __FILE__ .'<br />');
184 
    }
128 jpm 185 
    /*
186 
    // Récupération d'information sur le site de ce menu.
187 
    $site = GEN_lireInfoSitePrincipalCodeAlpha($db, $adme_site);
188 
    if ($site == false) {
189 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
190 
            'Code alpha du site : '. $adme_site .'<br />'.
7 jpm 191 
            'Ligne n° : '. __LINE__ .'<br />'.
192 
            'Fichier n° : '. __FILE__ .'<br />');
193 
    }
128 jpm 194 
    */
195 
    // Titre de la page
196 
    $retour = '<h1>'.'Modification menu'.'</h1>'."\n";
7 jpm 197 
 
198 
    // Création du formulaire
128 jpm 199 
    // Notes : Quickform semble remplacer les & des &amp; à nouveau par des &amp; solution utiliser str_replace()...
200 
    $form =& new HTML_QuickForm('form_menu_classique', 'post', str_replace('&amp;', '&', $url->getUrl()));
7 jpm 201 
    $tab_index = 1000;
202 
    $squelette =& $form->defaultRenderer();
203 
    $squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'{content}'."\n".'</form>'."\n");
204 
    $squelette->setElementTemplate(  '<li>'."\n".
205 
                                    '{label}'."\n".
206 
                                    '{element}'."\n".
207 
                                    '<!-- BEGIN required --><span class="symbole_obligatoire">*</span><!-- END required -->'."\n".
208 
                                    '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
209 
                                    '</li>'."\n");
210 
    $squelette->setRequiredNoteTemplate("\n".'<p><span class="symbole_obligatoire">*</span> {requiredNote}</p>'."\n");
211 
 
212 
    $partie_menu_debut = '<fieldset>'."\n".'<legend>Configuration du menu</legend>'."\n".'<ul>'."\n";
213 
    $form->addElement('html', $partie_menu_debut);
214 
 
215 
    $id = 'gm_code_num';
216 
    $aso_attributs = array('id'=>$id, 'tabindex' => $tab_index++, 'size' => 5, 'maxlength' => 100);
217 
    $label = '<label for="'.$id.'">'.'Code numérique du menu'.'</label>';
218 
    $form->addElement('text', $id, $label, $aso_attributs);
219 
    $form->addRule($id, 'Un code numérique est requis pour le menu !', 'required', '', 'client');
220 
 
221 
    $id = 'gm_code_alpha';
222 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 20, 'maxlength' => 20);
223 
    $label = '<label for="'.$id.'">'.'Code alphanumérique du menu'.'</label>';
224 
    $form->addElement('text', $id, $label, $aso_attributs);
225 
    $form->addRule($id, 'Un code alphanumérique est requis pour le menu !', 'required', '', 'client');
226 
 
227 
    $id = 'gm_nom';
228 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 100);
229 
    $label = '<label for="'.$id.'">'.'Nom du menu'.'</label>';
230 
    $form->addElement('text', $id, $label, $aso_attributs);
231 
    $form->addRule($id, 'Un nom est requis pour le menu !', 'required', '', 'client');
232 
    $form->applyFilter($id, 'trim');
233 
 
234 
    $id = 'gm_raccourci_clavier';
235 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 1, 'maxlength' => 1);
236 
    $label = '<label for="'.$id.'">'.'Raccourci clavier'.'</label>';
237 
    $form->addElement('text', $id, $label, $aso_attributs);
238 
 
239 
    $id = 'defaut';
240 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
241 
    $label = '<label for="'.$id.'">'.'En faire le menu par défaut'.'</label>';
242 
    $form->addElement('checkbox', $id, $label, '', $aso_attributs);
243 
 
244 
    $id = 'gm_fichier_squelette';
245 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 255);
246 
    $label = '<label for="'.$id.'">'.'Fichier squelette'.'</label>';
247 
    $form->addElement('text', $id, $label, $aso_attributs);
248 
 
249 
    $id = 'gm_description_resume';
250 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 50);
251 
    $label = '<label for="'.$id.'">'.'Contenu info-bulle'.'</label>';
252 
    $form->addElement('textarea', $id, $label, $aso_attributs);
253 
    $form->addRule($id, 'Une description courte pour l\'info-bulle est requise pour ce menu !', 'required', '', 'client');
254 
 
255 
    // Requête sur les applications
256 
    $requete =  'SELECT gap_id_application, gap_nom '.
257 
                'FROM gen_application '.
258 
                'WHERE gap_bool_applette = 0';// Pour éviter d'afficher les applettes.
259 
    $resultat = $db->query($requete);
260 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
261 
 
262 
    $aso_options = array();
263 
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
264 
        $aso_options[$ligne->gap_id_application] = $ligne->gap_nom;
265 
    }
266 
    $resultat->free();
267 
    $id = 'gm_ce_application';
268 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
269 
    $label = '<label for="'.$id.'">'.'Application'.'</label>';
270 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
271 
 
272 
    $id = 'gm_application_arguments';
273 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
274 
    $label = '<label for="'.$id.'">'.'Arguments de l\'application'.'</label>';
275 
    $form->addElement('text', $id, $label, $aso_attributs);
276 
 
277 
    $partie_menu_fin = '</ul>'."\n".'</fieldset>'."\n";
278 
    $form->addElement('html', $partie_menu_fin);
279 
 
280 
    $partie_entete_debut = '<fieldset>'."\n".'<legend>Entête des pages du menu</legend>'."\n".'<ul>'."\n";
281 
    $form->addElement('html', $partie_entete_debut);
282 
 
283 
    $id = 'gm_robot';
284 
    $aso_options = array(   'index,follow' => 'Indexer cette page et les suivantes',
285 
                            'index' => 'Indexer seulement cette page',
286 
                            'noindex' => 'Ne pas indexer cette page',
287 
                            'noindex,nofollow' => 'Ne pas indexer cette page et les suivantes',
288 
                            '' => 'Auncune');
289 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
290 
    $label = '<label for="'.$id.'">'.'Indexation par robots'.'</label>';
291 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
292 
 
293 
    $id = 'gm_titre';
294 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
295 
    $label = '<label for="'.$id.'">'.'Titre de la page'.'</label>';
296 
    $form->addElement('text', $id, $label, $aso_attributs);
297 
 
298 
    $id = 'gm_titre_alternatif';
299 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
300 
    $label = '<label for="'.$id.'">'.'Titre alternatif de la page'.'</label>';
301 
    $form->addElement('text', $id, $label, $aso_attributs);
302 
 
303 
    $id = 'gm_mots_cles';
304 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 50);
305 
    $label = '<label for="'.$id.'">'.'Mots-clés'.'</label>';
306 
    $form->addElement('textarea', $id, $label, $aso_attributs);
307 
 
308 
    $id = 'gm_description_libre';
309 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
310 
    $label = '<label for="'.$id.'">'.'Description du contenu '.'</label>';
311 
    $form->addElement('textarea', $id, $label, $aso_attributs);
312 
 
313 
    $id = 'gm_description_table_matieres';
314 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
315 
    $label = '<label for="'.$id.'">'.'Table des matières'.'</label>';
316 
    $form->addElement('textarea', $id, $label, $aso_attributs);
317 
 
318 
    $id = 'gm_source';
319 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
320 
    $label = '<label for="'.$id.'">'.'Source'.'</label>';
321 
    $form->addElement('text', $id, $label, $aso_attributs);
322 
 
323 
    $id = 'gm_auteur';
324 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
325 
    $label = '<label for="'.$id.'">'.'Auteur'.'</label>';
326 
    $form->addElement('text', $id, $label, $aso_attributs);
327 
 
328 
    $id = 'gm_contributeur';
329 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
330 
    $label = '<label for="'.$id.'">'.'Contributeur'.'</label>';
331 
    $form->addElement('textarea', $id, $label, $aso_attributs);
332 
 
333 
    $id = 'gm_editeur';
334 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
335 
    $label = '<label for="'.$id.'">'.'Editeur'.'</label>';
336 
    $form->addElement('textarea', $id, $label, $aso_attributs);
337 
 
338 
    $id = 'gm_date_debut_validite';
339 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
340 
    $label = '<label for="'.$id.'">'.'Date de début de validité'.'</label>';
341 
    $form->addElement('text', $id, $label, $aso_attributs);
342 
 
343 
    $id = 'gm_date_fin_validite';
344 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
345 
    $label = '<label for="'.$id.'">'.'Date de fin de validité'.'</label>';
346 
    $form->addElement('text', $id, $label, $aso_attributs);
347 
 
348 
    $id = 'gm_date_copyright';
349 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
350 
    $label = '<label for="'.$id.'">'.'Année pour le copyright'.'</label>';
351 
    $form->addElement('text', $id, $label, $aso_attributs);
352 
 
353 
    $id = 'gm_licence';
354 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
355 
    $label = '<label for="'.$id.'">'.'URL de la licence'.'</label>';
356 
    $form->addElement('text', $id, $label, $aso_attributs);
357 
 
358 
    $id = 'gm_categorie';
359 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
360 
    $label = '<label for="'.$id.'">'.'Catégorie'.'</label>';
361 
    $form->addElement('text', $id, $label, $aso_attributs);
362 
 
363 
    $id = 'gm_public';
364 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
365 
    $label = '<label for="'.$id.'">'.'Public pour la page'.'</label>';
366 
    $form->addElement('text', $id, $label, $aso_attributs);
367 
 
368 
    $id = 'gm_public_niveau';
369 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 25, 'maxlength' => 45);
370 
    $label = '<label for="'.$id.'">'.'Niveau du public pour la page'.'</label>';
371 
    $form->addElement('text', $id, $label, $aso_attributs);
372 
 
373 
    $id = 'gm_ce_type_portee_spatiale';
374 
    $aso_options = array(   '' => 'Aucun',
375 
                            'iso3166' => 'Code de pays sur deux lettres (iso3166)',
376 
                            'Point' => 'Point géographique',
377 
                            'Box' => 'Représenation des régions géographiques du Dublin Core',
378 
                            'TGN' => 'Noms issus du Getty Thesaurus of Geographic Names');
379 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
380 
    $label = '<label for="'.$id.'">'.'Type de portée spatiale'.'</label>';
381 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
382 
 
383 
    $id = 'gm_portee_spatiale';
384 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
385 
    $label = '<label for="'.$id.'">'.'Portée spatiale de la page'.'</label>';
386 
    $form->addElement('text', $id, $label, $aso_attributs);
387 
 
388 
    $id = 'gm_ce_type_portee_temporelle';
389 
    $aso_options = array(   '' => 'Aucun',
390 
                            'W3CDTF' => 'Codage des dates et heures du W3C',
391 
                            'Period' => 'Représentation des intervalles de temps du Dublin Core');
392 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
393 
    $label = '<label for="'.$id.'">'.'Type de portée temporelle'.'</label>';
394 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
395 
 
396 
    $id = 'gm_portee_temporelle';
397 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
398 
    $label = '<label for="'.$id.'">'.'Portée temporelle de la page'.'</label>';
399 
    $form->addElement('text', $id, $label, $aso_attributs);
400 
 
401 
    $partie_entete_fin = '</ul>'."\n".'</fieldset>'."\n";
402 
    $form->addElement('html', $partie_entete_fin);
128 jpm 403 
    $bouton_validation = '<input type="submit" id="menu_modifier" name="menu_modifier" value="'.'Enregistrer'.'" title="'.'Enregistrer'.'" />';
404 
    $bouton_annuler =   '<a class="bouton" href="'.$url->getURL().'" title="'.'Annuler'.'" >'.'Annuler'.'</a>';
7 jpm 405 
    $boutons =  '<p>'."\n".$bouton_validation.' '."\n".$bouton_annuler."\n".'</p>'."\n";
406 
    $form->addElement('html', $boutons);
407 
 
408 
    // Instanciation avec les valeur par défaut
128 jpm 409 
    $form->setDefaults($aso_valeurs);
7 jpm 410 
 
411 
    // Javascript pour la validation côté client
412 
    $regles_javascript = $form->getValidationScript();
413 
    // Suppression des balises déjà créées par GEN_stockerCodeScript()
414 
    $regles_javascript = ereg_replace ( '<script type="text\/javascript">', '', $regles_javascript);
415 
    $regles_javascript = ereg_replace ( '<!--', '', $regles_javascript);
416 
    $regles_javascript = ereg_replace ( '\/\/-->', '', $regles_javascript);
417 
    $regles_javascript = ereg_replace ( '<\/script>', '', $regles_javascript);
418 
    GEN_stockerCodeScript($regles_javascript);
419 
 
420 
    // Note de fin de formulaire
421 
    $form->setRequiredNote('Indique les champs obligatoires');
422 
 
128 jpm 423 
    $retour .= $form->toHTML()."\n";
424 
    return $retour;
7 jpm 425 
}
426 
 
128 jpm 427 
/** Fonction ADME_validerFormAjouterMenuClassique() - Valide les données issues du formulaire pour gen_menu.
7 jpm 428 
*
128 jpm 429 
* Cette fonction valide les données à ajouter dans la table gen_menu.
7 jpm 430 
*
128 jpm 431 
* @param  string   l'objet pear de connexion à la base de données.
432 
* @param  string   le tableau contenant les valeurs du formulaire.
433 
* @return string   retourne les messages d'erreurs sinon rien.
434 
*/
435 
function ADME_validerFormAjouterMenuClassique($db, $aso_valeurs)
436 
{
437 
    $message = '';
438 
    // Requete pour vérifier l'abscence du code numérique et alphanumérique de la table gen_menu
439 
    if (GEN_verifierPresenceCodeMenu($db, 'int', $aso_valeurs['gm_code_num'])) {
440 
        $message .= '<p class="pap_erreur">La valeur "'.$aso_valeurs['gm_code_num'].'" pour le champ "Code numérique" existe déjà.</p>';
441 
    }
442 
    if (GEN_verifierPresenceCodeMenu($db, 'int', $aso_valeurs['gm_code_alpha'])) {
443 
        $message .= '<p class="pap_erreur">La valeur "'.$aso_valeurs['gm_code_alpha'].'" pour le champ "Code alphanumérique" existe déjà.</p>';
444 
    }
445 
    return $message;
446 
}
447 
 
448 
/** Fonction ADME_modifierMenuClassique() - Enregistre les infos du formulaire de saisie d'un menu
449 
*
450 
* Ancien nom : commitUpdateLevel()
451 
*
7 jpm 452 
*   @return  void  les données sont enregistrées dans la base de données.
453 
*/
128 jpm 454 
function ADME_modifierMenuClassique($db, $auth, $adme_menu_id, $aso_valeurs)
7 jpm 455 
{
456 
    $requete =  'UPDATE gen_menu SET '.
128 jpm 457 
                'gm_ce_application = '.$aso_valeurs['gm_ce_application'].', '.
458 
                'gm_application_arguments = "'.$aso_valeurs['gm_application_arguments'].'", '.
459 
                'gm_fichier_squelette = "'.$aso_valeurs['gm_fichier_squelette'].'", '.
460 
                'gm_code_num = '.$aso_valeurs['gm_code_num'].', '.
461 
                'gm_code_alpha = "'.$aso_valeurs['gm_code_alpha'].'", '.
462 
                'gm_nom = "'.$aso_valeurs['gm_nom'].'", '.
463 
                'gm_raccourci_clavier = "'.$aso_valeurs['gm_raccourci_clavier'].'", '.
464 
                'gm_robot = "'.$aso_valeurs['gm_robot'].'", '.
465 
                'gm_titre = "'.$aso_valeurs['gm_titre'].'", '.
466 
                'gm_titre_alternatif = "'.$aso_valeurs['gm_titre_alternatif'].'", '.
467 
                'gm_mots_cles = "'.$aso_valeurs['gm_mots_cles'].'", '.
468 
                'gm_description_libre = "'.$aso_valeurs['gm_description_libre'].'", '.
469 
                'gm_description_resume = "'.$aso_valeurs['gm_description_resume'].'", '.
470 
                'gm_description_table_matieres = "'.$aso_valeurs['gm_description_table_matieres'].'", '.
471 
                'gm_source = "'.$aso_valeurs['gm_source'].'", '.
472 
                'gm_auteur = "'.$aso_valeurs['gm_auteur'].'", '.
473 
                'gm_contributeur = "'.$aso_valeurs['gm_contributeur'].'", '.
474 
                'gm_editeur = "'.$aso_valeurs['gm_editeur'].'", '.
475 
                'gm_date_debut_validite = "'.$aso_valeurs['gm_date_debut_validite'].'", '.
476 
                'gm_date_fin_validite = "'.$aso_valeurs['gm_date_fin_validite'].'", '.
477 
                'gm_date_copyright = "'.$aso_valeurs['gm_date_copyright'].'", '.
478 
                'gm_licence = "'.$aso_valeurs['gm_licence'].'", '.
479 
                'gm_categorie = "'.$aso_valeurs['gm_categorie'].'", '.
480 
                'gm_public = "'.$aso_valeurs['gm_public'].'", '.
481 
                'gm_public_niveau = "'.$aso_valeurs['gm_public_niveau'].'", '.
482 
                'gm_ce_type_portee_spatiale = "'.$aso_valeurs['gm_ce_type_portee_spatiale'].'", '.
483 
                'gm_portee_spatiale = "'.$aso_valeurs['gm_portee_spatiale'].'", '.
484 
                'gm_ce_type_portee_temporelle = "'.$aso_valeurs['gm_ce_type_portee_temporelle'].'", '.
485 
                'gm_portee_temporelle = "'.$aso_valeurs['gm_portee_temporelle'].'", '.
486 
                'gm_ce_admin = "'.$auth->getAuthData('ga_id_administrateur').'" '.
487 
                'WHERE gm_id_menu = '.$adme_menu_id;
7 jpm 488 
 
128 jpm 489 
    $resultat = $db->query($requete);
490 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 491 
 
492 
    // Gestion de la relation menu par défaut
128 jpm 493 
    if (isset($aso_valeurs['defaut']) && $aso_valeurs['defaut'] == 1) {
7 jpm 494 
        $requete_id_menu_supr_defaut =  'SELECT GM01.gm_id_menu AS id_menu_supr_defaut '.
495 
                                        'FROM gen_menu AS GM01, gen_menu AS GM02, gen_menu_relation '.
128 jpm 496 
                                        'WHERE GM02.gm_id_menu = '.$adme_menu_id.' '.
7 jpm 497 
                                        'AND GM02.gm_ce_site = GM01.gm_ce_site '.
498 
                                        'AND GM01.gm_id_menu = gmr_id_menu_01 '.
499 
                                        'AND gmr_id_valeur = 101 ';// 101 = menu par "defaut"
500 
        $resultat_menu_supr_defaut = $db->query($requete_id_menu_supr_defaut);
501 
        if (DB::isError($resultat_menu_supr_defaut)) {
502 
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu_supr_defaut->getMessage(), $requete_id_menu_supr_defaut));
503 
        }
504 
        if ($resultat_menu_supr_defaut->numRows() > 0 ) {
505 
            $requete_supr_defaut =  'DELETE FROM gen_menu_relation '.
506 
                                    'WHERE gmr_id_menu_01 = gmr_id_menu_02 '.
507 
                                    'AND gmr_id_valeur = 101 '.// 101 = menu par "defaut"
508 
                                    'AND gmr_id_menu_01 = '.$resultat_menu_supr_defaut->id_menu_supr_defaut;
509 
            $resultat_supr_defaut = $db->query($requete_supr_defaut);
510 
            if (DB::isError($resultat_supr_defaut)) {
511 
                die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_supr_defaut->getMessage(), $requete_supr_defaut));
512 
            }
513 
        }
514 
        // Requete d'insertion de la relation menu par défaut
515 
        $requete =  'INSERT INTO gen_menu_relation '.
128 jpm 516 
                    'SET gmr_id_menu_01 = '.$adme_menu_id.', '.
517 
                    'gmr_id_menu_02 = '.$adme_menu_id.', '.
7 jpm 518 
                    'gmr_id_valeur = 101, '.
519 
                    'gmr_ordre = NULL ';
520 
        $resultat = $db->query($requete);
521 
        if (DB::isError($resultat)) {
522 
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
523 
        }
524 
    }
525 
}
526 
 
128 jpm 527 
/** Fonction ADME_supprimerMenuClassique() - Supprime un menu classique.
7 jpm 528 
*
128 jpm 529 
* Supprime de la base de données de Génésia toutes les traces du menu classiques
530 
* passé en paramètre.
531 
* Ancien nom : deleteMenu()
532 
*
533 
*   @param mixed l'objet Pear DB de connexion à la base de données.
534 
*   @param  string  l'identifiant du menu à supprimer
535 
*   @return  void le menu classique est supprimé de la base de données.
536 
*/
537 
function ADME_supprimerMenuClassique($db, $id_menu_a_supprimer)
538 
{
539 
    //----------------------------------------------------------------------------
540 
    // Y a t'il des sous_menus
541 
    $requete =  'SELECT COUNT(gm_id_menu) AS compte '.
542 
                'FROM gen_menu, gen_menu_relation '.
543 
                'WHERE gmr_id_menu_02 = '.$id_menu_a_supprimer.' '.
544 
                'AND gmr_id_valeur = 1 '.
545 
                'AND gmr_id_menu_01 = gm_id_menu ';
546 
 
547 
    $resultat = $db->query($requete);
548 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
549 
 
550 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
551 
 
552 
    if ($ligne && ($ligne->compte > 0)) {
553 
        return 'Ce menu contient encore des sous menus. Veuillez commencez par supprimer ces sous menus.';
554 
    }
555 
 
556 
    //----------------------------------------------------------------------------
557 
    // S'il n'y a plus de sous niveau, on supprime le menu
558 
    $requete =  'DELETE FROM gen_menu '.
559 
                'WHERE gm_id_menu = '.$id_menu_a_supprimer;
560 
 
561 
    $resultat = $db->query($requete);
562 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
563 
 
564 
    //----------------------------------------------------------------------------
565 
    // Puis on supprime les relations de ce menu
566 
    $requete =  'DELETE FROM gen_menu_relation '.
567 
                'WHERE gmr_id_menu_01 = '.$id_menu_a_supprimer;
568 
 
569 
    $resultat = $db->query($requete);
570 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
571 
}
572 
 
573 
/** Fonction ADME_deplacerMenuClassique() - Permet de déplacer un menu dans la hiérarchie.
574 
*
7 jpm 575 
* Permet de déplacer un menu dans la hiérarchie des menus classiques.
128 jpm 576 
* Ancien nom : moveMenu()
7 jpm 577 
*
578 
*   @param  mixed  objet Pear DB de connexion à la base de données.
579 
*   @param  string  code du site administré.
580 
*   @param  string  identifiant de l'i18n du site administré.
581 
*   @param  int  identifiant du menu à déplacer.
582 
*   @param  boolean  indique si on veut monter le menu (true) ou le descendre (false).
583 
*   @return  void  Modifie la base de données.
584 
*/
128 jpm 585 
function ADME_deplacerMenuClassique($db, $adme_site_id, $adme_menu_id, $bln_monter)
7 jpm 586 
{
587 
    //----------------------------------------------------------------------------
588 
    // Récupération d'information sur le site de ce menu.
128 jpm 589 
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
110 jpm 590 
    if ($objet_site == false) {
7 jpm 591 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
128 jpm 592 
            'Id du site : '. $adme_site_id .'<br />'.
7 jpm 593 
            'Ligne n° : '. __LINE__ .'<br />'.
594 
            'Fichier n° : '. __FILE__ .'<br />');
595 
    }
596 
    //----------------------------------------------------------------------------
597 
    // Récupération d'informations sur les relations du menu courant.
128 jpm 598 
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $adme_menu_id, '1');
7 jpm 599 
    if ($ligne_menu_courant_relation == false) {
600 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos sur les relations du menu.<br />'.
128 jpm 601 
            'Identifiant menu : '. $adme_menu_id .'<br />'.
7 jpm 602 
            'Identifiant valeur relation : 1 <br />'.
603 
            'Ligne n° : '. __LINE__ .'<br />'.
604 
            'Fichier n° : '. __FILE__ .'<br />');
605 
    }
110 jpm 606 
    //----------------------------------------------------------------------------
607 
    // Récupération de l'identifiant du menu pére
128 jpm 608 
    $id_pere = GEN_lireIdentifiantMenuPere($adme_menu_id);
110 jpm 609 
    if ($id_pere === false) {
7 jpm 610 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire identifiant du menu père.<br />'.
128 jpm 611 
            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
7 jpm 612 
            'Ligne n° : '. __LINE__ .'<br />'.
613 
            'Fichier n° : '. __FILE__ .'<br />');
614 
    }
615 
    //----------------------------------------------------------------------------
616 
    // Recherche d'information sur le menu précédent ou suivant le menu courant
617 
    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
110 jpm 618 
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
7 jpm 619 
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
110 jpm 620 
                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
621 
                'AND gm_ce_site = '.$objet_site->gs_id_site.' '.
7 jpm 622 
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
623 
                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
624 
                'AND GMR01.gmr_id_valeur = 1 ';// 1 = relation menu "père"
128 jpm 625 
    if ($bln_monter) {
7 jpm 626 
        $requete .= 'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
627 
                    'ORDER BY GMR01.gmr_ordre DESC';
628 
    } else {
629 
        $requete .= 'AND GMR01.gmr_ordre > '.$ligne_menu_courant_relation->gmr_ordre.' '.
630 
                    'ORDER BY GMR01.gmr_ordre ASC';
631 
    }
632 
 
110 jpm 633 
    $resultat_menu = $db->query($requete);
634 
    (DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
7 jpm 635 
 
110 jpm 636 
    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
637 
    $resultat_menu->free();
7 jpm 638 
    //----------------------------------------------------------------------------
639 
    // Si la requete ne retourne rien nous ne faisons rien.
110 jpm 640 
    if (! $ligne_menu) {
128 jpm 641 
        return null;
7 jpm 642 
    }
643 
    //----------------------------------------------------------------------------
644 
    // Mise à jour des relations du menu courant
645 
    $requete =  'UPDATE gen_menu_relation SET '.
110 jpm 646 
                'gmr_ordre = '.$ligne_menu->nouvel_ordre.' '.
7 jpm 647 
                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
648 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
649 
 
110 jpm 650 
    $resultat_update = $db->query($requete);
651 
    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
7 jpm 652 
    //----------------------------------------------------------------------------
653 
    // Mise à jour des relations du menu précédent ou suivant
654 
    $requete =  'UPDATE gen_menu_relation SET '.
655 
                'gmr_ordre = '.$ligne_menu_courant_relation->gmr_ordre.' '.
110 jpm 656 
                'WHERE gmr_id_menu_01 = '.$ligne_menu->id_menu_remplace.' '.
7 jpm 657 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
658 
 
110 jpm 659 
    $resultat_update = $db->query($requete);
660 
    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
7 jpm 661 
}
662 
 
128 jpm 663 
/** Fonction ADME_afficherListeMenuClassique () - Affiche un menu en html
7 jpm 664 
*
128 jpm 665 
* Elle déploie un les sous-menu d'un menu.
666 
* Ancien nom : deployer_menu().
7 jpm 667 
*
128 jpm 668 
* @param  object objet Pear de connection à la base de données.
669 
* @param  string code alphanumérique du site à administrer.
670 
* @param  integer l'identifiant du menu à administrer.
671 
* @param  integer l'identifiant du menu qui doit être ouvert.
672 
* @param  integer l'identifiant du menu qui doit être déployé.
673 
* @return string  du code XHTML.
7 jpm 674 
*/
128 jpm 675 
function ADME_afficherListeMenuClassique($db, $url, $adme_site_id, $adme_menu_id, $adme_menu_ouvert, $id_menu_a_deployer, $bln_premier_appel = true)
7 jpm 676 
{
128 jpm 677 
    // Initialisation des variables :
678 
    $retour = '';
7 jpm 679 
 
680 
    // Est-ce que ces menus comporte des sous-menus ?
681 
    $requete_sous_menu =    'SELECT gm_id_menu '.
682 
                            'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
683 
                            'WHERE GMR01.gmr_id_menu_02 = '.$id_menu_a_deployer.' '.
684 
                            'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
128 jpm 685 
                            'AND gm_ce_site = '.$adme_site_id.' '.
7 jpm 686 
                            'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
687 
                            'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
688 
                            'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
689 
                            'AND GMR02.gmr_id_valeur = 100 '.// 100 = type "menu classique"
690 
                            'ORDER BY GMR01.gmr_ordre ASC';
691 
 
692 
    $resultat_sous_menu = $db->query($requete_sous_menu) ;
693 
    if (DB::isError($resultat_sous_menu)) {
694 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_sous_menu->getMessage(), $requete_sous_menu));
695 
    }
696 
 
697 
    if ($resultat_sous_menu->numRows() > 0) {
128 jpm 698 
        // Ici, on sait qu'un menu a des sous menus, on commence par l'afficher:
699 
        if ($bln_premier_appel == false) {
700 
            $retour .= '<li>'."\n";
701 
            if (GEN_etreFils($adme_menu_ouvert, $id_menu_a_deployer) || $adme_menu_ouvert == $id_menu_a_deployer || GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id)){
702 
                // Affiche un -
703 
                $retour .= ADME_retournerXhtmlMenuClassique($db, $url, $adme_site_id, $id_menu_a_deployer, $adme_menu_ouvert, 1);
704 
            } else if (!(GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id)) || !(GEN_etreFils($adme_menu_ouvert, $id_menu_a_deployer))) {
705 
                // Affiche un +
706 
                $retour .= ADME_retournerXhtmlMenuClassique($db, $url, $adme_site_id, $id_menu_a_deployer, $adme_menu_ouvert, 2);
707 
            }
708 
        }
709 
        if ($bln_premier_appel == true || GEN_etreFils($adme_menu_ouvert, $id_menu_a_deployer) || $adme_menu_ouvert == $id_menu_a_deployer || GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id)){
710 
            $retour .= '<ul>'."\n";
7 jpm 711 
            while ($ligne_sous_menu = $resultat_sous_menu->fetchRow(DB_FETCHMODE_OBJECT)) {
128 jpm 712 
                $retour .= ADME_afficherListeMenuClassique($db, $url, $adme_site_id, $adme_menu_id, $adme_menu_ouvert, $ligne_sous_menu->gm_id_menu, false);
7 jpm 713 
            }
128 jpm 714 
            $retour .= '</ul>'."\n";
7 jpm 715 
        }
128 jpm 716 
        if ($bln_premier_appel == false) {
717 
            $retour .= '</li>'."\n";
718 
        }
719 
    } else if ($resultat_sous_menu->numRows() == 0 && $bln_premier_appel == false) {
720 
        $retour .= '<li>'."\n";
721 
        $retour .= ADME_retournerXhtmlMenuClassique($db, $url, $adme_site_id, $id_menu_a_deployer, $adme_menu_ouvert, 0);
722 
        $retour .= '</li>'."\n";
7 jpm 723 
    }
128 jpm 724 
 
725 
    return $retour;
7 jpm 726 
}
727 
 
128 jpm 728 
/** Fonction ADME_retournerXhtmlMenuClassique () Effectue une sortie d'un menu en XHTML
7 jpm 729 
*
128 jpm 730 
* Ancien nom : menu_toHtml().
7 jpm 731 
*
128 jpm 732 
* @return  string  Une liste HTML
7 jpm 733 
*/
128 jpm 734 
function ADME_retournerXhtmlMenuClassique($db, $url, $adme_site_id, $adme_menu_id, $adme_menu_ouvert, $int_deplier)
7 jpm 735 
{
128 jpm 736 
    $etiquette_annuler = 'Annuler';
7 jpm 737 
    $etiquette_alt_modifier     = 'Modifier';
738 
    $etiquette_title_modifier     = 'Modifier ce menu';
739 
    $etiquette_alt_supprimer   = 'Supprimer';
740 
    $etiquette_title_supprimer   = 'Supprimer ce menu';
741 
    $etiquette_alt_ajouter = 'Ajouter';
742 
    $etiquette_title_ajouter = 'Ajouter un menu inférieur';
743 
    $etiquette_alt_monter = 'Monter';
744 
    $etiquette_title_monter = 'Monter ce menu';
745 
    $etiquette_alt_descendre = 'Descendre';
746 
    $etiquette_title_descendre = 'Descendre ce menu';
747 
    $etiquette_alt_redaction = 'Rédiger';
748 
    $etiquette_title_redaction = 'Rédiger le contenu de ce menu';
128 jpm 749 
    $etiquette_deplier = 'Déplier';
750 
    $etiquette_plier = 'Plier';
7 jpm 751 
 
128 jpm 752 
    $requete =  'SELECT gen_menu.*, ga_prenom '.
7 jpm 753 
                'FROM gen_menu, gen_annuaire '.
128 jpm 754 
                'WHERE gm_id_menu = '.$adme_menu_id.' '.
7 jpm 755 
                'AND gm_ce_admin = ga_id_administrateur';
756 
 
757 
    $resultat = $db->query($requete);
758 
    if (DB::isError($resultat)) {
759 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
760 
    }
761 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
762 
 
763 
    // recherche de l'application liée
764 
    $requete_app =  'SELECT gap_nom '.
765 
                    'FROM gen_application '.
766 
                    'WHERE gap_id_application = '.$ligne->gm_ce_application;
767 
 
768 
    $resultat_app = $db->query($requete_app);
769 
    if (DB::isError($resultat_app)) {
770 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_app->getMessage(), $requete_app));
771 
    }
772 
    $ligne_app = $resultat_app->fetchRow(DB_FETCHMODE_OBJECT);
773 
    $resultat_app->free();
774 
 
128 jpm 775 
    //-------------------------------------------------------------------------------------------------------------------
776 
    // XHTML image plier-déplier
7 jpm 777 
 
128 jpm 778 
    $url->addQueryString('adme_site_id', $adme_site_id);
779 
    $url->addQueryString('adme_menu_id', $ligne->gm_id_menu);
780 
    $xhtml_pd = '';
781 
    if ($int_deplier != 0) {
782 
        if ($int_deplier == 1) {
783 
            // Afficher un -
784 
            $image_plier_deplier = ADME_IMAGE_MOINS;
785 
            $alt = $etiquette_plier;
786 
            $url->addQueryString('adme_menu_ouvert', GEN_lireIdentifiantMenuPere($adme_menu_id));
787 
            $url_plier_deplier = $url->getURL();
788 
            $url->removeQueryString('adme_menu_ouvert');
789 
            $url->addQueryString('adme_menu_ouvert', $adme_menu_ouvert);
790 
        } else if ($int_deplier == 2) {
791 
            // Afficher un +
792 
            $image_plier_deplier = ADME_IMAGE_PLUS;
793 
            $alt = $etiquette_deplier;
794 
            $url->addQueryString('adme_menu_ouvert', $adme_menu_id);
795 
            $url_plier_deplier = $url->getURL();
796 
            $url->removeQueryString('adme_menu_ouvert');
797 
            $url->addQueryString('adme_menu_ouvert', $adme_menu_ouvert);
798 
        }
799 
        $xhtml_pd = '<a href="'.$url_plier_deplier.'" title="'.$alt.'">'.
800 
                        '<img class="'.ADME_CLASS_IMG_PD.'" src="'.$image_plier_deplier.'" alt="'.$alt.'" />'.
801 
                    '</a>'.'&nbsp;'."\n";
7 jpm 802 
    } else {
128 jpm 803 
        $url->addQueryString('adme_menu_ouvert', $adme_menu_ouvert);
7 jpm 804 
    }
805 
 
128 jpm 806 
    //-------------------------------------------------------------------------------------------------------------------
807 
    // XHTML du nom du menu et de ses infos
808 
    $xhtml_info  = htmlentities(empty($ligne->gm_nom) ? '('.$ligne->gm_nom.')' : $ligne->gm_nom);
809 
    $xhtml_info .= '&nbsp;';
810 
    $xhtml_info .= '('.$ligne_app->gap_nom.' / '.$ligne->ga_prenom.')';
811 
    $xhtml_info .= '&nbsp;'."\n";
7 jpm 812 
 
128 jpm 813 
    //-------------------------------------------------------------------------------------------------------------------
814 
    // XHTML actions
815 
    $url->addQueryString('adme_action', 'modifier_menu_classique');
816 
    $xhtml_action = '<a href="'.$url->getURL().'" title="'.$etiquette_title_modifier.'">'.
817 
                        '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_VOIR.'" alt="'.$etiquette_alt_modifier.'" />'.
818 
                    '</a>&nbsp;'."\n";
819 
    $url->removeQueryString('adme_action');
820 
    $url->addQueryString('adme_action', 'monter_menu_classique');
821 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_monter.'">'.
822 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_HAUT.'" alt="'.$etiquette_alt_monter.'" />'.
823 
                        '</a>&nbsp;'."\n";
824 
    $url->removeQueryString('adme_action');
825 
    $url->addQueryString('adme_action', 'descendre_menu_classique');
826 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_descendre.'">'.
827 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_BAS.'" alt="'.$etiquette_alt_descendre.'" />'.
828 
                        '</a>&nbsp;'."\n";
829 
    $url->removeQueryString('adme_action');
830 
    $url->addQueryString('adme_action', 'supprimer_menu_classique');
831 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_supprimer.'">'.
832 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_SUPPRIMER.'" alt="'.$etiquette_alt_supprimer.'" />'.
833 
                        '</a>&nbsp;'."\n";
834 
    $url->removeQueryString('adme_action');
835 
    $url->removeQueryString('adme_menu_ouvert');
836 
    $url->addQueryString('adme_menu_ouvert', $adme_menu_id);
837 
    $url->addQueryString('adme_action', 'ajouter_menu_classique');
838 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_ajouter.'">'.
839 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_NOUVEAU.'" alt="'.$etiquette_alt_ajouter.'" />'.
840 
                        '</a>'.'&nbsp;'."\n";
7 jpm 841 
 
842 
    // Si l'application liée est "texte simple", on ajoute un icone avec un lien vers
843 
    // l'administration de cette application.
128 jpm 844 
    if ($ligne->gm_ce_application == 3) { // l'appli afficheur a pour id 3
845 
        $url->removeQueryString('adme_action');
846 
        $url->removeQueryString('adme_menu_ouvert');
847 
        $url->addQueryString('adme_menu_ouvert', $adme_menu_ouvert);
848 
        $url->addQueryString('adme_action', 'contenu_rediger');
849 
        $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_redaction.'">'.
850 
                                '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TEXTE.'" alt="'.$etiquette_alt_redaction.'" />'.
851 
                            '</a>'.'&nbsp;'."\n";
7 jpm 852 
    }
853 
 
128 jpm 854 
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 855 
    // Envoi du menu.
128 jpm 856 
    $retour = $xhtml_pd.$xhtml_info.$xhtml_action;
857 
    return $retour;
7 jpm 858 
}
859 
 
860 
// +------------------------------------------------------------------------------------------------------+
861 
// |                                            PIED du PROGRAMME                                         |
862 
// +------------------------------------------------------------------------------------------------------+
863 
 
864 
 
865 
/* +--Fin du code ----------------------------------------------------------------------------------------+
866 
*
867 
* $Log: not supported by cvs2svn $
128 jpm 868 
* Revision 1.4  2004/10/25 16:27:42  jpm
869 
* Correction d'un bogue dans la gestion du déplacement des menus.
870 
*
110 jpm 871 
* Revision 1.3  2004/09/23 17:45:13  jpm
872 
* Amélioration de la gestion des liens annuler et du selecteur de sites.
873 
*
56 jpm 874 
* Revision 1.2  2004/07/06 17:07:37  jpm
875 
* Modification de la documentation pour une mailleur analyse par PhpDocumentor.
876 
*
25 jpm 877 
* Revision 1.1  2004/06/16 15:04:32  jpm
878 
* Changement de nom de Génésia en Papyrus.
879 
* Changement de l'arborescence.
880 
*
7 jpm 881 
* Revision 1.27  2004/05/10 12:13:03  jpm
882 
* Modification des formulaires.
883 
*
884 
* Revision 1.26  2004/05/07 16:31:20  jpm
885 
* Amélioration du formulaire d'un menu classique.
886 
*
887 
* Revision 1.25  2004/05/07 07:23:53  jpm
888 
* Amélioration du code, des commentaires et correction de bogues.
889 
*
890 
*
891 
* +-- Fin du code ----------------------------------------------------------------------------------------+
892 
*/
893 
?>