Subversion Repositories Applications.papyrus

Rev

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

Rev Author Line No. Line
7 jpm 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
134 jpm 8 
// | This file is part of Papyrus.                                                                        |
7 jpm 9 
// |                                                                                                      |
134 jpm 10 
// | Foobar is free software; you can redistribute it and/or modify                                       |
11 
// | it under the terms of the GNU General Public License as published by                                 |
12 
// | the Free Software Foundation; either version 2 of the License, or                                    |
13 
// | (at your option) any later version.                                                                  |
14 
// |                                                                                                      |
15 
// | Foobar is distributed in the hope that it will be useful,                                            |
7 jpm 16 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
134 jpm 17 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
18 
// | GNU General Public License for more details.                                                         |
7 jpm 19 
// |                                                                                                      |
134 jpm 20 
// | You should have received a copy of the GNU General Public License                                    |
21 
// | along with Foobar; if not, write to the Free Software                                                |
7 jpm 22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23 
// +------------------------------------------------------------------------------------------------------+
466 ddelon 24 
// CVS : $Id: adme_menu_commun.fonct.php,v 1.19 2005-09-27 08:42:49 ddelon Exp $
7 jpm 25 
/**
26 
* Application de gestion des menus communs
27 
*
28 
* Permet de lister, d'ajouter, de modifier, et de déplacer des menus communs.
134 jpm 29 
* Par menus communs, nous entendons tous les menus devant paraitre sur l'ensemble des pages de plusieurs site,
7 jpm 30 
* comme le lien vers le plan du site, le lien vers la charte d'accessibilité, le flux rss...
31 
*
25 jpm 32 
*@package Admin_menu
7 jpm 33 
*@subpackage Fonctions
34 
//Auteur original :
285 jpm 35 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
7 jpm 36 
//Autres auteurs :
37 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
410 ddelon 38 
*@author        David Delon <david.delon@clapas.net>
285 jpm 39 
*@author        Laurent COUDOUNEAU <lc@gsite.org>
7 jpm 40 
*@copyright     Tela-Botanica 2000-2004
466 ddelon 41 
*@version       $Revision: 1.19 $ $Date: 2005-09-27 08:42:49 $
7 jpm 42 
// +------------------------------------------------------------------------------------------------------+
43 
*/
44 
 
45 
// +------------------------------------------------------------------------------------------------------+
46 
// |                                            ENTÊTE du PROGRAMME                                       |
47 
// +------------------------------------------------------------------------------------------------------+
48 
 
49 
 
50 
// +------------------------------------------------------------------------------------------------------+
51 
// |                                            CORPS du PROGRAMME                                        |
52 
// +------------------------------------------------------------------------------------------------------+
53 
 
54 
 
55 
// +------------------------------------------------------------------------------------------------------+
56 
// |                                           LISTE de FONCTIONS                                         |
57 
// +------------------------------------------------------------------------------------------------------+
422 ddelon 58 
/** Fonction ADME_afficherListeMenuCommun () - Affiche un arbre de menu en xhtml
134 jpm 59 
*
60 
* Elle forme l'arbre des menus communs à administrer.
61 
* Ancien nom : deployer_menu().
62 
*
63 
* @param  object objet Pear de connection à la base de données.
64 
* @param  object objet Pear représentant l'url de base.
65 
* @param  integer l'identifiant du menu à administrer.
66 
* @param  integer l'identifiant du menu sur lequel on agit.
67 
* @param  string le nom de l'action courante.
68 
* @param  integer l'identifiant du menu en cours de déploiement.
69 
* @param  boolean true indique que l'on a à faire au premier appel de cette fonction récursive.
70 
* @return string  le code XHTML constituant l'arbre des menus à administrer.
71 
*/
72 
function ADME_afficherListeMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $adme_action, $id_menu_a_deployer, $bln_premier_appel = true)
7 jpm 73 
{
134 jpm 74 
    // Initialisation des variables :
75 
    $retour = '';
7 jpm 76 
 
134 jpm 77 
    // Est-ce que ces menus comporte des sous-menus ?
78 
    $requete_sous_menu =    'SELECT gm_id_menu '.
79 
                            'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
80 
                            'WHERE GMR01.gmr_id_menu_02 = '.$id_menu_a_deployer.' '.
81 
                            'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
82 
                            //'AND gm_ce_site = '.$adme_site_id.' '.
83 
                            'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
84 
                            'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
85 
                            'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
86 
                            'AND GMR02.gmr_id_valeur = 102 '.// 102 = type "menu commun"
87 
                            'ORDER BY GMR01.gmr_ordre ASC';
7 jpm 88 
 
134 jpm 89 
    $resultat_sous_menu = $db->query($requete_sous_menu) ;
90 
    if (DB::isError($resultat_sous_menu)) {
91 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_sous_menu->getMessage(), $requete_sous_menu));
7 jpm 92 
    }
93 
 
134 jpm 94 
    // Gestion du stockage ou déstockage des menus ouverts
150 jpm 95 
    if (($adme_action == ADME_LG_ACTION_DEPLIER || $adme_action == ADME_LG_ACTION_COMMUN_AJOUTER) && $id_menu_a_deployer != 0) {
134 jpm 96 
        $_SESSION['adme_menus_communs_ouverts'][$adme_menu_id] = $adme_menu_id;
97 
    }
150 jpm 98 
    if ($adme_action == ADME_LG_ACTION_PLIER && $id_menu_a_deployer != 0) {
134 jpm 99 
        unset($_SESSION['adme_menus_communs_ouverts'][$adme_menu_id]);
100 
        foreach ($_SESSION['adme_menus_communs_ouverts'] as $val) {
101 
            if (GEN_etreAncetre($adme_menu_id, $val)) {
102 
                unset($_SESSION['adme_menus_communs_ouverts'][$val]);
103 
            }
104 
        }
105 
    }
7 jpm 106 
 
134 jpm 107 
    // Gestion affichage des menus
108 
    if ($resultat_sous_menu->numRows() > 0) {
109 
        // Ici, on sait qu'un menu a des sous menus, on commence par l'afficher:
110 
        if ($bln_premier_appel == false) {
111 
            $retour .= '<li>'."\n";
112 
 
113 
            if (GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id) ||
150 jpm 114 
                ($id_menu_a_deployer == $adme_menu_id && $adme_action == ADME_LG_ACTION_DEPLIER) ||
134 jpm 115 
                isset($_SESSION['adme_menus_communs_ouverts'][$id_menu_a_deployer])
116 
                ){
117 
                // Affiche un -
118 
                $retour .= ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $id_menu_a_deployer, 1);
119 
            } else if ( !GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id) ||
150 jpm 120 
                        ($id_menu_a_deployer == $adme_menu_id && $adme_action == ADME_LG_ACTION_PLIER) ||
134 jpm 121 
                        !isset($_SESSION['adme_menus_communs_ouverts'][$id_menu_a_deployer])
122 
                        ){
123 
                // Affiche un +
124 
                $retour .= ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $id_menu_a_deployer, 2);
125 
            }
126 
        }
127 
        if ($bln_premier_appel == true || GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id) ||
150 jpm 128 
            ($id_menu_a_deployer == $adme_menu_id && $adme_action == ADME_LG_ACTION_DEPLIER) ||
134 jpm 129 
            isset($_SESSION['adme_menus_communs_ouverts'][$id_menu_a_deployer])
130 
            ){
131 
            $retour .= '<ul>'."\n";
132 
            while ($ligne_sous_menu = $resultat_sous_menu->fetchRow(DB_FETCHMODE_OBJECT)) {
133 
                $retour .= ADME_afficherListeMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $adme_action, $ligne_sous_menu->gm_id_menu, false);
134 
            }
135 
            $retour .= '</ul>'."\n";
136 
        }
137 
        if ($bln_premier_appel == false) {
138 
            $retour .= '</li>'."\n";
139 
        }
140 
    } else if ($resultat_sous_menu->numRows() == 0 && $bln_premier_appel == false) {
141 
        $retour .= '<li>'."\n";
142 
        $retour .= ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $id_menu_a_deployer, 0);
143 
        $retour .= '</li>'."\n";
144 
    }
145 
 
146 
    return $retour;
147 
}
148 
 
149 
/** Fonction ADME_retournerXhtmlMenuCommun() - Effectue une sortie d'un menu en XHTML
150 
*
151 
* Retourne le XHTML d'une ligne de l'arbre des menus communs permettant de l'administer.
152 
* Ancien nom : menu_toHtml().
153 
*
154 
* @param  object objet Pear de connection à la base de données.
155 
* @param  object objet Pear représentant l'url de base.
156 
* @param  integer l'identifiant du site à administrer.
157 
* @param  integer l'identifiant du menu à administrer.
158 
* @param  integer 0 indique que le menu ne possède pas de fils, 1 qu'il faut afficher un - et 2 un +.
159 
* @return  string une ligne de liste XHTML
160 
*/
161 
function ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $int_deplier)
162 
{
141 jpm 163 
    //-------------------------------------------------------------------------------------------------------------------
164 
    // Récupération des infos concernant l'administrateur d'un menu
134 jpm 165 
    $requete =  'SELECT gen_menu.*, ga_prenom '.
166 
                'FROM gen_menu, gen_annuaire '.
167 
                'WHERE gm_id_menu = '.$adme_menu_id.' '.
168 
                'AND gm_ce_admin = ga_id_administrateur';
7 jpm 169 
 
134 jpm 170 
    $resultat = $db->query($requete);
171 
    if (DB::isError($resultat)) {
172 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
173 
    }
174 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
7 jpm 175 
 
141 jpm 176 
    //-------------------------------------------------------------------------------------------------------------------
177 
    // Recupération des infos de l'appli du menu courant.
178 
    $ligne_app = GEN_retournerInfoAppliMenu($db, $adme_menu_id);
7 jpm 179 
 
134 jpm 180 
    //-------------------------------------------------------------------------------------------------------------------
181 
    // XHTML image plier-déplier
7 jpm 182 
 
134 jpm 183 
    $url->addQueryString('adme_site_id', $adme_site_id);
184 
    $url->addQueryString('adme_menu_id', $ligne->gm_id_menu);
185 
    $xhtml_pd = '';
186 
    if ($int_deplier != 0) {
187 
        if ($int_deplier == 1) {
188 
            // Afficher un -
189 
            $image_plier_deplier = ADME_IMAGE_MOINS;
150 jpm 190 
            $alt = ADME_LG_ACTION_PLIER_ALT;
191 
            $url->addQueryString('adme_action', ADME_LG_ACTION_PLIER);
134 jpm 192 
            $url_plier_deplier = $url->getURL();
193 
        } else if ($int_deplier == 2) {
194 
            // Afficher un +
195 
            $image_plier_deplier = ADME_IMAGE_PLUS;
150 jpm 196 
            $alt = ADME_LG_ACTION_DEPLIER_ALT;
197 
            $url->addQueryString('adme_action', ADME_LG_ACTION_DEPLIER);
134 jpm 198 
            $url_plier_deplier = $url->getURL();
7 jpm 199 
        }
134 jpm 200 
        $xhtml_pd = '<a href="'.$url_plier_deplier.'" title="'.$alt.'">'.
201 
                        '<img class="'.ADME_CLASS_IMG_PD.'" src="'.$image_plier_deplier.'" alt="'.$alt.'" />'.
202 
                    '</a>'.'&nbsp;'."\n";
7 jpm 203 
    }
204 
 
134 jpm 205 
    //-------------------------------------------------------------------------------------------------------------------
206 
    // XHTML du nom du menu et de ses infos
150 jpm 207 
    $xhtml_info  = htmlentities(empty($ligne->gm_nom) ? ADME_LG_PARENTHESE_OUVRANTE.$ligne->gm_nom.ADME_LG_PARENTHESE_FERMANTE : $ligne->gm_nom);
134 jpm 208 
    $xhtml_info .= '&nbsp;';
150 jpm 209 
    $xhtml_info .= ADME_LG_PARENTHESE_OUVRANTE.$ligne_app->gap_nom.'&nbsp;'.ADME_LG_SLASH.'&nbsp;'.$ligne->ga_prenom.ADME_LG_PARENTHESE_FERMANTE;
134 jpm 210 
    $xhtml_info .= '&nbsp;'."\n";
211 
 
212 
    //-------------------------------------------------------------------------------------------------------------------
213 
    // XHTML actions
214 
    $url->removeQueryString('adme_action');
150 jpm 215 
    $url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_MODIFIER);
216 
    $xhtml_action = '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_MODIFIER_TITLE.'">'.
217 
                        '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_VOIR.'" alt="'.ADME_LG_ACTION_COMMUN_MODIFIER_ALT.'" />'.
134 jpm 218 
                    '</a>&nbsp;'."\n";
219 
    $url->removeQueryString('adme_action');
150 jpm 220 
    $url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_MONTER);
221 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_MONTER_TITLE.'">'.
222 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_HAUT.'" alt="'.ADME_LG_ACTION_COMMUN_MONTER_ALT.'" />'.
134 jpm 223 
                        '</a>&nbsp;'."\n";
224 
    $url->removeQueryString('adme_action');
150 jpm 225 
    $url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_DESCENDRE);
226 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_DESCENDRE_TITLE.'">'.
227 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_BAS.'" alt="'.ADME_LG_ACTION_COMMUN_DESCENDRE_ALT.'" />'.
134 jpm 228 
                        '</a>&nbsp;'."\n";
422 ddelon 229 
 
230 
    $url->addQueryString('adme_action',ADME_LG_ACTION_COMMUN_DIMINUER);
231 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_DIMINUER_TITLE.'">'.
232 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_GAUCHE.'" alt="'.ADME_LG_ACTION_COMMUN_DIMINUER_ALT.'" />'.
233 
                        '</a>&nbsp;'."\n";
134 jpm 234 
    $url->removeQueryString('adme_action');
422 ddelon 235 
    $url->addQueryString('adme_action',ADME_LG_ACTION_COMMUN_AUGMENTER);
236 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_AUGMENTER_TITLE.'">'.
237 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_DROITE.'" alt="'.ADME_LG_ACTION_COMMUN_AUGMENTER_ALT.'" />'.
238 
                        '</a>&nbsp;'."\n";
239 
 
240 
 
241 
    $url->removeQueryString('adme_action');
150 jpm 242 
    $url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_SUPPRIMER);
197 jpm 243 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_SUPPRIMER_TITLE.'" onclick="javascript:return confirm(\''.ADME_LG_ACTION_SUPPRIMER_CONFIRMATION.'\');">'.
150 jpm 244 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_SUPPRIMER.'" alt="'.ADME_LG_ACTION_COMMUN_SUPPRIMER_ALT.'" />'.
134 jpm 245 
                        '</a>&nbsp;'."\n";
246 
    $url->removeQueryString('adme_action');
150 jpm 247 
    $url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_AJOUTER);
248 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_AJOUTER_TITLE.'">'.
249 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_NOUVEAU.'" alt="'.ADME_LG_ACTION_COMMUN_AJOUTER_ALT.'" />'.
134 jpm 250 
                        '</a>'.'&nbsp;'."\n";
251 
 
252 
    // Si l'application liée est "texte simple", on ajoute un icone avec un lien vers
253 
    // l'administration de cette application.
141 jpm 254 
    if ($ligne_app->gap_id_application != 0 && GEN_verifierPresenceInterfaceAdmin($db, $ligne_app->gap_id_application)) { // l'appli afficheur a pour id 3
134 jpm 255 
        $url->removeQueryString('adme_action');
150 jpm 256 
        $url->addQueryString('adme_action', ADME_LG_ACTION_ADMINISTRER);
257 
        $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_ADMINISTRER_TITLE.'">'.
258 
                                '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TEXTE.'" alt="'.ADME_LG_ACTION_ADMINISTRER_ALT.'" />'.
134 jpm 259 
                            '</a>'.'&nbsp;'."\n";
260 
    }
261 
 
262 
    //-------------------------------------------------------------------------------------------------------------------
263 
    // Envoi du menu.
264 
    $retour = $xhtml_pd.$xhtml_info.$xhtml_action;
265 
    return $retour;
7 jpm 266 
}
267 
 
134 jpm 268 
/** Fonction ADME_ajouterMenuCommun() - Ajoute un sous menu commun au menu commun courant
7 jpm 269 
*
134 jpm 270 
* Fonction ajoutant un menu commun à Papyrus.
7 jpm 271 
*
134 jpm 272 
* @param object objet Pear de connection à la base de données.
273 
* @param object objet Pear représentant l'authentification.
274 
* @param integer l'identifiant du site à administrer.
275 
* @param integer l'identifiant du menu à administrer.
276 
* @return void les changement sont fait dans la base de données.
7 jpm 277 
*/
134 jpm 278 
function ADME_ajouterMenuCommun($db, $auth, $adme_site_id, $adme_menu_id)
7 jpm 279 
{
280 
    //----------------------------------------------------------------------------
134 jpm 281 
    // Récupération d'infos sur le nouveau menu
282 
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
283 
    if ($objet_site == false) {
150 jpm 284 
        die('ERREUR Génésia Administrateur de Menus : '.ADME_LG_ERREUR_INFO_SITE.'<br />'.
134 jpm 285 
            'ID du site : '.$adme_site_id.'<br />'.
7 jpm 286 
            'Ligne n° : '. __LINE__ .'<br />'.
287 
            'Fichier n° : '. __FILE__ .'<br />');
288 
    }
289 
    $nouveau_id_menu = SQL_obtenirNouveauId($db, 'gen_menu', 'gm_id_menu');
134 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.', '.
134 jpm 296 
                'gm_ce_site = 0, '.
297 
                'gm_ce_i18n = "'.$objet_site->gs_ce_i18n.'", '.
7 jpm 298 
                'gm_ce_application = 0, '.
299 
                'gm_code_num = '.$nouveau_id_menu.', '.
134 jpm 300 
                'gm_code_alpha = "menu_commun_'.$nouveau_id_menu.'", '.
301 
                'gm_nom = "menu_commun_'.$nouveau_id_menu.'", '.
302 
                'gm_titre = "menu_commun_'.$nouveau_id_menu.'", '.
303 
                'gm_description_resume = "menu_commun_'.$nouveau_id_menu.'", '.
7 jpm 304 
                'gm_auteur = "'.$auteur.'", '.
305 
                'gm_date_creation = "'.date('Y-m-d H:i:s').'", '.
306 
                'gm_date_soumission = "'.date('Y-m-d H:i:s').'", '.
307 
                'gm_date_acceptation = "'.date('Y-m-d H:i:s').'", '.
308 
                'gm_date_publication = "'.date('Y-m-d H:i:s').'", '.
309 
                'gm_date_debut_validite = "'.date('Y-m-d H:i:s').'", '.
346 jpm 310 
                'gm_date_fin_validite = "0000-00-00 00:00:00", '.
7 jpm 311 
                'gm_date_copyright = "'.date('Y-00-00 00:00:00').'", '.
312 
                'gm_categorie = "menu", '.
134 jpm 313 
                'gm_ce_admin = '.$auth->getAuthData('ga_id_administrateur').' '
7 jpm 314 
                ;
315 
 
134 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 
 
134 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 '.
134 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 = 102 '.// 102 = menu type "commun"
334 
                'ORDER BY GMR01.gmr_ordre DESC';
335 
 
134 jpm 336 
    $resultat = $db->query($requete);
337 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 338 
 
466 ddelon 339 
    if ($resultat->numRows()>0) {
340 
    	$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
341 
    	$nouveau_ordre_menu = $ligne->gmr_ordre + 1;
342 
    }
343 
    else {
344 
    	$nouveau_ordre_menu=1;
345 
    }
134 jpm 346 
    $resultat->free();
7 jpm 347 
 
348 
    $requete =  'INSERT INTO gen_menu_relation '.
134 jpm 349 
                'SET gmr_id_menu_02 = '.$adme_menu_id.', '.
7 jpm 350 
                'gmr_id_menu_01 = '.$nouveau_id_menu.', '.
351 
                'gmr_id_valeur = 1, '.
352 
                'gmr_ordre = '.$nouveau_ordre_menu;
353 
 
134 jpm 354 
    $resultat = $db->query($requete);
355 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 356 
 
357 
    //----------------------------------------------------------------------------
358 
    // Ajout de la relation-type "commun"
359 
 
134 jpm 360 
    // Récupération d'infos sur la hierarchie du menu
7 jpm 361 
    $requete =  'SELECT * '.
362 
                'FROM gen_menu_relation, gen_menu '.
363 
                'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.
364 
                'AND gmr_id_valeur = 102 '.// 102 = type "commun"
365 
                'AND gmr_id_menu_01 = gm_id_menu '.
134 jpm 366 
                'AND gm_ce_site = 0 '.// un menu commun n'a pas de site lié!
7 jpm 367 
                'ORDER BY gmr_ordre DESC';
368 
 
134 jpm 369 
    $resultat = $db->query($requete);
370 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 371 
 
466 ddelon 372 
    if ($resultat->numRows()>0) {
373 
    	$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
374 
    	$nouveau_ordre_commun = $ligne->gmr_ordre + 1;
375 
    }
376 
    else {
377 
    	$nouveau_ordre_commun = 0;
378 
    }
379 
 
134 jpm 380 
    $resultat->free();
7 jpm 381 
 
382 
    $requete =  'INSERT INTO gen_menu_relation '.
383 
                'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.
384 
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
385 
                'gmr_id_valeur = 102, '.
386 
                'gmr_ordre = '.$nouveau_ordre_commun;
387 
 
134 jpm 388 
    $resultat = $db->query($requete);
389 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 390 
}
391 
 
134 jpm 392 
/** Fonction ADME_afficherFormMenuCommun() - Affiche le formulaire pour un menu commun.
7 jpm 393 
*
134 jpm 394 
* Utilise HTML_QuickForm pour générer le formulaire.
395 
* Ancien nom : showUpper().
7 jpm 396 
*
134 jpm 397 
* @param  object  objet Pear de connection à la base de données.
398 
* @param  object  objet Pear représentant l'url de base.
399 
* @param  integer l'identifiant du site à administrer.
400 
* @param  integer l'identifiant du menu à administrer.
401 
* @param  array   le tableau associatif des valeurs à afficher dans le formulaire.
402 
* @return string  le formulaire XHTML.
7 jpm 403 
*/
134 jpm 404 
function ADME_afficherFormMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $aso_valeurs)
7 jpm 405 
{
134 jpm 406 
    // Initialisation de variable
407 
    $url->addQueryString('adme_site_id', $adme_site_id);
408 
    $url->addQueryString('adme_menu_id', $adme_menu_id);
7 jpm 409 
 
410 
    // Récupération des informations du menu concerné.
150 jpm 411 
    if (!isset($aso_valeurs[ADME_LG_ACTION_COMMUN_VERIFIER])) {
134 jpm 412 
        $aso_valeurs = GEN_lireInfoMenu($db, $adme_menu_id, DB_FETCHMODE_ASSOC);
413 
 
150 jpm 414 
        if ($aso_valeurs === false) {
415 
            die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU.'<br />'.
134 jpm 416 
                'Idenitifiant du menu n° : '. $adme_menu_id .'<br />'.
417 
                'Ligne n° : '. __LINE__ .'<br />'.
418 
                'Fichier n° : '. __FILE__ .'<br />');
419 
        }
7 jpm 420 
    }
421 
 
422 
    // Titre de la page
150 jpm 423 
    $retour = '<h1>'.ADME_LG_FORM_MENU_COMMUN_TITRE_GENERAL.'</h1>'."\n";
424 
    $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 425 
 
426 
    // Création du formulaire
134 jpm 427 
    // Notes : Quickform semble remplacer les & des &amp; à nouveau par des &amp; solution utiliser str_replace()...
428 
    $form =& new HTML_QuickForm('form_menu_commun', 'post', str_replace('&amp;', '&', $url->getUrl()));
7 jpm 429 
    $tab_index = 1000;
430 
    $squelette =& $form->defaultRenderer();
431 
    $squelette->setFormTemplate("\n".'<form{attributes}>'."\n"."\n".'{content}'."\n"."\n".'</form>'."\n");
432 
    $squelette->setElementTemplate(  '<li>'."\n".
433 
                                    '{label}'."\n".
434 
                                    '{element}'."\n".
150 jpm 435 
                                    '<!-- BEGIN required --><span class="symbole_obligatoire">'.ADME_LG_FORM_SYMBOLE_CHP_OBLIGATOIRE.'</span><!-- END required -->'."\n".
7 jpm 436 
                                    '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
437 
                                    '</li>'."\n");
150 jpm 438 
    $squelette->setRequiredNoteTemplate("\n".'<p><span class="symbole_obligatoire">'.ADME_LG_FORM_SYMBOLE_CHP_OBLIGATOIRE.'</span> {requiredNote}</p>'."\n");
7 jpm 439 
 
150 jpm 440 
    $partie_menu_debut = '<fieldset>'."\n".'<legend>'.ADME_LG_FORM_MENU_COMMUN_TITRE_CONFIG.'</legend>'."\n".'<ul>'."\n";
7 jpm 441 
    $form->addElement('html', $partie_menu_debut);
442 
 
443 
    $id = 'gm_code_num';
380 jpm 444 
    $aso_attributs = array('id'=>$id, 'tabindex' => $tab_index++, 'size' => 5, 'maxlength' => 5);
150 jpm 445 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CODE_NUM.'</label>';
7 jpm 446 
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 447 
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_CODE_NUM, 'required', '', 'client');
7 jpm 448 
 
449 
    $id = 'gm_code_alpha';
380 jpm 450 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 50);
150 jpm 451 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CODE_ALPHA.'</label>';
7 jpm 452 
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 453 
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_CODE_ALPHA, 'required', '', 'client');
7 jpm 454 
 
455 
    $id = 'gm_nom';
456 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 100);
150 jpm 457 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_NOM.'</label>';
7 jpm 458 
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 459 
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_NOM, 'required', '', 'client');
7 jpm 460 
    $form->applyFilter($id, 'trim');
461 
 
462 
    $id = 'gm_raccourci_clavier';
463 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 1, 'maxlength' => 1);
464 
    $label = '<label for="'.$id.'">'.'Raccourci clavier'.'</label>';
465 
    $form->addElement('text', $id, $label, $aso_attributs);
466 
 
467 
    $id = 'gm_fichier_squelette';
468 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 255);
150 jpm 469 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_FICHIER_SQUELETTE.'</label>';
7 jpm 470 
    $form->addElement('text', $id, $label, $aso_attributs);
471 
 
472 
    $id = 'gm_description_resume';
473 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 50);
150 jpm 474 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_INFO_BULLE.'</label>';
7 jpm 475 
    $form->addElement('textarea', $id, $label, $aso_attributs);
150 jpm 476 
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_INFO_BULLE, 'required', '', 'client');
7 jpm 477 
 
478 
    // Requête sur les applications
479 
    $requete =  'SELECT gap_id_application, gap_nom '.
480 
                'FROM gen_application '.
481 
                'WHERE gap_bool_applette = 0';// Pour éviter d'afficher les applettes.
482 
    $resultat = $db->query($requete);
483 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
484 
 
485 
    $aso_options = array();
486 
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
487 
        $aso_options[$ligne->gap_id_application] = $ligne->gap_nom;
488 
    }
489 
    $resultat->free();
490 
    $id = 'gm_ce_application';
491 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 492 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_APPLI.'</label>';
7 jpm 493 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
494 
 
495 
    $id = 'gm_application_arguments';
496 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 497 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_APPLI_ARGUMENT.'</label>';
7 jpm 498 
    $form->addElement('text', $id, $label, $aso_attributs);
499 
 
500 
    $partie_menu_fin = '</ul>'."\n".'</fieldset>'."\n";
501 
    $form->addElement('html', $partie_menu_fin);
502 
 
150 jpm 503 
    $partie_entete_debut = '<fieldset>'."\n".'<legend>'.ADME_LG_FORM_MENU_COMMUN_TITRE_ENTETE.'</legend>'."\n".'<ul>'."\n";
7 jpm 504 
    $form->addElement('html', $partie_entete_debut);
505 
 
506 
    $id = 'gm_robot';
150 jpm 507 
    $aso_options = array(   'index,follow' => ADME_LG_FORM_MENU_INDEX_FOLLOW,
508 
                            'index' => ADME_LG_FORM_MENU_INDEX,
509 
                            'noindex' => ADME_LG_FORM_MENU_NOINDEX,
510 
                            'noindex,nofollow' => ADME_LG_FORM_MENU_NOINDEX_NOFOLLOW,
511 
                            '' => ADME_LG_FORM_MENU_INDEX_VIDE);
7 jpm 512 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 513 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ROBOT.'</label>';
7 jpm 514 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
515 
 
516 
    $id = 'gm_titre';
517 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 518 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TITRE.'</label>';
7 jpm 519 
    $form->addElement('text', $id, $label, $aso_attributs);
520 
 
521 
    $id = 'gm_titre_alternatif';
522 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 523 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TITRE_ALTERNATIF.'</label>';
7 jpm 524 
    $form->addElement('text', $id, $label, $aso_attributs);
525 
 
526 
    $id = 'gm_mots_cles';
527 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 50);
150 jpm 528 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_MOT_CLE.'</label>';
7 jpm 529 
    $form->addElement('textarea', $id, $label, $aso_attributs);
530 
 
531 
    $id = 'gm_description_libre';
532 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
150 jpm 533 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DESCRIPTION.'</label>';
7 jpm 534 
    $form->addElement('textarea', $id, $label, $aso_attributs);
535 
 
536 
    $id = 'gm_description_table_matieres';
537 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
150 jpm 538 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TABLE_MATIERE.'</label>';
7 jpm 539 
    $form->addElement('textarea', $id, $label, $aso_attributs);
540 
 
541 
    $id = 'gm_source';
542 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 543 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_SOURCE.'</label>';
7 jpm 544 
    $form->addElement('text', $id, $label, $aso_attributs);
545 
 
546 
    $id = 'gm_auteur';
547 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 548 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_AUTEUR.'</label>';
7 jpm 549 
    $form->addElement('text', $id, $label, $aso_attributs);
550 
 
551 
    $id = 'gm_contributeur';
552 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
150 jpm 553 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CONTRIBUTEUR.'</label>';
7 jpm 554 
    $form->addElement('textarea', $id, $label, $aso_attributs);
555 
 
556 
    $id = 'gm_editeur';
382 jpm 557 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 65000);
150 jpm 558 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_EDITEUR.'</label>';
382 jpm 559 
    $form->addElement('text', $id, $label, $aso_attributs);
7 jpm 560 
 
317 jpm 561 
    $id = 'gm_date_creation';
562 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
563 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_CREATION.'</label>';
564 
    $form->addElement('text', $id, $label, $aso_attributs);
565 
 
7 jpm 566 
    $id = 'gm_date_debut_validite';
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_VALIDITE_DEBUT.'</label>';
7 jpm 569 
    $form->addElement('text', $id, $label, $aso_attributs);
570 
 
571 
    $id = 'gm_date_fin_validite';
572 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 573 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_VALIDITE_FIN.'</label>';
7 jpm 574 
    $form->addElement('text', $id, $label, $aso_attributs);
575 
 
576 
    $id = 'gm_date_copyright';
577 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 578 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_COPYRIGHT.'</label>';
7 jpm 579 
    $form->addElement('text', $id, $label, $aso_attributs);
580 
 
581 
    $id = 'gm_licence';
582 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 583 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_URL_LICENCE.'</label>';
7 jpm 584 
    $form->addElement('text', $id, $label, $aso_attributs);
585 
 
586 
    $id = 'gm_categorie';
587 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 588 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CATEGORIE.'</label>';
7 jpm 589 
    $form->addElement('text', $id, $label, $aso_attributs);
590 
 
591 
    $id = 'gm_public';
592 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 593 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_PUBLIC.'</label>';
7 jpm 594 
    $form->addElement('text', $id, $label, $aso_attributs);
595 
 
596 
    $id = 'gm_public_niveau';
597 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 25, 'maxlength' => 45);
150 jpm 598 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_PUBLIC_NIVEAU.'</label>';
7 jpm 599 
    $form->addElement('text', $id, $label, $aso_attributs);
600 
 
601 
    $id = 'gm_ce_type_portee_spatiale';
150 jpm 602 
    $aso_options = array(   '' => ADME_LG_FORM_MENU_ZG_VIDE,
603 
                            'iso3166' => ADME_LG_FORM_MENU_ZG_ISO,
604 
                            'Point' => ADME_LG_FORM_MENU_ZG_POINT,
605 
                            'Box' => ADME_LG_FORM_MENU_ZG_DC,
606 
                            'TGN' => ADME_LG_FORM_MENU_ZG_GTGN);
7 jpm 607 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 608 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ZG_TYPE.'</label>';
7 jpm 609 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
610 
 
611 
    $id = 'gm_portee_spatiale';
612 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 613 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ZG_VALEUR.'</label>';
7 jpm 614 
    $form->addElement('text', $id, $label, $aso_attributs);
615 
 
616 
    $id = 'gm_ce_type_portee_temporelle';
150 jpm 617 
    $aso_options = array(   '' => ADME_LG_FORM_MENU_TMP_VIDE,
618 
                            'W3CDTF' => ADME_LG_FORM_MENU_TMP_W3C,
619 
                            'Period' => ADME_LG_FORM_MENU_TMP_DC);
7 jpm 620 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 621 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TMP_TYPE.'</label>';
7 jpm 622 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
623 
 
624 
    $id = 'gm_portee_temporelle';
625 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 626 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TMP_VALEUR.'</label>';
7 jpm 627 
    $form->addElement('text', $id, $label, $aso_attributs);
628 
 
629 
    $partie_entete_fin = '</ul>'."\n".'</fieldset>'."\n";
630 
    $form->addElement('html', $partie_entete_fin);
631 
 
378 jpm 632 
    // Requete pour connaitre les informations sur l'administrateur ayant fait la dernière modif
633 
    $requete_admin =    'SELECT * '.
634 
                        'FROM gen_annuaire '.
635 
                        'WHERE ga_id_administrateur = '.$aso_valeurs['gm_ce_admin'];
636 
    $resultat_admin = $db->query($requete_admin);
637 
    if (DB::isError($resultat_admin)) {
638 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_admin->getMessage(), $requete_admin));
639 
    }
640 
    $ligne_admin = $resultat_admin->fetchRow(DB_FETCHMODE_OBJECT);
379 jpm 641 
    $info_admin =   '<p class="info">Dernière modification par '.$ligne_admin->ga_prenom.' '.$ligne_admin->ga_nom.'</p>';
378 jpm 642 
    $form->addElement('html', $info_admin);
643 
 
7 jpm 644 
    $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
645 
    $form->addElement('html', $liste_bouton_debut);
646 
 
150 jpm 647 
    $form->addElement('submit', ADME_LG_ACTION_COMMUN_VERIFIER, ADME_LG_FORM_MENU_VALIDER);
648 
    $bouton_annuler = '<li><a class="bouton" href="'.$url->getURL().'" title="'.ADME_LG_FORM_MENU_ANNULER.'" >'.ADME_LG_FORM_MENU_ANNULER.'</a>'.'</li>'."\n";
7 jpm 649 
    $form->addElement('html', $bouton_annuler);
650 
 
651 
    $liste_bouton_fin = '</ul>'."\n";
652 
    $form->addElement('html', $liste_bouton_fin);
653 
 
150 jpm 654 
    $form->addElement('hidden', 'gm_id_menu', $aso_valeurs['gm_id_menu']);
655 
 
134 jpm 656 
    $form->setDefaults($aso_valeurs);
7 jpm 657 
 
658 
    // Note de fin de formulaire
150 jpm 659 
    $form->setRequiredNote(ADME_LG_FORM_TXT_CHP_OBLIGATOIRE);
7 jpm 660 
 
134 jpm 661 
    $retour .= $form->toHTML()."\n";
662 
    return $retour;
7 jpm 663 
}
664 
 
134 jpm 665 
/** Fonction ADME_validerFormAjouterMenuCommun() - Valide les données issues du formulaire pour gen_menu.
666 
*
667 
* Cette fonction valide les données à ajouter dans la table gen_menu.
668 
*
155 jpm 669 
* @param  PEAR:DB   l'objet pear de connexion à la base de données.
134 jpm 670 
* @param  string   le tableau contenant les valeurs du formulaire.
671 
* @return string   retourne les messages d'erreurs sinon rien.
672 
*/
673 
function ADME_validerFormAjouterMenuCommun($db, $aso_valeurs)
674 
{
675 
    $message = '';
150 jpm 676 
    if ($aso_valeurs['gm_code_alpha'] == '') {
677 
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_ALPHA.'</p>';
678 
    } else {
679 
        // Requete pour vérifier l'abscence du code alphanumérique de la table gen_menu
680 
        if (GEN_verifierPresenceCodeMenu($db, 'string', $aso_valeurs['gm_id_menu'], $aso_valeurs['gm_code_alpha']) === true) {
681 
            $message .= '<p class="pap_erreur">'.sprintf(ADME_LG_ERREUR_CODE_ALPHA, $aso_valeurs['gm_code_alpha']).'</p>';
682 
        }
134 jpm 683 
    }
150 jpm 684 
    if ($aso_valeurs['gm_code_num'] == '') {
685 
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_NUM.'</p>';
686 
    } else {
687 
        // Requete pour vérifier l'abscence du code numérique de la table gen_menu
688 
        if (GEN_verifierPresenceCodeMenu($db, 'int', $aso_valeurs['gm_id_menu'], $aso_valeurs['gm_code_num']) === true) {
689 
            $message .= '<p class="pap_erreur">'.sprintf(ADME_LG_ERREUR_CODE_NUM, $aso_valeurs['gm_code_num']).'</p>';
690 
        }
134 jpm 691 
    }
150 jpm 692 
    if ($aso_valeurs['gm_nom'] == '') {
693 
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_NOM.'</p>';
694 
    }
695 
    if ($aso_valeurs['gm_description_resume'] == '') {
696 
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_INFO_BULLE.'</p>';
697 
    }
134 jpm 698 
    return $message;
699 
}
700 
 
701 
/** Fonction ADME_modifierMenuCommun() - Met à jour les infos d'un menu commun
702 
*
703 
* Fonction modifiant un menu commun à Papyrus.
704 
*
705 
* @param object objet Pear de connection à la base de données.
706 
* @param object objet Pear représentant l'authentification.
707 
* @param integer l'identifiant du menu à administrer.
708 
* @param array le tableau des valeurs à modifier.
709 
* @return void les changement sont fait dans la base de données.
710 
*/
150 jpm 711 
function ADME_modifierMenuCommun($db, $auth, $adme_menu_id, $aso_valeurs)
134 jpm 712 
{
713 
    $requete =  'UPDATE gen_menu SET '.
317 jpm 714 
                'gm_ce_application = '.$aso_valeurs['gm_ce_application'].', '.
715 
                'gm_application_arguments = "'.$aso_valeurs['gm_application_arguments'].'", '.
716 
                'gm_fichier_squelette = "'.$aso_valeurs['gm_fichier_squelette'].'", '.
717 
                'gm_code_num = '.$aso_valeurs['gm_code_num'].', '.
718 
                'gm_code_alpha = "'.$aso_valeurs['gm_code_alpha'].'", '.
719 
                'gm_nom = "'.$aso_valeurs['gm_nom'].'", '.
720 
                'gm_raccourci_clavier = "'.$aso_valeurs['gm_raccourci_clavier'].'", '.
721 
                'gm_robot = "'.$aso_valeurs['gm_robot'].'", '.
722 
                'gm_titre = "'.$aso_valeurs['gm_titre'].'", '.
723 
                'gm_titre_alternatif = "'.$aso_valeurs['gm_titre_alternatif'].'", '.
724 
                'gm_mots_cles = "'.$aso_valeurs['gm_mots_cles'].'", '.
725 
                'gm_description_libre = "'.$aso_valeurs['gm_description_libre'].'", '.
726 
                'gm_description_resume = "'.$aso_valeurs['gm_description_resume'].'", '.
727 
                'gm_description_table_matieres = "'.$aso_valeurs['gm_description_table_matieres'].'", '.
728 
                'gm_source = "'.$aso_valeurs['gm_source'].'", '.
729 
                'gm_auteur = "'.$aso_valeurs['gm_auteur'].'", '.
730 
                'gm_contributeur = "'.$aso_valeurs['gm_contributeur'].'", '.
731 
                'gm_editeur = "'.$aso_valeurs['gm_editeur'].'", '.
732 
                'gm_date_creation = "'.$aso_valeurs['gm_date_creation'].'", '.
733 
                'gm_date_debut_validite = "'.$aso_valeurs['gm_date_debut_validite'].'", '.
734 
                'gm_date_fin_validite = "'.$aso_valeurs['gm_date_fin_validite'].'", '.
735 
                'gm_date_copyright = "'.$aso_valeurs['gm_date_copyright'].'", '.
736 
                'gm_licence = "'.$aso_valeurs['gm_licence'].'", '.
737 
                'gm_categorie = "'.$aso_valeurs['gm_categorie'].'", '.
738 
                'gm_public = "'.$aso_valeurs['gm_public'].'", '.
739 
                'gm_public_niveau = "'.$aso_valeurs['gm_public_niveau'].'", '.
740 
                'gm_portee_spatiale = "'.$aso_valeurs['gm_portee_spatiale'].'", '.
741 
                'gm_portee_temporelle = "'.$aso_valeurs['gm_portee_temporelle'].'", '.
134 jpm 742 
                'gm_ce_admin = "'.$auth->getAuthData('ga_id_administrateur').'" '.
743 
                'WHERE gm_id_menu = '.$adme_menu_id;
744 
 
745 
    $resultat = $db->query($requete);
746 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
747 
}
748 
 
749 
/** Fonction ADME_deplacerMenuCommun() - Permet de déplacer un menu dans la hiérarchie.
750 
*
751 
* Permet de déplacer un menu dans la hiérarchie des menus communs.
752 
* Ancien nom : moveUpper()
753 
*
754 
* @param  PEAR::DB objet Pear DB de connexion à la base de données.
155 jpm 755 
* @param  integer   identifiant du site administré.
134 jpm 756 
* @param  integer  identifiant du menu à déplacer.
757 
* @param  boolean  indique si on veut monter le menu (true) ou le descendre (false).
758 
* @return void     modifie la base de données.
759 
*/
760 
function ADME_deplacerMenuCommun($db, $adme_site_id, $adme_menu_id, $bln_monter)
761 
{
762 
    //-------------------------------------------------------------------------------------------------------------------
763 
    // Récupération d'informations sur les relations du menu courant.
764 
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $adme_menu_id, '1'); // 1 = relation "avoir père"
765 
    if ($ligne_menu_courant_relation == false) {
150 jpm 766 
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU_RELATION.'<br />'.
134 jpm 767 
            'Identifiant menu : '. $adme_menu_id .'<br />'.
768 
            'Identifiant valeur relation : 1 <br />'.
769 
            'Ligne n° : '. __LINE__ .'<br />'.
770 
            'Fichier n° : '. __FILE__ .'<br />');
771 
    }
772 
 
773 
    $id_pere = GEN_lireIdentifiantMenuPere($adme_menu_id);
249 jpm 774 
    if ($id_pere === false) {
150 jpm 775 
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_ID_MENU_PERE.'<br />'.
134 jpm 776 
            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
777 
            'Ligne n° : '. __LINE__ .'<br />'.
778 
            'Fichier n° : '. __FILE__ .'<br />');
779 
    }
780 
 
781 
    //-------------------------------------------------------------------------------------------------------------------
782 
    // Recherche d'information hiérarchiques sur le menu précédent ou suivant le menu courant
783 
    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
784 
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
785 
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
786 
                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
787 
                'AND gm_ce_site = 0 '.// les menus communs ne sont pas liés à un site!
788 
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
789 
                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
790 
                'AND GMR01.gmr_id_valeur = 1 ';// 1 = relation menu "père"
791 
    if ($bln_monter) {
792 
        $requete .= 'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
793 
                    'ORDER BY GMR01.gmr_ordre DESC';
794 
    } else {
795 
        $requete .= 'AND GMR01.gmr_ordre > '.$ligne_menu_courant_relation->gmr_ordre.' '.
796 
                    'ORDER BY GMR01.gmr_ordre ASC';
797 
    }
798 
 
799 
    $resultat_menu = $db->query($requete);
800 
    (DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
801 
 
802 
    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
803 
    $resultat_menu->free();
804 
 
805 
    //-------------------------------------------------------------------------------------------------------------------
806 
    // Si la requete ne retourne rien nous ne faisons rien.
807 
    if (! $ligne_menu) {
808 
        return null;
809 
    }
810 
 
811 
    //-------------------------------------------------------------------------------------------------------------------
812 
    // Mise à jour des relations hiérarchiques du menu courant
813 
    $requete =  'UPDATE gen_menu_relation SET '.
814 
                'gmr_ordre = '.$ligne_menu->nouvel_ordre.' '.
815 
                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
816 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
817 
 
818 
    $resultat = $db->query($requete);
819 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
820 
 
821 
    //-------------------------------------------------------------------------------------------------------------------
822 
    // Mise à jour des relations hiérarchiques du menu précédent ou suivant
823 
    $requete =  'UPDATE gen_menu_relation SET '.
824 
                'gmr_ordre = '.$ligne_menu_courant_relation->gmr_ordre.' '.
825 
                'WHERE gmr_id_menu_01 = '.$ligne_menu->id_menu_remplace.' '.
826 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
827 
 
828 
    $resultat = $db->query($requete);
829 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
830 
}
831 
 
422 ddelon 832 
function ADME_indenterMenuCommun($db, $adme_site_id, $adme_menu_id, $bln_diminuer) {
833 
 
834 
    //-------------------------------------------------------------------------------------------------------------------
835 
    // Récupération d'information sur le site de ce menu.
836 
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
837 
 
838 
    if ($objet_site == false) {
839 
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_SITE.'<br />'.
840 
            'Id du site : '. $adme_site_id .'<br />'.
841 
            'Ligne n° : '. __LINE__ .'<br />'.
842 
            'Fichier n° : '. __FILE__ .'<br />');
843 
    }
844 
 
845 
    //-------------------------------------------------------------------------------------------------------------------
846 
    // Récupération d'informations sur les relations du menu courant.
847 
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $adme_menu_id, '1');
848 
    if ($ligne_menu_courant_relation == false) {
849 
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU_RELATION.'<br />'.
850 
            'Identifiant menu : '. $adme_menu_id .'<br />'.
851 
            'Identifiant valeur relation : 1 <br />'.
852 
            'Ligne n° : '. __LINE__ .'<br />'.
853 
            'Fichier n° : '. __FILE__ .'<br />');
854 
    }
855 
 
856 
 
857 
 
858 
    //-------------------------------------------------------------------------------------------------------------------
859 
    // Récupération de l'identifiant du menu pére
860 
 
861 
    $id_pere = GEN_lireIdentifiantMenuPere($adme_menu_id);
862 
    if ($id_pere === false) {
863 
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_ID_MENU_PERE.'<br />'.
864 
            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
865 
            'Ligne n° : '. __LINE__ .'<br />'.
866 
            'Fichier n° : '. __FILE__ .'<br />');
867 
    }
868 
 
869 
	if ($bln_diminuer) {
870 
 
871 
	    // Diminution d'un niveau
872 
 
873 
	    if ($id_pere) {
874 
 
875 
			 // Récupération de l'identifiant du menu grand pére, sera le nouveau pere
876 
 
877 
		    $id_grand_pere = GEN_lireIdentifiantMenuPere($id_pere);
878 
 
879 
		    if ($id_grand_pere === false) {
880 
		        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_ID_MENU_PERE.'<br />'.
881 
		            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
882 
		            'Ligne n° : '. __LINE__ .'<br />'.
883 
		            'Fichier n° : '. __FILE__ .'<br />');
884 
		    }
885 
 
886 
		    // Récupération d'informations sur les relations du menu pere
887 
 
888 
		    $ligne_menu_pere_relation = GEN_lireInfoMenuRelation($db, $id_pere, '1');
889 
 
890 
	    	if ($ligne_menu_pere_relation == false) {
891 
		        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU_RELATION.'<br />'.
892 
		            'Identifiant menu : '. $adme_menu_id .'<br />'.
893 
		            'Identifiant valeur relation : 1 <br />'.
894 
		            'Ligne n° : '. __LINE__ .'<br />'.
895 
		            'Fichier n° : '. __FILE__ .'<br />');
896 
		    }
897 
 
898 
 
899 
		    //-------------------------------------------------------------------------------------------------------------------
900 
		    // Recherche d'information sur le menu suivant le menu pere
901 
		    //-------------------------------------------------------------------------------------------------------------------
902 
 
903 
		    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
904 
	                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
905 
	                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
906 
	                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
907 
	                'AND gm_ce_site = 0 '.// les menus communs ne sont pas liés à un site!
908 
	                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun""
909 
	                'AND GMR01.gmr_id_menu_02 = '.$id_grand_pere.' '.
910 
	                'AND GMR01.gmr_id_valeur = 1 '.// 1 = relation menu "père"
911 
				    'AND GMR01.gmr_ordre > '.$ligne_menu_pere_relation->gmr_ordre.' '.
912 
				    'ORDER BY GMR01.gmr_ordre DESC';
913 
 
914 
 
915 
		    $resultat_menu = $db->query($requete);
916 
 
917 
		    (DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
918 
 
919 
		    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
920 
		    $resultat_menu->free();
921 
 
922 
		    //-------------------------------------------------------------------------------------------------------------------
923 
		    // Si la requete ne retourne rien nous ne faisons rien.
924 
		    if (! $ligne_menu) {
925 
		        $no=$ligne_menu_pere_relation->gmr_ordre+1;
926 
		    }
927 
		    else {
928 
		    	$no=$ligne_menu->nouvel_ordre+1;
929 
		    }
930 
 
931 
			// Mise à jour pere menu courant
932 
		   	$requete =  'UPDATE gen_menu_relation SET '.
933 
		                'gmr_id_menu_02 =  '.$id_grand_pere.' ,'.
934 
		                'gmr_ordre = '.$no.' '.
935 
		                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
936 
		                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
937 
 
938 
			$resultat_update = $db->query($requete);
939 
		    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
940 
 
941 
 
942 
 
943 
	    }
944 
	}
945 
	else {
946 
 
947 
	    $requete =  'SELECT GMR01.gmr_id_menu_01 '.
948 
	                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
949 
	                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
950 
	                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
951 
	                'AND gm_ce_site = 0 '.// les menus communs ne sont pas liés à un site!
952 
	                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
953 
	                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
954 
	                'AND GMR01.gmr_id_valeur = 1 '.// 1 = relation menu "père"
955 
        			'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
956 
                    'ORDER BY GMR01.gmr_ordre DESC';
957 
 
958 
	    $resultat_menu = $db->query($requete);
959 
    	(DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
960 
 
961 
	    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
962 
	    $resultat_menu->free();
963 
	    //-------------------------------------------------------------------------------------------------------------------
964 
	    // Si la requete ne retourne rien nous ne faisons rien.
965 
	    if (! $ligne_menu) {
966 
	        return null;
967 
	    }
968 
 
969 
    	//----------------------------------------------------------------------------
970 
		// Recherche dernier fils
971 
 
972 
		$requete =  'SELECT GMR01.gmr_ordre '.
973 
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
974 
                'WHERE GMR01.gmr_id_menu_02 = '.$ligne_menu->gmr_id_menu_01.' '.
975 
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
976 
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
977 
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
978 
                'AND GMR02.gmr_id_valeur = 102 '.// 100 = menu type "commun"
979 
                'ORDER BY GMR01.gmr_ordre DESC';
980 
 
981 
		$resultat = $db->query($requete);
982 
		(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
983 
 
984 
		$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
985 
		$no = $ligne->gmr_ordre + 1;
986 
		$resultat->free();
987 
 
988 
 
989 
		// Mise à jour pere menu courant
990 
	   	$requete =  'UPDATE gen_menu_relation SET '.
991 
	                'gmr_id_menu_02 =  '.$ligne_menu->gmr_id_menu_01.' ,'.
992 
	                'gmr_ordre = '.$no.' '.
993 
	                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
994 
	                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
995 
 
996 
		$resultat_update = $db->query($requete);
997 
	    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
998 
 
999 
 
1000 
    }
1001 
}
1002 
 
1003 
 
1004 
 
1005 
/** Fonction ADME_supprimerMenuCommun() - Supprime un menu commun.
134 jpm 1006 
*
422 ddelon 1007 
* Supprime de la base de données de Génésia toutes les traces du menu commun
134 jpm 1008 
* passé en paramètre.
1009 
* Ancien nom : deleteUpper()
1010 
*
1011 
* @param  PEAR::DB l'objet Pear DB de connexion à la base de données.
155 jpm 1012 
* @param  integer   l'identifiant du menu à supprimer
422 ddelon 1013 
* @return void     le menu commun est supprimé de la base de données.
134 jpm 1014 
*/
1015 
function ADME_supprimerMenuCommun($db, $id_menu_a_supprimer)
1016 
{
1017 
    //-------------------------------------------------------------------------------------------------------------------
1018 
    // Y a t'il des sous_menus ?
1019 
    $requete =    'SELECT COUNT(gm_id_menu) AS compte '.
1020 
                'FROM gen_menu, gen_menu_relation '.
1021 
                'WHERE gmr_id_menu_02 = '.$id_menu_a_supprimer.' '.
1022 
                'AND gmr_id_valeur = 1 '.
1023 
                'AND gmr_id_menu_01 = gm_id_menu ';
1024 
 
1025 
    $resultat = $db->query($requete);
1026 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1027 
 
1028 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
1029 
 
1030 
    if ($ligne && ($ligne->compte > 0)) {
150 jpm 1031 
        return ADME_LG_ERREUR_EXISTE_SOUS_MENU;
134 jpm 1032 
    }
1033 
 
1034 
    //-------------------------------------------------------------------------------------------------------------------
155 jpm 1035 
    // Mise à jour de l'ordre des menus
1036 
    $ligne_menu_supr_relation = GEN_lireInfoMenuRelation($db, $id_menu_a_supprimer, '1'); // 1 = relation "avoir père"
1037 
    $requete =  'SELECT GMR01.gmr_id_menu_01, GMR01.gmr_ordre '.
1038 
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
1039 
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
1040 
                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
1041 
                'AND gm_ce_site = 0 '.// les menus communs ne sont pas liés à un site!
1042 
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
1043 
                'AND GMR01.gmr_id_menu_02 = '.$ligne_menu_supr_relation->gmr_id_menu_02.' '.
1044 
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = relation menu "père"
1045 
                'AND GMR01.gmr_ordre > '.$ligne_menu_supr_relation->gmr_ordre.' '.
1046 
                'ORDER BY GMR01.gmr_ordre ASC';
1047 
    $resultat = $db->query($requete);
1048 
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
1049 
        // Mise à jour des relations hiérarchiques du menu courant
1050 
        $requete_maj =  'UPDATE gen_menu_relation SET '.
1051 
                        'gmr_ordre = '.($ligne->gmr_ordre - 1).' '.
1052 
                        'WHERE gmr_id_menu_01 = '.$ligne->gmr_id_menu_01.' '.
1053 
                        'AND gmr_id_valeur = 1';// 1 = relation menu "père"
1054 
 
1055 
        $resultat_maj = $db->query($requete_maj);
1056 
        (DB::isError($resultat_maj)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_maj->getMessage(), $requete_maj)) : '';
1057 
    }
1058 
    $resultat->free();
1059 
 
1060 
    //-------------------------------------------------------------------------------------------------------------------
134 jpm 1061 
    // S'il n'y a plus de sous niveau, on supprime le menu
1062 
    $requete =  'DELETE FROM gen_menu '.
1063 
                'WHERE gm_id_menu = '.$id_menu_a_supprimer;
1064 
 
1065 
    $resultat = $db->query($requete);
1066 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1067 
 
1068 
    //-------------------------------------------------------------------------------------------------------------------
1069 
    // Puis on supprime les relations de ce menu
1070 
    $requete =  'DELETE FROM gen_menu_relation '.
1071 
                'WHERE gmr_id_menu_01 = '.$id_menu_a_supprimer;
1072 
 
1073 
    $resultat = $db->query($requete);
1074 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
155 jpm 1075 
 
134 jpm 1076 
}
1077 
 
1078 
 
1079 
 
7 jpm 1080 
// +------------------------------------------------------------------------------------------------------+
1081 
// |                                            PIED du PROGRAMME                                         |
1082 
// +------------------------------------------------------------------------------------------------------+
1083 
 
1084 
 
134 jpm 1085 
 
7 jpm 1086 
/* +--Fin du code ----------------------------------------------------------------------------------------+
1087 
*
1088 
* $Log: not supported by cvs2svn $
466 ddelon 1089 
* Revision 1.18  2005/07/18 16:14:32  ddelon
1090 
* css admin + menu communs
1091 
*
422 ddelon 1092 
* Revision 1.17  2005/07/08 22:01:25  ddelon
1093 
* Copyright
1094 
*
410 ddelon 1095 
* Revision 1.16  2005/05/26 16:13:08  jpm
1096 
* Correction taille éditeur: passage en text
1097 
*
380 jpm 1098 
* Revision 1.14  2005/05/26 15:34:46  jpm
1099 
* Ajout d'un espace.
1100 
*
379 jpm 1101 
* Revision 1.13  2005/05/26 08:54:20  jpm
1102 
* Ajout info admin ayant fait la dernière modif.
1103 
*
378 jpm 1104 
* Revision 1.12  2005/04/19 16:47:16  jpm
1105 
* Gestion des dates  de fin de validité des menus.
1106 
*
346 jpm 1107 
* Revision 1.11  2005/03/29 15:49:12  jpm
1108 
* Ajout de la date de création dans le formulaire des menus.
1109 
*
317 jpm 1110 
* Revision 1.10  2005/02/28 11:05:06  jpm
1111 
* Modification des auteurs.
1112 
*
285 jpm 1113 
* Revision 1.9  2005/01/24 11:28:09  jpm
1114 
* Correction bogue.
1115 
* Ajout d'un troisième = pour comparer le type.
1116 
*
249 jpm 1117 
* Revision 1.8  2004/12/01 16:47:28  jpm
1118 
* Ajout d'une boite javascript de confirmation de suppression d'un menu.
1119 
*
197 jpm 1120 
* Revision 1.7  2004/11/15 16:51:12  jpm
1121 
* Correction bogue de mise à jour de l'ordre des menus.
1122 
*
155 jpm 1123 
* Revision 1.6  2004/11/10 17:26:07  jpm
1124 
* Fin gestion de la traduction.
1125 
*
150 jpm 1126 
* Revision 1.5  2004/11/09 17:48:35  jpm
1127 
* Gestion de différentes interfaces d'administration.
1128 
*
134 jpm 1129 
* Revision 1.3  2004/09/23 17:45:13  jpm
1130 
* Amélioration de la gestion des liens annuler et du selecteur de sites.
1131 
*
56 jpm 1132 
* Revision 1.2  2004/07/06 17:07:37  jpm
1133 
* Modification de la documentation pour une mailleur analyse par PhpDocumentor.
1134 
*
25 jpm 1135 
* Revision 1.1  2004/06/16 15:04:32  jpm
1136 
* Changement de nom de Génésia en Papyrus.
1137 
* Changement de l'arborescence.
1138 
*
7 jpm 1139 
* Revision 1.10  2004/05/10 12:13:03  jpm
1140 
* Modification des formulaires.
1141 
*
1142 
* Revision 1.9  2004/05/07 16:31:40  jpm
1143 
* Amélioration du formulaire d'un menu commun.
1144 
*
1145 
* Revision 1.8  2004/05/07 09:56:52  jpm
1146 
* Correction des noms de constantes d'images.
1147 
*
1148 
* Revision 1.7  2004/05/07 07:23:54  jpm
1149 
* Amélioration du code, des commentaires et correction de bogues.
1150 
*
1151 
* Revision 1.6  2004/05/04 16:27:55  jpm
1152 
* Amélioration gestion du déplacement des menus.
1153 
*
1154 
*
1155 
* +-- Fin du code ----------------------------------------------------------------------------------------+
1156 
*/
1157 
?>