Subversion Repositories Applications.papyrus

Rev

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