Subversion Repositories Applications.papyrus

Rev

Rev 346 | Rev 379 | 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
// +------------------------------------------------------------------------------------------------------+
378 jpm 22
// CVS : $Id: adme_menu_classique.fonct.php,v 1.18 2005-05-26 08:54:20 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 :
285 jpm 33
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
7 jpm 34
//Autres auteurs :
35
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
285 jpm 36
*@author        Laurent COUDOUNEAU <lc@gsite.org>
7 jpm 37
*@copyright     Tela-Botanica 2000-2004
378 jpm 38
*@version       $Revision: 1.18 $ $Date: 2005-05-26 08:54:20 $
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
150 jpm 88
    if (($adme_action == ADME_LG_ACTION_DEPLIER || $adme_action == ADME_LG_ACTION_CLASSIQUE_AJOUTER) && $id_menu_a_deployer != 0) {
134 jpm 89
        $_SESSION['adme_menus_classiques_ouverts'][$adme_menu_id] = $adme_menu_id;
90
    }
150 jpm 91
    if ($adme_action == ADME_LG_ACTION_PLIER && $id_menu_a_deployer != 0) {
134 jpm 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) ||
150 jpm 107
                ($id_menu_a_deployer == $adme_menu_id && $adme_action == ADME_LG_ACTION_DEPLIER) ||
134 jpm 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) ||
150 jpm 113
                        ($id_menu_a_deployer == $adme_menu_id && $adme_action == ADME_LG_ACTION_PLIER) ||
134 jpm 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) ||
150 jpm 121
            ($id_menu_a_deployer == $adme_menu_id && $adme_action == ADME_LG_ACTION_DEPLIER) ||
134 jpm 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 +.
155 jpm 152
* @return string une ligne de liste XHTML
134 jpm 153
*/
154
function ADME_retournerXhtmlMenuClassique($db, $url, $adme_site_id, $adme_menu_id, $int_deplier)
155
{
141 jpm 156
    //-------------------------------------------------------------------------------------------------------------------
157
    // Initialisation des variables
150 jpm 158
 
134 jpm 159
 
141 jpm 160
    //-------------------------------------------------------------------------------------------------------------------
161
    // Récupération des infos concernant l'administrateur d'un menu
134 jpm 162
    $requete =  'SELECT gen_menu.*, ga_prenom '.
163
                'FROM gen_menu, gen_annuaire '.
164
                'WHERE gm_id_menu = '.$adme_menu_id.' '.
165
                'AND gm_ce_admin = ga_id_administrateur';
166
 
167
    $resultat = $db->query($requete);
168
    if (DB::isError($resultat)) {
169
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
170
    }
171
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
172
 
141 jpm 173
    //-------------------------------------------------------------------------------------------------------------------
174
    // Recupération des infos de l'appli du menu courant.
175
    $ligne_app = GEN_retournerInfoAppliMenu($db, $adme_menu_id);
134 jpm 176
 
177
    //-------------------------------------------------------------------------------------------------------------------
178
    // XHTML image plier-déplier
179
 
180
    $url->addQueryString('adme_site_id', $adme_site_id);
181
    $url->addQueryString('adme_menu_id', $ligne->gm_id_menu);
182
    $xhtml_pd = '';
183
    if ($int_deplier != 0) {
184
        if ($int_deplier == 1) {
185
            // Afficher un -
186
            $image_plier_deplier = ADME_IMAGE_MOINS;
150 jpm 187
            $alt = ADME_LG_ACTION_PLIER_ALT;
188
            $url->addQueryString('adme_action', ADME_LG_ACTION_PLIER);
134 jpm 189
            $url_plier_deplier = $url->getURL();
190
        } else if ($int_deplier == 2) {
191
            // Afficher un +
192
            $image_plier_deplier = ADME_IMAGE_PLUS;
150 jpm 193
            $alt = ADME_LG_ACTION_DEPLIER_ALT;
194
            $url->addQueryString('adme_action', ADME_LG_ACTION_DEPLIER);
134 jpm 195
            $url_plier_deplier = $url->getURL();
196
        }
197
        $xhtml_pd = '<a href="'.$url_plier_deplier.'" title="'.$alt.'">'.
198
                        '<img class="'.ADME_CLASS_IMG_PD.'" src="'.$image_plier_deplier.'" alt="'.$alt.'" />'.
199
                    '</a>'.'&nbsp;'."\n";
200
    }
201
 
202
    //-------------------------------------------------------------------------------------------------------------------
203
    // XHTML du nom du menu et de ses infos
150 jpm 204
    $xhtml_info  = htmlentities(empty($ligne->gm_nom) ? ADME_LG_PARENTHESE_OUVRANTE.$ligne->gm_nom.ADME_LG_PARENTHESE_FERMANTE : $ligne->gm_nom);
134 jpm 205
    $xhtml_info .= '&nbsp;';
150 jpm 206
    $xhtml_info .= ADME_LG_PARENTHESE_OUVRANTE.$ligne_app->gap_nom.'&nbsp;'.ADME_LG_SLASH.'&nbsp;'.$ligne->ga_prenom.ADME_LG_PARENTHESE_FERMANTE;
134 jpm 207
    $xhtml_info .= '&nbsp;'."\n";
208
 
209
    //-------------------------------------------------------------------------------------------------------------------
210
    // XHTML actions
211
    $url->removeQueryString('adme_action');
150 jpm 212
    $url->addQueryString('adme_action', ADME_LG_ACTION_CLASSIQUE_MODIFIER);
213
    $xhtml_action = '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_CLASSIQUE_MODIFIER_TITLE.'">'.
214
                        '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_VOIR.'" alt="'.ADME_LG_ACTION_CLASSIQUE_MODIFIER_ALT.'" />'.
134 jpm 215
                    '</a>&nbsp;'."\n";
216
    $url->removeQueryString('adme_action');
150 jpm 217
    $url->addQueryString('adme_action', ADME_LG_ACTION_CLASSIQUE_MONTER);
218
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_CLASSIQUE_MONTER_TITLE.'">'.
219
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_HAUT.'" alt="'.ADME_LG_ACTION_CLASSIQUE_MONTER_ALT.'" />'.
134 jpm 220
                        '</a>&nbsp;'."\n";
221
    $url->removeQueryString('adme_action');
150 jpm 222
    $url->addQueryString('adme_action', ADME_LG_ACTION_CLASSIQUE_DESCENDRE);
223
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_CLASSIQUE_DESCENDRE_TITLE.'">'.
224
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_BAS.'" alt="'.ADME_LG_ACTION_CLASSIQUE_DESCENDRE_ALT.'" />'.
134 jpm 225
                        '</a>&nbsp;'."\n";
226
    $url->removeQueryString('adme_action');
150 jpm 227
    $url->addQueryString('adme_action', ADME_LG_ACTION_CLASSIQUE_SUPPRIMER);
197 jpm 228
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_CLASSIQUE_SUPPRIMER_TITLE.'" onclick="javascript:return confirm(\''.ADME_LG_ACTION_SUPPRIMER_CONFIRMATION.'\');">'.
150 jpm 229
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_SUPPRIMER.'" alt="'.ADME_LG_ACTION_CLASSIQUE_SUPPRIMER_ALT.'" />'.
134 jpm 230
                        '</a>&nbsp;'."\n";
231
    $url->removeQueryString('adme_action');
150 jpm 232
    $url->addQueryString('adme_action', ADME_LG_ACTION_CLASSIQUE_AJOUTER);
233
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_CLASSIQUE_AJOUTER_TITLE.'">'.
234
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_NOUVEAU.'" alt="'.ADME_LG_ACTION_CLASSIQUE_AJOUTER_ALT.'" />'.
134 jpm 235
                        '</a>'.'&nbsp;'."\n";
236
 
141 jpm 237
    // Si le menu à une application liée on regarde s'il y a une interface d'administration.
238
    if ($ligne_app->gap_id_application != 0 && GEN_verifierPresenceInterfaceAdmin($db, $ligne_app->gap_id_application)) {
134 jpm 239
        $url->removeQueryString('adme_action');
150 jpm 240
        $url->addQueryString('adme_action', ADME_LG_ACTION_ADMINISTRER);
241
        $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_ADMINISTRER_TITLE.'">'.
242
                                '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TEXTE.'" alt="'.ADME_LG_ACTION_ADMINISTRER_ALT.'" />'.
134 jpm 243
                            '</a>'.'&nbsp;'."\n";
244
    }
245
 
246
    //-------------------------------------------------------------------------------------------------------------------
247
    // Envoi du menu.
248
    $retour = $xhtml_pd.$xhtml_info.$xhtml_action;
249
    return $retour;
250
}
251
 
128 jpm 252
/** Fonction ADME_ajouterMenuClassique() - Ajoute un sous menu au menu courant
7 jpm 253
*
134 jpm 254
* Cette fonction permet d'ajouter un sous-menu de type "classique" au menu courant.
128 jpm 255
* Ancien nom : addMenu()
256
*
134 jpm 257
* @param  object objet Pear de connection à la base de données.
258
* @param  object objet Pear d'authentification.
259
* @param  integer l'identifiant du site à administrer.
260
* @param  integer l'identifiant du menu à administrer.
261
* @return void le menu classique est ajouté à la base de données.
7 jpm 262
*/
128 jpm 263
function ADME_ajouterMenuClassique($db, $auth, $adme_site_id, $adme_menu_id)
7 jpm 264
{
265
    //----------------------------------------------------------------------------
266
    // Récupération d'infos sur le site principal.
128 jpm 267
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
268
    if ($objet_site == false) {
7 jpm 269
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
128 jpm 270
            'ID du site : '.$adme_site_id.'<br />'.
7 jpm 271
            'Ligne n° : '. __LINE__ .'<br />'.
272
            'Fichier n° : '. __FILE__ .'<br />');
273
    }
274
 
275
    $nouveau_id_menu = SQL_obtenirNouveauId($db, 'gen_menu', 'gm_id_menu');
128 jpm 276
    $auteur = $auth->getAuthData('ga_prenom').' '.$auth->getAuthData('ga_nom');
7 jpm 277
 
278
    //----------------------------------------------------------------------------
279
    // Ajout du nouveau menu
280
    $requete =  'INSERT INTO gen_menu '.
281
                'SET gm_id_menu = '.$nouveau_id_menu.', '.
128 jpm 282
                'gm_ce_site = '.$adme_site_id.', '.
283
                'gm_ce_i18n = "'.$objet_site->gs_ce_i18n.'", '.
7 jpm 284
                'gm_ce_application = 0, '.
285
                'gm_code_num = '.$nouveau_id_menu.', '.
286
                'gm_code_alpha = "menu_'.$nouveau_id_menu.'", '.
287
                'gm_nom = "menu_'.$nouveau_id_menu.'", '.
128 jpm 288
                'gm_titre = "menu_'.$nouveau_id_menu.'", '.
289
                'gm_description_resume = "menu_'.$nouveau_id_menu.'", '.
7 jpm 290
                'gm_auteur = "'.$auteur.'", '.
128 jpm 291
                'gm_editeur = "'.$objet_site->gs_auteur.'", '.
7 jpm 292
                'gm_date_creation = "'.date('Y-m-d H:i:s').'", '.
293
                'gm_date_soumission = "'.date('Y-m-d H:i:s').'", '.
294
                'gm_date_acceptation = "'.date('Y-m-d H:i:s').'", '.
295
                'gm_date_publication = "'.date('Y-m-d H:i:s').'", '.
296
                'gm_date_debut_validite = "'.date('Y-m-d H:i:s').'", '.
346 jpm 297
                'gm_date_fin_validite = "0000-00-00 00:00:00", '.
7 jpm 298
                'gm_date_copyright = "'.date('Y-00-00 00:00:00').'", '.
299
                'gm_categorie = "menu", '.
128 jpm 300
                'gm_ce_admin = '.$auth->getAuthData('ga_id_administrateur').' '
7 jpm 301
                ;
302
 
128 jpm 303
    $resultat = $db->query($requete);
304
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 305
 
306
    //----------------------------------------------------------------------------
307
    // Ajout de la relation "père"
308
 
128 jpm 309
    if (!isset($adme_menu_id) && empty($adme_menu_id)) {
310
        $adme_menu_id = 0 ;// Identifiant du père
7 jpm 311
    }
312
    //----------------------------------------------------------------------------
313
    // Récupération d'infos sur la hierarchie du menu
134 jpm 314
    $requete =  'SELECT GMR01.gmr_ordre '.
7 jpm 315
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
128 jpm 316
                'WHERE GMR01.gmr_id_menu_02 = '.$adme_menu_id.' '.
7 jpm 317
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
318
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
319
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
320
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
321
                'ORDER BY GMR01.gmr_ordre DESC';
322
 
128 jpm 323
    $resultat = $db->query($requete);
324
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 325
 
128 jpm 326
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
327
    $nouveau_ordre_menu = $ligne->gmr_ordre + 1;
328
    $resultat->free();
7 jpm 329
 
330
    $requete =  'INSERT INTO gen_menu_relation '.
128 jpm 331
                'SET gmr_id_menu_02 = '.$adme_menu_id.', '.
7 jpm 332
                'gmr_id_menu_01 = '.$nouveau_id_menu.', '.
333
                'gmr_id_valeur = 1, '.
334
                'gmr_ordre = '.$nouveau_ordre_menu;
335
 
128 jpm 336
    $resultat = $db->query($requete);
337
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 338
 
339
    //----------------------------------------------------------------------------
340
    // Ajout de la relation-type "menu classique"
341
 
342
    // Récupération d'infos sur la hierarchie du menu
343
    $requete =  'SELECT * '.
344
                'FROM gen_menu_relation, gen_menu '.
345
                'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.
134 jpm 346
                'AND gmr_id_valeur = 100 '.// 100 = type menu "classique"
7 jpm 347
                'AND gmr_id_menu_01 = gm_id_menu '.
128 jpm 348
                'AND gm_ce_site = '.$adme_site_id.' '.
7 jpm 349
                'ORDER BY gmr_ordre DESC';
350
 
128 jpm 351
    $resultat = $db->query($requete);
352
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 353
 
128 jpm 354
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
355
    $nouveau_ordre_menu_classique = $ligne->gmr_ordre + 1;
356
    $resultat->free();
7 jpm 357
 
358
    $requete =  'INSERT INTO gen_menu_relation '.
359
                'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.
360
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
361
                'gmr_id_valeur = 100, '.
362
                'gmr_ordre = '.$nouveau_ordre_menu_classique;
363
 
364
    $result = $db->query($requete);
365
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
366
}
367
 
134 jpm 368
/** Fonction ADME_afficherFormMenuClassique() - Affiche le formulaire pour un menu classique
7 jpm 369
*
134 jpm 370
* Utilise HTML_QuickForm pour générer le formulaire.
128 jpm 371
* Ancien nom : showMenu()
7 jpm 372
*
134 jpm 373
* @param  object  objet Pear de connection à la base de données.
374
* @param  object objet Pear représentant l'url de base.
375
* @param  integer l'identifiant du site à administrer.
376
* @param  integer l'identifiant du menu à administrer.
377
* @param  array le tableau associatif des valeurs à afficher dans le formulaire.
378
* @return  string  le formulaire XHTML.
7 jpm 379
*/
134 jpm 380
function ADME_afficherFormMenuClassique($db, $url, $adme_site_id, $adme_menu_id, $aso_valeurs)
7 jpm 381
{
382
    // Initialisation de variable
128 jpm 383
    $url->addQueryString('adme_site_id', $adme_site_id);
384
    $url->addQueryString('adme_menu_id', $adme_menu_id);
7 jpm 385
 
128 jpm 386
    // Nous sommes toujours en modification car un menu est ajouter automatiquement!
387
    // Récupération des informations du menu concerné.
150 jpm 388
    if (!isset($aso_valeurs[ADME_LG_ACTION_CLASSIQUE_VERIFIER])) {
134 jpm 389
        $aso_valeurs = GEN_lireInfoMenu($db, $adme_menu_id, DB_FETCHMODE_ASSOC);
152 jpm 390
        if ($aso_valeurs === false) {
150 jpm 391
            die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU.'<br />'.
134 jpm 392
                'Idenitifiant du menu n° : '. $adme_menu_id .'<br />'.
393
                'Ligne n° : '. __LINE__ .'<br />'.
394
                'Fichier n° : '. __FILE__ .'<br />');
395
        }
194 jpm 396
        // Requete pour récupérer les informations issues des relations du site à modifier
397
        $ligne = GEN_lireInfoMenuRelation($db, $adme_menu_id, $id_valeur = 101);
398
        $aso_valeurs['defaut'] = false;
399
        if ($ligne->gmr_id_valeur != false) {// 101 = site par défaut
400
            $aso_valeurs['defaut'] = true;
401
        }
7 jpm 402
    }
134 jpm 403
 
128 jpm 404
    // Titre de la page
150 jpm 405
    $retour = '<h1>'.ADME_LG_FORM_MENU_CLASSIQUE_TITRE_GENERAL.'</h1>'."\n";
406
    $retour .= '<p class="adme_menu_id" >'.ADME_LG_FORM_MENU_ID.'<span id="adme_menu_id">'.$aso_valeurs['gm_id_menu'].'</span></p>'."\n";
7 jpm 407
 
408
    // Création du formulaire
128 jpm 409
    // Notes : Quickform semble remplacer les & des &amp; à nouveau par des &amp; solution utiliser str_replace()...
410
    $form =& new HTML_QuickForm('form_menu_classique', 'post', str_replace('&amp;', '&', $url->getUrl()));
7 jpm 411
    $tab_index = 1000;
412
    $squelette =& $form->defaultRenderer();
413
    $squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'{content}'."\n".'</form>'."\n");
414
    $squelette->setElementTemplate(  '<li>'."\n".
415
                                    '{label}'."\n".
416
                                    '{element}'."\n".
150 jpm 417
                                    '<!-- BEGIN required --><span class="symbole_obligatoire">'.ADME_LG_FORM_SYMBOLE_CHP_OBLIGATOIRE.'</span><!-- END required -->'."\n".
7 jpm 418
                                    '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
419
                                    '</li>'."\n");
150 jpm 420
    $squelette->setRequiredNoteTemplate("\n".'<p><span class="symbole_obligatoire">'.ADME_LG_FORM_SYMBOLE_CHP_OBLIGATOIRE.'</span> {requiredNote}</p>'."\n");
7 jpm 421
 
150 jpm 422
    $partie_menu_debut = '<fieldset>'."\n".'<legend>'.ADME_LG_FORM_MENU_CLASSIQUE_TITRE_CONFIG.'</legend>'."\n".'<ul>'."\n";
7 jpm 423
    $form->addElement('html', $partie_menu_debut);
424
 
425
    $id = 'gm_code_num';
426
    $aso_attributs = array('id'=>$id, 'tabindex' => $tab_index++, 'size' => 5, 'maxlength' => 100);
150 jpm 427
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CODE_NUM.'</label>';
7 jpm 428
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 429
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_CODE_NUM, 'required', '', 'client');
7 jpm 430
 
431
    $id = 'gm_code_alpha';
432
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 20, 'maxlength' => 20);
150 jpm 433
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CODE_ALPHA.'</label>';
7 jpm 434
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 435
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_CODE_ALPHA, 'required', '', 'client');
7 jpm 436
 
437
    $id = 'gm_nom';
438
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 100);
150 jpm 439
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_NOM.'</label>';
7 jpm 440
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 441
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_NOM, 'required', '', 'client');
7 jpm 442
    $form->applyFilter($id, 'trim');
443
 
444
    $id = 'gm_raccourci_clavier';
445
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 1, 'maxlength' => 1);
150 jpm 446
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_RACCOURCI.'</label>';
7 jpm 447
    $form->addElement('text', $id, $label, $aso_attributs);
448
 
449
    $id = 'defaut';
450
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
194 jpm 451
    if ($aso_valeurs[$id] === true) {
452
        $aso_attributs['checked'] = 'checked';
453
    }
150 jpm 454
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DEFAUT.'</label>';
7 jpm 455
    $form->addElement('checkbox', $id, $label, '', $aso_attributs);
456
 
457
    $id = 'gm_fichier_squelette';
458
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 255);
150 jpm 459
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_FICHIER_SQUELETTE.'</label>';
7 jpm 460
    $form->addElement('text', $id, $label, $aso_attributs);
461
 
462
    $id = 'gm_description_resume';
463
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 50);
150 jpm 464
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_INFO_BULLE.'</label>';
7 jpm 465
    $form->addElement('textarea', $id, $label, $aso_attributs);
150 jpm 466
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_INFO_BULLE, 'required', '', 'client');
7 jpm 467
 
468
    // Requête sur les applications
469
    $requete =  'SELECT gap_id_application, gap_nom '.
470
                'FROM gen_application '.
471
                'WHERE gap_bool_applette = 0';// Pour éviter d'afficher les applettes.
472
    $resultat = $db->query($requete);
473
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
474
 
475
    $aso_options = array();
476
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
477
        $aso_options[$ligne->gap_id_application] = $ligne->gap_nom;
478
    }
479
    $resultat->free();
480
    $id = 'gm_ce_application';
481
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 482
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_APPLI.'</label>';
7 jpm 483
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
484
 
485
    $id = 'gm_application_arguments';
486
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 487
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_APPLI_ARGUMENT.'</label>';
7 jpm 488
    $form->addElement('text', $id, $label, $aso_attributs);
489
 
490
    $partie_menu_fin = '</ul>'."\n".'</fieldset>'."\n";
491
    $form->addElement('html', $partie_menu_fin);
492
 
150 jpm 493
    $partie_entete_debut = '<fieldset>'."\n".'<legend>'.ADME_LG_FORM_MENU_CLASSIQUE_TITRE_ENTETE.'</legend>'."\n".'<ul>'."\n";
7 jpm 494
    $form->addElement('html', $partie_entete_debut);
495
 
496
    $id = 'gm_robot';
150 jpm 497
    $aso_options = array(   'index,follow' => ADME_LG_FORM_MENU_INDEX_FOLLOW,
498
                            'index' => ADME_LG_FORM_MENU_INDEX,
499
                            'noindex' => ADME_LG_FORM_MENU_NOINDEX,
500
                            'noindex,nofollow' => ADME_LG_FORM_MENU_NOINDEX_NOFOLLOW,
501
                            '' => ADME_LG_FORM_MENU_INDEX_VIDE);
7 jpm 502
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 503
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ROBOT.'</label>';
7 jpm 504
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
505
 
506
    $id = 'gm_titre';
507
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 508
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TITRE.'</label>';
7 jpm 509
    $form->addElement('text', $id, $label, $aso_attributs);
510
 
511
    $id = 'gm_titre_alternatif';
512
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 513
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TITRE_ALTERNATIF.'</label>';
7 jpm 514
    $form->addElement('text', $id, $label, $aso_attributs);
515
 
516
    $id = 'gm_mots_cles';
517
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 50);
150 jpm 518
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_MOT_CLE.'</label>';
7 jpm 519
    $form->addElement('textarea', $id, $label, $aso_attributs);
520
 
521
    $id = 'gm_description_libre';
522
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
150 jpm 523
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DESCRIPTION.'</label>';
7 jpm 524
    $form->addElement('textarea', $id, $label, $aso_attributs);
525
 
526
    $id = 'gm_description_table_matieres';
527
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
150 jpm 528
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TABLE_MATIERE.'</label>';
7 jpm 529
    $form->addElement('textarea', $id, $label, $aso_attributs);
530
 
531
    $id = 'gm_source';
532
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 533
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_SOURCE.'</label>';
7 jpm 534
    $form->addElement('text', $id, $label, $aso_attributs);
535
 
536
    $id = 'gm_auteur';
537
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 538
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_AUTEUR.'</label>';
7 jpm 539
    $form->addElement('text', $id, $label, $aso_attributs);
540
 
541
    $id = 'gm_contributeur';
542
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
150 jpm 543
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CONTRIBUTEUR.'</label>';
7 jpm 544
    $form->addElement('textarea', $id, $label, $aso_attributs);
545
 
546
    $id = 'gm_editeur';
547
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
150 jpm 548
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_EDITEUR.'</label>';
7 jpm 549
    $form->addElement('textarea', $id, $label, $aso_attributs);
550
 
317 jpm 551
    $id = 'gm_date_creation';
552
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
553
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_CREATION.'</label>';
554
    $form->addElement('text', $id, $label, $aso_attributs);
555
 
7 jpm 556
    $id = 'gm_date_debut_validite';
557
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 558
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_VALIDITE_DEBUT.'</label>';
7 jpm 559
    $form->addElement('text', $id, $label, $aso_attributs);
560
 
561
    $id = 'gm_date_fin_validite';
562
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 563
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_VALIDITE_FIN.'</label>';
7 jpm 564
    $form->addElement('text', $id, $label, $aso_attributs);
565
 
566
    $id = 'gm_date_copyright';
567
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 568
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_COPYRIGHT.'</label>';
7 jpm 569
    $form->addElement('text', $id, $label, $aso_attributs);
570
 
571
    $id = 'gm_licence';
572
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 573
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_URL_LICENCE.'</label>';
7 jpm 574
    $form->addElement('text', $id, $label, $aso_attributs);
575
 
576
    $id = 'gm_categorie';
577
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 578
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CATEGORIE.'</label>';
7 jpm 579
    $form->addElement('text', $id, $label, $aso_attributs);
580
 
581
    $id = 'gm_public';
582
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 583
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_PUBLIC.'</label>';
7 jpm 584
    $form->addElement('text', $id, $label, $aso_attributs);
585
 
586
    $id = 'gm_public_niveau';
587
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 25, 'maxlength' => 45);
150 jpm 588
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_PUBLIC_NIVEAU.'</label>';
7 jpm 589
    $form->addElement('text', $id, $label, $aso_attributs);
590
 
591
    $id = 'gm_ce_type_portee_spatiale';
150 jpm 592
    $aso_options = array(   '' => ADME_LG_FORM_MENU_ZG_VIDE,
593
                            'iso3166' => ADME_LG_FORM_MENU_ZG_ISO,
594
                            'Point' => ADME_LG_FORM_MENU_ZG_POINT,
595
                            'Box' => ADME_LG_FORM_MENU_ZG_DC,
596
                            'TGN' => ADME_LG_FORM_MENU_ZG_GTGN);
7 jpm 597
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 598
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ZG_TYPE.'</label>';
7 jpm 599
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
600
 
601
    $id = 'gm_portee_spatiale';
602
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 603
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ZG_VALEUR.'</label>';
7 jpm 604
    $form->addElement('text', $id, $label, $aso_attributs);
605
 
606
    $id = 'gm_ce_type_portee_temporelle';
150 jpm 607
    $aso_options = array(   '' => ADME_LG_FORM_MENU_TMP_VIDE,
608
                            'W3CDTF' => ADME_LG_FORM_MENU_TMP_W3C,
609
                            'Period' => ADME_LG_FORM_MENU_TMP_DC);
7 jpm 610
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 611
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TMP_TYPE.'</label>';
7 jpm 612
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
613
 
614
    $id = 'gm_portee_temporelle';
615
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 616
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TMP_VALEUR.'</label>';
7 jpm 617
    $form->addElement('text', $id, $label, $aso_attributs);
618
 
378 jpm 619
 
7 jpm 620
    $partie_entete_fin = '</ul>'."\n".'</fieldset>'."\n";
197 jpm 621
    $form->addElement('html', $partie_entete_fin);
7 jpm 622
 
378 jpm 623
    // Requete pour connaitre les informations sur l'administrateur ayant fait la dernière modif
624
    $requete_admin =    'SELECT * '.
625
                        'FROM gen_annuaire '.
626
                        'WHERE ga_id_administrateur = '.$aso_valeurs['gm_ce_admin'];
627
    $resultat_admin = $db->query($requete_admin);
628
    if (DB::isError($resultat_admin)) {
629
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_admin->getMessage(), $requete_admin));
630
    }
631
    $ligne_admin = $resultat_admin->fetchRow(DB_FETCHMODE_OBJECT);
632
    $info_admin =   '<p class="info">Dernière modification par'.$ligne_admin->ga_prenom.' '.$ligne_admin->ga_nom.'</p>';
633
    $form->addElement('html', $info_admin);
634
 
134 jpm 635
    $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
636
    $form->addElement('html', $liste_bouton_debut);
637
 
150 jpm 638
    $form->addElement('submit', ADME_LG_ACTION_CLASSIQUE_VERIFIER, ADME_LG_FORM_MENU_VALIDER);
639
    $bouton_annuler = '<li><a class="bouton" href="'.$url->getURL().'" title="'.ADME_LG_FORM_MENU_ANNULER.'" >'.ADME_LG_FORM_MENU_ANNULER.'</a>'.'</li>'."\n";
134 jpm 640
    $form->addElement('html', $bouton_annuler);
641
 
642
    $liste_bouton_fin = '</ul>'."\n";
643
    $form->addElement('html', $liste_bouton_fin);
644
 
150 jpm 645
    $form->addElement('hidden', 'gm_id_menu', $aso_valeurs['gm_id_menu']);
646
 
7 jpm 647
    // Instanciation avec les valeur par défaut
128 jpm 648
    $form->setDefaults($aso_valeurs);
7 jpm 649
 
650
    // Note de fin de formulaire
150 jpm 651
    $form->setRequiredNote(ADME_LG_FORM_TXT_CHP_OBLIGATOIRE);
7 jpm 652
 
128 jpm 653
    $retour .= $form->toHTML()."\n";
654
    return $retour;
7 jpm 655
}
656
 
128 jpm 657
/** Fonction ADME_validerFormAjouterMenuClassique() - Valide les données issues du formulaire pour gen_menu.
7 jpm 658
*
128 jpm 659
* Cette fonction valide les données à ajouter dans la table gen_menu.
7 jpm 660
*
155 jpm 661
* @param  PEAR::DB   l'objet pear de connexion à la base de données.
128 jpm 662
* @param  string   le tableau contenant les valeurs du formulaire.
663
* @return string   retourne les messages d'erreurs sinon rien.
664
*/
665
function ADME_validerFormAjouterMenuClassique($db, $aso_valeurs)
666
{
667
    $message = '';
150 jpm 668
    if ($aso_valeurs['gm_code_alpha'] == '') {
669
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_ALPHA.'</p>';
670
    } else {
671
        // Requete pour vérifier l'abscence du code alphanumérique de la table gen_menu
152 jpm 672
        if (GEN_verifierPresenceCodeMenu($db, 'string', $aso_valeurs['gm_id_menu'], $aso_valeurs['gm_code_alpha']) === true) {
150 jpm 673
            $message .= '<p class="pap_erreur">'.sprintf(ADME_LG_ERREUR_CODE_ALPHA, $aso_valeurs['gm_code_alpha']).'</p>';
674
        }
128 jpm 675
    }
150 jpm 676
    if ($aso_valeurs['gm_code_num'] == '') {
677
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_NUM.'</p>';
678
    } else {
679
        // Requete pour vérifier l'abscence du code numérique de la table gen_menu
152 jpm 680
        if (GEN_verifierPresenceCodeMenu($db, 'int', $aso_valeurs['gm_id_menu'], $aso_valeurs['gm_code_num']) === true) {
150 jpm 681
            $message .= '<p class="pap_erreur">'.sprintf(ADME_LG_ERREUR_CODE_NUM, $aso_valeurs['gm_code_num']).'</p>';
682
        }
128 jpm 683
    }
150 jpm 684
    if ($aso_valeurs['gm_nom'] == '') {
685
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_NOM.'</p>';
686
    }
687
    if ($aso_valeurs['gm_description_resume'] == '') {
688
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_INFO_BULLE.'</p>';
689
    }
128 jpm 690
    return $message;
691
}
692
 
134 jpm 693
/** Fonction ADME_modifierMenuClassique() - Met à jour les infos d'un menu classique
128 jpm 694
*
134 jpm 695
* Fonction modifiant un menu commun à Papyrus.
128 jpm 696
* Ancien nom : commitUpdateLevel()
697
*
134 jpm 698
* @param object objet Pear de connection à la base de données.
699
* @param object objet Pear représentant l'authentification.
700
* @param integer l'identifiant du menu à administrer.
701
* @param array le tableau des valeurs à modifier.
702
* @return void les changement sont fait dans la base de données.
7 jpm 703
*/
128 jpm 704
function ADME_modifierMenuClassique($db, $auth, $adme_menu_id, $aso_valeurs)
7 jpm 705
{
706
    $requete =  'UPDATE gen_menu SET '.
128 jpm 707
                'gm_ce_application = '.$aso_valeurs['gm_ce_application'].', '.
708
                'gm_application_arguments = "'.$aso_valeurs['gm_application_arguments'].'", '.
709
                'gm_fichier_squelette = "'.$aso_valeurs['gm_fichier_squelette'].'", '.
710
                'gm_code_num = '.$aso_valeurs['gm_code_num'].', '.
711
                'gm_code_alpha = "'.$aso_valeurs['gm_code_alpha'].'", '.
712
                'gm_nom = "'.$aso_valeurs['gm_nom'].'", '.
713
                'gm_raccourci_clavier = "'.$aso_valeurs['gm_raccourci_clavier'].'", '.
714
                'gm_robot = "'.$aso_valeurs['gm_robot'].'", '.
715
                'gm_titre = "'.$aso_valeurs['gm_titre'].'", '.
716
                'gm_titre_alternatif = "'.$aso_valeurs['gm_titre_alternatif'].'", '.
717
                'gm_mots_cles = "'.$aso_valeurs['gm_mots_cles'].'", '.
718
                'gm_description_libre = "'.$aso_valeurs['gm_description_libre'].'", '.
719
                'gm_description_resume = "'.$aso_valeurs['gm_description_resume'].'", '.
720
                'gm_description_table_matieres = "'.$aso_valeurs['gm_description_table_matieres'].'", '.
721
                'gm_source = "'.$aso_valeurs['gm_source'].'", '.
722
                'gm_auteur = "'.$aso_valeurs['gm_auteur'].'", '.
723
                'gm_contributeur = "'.$aso_valeurs['gm_contributeur'].'", '.
724
                'gm_editeur = "'.$aso_valeurs['gm_editeur'].'", '.
317 jpm 725
                'gm_date_creation = "'.$aso_valeurs['gm_date_creation'].'", '.
128 jpm 726
                'gm_date_debut_validite = "'.$aso_valeurs['gm_date_debut_validite'].'", '.
727
                'gm_date_fin_validite = "'.$aso_valeurs['gm_date_fin_validite'].'", '.
728
                'gm_date_copyright = "'.$aso_valeurs['gm_date_copyright'].'", '.
729
                'gm_licence = "'.$aso_valeurs['gm_licence'].'", '.
730
                'gm_categorie = "'.$aso_valeurs['gm_categorie'].'", '.
731
                'gm_public = "'.$aso_valeurs['gm_public'].'", '.
732
                'gm_public_niveau = "'.$aso_valeurs['gm_public_niveau'].'", '.
733
                'gm_ce_type_portee_spatiale = "'.$aso_valeurs['gm_ce_type_portee_spatiale'].'", '.
734
                'gm_portee_spatiale = "'.$aso_valeurs['gm_portee_spatiale'].'", '.
735
                'gm_ce_type_portee_temporelle = "'.$aso_valeurs['gm_ce_type_portee_temporelle'].'", '.
736
                'gm_portee_temporelle = "'.$aso_valeurs['gm_portee_temporelle'].'", '.
737
                'gm_ce_admin = "'.$auth->getAuthData('ga_id_administrateur').'" '.
738
                'WHERE gm_id_menu = '.$adme_menu_id;
7 jpm 739
 
128 jpm 740
    $resultat = $db->query($requete);
741
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 742
 
743
    // Gestion de la relation menu par défaut
128 jpm 744
    if (isset($aso_valeurs['defaut']) && $aso_valeurs['defaut'] == 1) {
7 jpm 745
        $requete_id_menu_supr_defaut =  'SELECT GM01.gm_id_menu AS id_menu_supr_defaut '.
746
                                        'FROM gen_menu AS GM01, gen_menu AS GM02, gen_menu_relation '.
128 jpm 747
                                        'WHERE GM02.gm_id_menu = '.$adme_menu_id.' '.
7 jpm 748
                                        'AND GM02.gm_ce_site = GM01.gm_ce_site '.
749
                                        'AND GM01.gm_id_menu = gmr_id_menu_01 '.
750
                                        'AND gmr_id_valeur = 101 ';// 101 = menu par "defaut"
194 jpm 751
 
7 jpm 752
        $resultat_menu_supr_defaut = $db->query($requete_id_menu_supr_defaut);
194 jpm 753
        //echo '<pre>'.print_r($resultat_menu_supr_defaut, true).'</pre>';
7 jpm 754
        if (DB::isError($resultat_menu_supr_defaut)) {
755
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu_supr_defaut->getMessage(), $requete_id_menu_supr_defaut));
756
        }
194 jpm 757
        $ligne_menu_supr_defaut = $resultat_menu_supr_defaut->fetchRow(DB_FETCHMODE_OBJECT);
7 jpm 758
        if ($resultat_menu_supr_defaut->numRows() > 0 ) {
759
            $requete_supr_defaut =  'DELETE FROM gen_menu_relation '.
760
                                    'WHERE gmr_id_menu_01 = gmr_id_menu_02 '.
761
                                    'AND gmr_id_valeur = 101 '.// 101 = menu par "defaut"
194 jpm 762
                                    'AND gmr_id_menu_01 = '.$ligne_menu_supr_defaut->id_menu_supr_defaut;
7 jpm 763
            $resultat_supr_defaut = $db->query($requete_supr_defaut);
764
            if (DB::isError($resultat_supr_defaut)) {
765
                die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_supr_defaut->getMessage(), $requete_supr_defaut));
766
            }
767
        }
194 jpm 768
        $resultat_menu_supr_defaut->free();
769
 
770
 
7 jpm 771
        // Requete d'insertion de la relation menu par défaut
772
        $requete =  'INSERT INTO gen_menu_relation '.
128 jpm 773
                    'SET gmr_id_menu_01 = '.$adme_menu_id.', '.
774
                    'gmr_id_menu_02 = '.$adme_menu_id.', '.
7 jpm 775
                    'gmr_id_valeur = 101, '.
776
                    'gmr_ordre = NULL ';
777
        $resultat = $db->query($requete);
778
        if (DB::isError($resultat)) {
779
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
780
        }
194 jpm 781
 
7 jpm 782
    }
783
}
784
 
128 jpm 785
/** Fonction ADME_deplacerMenuClassique() - Permet de déplacer un menu dans la hiérarchie.
786
*
7 jpm 787
* Permet de déplacer un menu dans la hiérarchie des menus classiques.
128 jpm 788
* Ancien nom : moveMenu()
7 jpm 789
*
134 jpm 790
* @param  mixed   objet Pear DB de connexion à la base de données.
155 jpm 791
* @param  integer  identifiant du site administré.
134 jpm 792
* @param  integer identifiant du menu à déplacer.
793
* @param  boolean indique si on veut monter le menu (true) ou le descendre (false).
794
* @return void    modifie la base de données.
7 jpm 795
*/
128 jpm 796
function ADME_deplacerMenuClassique($db, $adme_site_id, $adme_menu_id, $bln_monter)
7 jpm 797
{
134 jpm 798
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 799
    // Récupération d'information sur le site de ce menu.
128 jpm 800
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
110 jpm 801
    if ($objet_site == false) {
150 jpm 802
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_SITE.'<br />'.
128 jpm 803
            'Id du site : '. $adme_site_id .'<br />'.
7 jpm 804
            'Ligne n° : '. __LINE__ .'<br />'.
805
            'Fichier n° : '. __FILE__ .'<br />');
806
    }
134 jpm 807
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 808
    // Récupération d'informations sur les relations du menu courant.
128 jpm 809
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $adme_menu_id, '1');
7 jpm 810
    if ($ligne_menu_courant_relation == false) {
150 jpm 811
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU_RELATION.'<br />'.
128 jpm 812
            'Identifiant menu : '. $adme_menu_id .'<br />'.
7 jpm 813
            'Identifiant valeur relation : 1 <br />'.
814
            'Ligne n° : '. __LINE__ .'<br />'.
815
            'Fichier n° : '. __FILE__ .'<br />');
816
    }
134 jpm 817
    //-------------------------------------------------------------------------------------------------------------------
110 jpm 818
    // Récupération de l'identifiant du menu pére
128 jpm 819
    $id_pere = GEN_lireIdentifiantMenuPere($adme_menu_id);
110 jpm 820
    if ($id_pere === false) {
150 jpm 821
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_ID_MENU_PERE.'<br />'.
128 jpm 822
            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
7 jpm 823
            'Ligne n° : '. __LINE__ .'<br />'.
824
            'Fichier n° : '. __FILE__ .'<br />');
825
    }
134 jpm 826
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 827
    // Recherche d'information sur le menu précédent ou suivant le menu courant
828
    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
110 jpm 829
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
7 jpm 830
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
110 jpm 831
                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
832
                'AND gm_ce_site = '.$objet_site->gs_id_site.' '.
7 jpm 833
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
834
                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
835
                'AND GMR01.gmr_id_valeur = 1 ';// 1 = relation menu "père"
128 jpm 836
    if ($bln_monter) {
7 jpm 837
        $requete .= 'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
838
                    'ORDER BY GMR01.gmr_ordre DESC';
839
    } else {
840
        $requete .= 'AND GMR01.gmr_ordre > '.$ligne_menu_courant_relation->gmr_ordre.' '.
841
                    'ORDER BY GMR01.gmr_ordre ASC';
842
    }
843
 
110 jpm 844
    $resultat_menu = $db->query($requete);
845
    (DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
7 jpm 846
 
110 jpm 847
    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
848
    $resultat_menu->free();
134 jpm 849
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 850
    // Si la requete ne retourne rien nous ne faisons rien.
110 jpm 851
    if (! $ligne_menu) {
128 jpm 852
        return null;
7 jpm 853
    }
134 jpm 854
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 855
    // Mise à jour des relations du menu courant
856
    $requete =  'UPDATE gen_menu_relation SET '.
110 jpm 857
                'gmr_ordre = '.$ligne_menu->nouvel_ordre.' '.
7 jpm 858
                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
859
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
860
 
110 jpm 861
    $resultat_update = $db->query($requete);
862
    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
134 jpm 863
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 864
    // Mise à jour des relations du menu précédent ou suivant
865
    $requete =  'UPDATE gen_menu_relation SET '.
866
                'gmr_ordre = '.$ligne_menu_courant_relation->gmr_ordre.' '.
110 jpm 867
                'WHERE gmr_id_menu_01 = '.$ligne_menu->id_menu_remplace.' '.
7 jpm 868
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
869
 
110 jpm 870
    $resultat_update = $db->query($requete);
871
    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
7 jpm 872
}
873
 
134 jpm 874
/** Fonction ADME_supprimerMenuClassique() - Supprime un menu classique.
7 jpm 875
*
134 jpm 876
* Supprime de la base de données de Génésia toutes les traces du menu classiques
877
* passé en paramètre.
878
* Ancien nom : deleteMenu()
7 jpm 879
*
134 jpm 880
* @param  mixed  l'objet Pear DB de connexion à la base de données.
155 jpm 881
* @param  integer l'identifiant du site du menu à supprimer
882
* @param  integer l'identifiant du menu à supprimer
134 jpm 883
* @return void   le menu classique est supprimé de la base de données.
7 jpm 884
*/
155 jpm 885
function ADME_supprimerMenuClassique($db, $adme_id_site, $id_menu_a_supprimer)
7 jpm 886
{
134 jpm 887
    //----------------------------------------------------------------------------
888
    // Y a t'il des sous_menus
889
    $requete =  'SELECT COUNT(gm_id_menu) AS compte '.
890
                'FROM gen_menu, gen_menu_relation '.
891
                'WHERE gmr_id_menu_02 = '.$id_menu_a_supprimer.' '.
892
                'AND gmr_id_valeur = 1 '.
893
                'AND gmr_id_menu_01 = gm_id_menu ';
7 jpm 894
 
134 jpm 895
    $resultat = $db->query($requete);
896
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 897
 
134 jpm 898
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
7 jpm 899
 
134 jpm 900
    if ($ligne && ($ligne->compte > 0)) {
150 jpm 901
        return ADME_LG_ERREUR_EXISTE_SOUS_MENU;
130 jpm 902
    }
903
 
155 jpm 904
    //-------------------------------------------------------------------------------------------------------------------
905
    // Mise à jour de l'ordre des menus
906
    $ligne_menu_supr_relation = GEN_lireInfoMenuRelation($db, $id_menu_a_supprimer, '1'); // 1 = relation "avoir père"
907
    $requete =  'SELECT GMR01.gmr_id_menu_01, GMR01.gmr_ordre '.
908
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
909
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
910
                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
911
                'AND gm_ce_site = '.$adme_id_site.' '.// le site du menu!
912
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
913
                'AND GMR01.gmr_id_menu_02 = '.$ligne_menu_supr_relation->gmr_id_menu_02.' '.
914
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = relation menu "père"
915
                'AND GMR01.gmr_ordre > '.$ligne_menu_supr_relation->gmr_ordre.' '.
916
                'ORDER BY GMR01.gmr_ordre ASC';
917
    $resultat = $db->query($requete);
918
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
919
        // Mise à jour des relations hiérarchiques du menu courant
920
        $requete_maj =  'UPDATE gen_menu_relation SET '.
921
                        'gmr_ordre = '.($ligne->gmr_ordre - 1).' '.
922
                        'WHERE gmr_id_menu_01 = '.$ligne->gmr_id_menu_01.' '.
923
                        'AND gmr_id_valeur = 1';// 1 = relation menu "père"
924
 
925
        $resultat_maj = $db->query($requete_maj);
926
        (DB::isError($resultat_maj)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_maj->getMessage(), $requete_maj)) : '';
927
    }
928
    $resultat->free();
929
 
134 jpm 930
    //----------------------------------------------------------------------------
931
    // S'il n'y a plus de sous niveau, on supprime le menu
932
    $requete =  'DELETE FROM gen_menu '.
933
                'WHERE gm_id_menu = '.$id_menu_a_supprimer;
128 jpm 934
 
134 jpm 935
    $resultat = $db->query($requete);
936
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 937
 
134 jpm 938
    //----------------------------------------------------------------------------
939
    // Puis on supprime les relations de ce menu
940
    $requete =  'DELETE FROM gen_menu_relation '.
941
                'WHERE gmr_id_menu_01 = '.$id_menu_a_supprimer;
7 jpm 942
 
943
    $resultat = $db->query($requete);
134 jpm 944
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 945
}
946
 
947
// +------------------------------------------------------------------------------------------------------+
948
// |                                            PIED du PROGRAMME                                         |
949
// +------------------------------------------------------------------------------------------------------+
950
 
951
 
952
/* +--Fin du code ----------------------------------------------------------------------------------------+
953
*
954
* $Log: not supported by cvs2svn $
378 jpm 955
* Revision 1.17  2005/04/19 16:47:16  jpm
956
* Gestion des dates  de fin de validité des menus.
957
*
346 jpm 958
* Revision 1.16  2005/03/29 15:49:12  jpm
959
* Ajout de la date de création dans le formulaire des menus.
960
*
317 jpm 961
* Revision 1.15  2005/02/28 11:05:06  jpm
962
* Modification des auteurs.
963
*
285 jpm 964
* Revision 1.14  2004/12/01 16:47:28  jpm
965
* Ajout d'une boite javascript de confirmation de suppression d'un menu.
966
*
197 jpm 967
* Revision 1.13  2004/11/29 18:34:51  jpm
968
* Correction bogue checkbox.
969
*
194 jpm 970
* Revision 1.12  2004/11/15 16:51:12  jpm
971
* Correction bogue de mise à jour de l'ordre des menus.
972
*
155 jpm 973
* Revision 1.11  2004/11/10 19:41:14  jpm
974
* Correction bogue.
975
*
152 jpm 976
* Revision 1.10  2004/11/10 17:26:07  jpm
977
* Fin gestion de la traduction.
978
*
150 jpm 979
* Revision 1.9  2004/11/09 17:53:00  jpm
980
* Changement des noms des actions sur les menus classiques.
981
*
143 jpm 982
* Revision 1.8  2004/11/09 17:48:35  jpm
983
* Gestion de différentes interfaces d'administration.
984
*
141 jpm 985
* Revision 1.7  2004/11/09 12:37:34  jpm
986
* Fin de gestion des menus et mise en conformité avec la convention de codage.
987
*
134 jpm 988
* Revision 1.6  2004/11/08 17:40:07  jpm
989
* Gestion correcte de l'ouverture et fermeture des menus.
990
* Utilisation des sessions.
991
*
130 jpm 992
* Revision 1.5  2004/11/04 19:11:38  jpm
993
* Mise en conformité vis à vis de la convention de codage.
994
* Amélioration de la récursivité de la gestion de l'affichage des menus.
995
*
128 jpm 996
* Revision 1.4  2004/10/25 16:27:42  jpm
997
* Correction d'un bogue dans la gestion du déplacement des menus.
998
*
110 jpm 999
* Revision 1.3  2004/09/23 17:45:13  jpm
1000
* Amélioration de la gestion des liens annuler et du selecteur de sites.
1001
*
56 jpm 1002
* Revision 1.2  2004/07/06 17:07:37  jpm
1003
* Modification de la documentation pour une mailleur analyse par PhpDocumentor.
1004
*
25 jpm 1005
* Revision 1.1  2004/06/16 15:04:32  jpm
1006
* Changement de nom de Génésia en Papyrus.
1007
* Changement de l'arborescence.
1008
*
7 jpm 1009
* Revision 1.27  2004/05/10 12:13:03  jpm
1010
* Modification des formulaires.
1011
*
1012
* Revision 1.26  2004/05/07 16:31:20  jpm
1013
* Amélioration du formulaire d'un menu classique.
1014
*
1015
* Revision 1.25  2004/05/07 07:23:53  jpm
1016
* Amélioration du code, des commentaires et correction de bogues.
1017
*
1018
*
1019
* +-- Fin du code ----------------------------------------------------------------------------------------+
1020
*/
1021
?>