Subversion Repositories Applications.papyrus

Rev

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

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