Subversion Repositories Applications.papyrus

Rev

Rev 7 | Rev 56 | 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
// +------------------------------------------------------------------------------------------------------+
25 jpm 22
// CVS : $Id: adme_menu_classique.fonct.php,v 1.2 2004-07-06 17:07:37 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
25 jpm 38
*@version       $Revision: 1.2 $ $Date: 2004-07-06 17:07:37 $
7 jpm 39
// +------------------------------------------------------------------------------------------------------+
40
*/
41
 
42
// +------------------------------------------------------------------------------------------------------+
43
// |                                            ENTÊTE du PROGRAMME                                       |
44
// +------------------------------------------------------------------------------------------------------+
45
                                    /*Mettre ici les inclusions de fichiers*/
46
 
47
 
48
 
49
// +------------------------------------------------------------------------------------------------------+
50
// |                                            CORPS du PROGRAMME                                        |
51
// +------------------------------------------------------------------------------------------------------+
52
                                       /*Mettre ici le code du programme*/
53
 
54
 
55
 
56
// +------------------------------------------------------------------------------------------------------+
57
// |                                           LISTE de FONCTIONS                                         |
58
// +------------------------------------------------------------------------------------------------------+
59
                                        /*Mettre ici la liste de fonctions.*/
60
function lister_menu_racine($db,
61
                            $baseURL, $baseURLjs, $baseHidden,
62
                            $adminProject, $adminLocale, $adminAnnu,
63
                            $menuid, $upperid,
64
                            $doccmd, $menuopen, $upperopen, $id_pere)
65
{
66
    //----------------------------------------------------------------------------
67
    // Labels.
68
    $cancelLabel   = "Annuler";
69
    $showLabel     = "Modifier le document";
70
    $deleteLabel   = "Supprimer";
71
    $addMenu2Label = "Ajouter un menu de niveau 2";
72
 
73
    //----------------------------------------------------------------------------
74
    // Javascript.
75
    $goMsg = addslashes ("Supprimer");
76
    $fullURLjs = $baseURLjs.'&menuview=menu';
77
 
78
    GEN_stockerFonctionScript('deleteMenu',
79
        "  function deleteMenu (iMenuId) {"."\n".
80
        "    var url = '$fullURLjs'+'&doccmd=delmenu&menuid='+iMenuId+'&menuopen=".($menuopen ? 1 : 0)."';"."\n".
81
        "    if (window.confirm ('$goMsg')) document.location = url;"."\n".
82
        "  }"."\n"
83
    );
84
 
85
    //----------------------------------------------------------------------------
86
    // Récupération des informations sur le site à administrer.
87
 
88
    $res = "<ul>\n";
89
 
90
    $requete =  'SELECT * '.
91
                'FROM gen_site, gen_site_relation '.
92
                'WHERE gs_code_alpha = "'.$adminProject.'" '.
93
                'AND gs_id_site = gsr_id_site_01 '.
94
                'AND gsr_id_site_01 = gsr_id_site_02 '.
95
                'AND gsr_id_valeur = 102 ';// 102 = site "principal"
96
 
97
    $result = $db->query($requete);
98
    if (DB::isError($result)) {
99
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete));
100
    }
101
 
102
    if ($result->numRows() != 1) {
103
        return '';
104
    }
105
    $PRJrow = $result->fetchRow(DB_FETCHMODE_OBJECT);
106
    $result->free();
107
 
108
    //----------------------------------------------------------------------------
109
    // Liste des menus de niveau 1.
110
 
111
    $requete =  'SELECT * '.
112
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
113
                'WHERE gm_ce_site = "'.$PRJrow->gs_id_site.'" '.
114
                'AND gm_ce_i18n = "'.$adminLocale.'" '.
115
                'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
116
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
117
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = type "menu classique"
118
                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
119
                'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
120
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
121
                'ORDER BY GMR01.gmr_ordre ASC';
122
 
123
    $L1result = $db->query($requete);
124
    (DB::isError($L1result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $L1result->getMessage(), $requete)) : '';
125
 
126
    // On recherche quel est le menu de niveau 1 correspondant au menuid courant
127
    if (isset($menuid)) {
128
        $menu_id_ancetre = GEN_lireIdentifiantMenuAncetre($menuid);
129
    } else {
130
        $menu_id_ancetre = '' ;
131
    }
132
 
133
    while ($L1row = $L1result->fetchRow(DB_FETCHMODE_OBJECT)) {
134
        // est-ce que $menuid = menuracine
135
        if ($L1row->gm_id_menu == $menu_id_ancetre) {
136
            $res .= deployer_menu($L1row->gm_id_menu, $adminProject) ;
137
        } else {
138
            $res .= menu_toHTML($L1row->gm_id_menu, false, $adminProject) ;
139
        }
140
    }
141
 
142
    //----------------------------------------------------------------------------
143
    // End of menu table.
144
    $res .= "\n".'</ul>';
145
 
146
    //----------------------------------------------------------------------------
147
    // Cleanup.
148
    $L1result->free();
149
 
150
    return $res;
151
}
152
 
153
/** Fonction addMenu() - Ajoute un sous menu au menu courant
154
*
155
*   @param  string  Le projet courant
156
*   @param  string  La langue courante
157
*   @return void le menu classique est ajouté à la base de données.
158
*/
159
function addMenu($adminProject, $adminLocale)
160
{
161
    global $db, $_GEN_commun, $menuid;
162
 
163
    //----------------------------------------------------------------------------
164
    // Récupération d'infos sur le site principal.
165
    $PRJrow = GEN_lireInfoSitePrincipalCodeAlpha($db, $adminProject);
166
    if ($PRJrow == false) {
167
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
168
            'Code alpha du site : '. $adminProject .'<br />'.
169
            'Ligne n° : '. __LINE__ .'<br />'.
170
            'Fichier n° : '. __FILE__ .'<br />');
171
    }
172
 
173
    //----------------------------------------------------------------------------
174
    // Récupération d'infos sur le nouveau menu
175
    if ($adminLocale == $PRJrow->gs_ce_i18n) {
176
        $id_site = $PRJrow->gs_id_site;
177
    } else {
178
        $ligne_admin_site_i18n = getSiteI18nInfos($db, $adminProject, $adminLocale);// Info du site en cours d'administration
179
        $id_site = $ligne_admin_site_i18n->gs_id_site;
180
    }
181
    $nouveau_id_menu = SQL_obtenirNouveauId($db, 'gen_menu', 'gm_id_menu');
182
    $auteur = $_GEN_commun['pear_auth']->getAuthData('ga_prenom').' '.$_GEN_commun['pear_auth']->getAuthData('ga_nom');
183
 
184
    //----------------------------------------------------------------------------
185
    // Ajout du nouveau menu
186
    $requete =  'INSERT INTO gen_menu '.
187
                'SET gm_id_menu = '.$nouveau_id_menu.', '.
188
                'gm_ce_site = '.$id_site.', '.
189
                'gm_ce_i18n = "'.$adminLocale.'", '.
190
                'gm_ce_application = 0, '.
191
                'gm_code_num = '.$nouveau_id_menu.', '.
192
                'gm_code_alpha = "menu_'.$nouveau_id_menu.'", '.
193
                'gm_nom = "menu_'.$nouveau_id_menu.'", '.
194
                'gm_auteur = "'.$auteur.'", '.
195
                'gm_editeur = "'.$PRJrow->gs_auteur.'", '.
196
                'gm_date_creation = "'.date('Y-m-d H:i:s').'", '.
197
                'gm_date_soumission = "'.date('Y-m-d H:i:s').'", '.
198
                'gm_date_acceptation = "'.date('Y-m-d H:i:s').'", '.
199
                'gm_date_publication = "'.date('Y-m-d H:i:s').'", '.
200
                'gm_date_debut_validite = "'.date('Y-m-d H:i:s').'", '.
201
                'gm_date_copyright = "'.date('Y-00-00 00:00:00').'", '.
202
                'gm_categorie = "menu", '.
203
                'gm_ce_admin = '.$_GEN_commun['pear_auth']->getAuthData('ga_id_administrateur').' '
204
                ;
205
 
206
    $result = $db->query($requete);
207
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
208
 
209
    //----------------------------------------------------------------------------
210
    // Ajout de la relation "père"
211
 
212
    if (!isset($menuid) && empty($menuid)) {
213
        $menuid = 0 ;// Identifiant du père
214
    }
215
    //----------------------------------------------------------------------------
216
    // Récupération d'infos sur la hierarchie du menu
217
    $requete =  'SELECT * '.
218
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
219
                'WHERE GMR01.gmr_id_menu_02 = '.$menuid.' '.
220
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
221
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
222
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
223
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
224
                'ORDER BY GMR01.gmr_ordre DESC';
225
 
226
    $result = $db->query($requete);
227
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
228
 
229
    $row = $result->fetchRow(DB_FETCHMODE_OBJECT);
230
    $nouveau_ordre_menu = $row->gmr_ordre + 1;
231
    $result->free();
232
 
233
    $requete =  'INSERT INTO gen_menu_relation '.
234
                'SET gmr_id_menu_02 = '.$menuid.', '.
235
                'gmr_id_menu_01 = '.$nouveau_id_menu.', '.
236
                'gmr_id_valeur = 1, '.
237
                'gmr_ordre = '.$nouveau_ordre_menu;
238
 
239
    $result = $db->query($requete);
240
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
241
 
242
    //----------------------------------------------------------------------------
243
    // Ajout de la relation-type "menu classique"
244
 
245
    // Récupération d'infos sur la hierarchie du menu
246
    $requete =  'SELECT * '.
247
                'FROM gen_menu_relation, gen_menu '.
248
                'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.
249
                'AND gmr_id_valeur = 100 '.// 10 = type menu "classique"
250
                'AND gmr_id_menu_01 = gm_id_menu '.
251
                'AND gm_ce_site = '.$id_site.' '.
252
                'ORDER BY gmr_ordre DESC';
253
 
254
    $result = $db->query($requete);
255
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
256
 
257
    $row = $result->fetchRow(DB_FETCHMODE_OBJECT);
258
    $nouveau_ordre_menu_classique = $row->gmr_ordre + 1;
259
    $result->free();
260
 
261
    $requete =  'INSERT INTO gen_menu_relation '.
262
                'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.
263
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
264
                'gmr_id_valeur = 100, '.
265
                'gmr_ordre = '.$nouveau_ordre_menu_classique;
266
 
267
    $result = $db->query($requete);
268
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
269
}
270
 
271
/** Fonction showMenu() - Affiche le formulaire de saisie d'un menu
272
*
273
*
274
*   @return  string  Le HTML
275
*/
276
function showMenu(  $db,
277
                    $adminProject, $adminLocale,
278
                    $baseURL, $baseURLjs, $baseHidden,
279
                    $menuid, $docid, $pageid, $menuopen, $docopen, $pageopen)
280
{
281
    //----------------------------------------------------------------------------
282
    // Initialisation de variable
283
    $closeURL = $baseURL.'&amp;menuid='.$menuid.'&amp;menuopen='.$menuopen;
284
 
285
    //----------------------------------------------------------------------------
286
    // Récupération d'information sur le site de ce menu.
287
    $PRJrow = GEN_lireInfoSitePrincipalCodeAlpha($db, $adminProject);
288
    if ($PRJrow == false) {
289
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
290
            'Code alpha du site : '. $adminProject .'<br />'.
291
            'Ligne n° : '. __LINE__ .'<br />'.
292
            'Fichier n° : '. __FILE__ .'<br />');
293
    }
294
 
295
    //----------------------------------------------------------------------------
296
    // Récupération des informations du menu concerné.
297
    $ligne_menu = GEN_lireInfoMenu($db, $menuid, DB_FETCHMODE_ASSOC);
298
    if ($ligne_menu == false) {
299
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du menu.<br />'.
300
            'Idenitifiant du menu n° : '. $menuid .'<br />'.
301
            'Ligne n° : '. __LINE__ .'<br />'.
302
            'Fichier n° : '. __FILE__ .'<br />');
303
    }
304
 
305
    //----------------------------------------------------------------------------
306
    // Titre de la page
307
    $res = '<h1>'.'Modification menu'.'</h1>'."\n";
308
    //----------------------------------------------------------------------------
309
    // Création du formulaire
310
    $form =& new HTML_QuickForm('updform', 'post', $baseURLjs);
311
    $tab_index = 1000;
312
    $squelette =& $form->defaultRenderer();
313
    $squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'{content}'."\n".'</form>'."\n");
314
    $squelette->setElementTemplate(  '<li>'."\n".
315
                                    '{label}'."\n".
316
                                    '{element}'."\n".
317
                                    '<!-- BEGIN required --><span class="symbole_obligatoire">*</span><!-- END required -->'."\n".
318
                                    '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
319
                                    '</li>'."\n");
320
    $squelette->setRequiredNoteTemplate("\n".'<p><span class="symbole_obligatoire">*</span> {requiredNote}</p>'."\n");
321
 
322
    $partie_menu_debut = '<fieldset>'."\n".'<legend>Configuration du menu</legend>'."\n".'<ul>'."\n";
323
    $form->addElement('html', $partie_menu_debut);
324
 
325
    $id = 'gm_code_num';
326
    $aso_attributs = array('id'=>$id, 'tabindex' => $tab_index++, 'size' => 5, 'maxlength' => 100);
327
    $label = '<label for="'.$id.'">'.'Code numérique du menu'.'</label>';
328
    $form->addElement('text', $id, $label, $aso_attributs);
329
    $form->addRule($id, 'Un code numérique est requis pour le menu !', 'required', '', 'client');
330
 
331
    $id = 'gm_code_alpha';
332
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 20, 'maxlength' => 20);
333
    $label = '<label for="'.$id.'">'.'Code alphanumérique du menu'.'</label>';
334
    $form->addElement('text', $id, $label, $aso_attributs);
335
    $form->addRule($id, 'Un code alphanumérique est requis pour le menu !', 'required', '', 'client');
336
 
337
    $id = 'gm_nom';
338
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 100);
339
    $label = '<label for="'.$id.'">'.'Nom du menu'.'</label>';
340
    $form->addElement('text', $id, $label, $aso_attributs);
341
    $form->addRule($id, 'Un nom est requis pour le menu !', 'required', '', 'client');
342
    $form->applyFilter($id, 'trim');
343
 
344
    $id = 'gm_raccourci_clavier';
345
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 1, 'maxlength' => 1);
346
    $label = '<label for="'.$id.'">'.'Raccourci clavier'.'</label>';
347
    $form->addElement('text', $id, $label, $aso_attributs);
348
 
349
    $id = 'defaut';
350
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
351
    $label = '<label for="'.$id.'">'.'En faire le menu par défaut'.'</label>';
352
    $form->addElement('checkbox', $id, $label, '', $aso_attributs);
353
 
354
    $id = 'gm_fichier_squelette';
355
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 255);
356
    $label = '<label for="'.$id.'">'.'Fichier squelette'.'</label>';
357
    $form->addElement('text', $id, $label, $aso_attributs);
358
 
359
    $id = 'gm_description_resume';
360
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 50);
361
    $label = '<label for="'.$id.'">'.'Contenu info-bulle'.'</label>';
362
    $form->addElement('textarea', $id, $label, $aso_attributs);
363
    $form->addRule($id, 'Une description courte pour l\'info-bulle est requise pour ce menu !', 'required', '', 'client');
364
 
365
    // Requête sur les applications
366
    $requete =  'SELECT gap_id_application, gap_nom '.
367
                'FROM gen_application '.
368
                'WHERE gap_bool_applette = 0';// Pour éviter d'afficher les applettes.
369
    $resultat = $db->query($requete);
370
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
371
 
372
    $aso_options = array();
373
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
374
        $aso_options[$ligne->gap_id_application] = $ligne->gap_nom;
375
    }
376
    $resultat->free();
377
    $id = 'gm_ce_application';
378
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
379
    $label = '<label for="'.$id.'">'.'Application'.'</label>';
380
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
381
 
382
    $id = 'gm_application_arguments';
383
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
384
    $label = '<label for="'.$id.'">'.'Arguments de l\'application'.'</label>';
385
    $form->addElement('text', $id, $label, $aso_attributs);
386
 
387
    $partie_menu_fin = '</ul>'."\n".'</fieldset>'."\n";
388
    $form->addElement('html', $partie_menu_fin);
389
 
390
    $partie_entete_debut = '<fieldset>'."\n".'<legend>Entête des pages du menu</legend>'."\n".'<ul>'."\n";
391
    $form->addElement('html', $partie_entete_debut);
392
 
393
    $id = 'gm_robot';
394
    $aso_options = array(   'index,follow' => 'Indexer cette page et les suivantes',
395
                            'index' => 'Indexer seulement cette page',
396
                            'noindex' => 'Ne pas indexer cette page',
397
                            'noindex,nofollow' => 'Ne pas indexer cette page et les suivantes',
398
                            '' => 'Auncune');
399
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
400
    $label = '<label for="'.$id.'">'.'Indexation par robots'.'</label>';
401
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
402
 
403
    $id = 'gm_titre';
404
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
405
    $label = '<label for="'.$id.'">'.'Titre de la page'.'</label>';
406
    $form->addElement('text', $id, $label, $aso_attributs);
407
 
408
    $id = 'gm_titre_alternatif';
409
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
410
    $label = '<label for="'.$id.'">'.'Titre alternatif de la page'.'</label>';
411
    $form->addElement('text', $id, $label, $aso_attributs);
412
 
413
    $id = 'gm_mots_cles';
414
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 50);
415
    $label = '<label for="'.$id.'">'.'Mots-clés'.'</label>';
416
    $form->addElement('textarea', $id, $label, $aso_attributs);
417
 
418
    $id = 'gm_description_libre';
419
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
420
    $label = '<label for="'.$id.'">'.'Description du contenu '.'</label>';
421
    $form->addElement('textarea', $id, $label, $aso_attributs);
422
 
423
    $id = 'gm_description_table_matieres';
424
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
425
    $label = '<label for="'.$id.'">'.'Table des matières'.'</label>';
426
    $form->addElement('textarea', $id, $label, $aso_attributs);
427
 
428
    $id = 'gm_source';
429
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
430
    $label = '<label for="'.$id.'">'.'Source'.'</label>';
431
    $form->addElement('text', $id, $label, $aso_attributs);
432
 
433
    $id = 'gm_auteur';
434
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
435
    $label = '<label for="'.$id.'">'.'Auteur'.'</label>';
436
    $form->addElement('text', $id, $label, $aso_attributs);
437
 
438
    $id = 'gm_contributeur';
439
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
440
    $label = '<label for="'.$id.'">'.'Contributeur'.'</label>';
441
    $form->addElement('textarea', $id, $label, $aso_attributs);
442
 
443
    $id = 'gm_editeur';
444
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
445
    $label = '<label for="'.$id.'">'.'Editeur'.'</label>';
446
    $form->addElement('textarea', $id, $label, $aso_attributs);
447
 
448
    $id = 'gm_date_debut_validite';
449
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
450
    $label = '<label for="'.$id.'">'.'Date de début de validité'.'</label>';
451
    $form->addElement('text', $id, $label, $aso_attributs);
452
 
453
    $id = 'gm_date_fin_validite';
454
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
455
    $label = '<label for="'.$id.'">'.'Date de fin de validité'.'</label>';
456
    $form->addElement('text', $id, $label, $aso_attributs);
457
 
458
    $id = 'gm_date_copyright';
459
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
460
    $label = '<label for="'.$id.'">'.'Année pour le copyright'.'</label>';
461
    $form->addElement('text', $id, $label, $aso_attributs);
462
 
463
    $id = 'gm_licence';
464
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
465
    $label = '<label for="'.$id.'">'.'URL de la licence'.'</label>';
466
    $form->addElement('text', $id, $label, $aso_attributs);
467
 
468
    $id = 'gm_categorie';
469
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
470
    $label = '<label for="'.$id.'">'.'Catégorie'.'</label>';
471
    $form->addElement('text', $id, $label, $aso_attributs);
472
 
473
    $id = 'gm_public';
474
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
475
    $label = '<label for="'.$id.'">'.'Public pour la page'.'</label>';
476
    $form->addElement('text', $id, $label, $aso_attributs);
477
 
478
    $id = 'gm_public_niveau';
479
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 25, 'maxlength' => 45);
480
    $label = '<label for="'.$id.'">'.'Niveau du public pour la page'.'</label>';
481
    $form->addElement('text', $id, $label, $aso_attributs);
482
 
483
    $id = 'gm_ce_type_portee_spatiale';
484
    $aso_options = array(   '' => 'Aucun',
485
                            'iso3166' => 'Code de pays sur deux lettres (iso3166)',
486
                            'Point' => 'Point géographique',
487
                            'Box' => 'Représenation des régions géographiques du Dublin Core',
488
                            'TGN' => 'Noms issus du Getty Thesaurus of Geographic Names');
489
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
490
    $label = '<label for="'.$id.'">'.'Type de portée spatiale'.'</label>';
491
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
492
 
493
    $id = 'gm_portee_spatiale';
494
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
495
    $label = '<label for="'.$id.'">'.'Portée spatiale de la page'.'</label>';
496
    $form->addElement('text', $id, $label, $aso_attributs);
497
 
498
    $id = 'gm_ce_type_portee_temporelle';
499
    $aso_options = array(   '' => 'Aucun',
500
                            'W3CDTF' => 'Codage des dates et heures du W3C',
501
                            'Period' => 'Représentation des intervalles de temps du Dublin Core');
502
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
503
    $label = '<label for="'.$id.'">'.'Type de portée temporelle'.'</label>';
504
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
505
 
506
    $id = 'gm_portee_temporelle';
507
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
508
    $label = '<label for="'.$id.'">'.'Portée temporelle de la page'.'</label>';
509
    $form->addElement('text', $id, $label, $aso_attributs);
510
 
511
    $partie_entete_fin = '</ul>'."\n".'</fieldset>'."\n";
512
    $form->addElement('html', $partie_entete_fin);
513
 
514
    $bouton_validation = '<input type="submit" value="'.'Enregistrer'.'" title="'.'Enregistrer'.'" />';
515
    $bouton_annuler =   '<a class="bouton" href="'.$closeURL.'" title="'.'Annuler'.'" >'.'Annuler'.'</a>';
516
    $boutons =  '<p>'."\n".$bouton_validation.' '."\n".$bouton_annuler."\n".'</p>'."\n";
517
    $form->addElement('html', $boutons);
518
 
519
    $partie_cachee_debut = '<p>'."\n";
520
    $form->addElement('html', $partie_cachee_debut);
521
 
522
    $form->addElement('html', $baseHidden);
523
    $form->addElement('hidden', 'menuid', $menuid);
524
    $form->addElement('hidden', 'docid', $docid);
525
    $form->addElement('hidden', 'pageid', $pageid);
526
    $form->addElement('hidden', 'menuopen', $menuopen);
527
    $form->addElement('hidden', 'docopen', $docopen);
528
    $form->addElement('hidden', 'pageopen', $pageopen);
529
    $form->addElement('hidden', 'doccmd', 'commitupdmenu');
530
 
531
    $partie_cachee_fin = '</p>'."\n";
532
    $form->addElement('html', $partie_cachee_fin);
533
 
534
    // Instanciation avec les valeur par défaut
535
    $form->setDefaults($ligne_menu);
536
 
537
    // Javascript pour la validation côté client
538
    $regles_javascript = $form->getValidationScript();
539
    // Suppression des balises déjà créées par GEN_stockerCodeScript()
540
    $regles_javascript = ereg_replace ( '<script type="text\/javascript">', '', $regles_javascript);
541
    $regles_javascript = ereg_replace ( '<!--', '', $regles_javascript);
542
    $regles_javascript = ereg_replace ( '\/\/-->', '', $regles_javascript);
543
    $regles_javascript = ereg_replace ( '<\/script>', '', $regles_javascript);
544
    GEN_stockerCodeScript($regles_javascript);
545
 
546
    // Note de fin de formulaire
547
    $form->setRequiredNote('Indique les champs obligatoires');
548
 
549
    $res .= $form->toHTML()."\n";
550
    return $res;
551
}
552
 
553
/** Fonction commitUpdateLevel() - Enregistre les infos du formulaire de saisie d'un menu
554
*
555
*
556
*   @return  void  les données sont enregistrées dans la base de données.
557
*/
558
function commitUpdateLevel($db, $adminProject, $adminLocale, $menuid)
559
{
560
    global $_GEN_commun;
561
 
562
    $requete =  'UPDATE gen_menu SET '.
563
                'gm_ce_application = '.$_POST['gm_ce_application'].', '.
564
                'gm_application_arguments = "'.$_POST['gm_application_arguments'].'", '.
565
                'gm_fichier_squelette = "'.$_POST['gm_fichier_squelette'].'", '.
566
                'gm_code_num = '.$_POST['gm_code_num'].', '.
567
                'gm_code_alpha = "'.$_POST['gm_code_alpha'].'", '.
568
                'gm_nom = "'.$_POST['gm_nom'].'", '.
569
                'gm_raccourci_clavier = "'.$_POST['gm_raccourci_clavier'].'", '.
570
                'gm_robot = "'.$_POST['gm_robot'].'", '.
571
                'gm_titre = "'.$_POST['gm_titre'].'", '.
572
                'gm_titre_alternatif = "'.$_POST['gm_titre_alternatif'].'", '.
573
                'gm_mots_cles = "'.$_POST['gm_mots_cles'].'", '.
574
                'gm_description_libre = "'.$_POST['gm_description_libre'].'", '.
575
                'gm_description_resume = "'.$_POST['gm_description_resume'].'", '.
576
                'gm_description_table_matieres = "'.$_POST['gm_description_table_matieres'].'", '.
577
                'gm_source = "'.$_POST['gm_source'].'", '.
578
                'gm_auteur = "'.$_POST['gm_auteur'].'", '.
579
                'gm_contributeur = "'.$_POST['gm_contributeur'].'", '.
580
                'gm_editeur = "'.$_POST['gm_editeur'].'", '.
581
                'gm_date_debut_validite = "'.$_POST['gm_date_debut_validite'].'", '.
582
                'gm_date_fin_validite = "'.$_POST['gm_date_fin_validite'].'", '.
583
                'gm_date_copyright = "'.$_POST['gm_date_copyright'].'", '.
584
                'gm_licence = "'.$_POST['gm_licence'].'", '.
585
                'gm_categorie = "'.$_POST['gm_categorie'].'", '.
586
                'gm_public = "'.$_POST['gm_public'].'", '.
587
                'gm_public_niveau = "'.$_POST['gm_public_niveau'].'", '.
588
                'gm_ce_type_portee_spatiale = "'.$_POST['gm_ce_type_portee_spatiale'].'", '.
589
                'gm_portee_spatiale = "'.$_POST['gm_portee_spatiale'].'", '.
590
                'gm_ce_type_portee_temporelle = "'.$_POST['gm_ce_type_portee_temporelle'].'", '.
591
                'gm_portee_temporelle = "'.$_POST['gm_portee_temporelle'].'", '.
592
                'gm_ce_admin = "'.$_GEN_commun['pear_auth']->getAuthData('ga_id_administrateur').'" '.
593
                'WHERE gm_id_menu = '.$menuid;
594
 
595
    $result = $db->query($requete);
596
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
597
 
598
    // Gestion de la relation menu par défaut
599
    if (isset($_POST['defaut']) && $_POST['defaut'] == 1) {
600
        $requete_id_menu_supr_defaut =  'SELECT GM01.gm_id_menu AS id_menu_supr_defaut '.
601
                                        'FROM gen_menu AS GM01, gen_menu AS GM02, gen_menu_relation '.
602
                                        'WHERE GM02.gm_id_menu = '.$menuid.' '.
603
                                        'AND GM02.gm_ce_site = GM01.gm_ce_site '.
604
                                        'AND GM01.gm_id_menu = gmr_id_menu_01 '.
605
                                        'AND gmr_id_valeur = 101 ';// 101 = menu par "defaut"
606
        $resultat_menu_supr_defaut = $db->query($requete_id_menu_supr_defaut);
607
        if (DB::isError($resultat_menu_supr_defaut)) {
608
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu_supr_defaut->getMessage(), $requete_id_menu_supr_defaut));
609
        }
610
        if ($resultat_menu_supr_defaut->numRows() > 0 ) {
611
            $requete_supr_defaut =  'DELETE FROM gen_menu_relation '.
612
                                    'WHERE gmr_id_menu_01 = gmr_id_menu_02 '.
613
                                    'AND gmr_id_valeur = 101 '.// 101 = menu par "defaut"
614
                                    'AND gmr_id_menu_01 = '.$resultat_menu_supr_defaut->id_menu_supr_defaut;
615
            $resultat_supr_defaut = $db->query($requete_supr_defaut);
616
            if (DB::isError($resultat_supr_defaut)) {
617
                die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_supr_defaut->getMessage(), $requete_supr_defaut));
618
            }
619
        }
620
        // Requete d'insertion de la relation menu par défaut
621
        $requete =  'INSERT INTO gen_menu_relation '.
622
                    'SET gmr_id_menu_01 = '.$menuid.', '.
623
                    'gmr_id_menu_02 = '.$menuid.', '.
624
                    'gmr_id_valeur = 101, '.
625
                    'gmr_ordre = NULL ';
626
        $resultat = $db->query($requete);
627
        if (DB::isError($resultat)) {
628
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
629
        }
630
    }
631
}
632
 
633
/** Fonction moveMenu() - Permet de déplacer un menu dans la hiérarchie.
634
*
635
* Permet de déplacer un menu dans la hiérarchie des menus classiques.
636
*
637
*   @param  mixed  objet Pear DB de connexion à la base de données.
638
*   @param  string  code du site administré.
639
*   @param  string  identifiant de l'i18n du site administré.
640
*   @param  int  identifiant du menu à déplacer.
641
*   @param  boolean  indique si on veut monter le menu (true) ou le descendre (false).
642
*   @return  void  Modifie la base de données.
643
*/
644
function moveMenu($db, $adminProject, $adminLocale, $menuid, $up)
645
{
646
    //----------------------------------------------------------------------------
647
    // Récupération d'information sur le site de ce menu.
648
    $PRJrow = GEN_lireInfoSitePrincipalCodeAlpha($db, $adminProject);
649
    if ($PRJrow == false) {
650
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
651
            'Code alpha du site : '. $adminProject .'<br />'.
652
            'Ligne n° : '. __LINE__ .'<br />'.
653
            'Fichier n° : '. __FILE__ .'<br />');
654
    }
655
    //----------------------------------------------------------------------------
656
    // Récupération d'informations sur les relations du menu courant.
657
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $menuid, '1');
658
    if ($ligne_menu_courant_relation == false) {
659
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos sur les relations du menu.<br />'.
660
            'Identifiant menu : '. $menuid .'<br />'.
661
            'Identifiant valeur relation : 1 <br />'.
662
            'Ligne n° : '. __LINE__ .'<br />'.
663
            'Fichier n° : '. __FILE__ .'<br />');
664
    }
665
    $id_pere = $ligne_menu_courant_relation->gmr_id_menu_02;
666
 
667
    // Il serait mieux d'utiliser la fonction ci-dessous.
668
    // Mais cela ne semble pas fonctionner!!!
669
    /*
670
    $id_pere = GEN_lireIdentifiantMenuPere($menuid);
671
    if ($id_pere == false) {
672
        die('ERREUR Génésia Administrateur de Menus : impossible de lire identifiant du menu père.<br />'.
673
            'Identifiant menu fils : '. $menuid .'<br />'.
674
            'Ligne n° : '. __LINE__ .'<br />'.
675
            'Fichier n° : '. __FILE__ .'<br />');
676
    }
677
    */
678
 
679
    //----------------------------------------------------------------------------
680
    // Recherche d'information sur le menu précédent ou suivant le menu courant
681
    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
682
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
683
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
684
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
685
                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
686
                'AND GMR01.gmr_id_valeur = 1 ';// 1 = relation menu "père"
687
    if ($up) {
688
        $requete .= 'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
689
                    'ORDER BY GMR01.gmr_ordre DESC';
690
    } else {
691
        $requete .= 'AND GMR01.gmr_ordre > '.$ligne_menu_courant_relation->gmr_ordre.' '.
692
                    'ORDER BY GMR01.gmr_ordre ASC';
693
    }
694
 
695
    $MENUresult = $db->query($requete);
696
    (DB::isError($MENUresult)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $MENUresult->getMessage(), $requete)) : '';
697
 
698
    $MENUrow = $MENUresult->fetchRow(DB_FETCHMODE_OBJECT);
699
    $MENUresult->free();
700
 
701
    //----------------------------------------------------------------------------
702
    // Si la requete ne retourne rien nous ne faisons rien.
703
    if (! $MENUrow) {
704
        return;
705
    }
706
 
707
    //----------------------------------------------------------------------------
708
    // Mise à jour des relations du menu courant
709
    $requete =  'UPDATE gen_menu_relation SET '.
710
                'gmr_ordre = '.$MENUrow->nouvel_ordre.' '.
711
                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
712
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
713
 
714
    $result = $db->query($requete);
715
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
716
    //----------------------------------------------------------------------------
717
    // Mise à jour des relations du menu précédent ou suivant
718
    $requete =  'UPDATE gen_menu_relation SET '.
719
                'gmr_ordre = '.$ligne_menu_courant_relation->gmr_ordre.' '.
720
                'WHERE gmr_id_menu_01 = '.$MENUrow->id_menu_remplace.' '.
721
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
722
 
723
    $result = $db->query($requete);
724
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
725
}
726
 
727
/** Fonction deleteMenu() - Supprime un menu classique.
728
*
729
* Supprime de la base de données de Génésia toutes les traces du menu classiques
730
* passé en paramètre.
731
*
732
*   @param mixed l'objet Pear DB de connexion à la base de données.
733
*   @param  string  l'identifiant du menu à supprimer
734
*   @return  void le menu classique est supprimé de la base de données.
735
*/
736
function deleteMenu($objet_pear_db, $id_menu_a_supprimer)
737
{
738
    //----------------------------------------------------------------------------
739
    // Y a t'il des sous_menus
740
    $requete =    'SELECT COUNT(gm_id_menu) AS compte '.
741
                'FROM gen_menu, gen_menu_relation '.
742
                'WHERE gmr_id_menu_02 = '.$id_menu_a_supprimer.' '.
743
                'AND gmr_id_valeur = 1 '.
744
                'AND gmr_id_menu_01 = gm_id_menu ';
745
 
746
    $resultat = $objet_pear_db->query($requete);
747
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
748
 
749
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
750
 
751
    if ($ligne && ($ligne->compte > 0)) {
752
        return "Il reste des menus attachés à ce menu !";
753
    }
754
 
755
    //----------------------------------------------------------------------------
756
    // S'il n'y a plus de sous niveau, on supprime le menu
757
    $requete =  'DELETE FROM gen_menu '.
758
                'WHERE gm_id_menu = '.$id_menu_a_supprimer;
759
 
760
    $resultat = $objet_pear_db->query($requete);
761
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
762
 
763
    //----------------------------------------------------------------------------
764
    // Puis on supprime les relations de ce menu
765
    $requete =  'DELETE FROM gen_menu_relation '.
766
                'WHERE gmr_id_menu_01 = '.$id_menu_a_supprimer;
767
 
768
    $resultat = $objet_pear_db->query($requete);
769
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
770
}
771
 
772
 
773
/** Fonction deployer_menu () - Affiche un menu en html
774
*
775
*   @param  integer l'identifiant du menu
776
*   @param  integer le code (numérique ou alphanumérique) du site administré.
777
*   @return string  du code HTML
778
*/
779
function deployer_menu($id_menu_a_deployer, $adminProject)
780
{
781
    global $project, $locale, $db, $menuopen, $menuid;
782
 
783
    // Est-ce que ces menus comporte des sous-menus ?
784
    $requete_sous_menu =    'SELECT gm_id_menu '.
785
                            'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
786
                            'WHERE GMR01.gmr_id_menu_02 = '.$id_menu_a_deployer.' '.
787
                            'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
788
                            'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
789
                            'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
790
                            'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
791
                            'AND GMR02.gmr_id_valeur = 100 '.// 100 = type "menu classique"
792
                            'ORDER BY GMR01.gmr_ordre ASC';
793
 
794
    $resultat_sous_menu = $db->query($requete_sous_menu) ;
795
    if (DB::isError($resultat_sous_menu)) {
796
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_sous_menu->getMessage(), $requete_sous_menu));
797
    }
798
 
799
    if (isset($menuid)) {
800
        $menu_id_ancetre = GEN_lireIdentifiantMenuAncetre($menuid);
801
    }
802
 
803
    $res = '' ;
804
    if ($resultat_sous_menu->numRows() > 0) {
805
        // ici, on sait qu'un menu a des sous menus
806
        // on commence par l'afficher
807
        // $afficher_un_moins vaut vrai si :
808
        // - menuopen vaut 1 ET menuid (de l'url) égale le menu qu'on est en train de déployer
809
        // - OU  l'identifiant du menu racine du menuid est celui qu'on est en train de déployer
810
        //   mais n'est pas la racine
811
        $afficher_un_moins = ($menuopen && $menuid == $id_menu_a_deployer)
812
                                || (GEN_etreAncetre($id_menu_a_deployer, $menuid)  && $menuid != $menu_id_ancetre);
813
        $res .= menu_toHTML($id_menu_a_deployer, $afficher_un_moins, $adminProject);
814
        if ($afficher_un_moins) {
815
            while ($ligne_sous_menu = $resultat_sous_menu->fetchRow(DB_FETCHMODE_OBJECT)) {
816
                $res .= '<ul>'."\n" ;
817
                $res .= deployer_menu($ligne_sous_menu->gm_id_menu, $adminProject);
818
                $res .= '</ul>';
819
            }
820
        }
821
    } else {
822
        $res .= menu_toHTML($id_menu_a_deployer, true, $adminProject);
823
    }
824
    return $res;
825
}
826
 
827
/** Fonction menu_toHTML () Effectue une sortie d'un menu en HTML
828
*
829
*
830
*   @return  string  Une liste HTML
831
*/
832
function menu_toHTML($menuid, $deplier, $adminProject)
833
{
834
    global $db, $_GEN_commun, $menu, $locale, $menuopen, $doccmd ;
835
    $cancelLabel   = 'Annuler';
836
    $etiquette_alt_modifier     = 'Modifier';
837
    $etiquette_title_modifier     = 'Modifier ce menu';
838
    $etiquette_alt_supprimer   = 'Supprimer';
839
    $etiquette_title_supprimer   = 'Supprimer ce menu';
840
    $etiquette_alt_ajouter = 'Ajouter';
841
    $etiquette_title_ajouter = 'Ajouter un menu inférieur';
842
    $etiquette_alt_monter = 'Monter';
843
    $etiquette_title_monter = 'Monter ce menu';
844
    $etiquette_alt_descendre = 'Descendre';
845
    $etiquette_title_descendre = 'Descendre ce menu';
846
    $etiquette_alt_redaction = 'Rédiger';
847
    $etiquette_title_redaction = 'Rédiger le contenu de ce menu';
848
 
849
    $label_deplier = "Déplier" ;
850
    $label_plier = "Plier" ;
851
 
852
    $baseURL =  'papyrus.php?'.
853
                'site='.$_GEN_commun['url_site'].
854
                '&menu='.$_GEN_commun['url_menu'].
855
                '&langue='.$_GEN_commun['url_i18n'].
856
                '&adminProject='.$adminProject;
857
 
858
    $requete =  'SELECT *, ga_prenom '.
859
                'FROM gen_menu, gen_annuaire '.
860
                'WHERE gm_id_menu = '.$menuid.' '.
861
                'AND gm_ce_admin = ga_id_administrateur';
862
 
863
    $resultat = $db->query($requete);
864
    if (DB::isError($resultat)) {
865
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
866
    }
867
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
868
 
869
    // recherche de l'application liée
870
    $requete_app =  'SELECT gap_nom '.
871
                    'FROM gen_application '.
872
                    'WHERE gap_id_application = '.$ligne->gm_ce_application;
873
 
874
    $resultat_app = $db->query($requete_app);
875
    if (DB::isError($resultat_app)) {
876
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_app->getMessage(), $requete_app));
877
    }
878
    $ligne_app = $resultat_app->fetchRow(DB_FETCHMODE_OBJECT);
879
    $resultat_app->free();
880
 
881
    if ($deplier) {
882
      $imgURL  = ADME_IMAGE_MOINS;
883
      $imgHREF = $baseURL.'&amp;menuid='.$ligne->gm_id_menu;
884
      $alt = $label_plier ;
885
    } else {
886
        $imgURL  = ADME_IMAGE_PLUS;
887
        $imgHREF = $baseURL.'&amp;menuid='.$ligne->gm_id_menu.'&amp;menuopen=1';
888
        $alt = $label_deplier ;
889
    }
890
 
891
    if (isset($imgURL) && $imgURL != '') {
892
        $img = '<a href="'.$imgHREF.'" class="anchor" title="'.$alt.'">'.
893
          '<img src="'.$imgURL.'" alt="'.$alt.'" width="9" height="9" border="0" />'.
894
          '</a>'.'&nbsp;';
895
    } else {
896
        $img = '';
897
    }
898
 
899
    //------------------------------------------------------------------------
900
    // Url de base
901
    $pageHREF = $baseURL.'&amp;menuid='.$ligne->gm_id_menu.'&amp;menuopen='.($menuopen ? 1 : 0);
902
 
903
    //------------------------------------------------------------------------
904
    // Affichage du nom du menu et de ses infos
905
    $menuText  = htmlentities(empty($ligne->gm_nom) ? "($ligne->gm_nom)" : $ligne->gm_nom);
906
    $menuText .= '&nbsp;';
907
    $menuText .= '('.$ligne_app->gap_nom.' / '.$ligne->ga_prenom.')';
908
    $menuText .= '&nbsp;';
909
    //------------------------------------------------------------------------
910
    // Icones d'actions
911
    $actionIcons =
912
        '<a href="'.$pageHREF.'&amp;doccmd=showmenu" title="'.$etiquette_title_modifier.'">'.
913
        '<img src="'.ADME_IMAGE_VOIR.'" alt="'.$etiquette_alt_modifier.'" width="16" height="16" border="0" />'.
914
        '</a>'.
915
        '&nbsp;'.
916
        '<a href="'.$pageHREF.'&amp;doccmd=upmenu" title="'.$etiquette_title_monter.'">'.
917
        '<img src="'.ADME_IMAGE_FLECHE_HAUT.'" alt="'.$etiquette_alt_monter.'" width="16" height="16" border="0" />'.
918
        '</a>'.
919
        '&nbsp;'.
920
        '<a href="'.$pageHREF.'&amp;doccmd=dnmenu" title="'.$etiquette_title_descendre.'">'.
921
        '<img src="'.ADME_IMAGE_FLECHE_BAS.'" alt="'.$etiquette_alt_descendre.'" width="16" height="16" border="0" />'.
922
        '</a>'.
923
        '&nbsp;'.
924
        '<a href="javascript:deleteMenu ('.$ligne->gm_id_menu.')" title="'.$etiquette_title_supprimer.'">'.
925
        '<img src="'.ADME_IMAGE_SUPPRIMER.'" alt="'.$etiquette_alt_supprimer.'" width="16" height="16" border="0" />'.
926
        '</a>'.
927
        '&nbsp;'.
928
        '<a href="'.$baseURL.'&amp;menuview=menu&amp;menuid='.$ligne->gm_id_menu.'&amp;menuopen=1&amp;doccmd=addmenu" title="'.$etiquette_title_ajouter.'">'.
929
        '<img src="'.ADME_IMAGE_NOUVEAU.'" alt="'.$etiquette_alt_ajouter.'" width="16" height="16" border="0" />'.
930
        '</a>'.'&nbsp;';
931
 
932
    // Si l'application liée est "texte simple", on ajoute un icone avec un lien vers
933
    // l'administration de cette application.
934
    if ($ligne->gm_ce_application == 3) {     // l'appli afficheur a pour id 3
935
        //$url_popup = DOCADM_CHEMIN_APPLICATION."docpopup.php?admproject=$adminProject&locale=$locale&menu=$menuid" ;
936
        $actionIcons .= '<a href="'.$pageHREF.'&amp;doccmd=contenuredac" title="'.$etiquette_title_redaction.'">'.
937
                            '<img src="'.ADME_IMAGE_TEXTE.'" alt="'.$etiquette_alt_redaction.'" width="16" height="16" border="0" />'.
938
                        '</a>'.'&nbsp;';
939
    }
940
 
941
    //--------------------------------------------------------------------------
942
    // Envoi du menu.
943
    $res = '<li class="text">'.$img.$menuText.$actionIcons.'</li>'."\n";
944
    return $res;
945
}
946
 
947
// +------------------------------------------------------------------------------------------------------+
948
// |                                            PIED du PROGRAMME                                         |
949
// +------------------------------------------------------------------------------------------------------+
950
                                           /*Partie non obligatoire*/
951
 
952
 
953
/* +--Fin du code ----------------------------------------------------------------------------------------+
954
*
955
* $Log: not supported by cvs2svn $
25 jpm 956
* Revision 1.1  2004/06/16 15:04:32  jpm
957
* Changement de nom de Génésia en Papyrus.
958
* Changement de l'arborescence.
959
*
7 jpm 960
* Revision 1.27  2004/05/10 12:13:03  jpm
961
* Modification des formulaires.
962
*
963
* Revision 1.26  2004/05/07 16:31:20  jpm
964
* Amélioration du formulaire d'un menu classique.
965
*
966
* Revision 1.25  2004/05/07 07:23:53  jpm
967
* Amélioration du code, des commentaires et correction de bogues.
968
*
969
*
970
* +-- Fin du code ----------------------------------------------------------------------------------------+
971
*/
972
?>