Subversion Repositories Applications.papyrus

Rev

Rev 143 | Rev 152 | 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 
// +------------------------------------------------------------------------------------------------------+
150 jpm 22 
// CVS : $Id: adme_menu_classique.fonct.php,v 1.10 2004-11-10 17:26:07 jpm Exp $
7 jpm 23 
/**
24 
* Fonctions de gestion des menus classiques
25 
*
26 
* Permet de lister, d'ajouter, de modifier, et de déplacer des menus classiques.
27 
* Par menus classiques nous entendons tous les menus devant paraitre dans l'arborescences
28 
* des menus disponibles pour le site courant.
29 
*
25 jpm 30 
*@package Admin_menu
7 jpm 31 
*@subpackage Fonctions
32 
//Auteur original :
33 
*@author        Laurent COUDOUNEAU <lc@gsite.org>
34 
//Autres auteurs :
35 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
36 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
37 
*@copyright     Tela-Botanica 2000-2004
150 jpm 38 
*@version       $Revision: 1.10 $ $Date: 2004-11-10 17:26:07 $
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 +.
152 
* @return  string une ligne de liste XHTML
153 
*/
154 
function ADME_retournerXhtmlMenuClassique($db, $url, $adme_site_id, $adme_menu_id, $int_deplier)
155 
{
141 jpm 156 
    //-------------------------------------------------------------------------------------------------------------------
157 
    // Initialisation des variables
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);
228 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_CLASSIQUE_SUPPRIMER_TITLE.'">'.
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').'", '.
297 
                'gm_date_copyright = "'.date('Y-00-00 00:00:00').'", '.
298 
                'gm_categorie = "menu", '.
128 jpm 299 
                'gm_ce_admin = '.$auth->getAuthData('ga_id_administrateur').' '
7 jpm 300 
                ;
301 
 
128 jpm 302 
    $resultat = $db->query($requete);
303 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 304 
 
305 
    //----------------------------------------------------------------------------
306 
    // Ajout de la relation "père"
307 
 
128 jpm 308 
    if (!isset($adme_menu_id) && empty($adme_menu_id)) {
309 
        $adme_menu_id = 0 ;// Identifiant du père
7 jpm 310 
    }
311 
    //----------------------------------------------------------------------------
312 
    // Récupération d'infos sur la hierarchie du menu
134 jpm 313 
    $requete =  'SELECT GMR01.gmr_ordre '.
7 jpm 314 
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
128 jpm 315 
                'WHERE GMR01.gmr_id_menu_02 = '.$adme_menu_id.' '.
7 jpm 316 
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
317 
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
318 
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
319 
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
320 
                'ORDER BY GMR01.gmr_ordre DESC';
321 
 
128 jpm 322 
    $resultat = $db->query($requete);
323 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 324 
 
128 jpm 325 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
326 
    $nouveau_ordre_menu = $ligne->gmr_ordre + 1;
327 
    $resultat->free();
7 jpm 328 
 
329 
    $requete =  'INSERT INTO gen_menu_relation '.
128 jpm 330 
                'SET gmr_id_menu_02 = '.$adme_menu_id.', '.
7 jpm 331 
                'gmr_id_menu_01 = '.$nouveau_id_menu.', '.
332 
                'gmr_id_valeur = 1, '.
333 
                'gmr_ordre = '.$nouveau_ordre_menu;
334 
 
128 jpm 335 
    $resultat = $db->query($requete);
336 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 337 
 
338 
    //----------------------------------------------------------------------------
339 
    // Ajout de la relation-type "menu classique"
340 
 
341 
    // Récupération d'infos sur la hierarchie du menu
342 
    $requete =  'SELECT * '.
343 
                'FROM gen_menu_relation, gen_menu '.
344 
                'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.
134 jpm 345 
                'AND gmr_id_valeur = 100 '.// 100 = type menu "classique"
7 jpm 346 
                'AND gmr_id_menu_01 = gm_id_menu '.
128 jpm 347 
                'AND gm_ce_site = '.$adme_site_id.' '.
7 jpm 348 
                'ORDER BY gmr_ordre DESC';
349 
 
128 jpm 350 
    $resultat = $db->query($requete);
351 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 352 
 
128 jpm 353 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
354 
    $nouveau_ordre_menu_classique = $ligne->gmr_ordre + 1;
355 
    $resultat->free();
7 jpm 356 
 
357 
    $requete =  'INSERT INTO gen_menu_relation '.
358 
                'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.
359 
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
360 
                'gmr_id_valeur = 100, '.
361 
                'gmr_ordre = '.$nouveau_ordre_menu_classique;
362 
 
363 
    $result = $db->query($requete);
364 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
365 
}
366 
 
134 jpm 367 
/** Fonction ADME_afficherFormMenuClassique() - Affiche le formulaire pour un menu classique
7 jpm 368 
*
134 jpm 369 
* Utilise HTML_QuickForm pour générer le formulaire.
128 jpm 370 
* Ancien nom : showMenu()
7 jpm 371 
*
134 jpm 372 
* @param  object  objet Pear de connection à la base de données.
373 
* @param  object objet Pear représentant l'url de base.
374 
* @param  integer l'identifiant du site à administrer.
375 
* @param  integer l'identifiant du menu à administrer.
376 
* @param  array le tableau associatif des valeurs à afficher dans le formulaire.
377 
* @return  string  le formulaire XHTML.
7 jpm 378 
*/
134 jpm 379 
function ADME_afficherFormMenuClassique($db, $url, $adme_site_id, $adme_menu_id, $aso_valeurs)
7 jpm 380 
{
381 
    // Initialisation de variable
128 jpm 382 
    $url->addQueryString('adme_site_id', $adme_site_id);
383 
    $url->addQueryString('adme_menu_id', $adme_menu_id);
7 jpm 384 
 
128 jpm 385 
    // Nous sommes toujours en modification car un menu est ajouter automatiquement!
386 
    // Récupération des informations du menu concerné.
150 jpm 387 
    if (!isset($aso_valeurs[ADME_LG_ACTION_CLASSIQUE_VERIFIER])) {
134 jpm 388 
        $aso_valeurs = GEN_lireInfoMenu($db, $adme_menu_id, DB_FETCHMODE_ASSOC);
389 
        if ($aso_valeurs == false) {
150 jpm 390 
            die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU.'<br />'.
134 jpm 391 
                'Idenitifiant du menu n° : '. $adme_menu_id .'<br />'.
392 
                'Ligne n° : '. __LINE__ .'<br />'.
393 
                'Fichier n° : '. __FILE__ .'<br />');
394 
        }
7 jpm 395 
    }
134 jpm 396 
 
128 jpm 397 
    // Titre de la page
150 jpm 398 
    $retour = '<h1>'.ADME_LG_FORM_MENU_CLASSIQUE_TITRE_GENERAL.'</h1>'."\n";
399 
    $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 400 
 
401 
    // Création du formulaire
128 jpm 402 
    // Notes : Quickform semble remplacer les & des &amp; à nouveau par des &amp; solution utiliser str_replace()...
403 
    $form =& new HTML_QuickForm('form_menu_classique', 'post', str_replace('&amp;', '&', $url->getUrl()));
7 jpm 404 
    $tab_index = 1000;
405 
    $squelette =& $form->defaultRenderer();
406 
    $squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'{content}'."\n".'</form>'."\n");
407 
    $squelette->setElementTemplate(  '<li>'."\n".
408 
                                    '{label}'."\n".
409 
                                    '{element}'."\n".
150 jpm 410 
                                    '<!-- BEGIN required --><span class="symbole_obligatoire">'.ADME_LG_FORM_SYMBOLE_CHP_OBLIGATOIRE.'</span><!-- END required -->'."\n".
7 jpm 411 
                                    '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
412 
                                    '</li>'."\n");
150 jpm 413 
    $squelette->setRequiredNoteTemplate("\n".'<p><span class="symbole_obligatoire">'.ADME_LG_FORM_SYMBOLE_CHP_OBLIGATOIRE.'</span> {requiredNote}</p>'."\n");
7 jpm 414 
 
150 jpm 415 
    $partie_menu_debut = '<fieldset>'."\n".'<legend>'.ADME_LG_FORM_MENU_CLASSIQUE_TITRE_CONFIG.'</legend>'."\n".'<ul>'."\n";
7 jpm 416 
    $form->addElement('html', $partie_menu_debut);
417 
 
418 
    $id = 'gm_code_num';
419 
    $aso_attributs = array('id'=>$id, 'tabindex' => $tab_index++, 'size' => 5, 'maxlength' => 100);
150 jpm 420 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CODE_NUM.'</label>';
7 jpm 421 
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 422 
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_CODE_NUM, 'required', '', 'client');
7 jpm 423 
 
424 
    $id = 'gm_code_alpha';
425 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 20, 'maxlength' => 20);
150 jpm 426 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CODE_ALPHA.'</label>';
7 jpm 427 
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 428 
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_CODE_ALPHA, 'required', '', 'client');
7 jpm 429 
 
430 
    $id = 'gm_nom';
431 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 100);
150 jpm 432 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_NOM.'</label>';
7 jpm 433 
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 434 
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_NOM, 'required', '', 'client');
7 jpm 435 
    $form->applyFilter($id, 'trim');
436 
 
437 
    $id = 'gm_raccourci_clavier';
438 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 1, 'maxlength' => 1);
150 jpm 439 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_RACCOURCI.'</label>';
7 jpm 440 
    $form->addElement('text', $id, $label, $aso_attributs);
441 
 
442 
    $id = 'defaut';
443 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 444 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DEFAUT.'</label>';
7 jpm 445 
    $form->addElement('checkbox', $id, $label, '', $aso_attributs);
446 
 
447 
    $id = 'gm_fichier_squelette';
448 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 255);
150 jpm 449 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_FICHIER_SQUELETTE.'</label>';
7 jpm 450 
    $form->addElement('text', $id, $label, $aso_attributs);
451 
 
452 
    $id = 'gm_description_resume';
453 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 50);
150 jpm 454 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_INFO_BULLE.'</label>';
7 jpm 455 
    $form->addElement('textarea', $id, $label, $aso_attributs);
150 jpm 456 
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_INFO_BULLE, 'required', '', 'client');
7 jpm 457 
 
458 
    // Requête sur les applications
459 
    $requete =  'SELECT gap_id_application, gap_nom '.
460 
                'FROM gen_application '.
461 
                'WHERE gap_bool_applette = 0';// Pour éviter d'afficher les applettes.
462 
    $resultat = $db->query($requete);
463 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
464 
 
465 
    $aso_options = array();
466 
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
467 
        $aso_options[$ligne->gap_id_application] = $ligne->gap_nom;
468 
    }
469 
    $resultat->free();
470 
    $id = 'gm_ce_application';
471 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 472 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_APPLI.'</label>';
7 jpm 473 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
474 
 
475 
    $id = 'gm_application_arguments';
476 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 477 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_APPLI_ARGUMENT.'</label>';
7 jpm 478 
    $form->addElement('text', $id, $label, $aso_attributs);
479 
 
480 
    $partie_menu_fin = '</ul>'."\n".'</fieldset>'."\n";
481 
    $form->addElement('html', $partie_menu_fin);
482 
 
150 jpm 483 
    $partie_entete_debut = '<fieldset>'."\n".'<legend>'.ADME_LG_FORM_MENU_CLASSIQUE_TITRE_ENTETE.'</legend>'."\n".'<ul>'."\n";
7 jpm 484 
    $form->addElement('html', $partie_entete_debut);
485 
 
486 
    $id = 'gm_robot';
150 jpm 487 
    $aso_options = array(   'index,follow' => ADME_LG_FORM_MENU_INDEX_FOLLOW,
488 
                            'index' => ADME_LG_FORM_MENU_INDEX,
489 
                            'noindex' => ADME_LG_FORM_MENU_NOINDEX,
490 
                            'noindex,nofollow' => ADME_LG_FORM_MENU_NOINDEX_NOFOLLOW,
491 
                            '' => ADME_LG_FORM_MENU_INDEX_VIDE);
7 jpm 492 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 493 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ROBOT.'</label>';
7 jpm 494 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
495 
 
496 
    $id = 'gm_titre';
497 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 498 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TITRE.'</label>';
7 jpm 499 
    $form->addElement('text', $id, $label, $aso_attributs);
500 
 
501 
    $id = 'gm_titre_alternatif';
502 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 503 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TITRE_ALTERNATIF.'</label>';
7 jpm 504 
    $form->addElement('text', $id, $label, $aso_attributs);
505 
 
506 
    $id = 'gm_mots_cles';
507 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 50);
150 jpm 508 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_MOT_CLE.'</label>';
7 jpm 509 
    $form->addElement('textarea', $id, $label, $aso_attributs);
510 
 
511 
    $id = 'gm_description_libre';
512 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
150 jpm 513 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DESCRIPTION.'</label>';
7 jpm 514 
    $form->addElement('textarea', $id, $label, $aso_attributs);
515 
 
516 
    $id = 'gm_description_table_matieres';
517 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
150 jpm 518 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TABLE_MATIERE.'</label>';
7 jpm 519 
    $form->addElement('textarea', $id, $label, $aso_attributs);
520 
 
521 
    $id = 'gm_source';
522 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 523 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_SOURCE.'</label>';
7 jpm 524 
    $form->addElement('text', $id, $label, $aso_attributs);
525 
 
526 
    $id = 'gm_auteur';
527 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 528 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_AUTEUR.'</label>';
7 jpm 529 
    $form->addElement('text', $id, $label, $aso_attributs);
530 
 
531 
    $id = 'gm_contributeur';
532 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
150 jpm 533 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CONTRIBUTEUR.'</label>';
7 jpm 534 
    $form->addElement('textarea', $id, $label, $aso_attributs);
535 
 
536 
    $id = 'gm_editeur';
537 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
150 jpm 538 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_EDITEUR.'</label>';
7 jpm 539 
    $form->addElement('textarea', $id, $label, $aso_attributs);
540 
 
541 
    $id = 'gm_date_debut_validite';
542 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 543 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_VALIDITE_DEBUT.'</label>';
7 jpm 544 
    $form->addElement('text', $id, $label, $aso_attributs);
545 
 
546 
    $id = 'gm_date_fin_validite';
547 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 548 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_VALIDITE_FIN.'</label>';
7 jpm 549 
    $form->addElement('text', $id, $label, $aso_attributs);
550 
 
551 
    $id = 'gm_date_copyright';
552 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 553 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_COPYRIGHT.'</label>';
7 jpm 554 
    $form->addElement('text', $id, $label, $aso_attributs);
555 
 
556 
    $id = 'gm_licence';
557 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 558 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_URL_LICENCE.'</label>';
7 jpm 559 
    $form->addElement('text', $id, $label, $aso_attributs);
560 
 
561 
    $id = 'gm_categorie';
562 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 563 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CATEGORIE.'</label>';
7 jpm 564 
    $form->addElement('text', $id, $label, $aso_attributs);
565 
 
566 
    $id = 'gm_public';
567 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 568 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_PUBLIC.'</label>';
7 jpm 569 
    $form->addElement('text', $id, $label, $aso_attributs);
570 
 
571 
    $id = 'gm_public_niveau';
572 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 25, 'maxlength' => 45);
150 jpm 573 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_PUBLIC_NIVEAU.'</label>';
7 jpm 574 
    $form->addElement('text', $id, $label, $aso_attributs);
575 
 
576 
    $id = 'gm_ce_type_portee_spatiale';
150 jpm 577 
    $aso_options = array(   '' => ADME_LG_FORM_MENU_ZG_VIDE,
578 
                            'iso3166' => ADME_LG_FORM_MENU_ZG_ISO,
579 
                            'Point' => ADME_LG_FORM_MENU_ZG_POINT,
580 
                            'Box' => ADME_LG_FORM_MENU_ZG_DC,
581 
                            'TGN' => ADME_LG_FORM_MENU_ZG_GTGN);
7 jpm 582 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 583 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ZG_TYPE.'</label>';
7 jpm 584 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
585 
 
586 
    $id = 'gm_portee_spatiale';
587 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 588 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ZG_VALEUR.'</label>';
7 jpm 589 
    $form->addElement('text', $id, $label, $aso_attributs);
590 
 
591 
    $id = 'gm_ce_type_portee_temporelle';
150 jpm 592 
    $aso_options = array(   '' => ADME_LG_FORM_MENU_TMP_VIDE,
593 
                            'W3CDTF' => ADME_LG_FORM_MENU_TMP_W3C,
594 
                            'Period' => ADME_LG_FORM_MENU_TMP_DC);
7 jpm 595 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 596 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TMP_TYPE.'</label>';
7 jpm 597 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
598 
 
599 
    $id = 'gm_portee_temporelle';
600 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 601 
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TMP_VALEUR.'</label>';
7 jpm 602 
    $form->addElement('text', $id, $label, $aso_attributs);
603 
 
604 
    $partie_entete_fin = '</ul>'."\n".'</fieldset>'."\n";
605 
 
134 jpm 606 
    $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
607 
    $form->addElement('html', $liste_bouton_debut);
608 
 
150 jpm 609 
    $form->addElement('submit', ADME_LG_ACTION_CLASSIQUE_VERIFIER, ADME_LG_FORM_MENU_VALIDER);
610 
    $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 611 
    $form->addElement('html', $bouton_annuler);
612 
 
613 
    $liste_bouton_fin = '</ul>'."\n";
614 
    $form->addElement('html', $liste_bouton_fin);
615 
 
150 jpm 616 
    $form->addElement('hidden', 'gm_id_menu', $aso_valeurs['gm_id_menu']);
617 
 
7 jpm 618 
    // Instanciation avec les valeur par défaut
128 jpm 619 
    $form->setDefaults($aso_valeurs);
7 jpm 620 
 
621 
    // Note de fin de formulaire
150 jpm 622 
    $form->setRequiredNote(ADME_LG_FORM_TXT_CHP_OBLIGATOIRE);
7 jpm 623 
 
128 jpm 624 
    $retour .= $form->toHTML()."\n";
625 
    return $retour;
7 jpm 626 
}
627 
 
128 jpm 628 
/** Fonction ADME_validerFormAjouterMenuClassique() - Valide les données issues du formulaire pour gen_menu.
7 jpm 629 
*
128 jpm 630 
* Cette fonction valide les données à ajouter dans la table gen_menu.
7 jpm 631 
*
128 jpm 632 
* @param  string   l'objet pear de connexion à la base de données.
633 
* @param  string   le tableau contenant les valeurs du formulaire.
634 
* @return string   retourne les messages d'erreurs sinon rien.
635 
*/
636 
function ADME_validerFormAjouterMenuClassique($db, $aso_valeurs)
637 
{
638 
    $message = '';
150 jpm 639 
    if ($aso_valeurs['gm_code_alpha'] == '') {
640 
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_ALPHA.'</p>';
641 
    } else {
642 
        // Requete pour vérifier l'abscence du code alphanumérique de la table gen_menu
643 
        if (GEN_verifierPresenceCodeMenu($db, 'string', $aso_valeurs['gm_code_alpha']) === true) {
644 
            $message .= '<p class="pap_erreur">'.sprintf(ADME_LG_ERREUR_CODE_ALPHA, $aso_valeurs['gm_code_alpha']).'</p>';
645 
        }
128 jpm 646 
    }
150 jpm 647 
    if ($aso_valeurs['gm_code_num'] == '') {
648 
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_NUM.'</p>';
649 
    } else {
650 
        // Requete pour vérifier l'abscence du code numérique de la table gen_menu
651 
        if (GEN_verifierPresenceCodeMenu($db, 'int', $aso_valeurs['gm_code_num']) === true) {
652 
            $message .= '<p class="pap_erreur">'.sprintf(ADME_LG_ERREUR_CODE_NUM, $aso_valeurs['gm_code_num']).'</p>';
653 
        }
128 jpm 654 
    }
150 jpm 655 
    if ($aso_valeurs['gm_nom'] == '') {
656 
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_NOM.'</p>';
657 
    }
658 
    if ($aso_valeurs['gm_description_resume'] == '') {
659 
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_INFO_BULLE.'</p>';
660 
    }
128 jpm 661 
    return $message;
662 
}
663 
 
134 jpm 664 
/** Fonction ADME_modifierMenuClassique() - Met à jour les infos d'un menu classique
128 jpm 665 
*
134 jpm 666 
* Fonction modifiant un menu commun à Papyrus.
128 jpm 667 
* Ancien nom : commitUpdateLevel()
668 
*
134 jpm 669 
* @param object objet Pear de connection à la base de données.
670 
* @param object objet Pear représentant l'authentification.
671 
* @param integer l'identifiant du menu à administrer.
672 
* @param array le tableau des valeurs à modifier.
673 
* @return void les changement sont fait dans la base de données.
7 jpm 674 
*/
128 jpm 675 
function ADME_modifierMenuClassique($db, $auth, $adme_menu_id, $aso_valeurs)
7 jpm 676 
{
677 
    $requete =  'UPDATE gen_menu SET '.
128 jpm 678 
                'gm_ce_application = '.$aso_valeurs['gm_ce_application'].', '.
679 
                'gm_application_arguments = "'.$aso_valeurs['gm_application_arguments'].'", '.
680 
                'gm_fichier_squelette = "'.$aso_valeurs['gm_fichier_squelette'].'", '.
681 
                'gm_code_num = '.$aso_valeurs['gm_code_num'].', '.
682 
                'gm_code_alpha = "'.$aso_valeurs['gm_code_alpha'].'", '.
683 
                'gm_nom = "'.$aso_valeurs['gm_nom'].'", '.
684 
                'gm_raccourci_clavier = "'.$aso_valeurs['gm_raccourci_clavier'].'", '.
685 
                'gm_robot = "'.$aso_valeurs['gm_robot'].'", '.
686 
                'gm_titre = "'.$aso_valeurs['gm_titre'].'", '.
687 
                'gm_titre_alternatif = "'.$aso_valeurs['gm_titre_alternatif'].'", '.
688 
                'gm_mots_cles = "'.$aso_valeurs['gm_mots_cles'].'", '.
689 
                'gm_description_libre = "'.$aso_valeurs['gm_description_libre'].'", '.
690 
                'gm_description_resume = "'.$aso_valeurs['gm_description_resume'].'", '.
691 
                'gm_description_table_matieres = "'.$aso_valeurs['gm_description_table_matieres'].'", '.
692 
                'gm_source = "'.$aso_valeurs['gm_source'].'", '.
693 
                'gm_auteur = "'.$aso_valeurs['gm_auteur'].'", '.
694 
                'gm_contributeur = "'.$aso_valeurs['gm_contributeur'].'", '.
695 
                'gm_editeur = "'.$aso_valeurs['gm_editeur'].'", '.
696 
                'gm_date_debut_validite = "'.$aso_valeurs['gm_date_debut_validite'].'", '.
697 
                'gm_date_fin_validite = "'.$aso_valeurs['gm_date_fin_validite'].'", '.
698 
                'gm_date_copyright = "'.$aso_valeurs['gm_date_copyright'].'", '.
699 
                'gm_licence = "'.$aso_valeurs['gm_licence'].'", '.
700 
                'gm_categorie = "'.$aso_valeurs['gm_categorie'].'", '.
701 
                'gm_public = "'.$aso_valeurs['gm_public'].'", '.
702 
                'gm_public_niveau = "'.$aso_valeurs['gm_public_niveau'].'", '.
703 
                'gm_ce_type_portee_spatiale = "'.$aso_valeurs['gm_ce_type_portee_spatiale'].'", '.
704 
                'gm_portee_spatiale = "'.$aso_valeurs['gm_portee_spatiale'].'", '.
705 
                'gm_ce_type_portee_temporelle = "'.$aso_valeurs['gm_ce_type_portee_temporelle'].'", '.
706 
                'gm_portee_temporelle = "'.$aso_valeurs['gm_portee_temporelle'].'", '.
707 
                'gm_ce_admin = "'.$auth->getAuthData('ga_id_administrateur').'" '.
708 
                'WHERE gm_id_menu = '.$adme_menu_id;
7 jpm 709 
 
128 jpm 710 
    $resultat = $db->query($requete);
711 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 712 
 
713 
    // Gestion de la relation menu par défaut
128 jpm 714 
    if (isset($aso_valeurs['defaut']) && $aso_valeurs['defaut'] == 1) {
7 jpm 715 
        $requete_id_menu_supr_defaut =  'SELECT GM01.gm_id_menu AS id_menu_supr_defaut '.
716 
                                        'FROM gen_menu AS GM01, gen_menu AS GM02, gen_menu_relation '.
128 jpm 717 
                                        'WHERE GM02.gm_id_menu = '.$adme_menu_id.' '.
7 jpm 718 
                                        'AND GM02.gm_ce_site = GM01.gm_ce_site '.
719 
                                        'AND GM01.gm_id_menu = gmr_id_menu_01 '.
720 
                                        'AND gmr_id_valeur = 101 ';// 101 = menu par "defaut"
721 
        $resultat_menu_supr_defaut = $db->query($requete_id_menu_supr_defaut);
722 
        if (DB::isError($resultat_menu_supr_defaut)) {
723 
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu_supr_defaut->getMessage(), $requete_id_menu_supr_defaut));
724 
        }
725 
        if ($resultat_menu_supr_defaut->numRows() > 0 ) {
726 
            $requete_supr_defaut =  'DELETE FROM gen_menu_relation '.
727 
                                    'WHERE gmr_id_menu_01 = gmr_id_menu_02 '.
728 
                                    'AND gmr_id_valeur = 101 '.// 101 = menu par "defaut"
729 
                                    'AND gmr_id_menu_01 = '.$resultat_menu_supr_defaut->id_menu_supr_defaut;
730 
            $resultat_supr_defaut = $db->query($requete_supr_defaut);
731 
            if (DB::isError($resultat_supr_defaut)) {
732 
                die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_supr_defaut->getMessage(), $requete_supr_defaut));
733 
            }
734 
        }
735 
        // Requete d'insertion de la relation menu par défaut
736 
        $requete =  'INSERT INTO gen_menu_relation '.
128 jpm 737 
                    'SET gmr_id_menu_01 = '.$adme_menu_id.', '.
738 
                    'gmr_id_menu_02 = '.$adme_menu_id.', '.
7 jpm 739 
                    'gmr_id_valeur = 101, '.
740 
                    'gmr_ordre = NULL ';
741 
        $resultat = $db->query($requete);
742 
        if (DB::isError($resultat)) {
743 
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
744 
        }
745 
    }
746 
}
747 
 
128 jpm 748 
/** Fonction ADME_deplacerMenuClassique() - Permet de déplacer un menu dans la hiérarchie.
749 
*
7 jpm 750 
* Permet de déplacer un menu dans la hiérarchie des menus classiques.
128 jpm 751 
* Ancien nom : moveMenu()
7 jpm 752 
*
134 jpm 753 
* @param  mixed   objet Pear DB de connexion à la base de données.
754 
* @param  string  identifiant du site administré.
755 
* @param  integer identifiant du menu à déplacer.
756 
* @param  boolean indique si on veut monter le menu (true) ou le descendre (false).
757 
* @return void    modifie la base de données.
7 jpm 758 
*/
128 jpm 759 
function ADME_deplacerMenuClassique($db, $adme_site_id, $adme_menu_id, $bln_monter)
7 jpm 760 
{
134 jpm 761 
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 762 
    // Récupération d'information sur le site de ce menu.
128 jpm 763 
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
110 jpm 764 
    if ($objet_site == false) {
150 jpm 765 
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_SITE.'<br />'.
128 jpm 766 
            'Id du site : '. $adme_site_id .'<br />'.
7 jpm 767 
            'Ligne n° : '. __LINE__ .'<br />'.
768 
            'Fichier n° : '. __FILE__ .'<br />');
769 
    }
134 jpm 770 
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 771 
    // Récupération d'informations sur les relations du menu courant.
128 jpm 772 
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $adme_menu_id, '1');
7 jpm 773 
    if ($ligne_menu_courant_relation == false) {
150 jpm 774 
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU_RELATION.'<br />'.
128 jpm 775 
            'Identifiant menu : '. $adme_menu_id .'<br />'.
7 jpm 776 
            'Identifiant valeur relation : 1 <br />'.
777 
            'Ligne n° : '. __LINE__ .'<br />'.
778 
            'Fichier n° : '. __FILE__ .'<br />');
779 
    }
134 jpm 780 
    //-------------------------------------------------------------------------------------------------------------------
110 jpm 781 
    // Récupération de l'identifiant du menu pére
128 jpm 782 
    $id_pere = GEN_lireIdentifiantMenuPere($adme_menu_id);
110 jpm 783 
    if ($id_pere === false) {
150 jpm 784 
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_ID_MENU_PERE.'<br />'.
128 jpm 785 
            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
7 jpm 786 
            'Ligne n° : '. __LINE__ .'<br />'.
787 
            'Fichier n° : '. __FILE__ .'<br />');
788 
    }
134 jpm 789 
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 790 
    // Recherche d'information sur le menu précédent ou suivant le menu courant
791 
    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
110 jpm 792 
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
7 jpm 793 
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
110 jpm 794 
                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
795 
                'AND gm_ce_site = '.$objet_site->gs_id_site.' '.
7 jpm 796 
                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
797 
                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
798 
                'AND GMR01.gmr_id_valeur = 1 ';// 1 = relation menu "père"
128 jpm 799 
    if ($bln_monter) {
7 jpm 800 
        $requete .= 'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
801 
                    'ORDER BY GMR01.gmr_ordre DESC';
802 
    } else {
803 
        $requete .= 'AND GMR01.gmr_ordre > '.$ligne_menu_courant_relation->gmr_ordre.' '.
804 
                    'ORDER BY GMR01.gmr_ordre ASC';
805 
    }
806 
 
110 jpm 807 
    $resultat_menu = $db->query($requete);
808 
    (DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
7 jpm 809 
 
110 jpm 810 
    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
811 
    $resultat_menu->free();
134 jpm 812 
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 813 
    // Si la requete ne retourne rien nous ne faisons rien.
110 jpm 814 
    if (! $ligne_menu) {
128 jpm 815 
        return null;
7 jpm 816 
    }
134 jpm 817 
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 818 
    // Mise à jour des relations du menu courant
819 
    $requete =  'UPDATE gen_menu_relation SET '.
110 jpm 820 
                'gmr_ordre = '.$ligne_menu->nouvel_ordre.' '.
7 jpm 821 
                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
822 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
823 
 
110 jpm 824 
    $resultat_update = $db->query($requete);
825 
    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
134 jpm 826 
    //-------------------------------------------------------------------------------------------------------------------
7 jpm 827 
    // Mise à jour des relations du menu précédent ou suivant
828 
    $requete =  'UPDATE gen_menu_relation SET '.
829 
                'gmr_ordre = '.$ligne_menu_courant_relation->gmr_ordre.' '.
110 jpm 830 
                'WHERE gmr_id_menu_01 = '.$ligne_menu->id_menu_remplace.' '.
7 jpm 831 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
832 
 
110 jpm 833 
    $resultat_update = $db->query($requete);
834 
    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
7 jpm 835 
}
836 
 
134 jpm 837 
/** Fonction ADME_supprimerMenuClassique() - Supprime un menu classique.
7 jpm 838 
*
134 jpm 839 
* Supprime de la base de données de Génésia toutes les traces du menu classiques
840 
* passé en paramètre.
841 
* Ancien nom : deleteMenu()
7 jpm 842 
*
134 jpm 843 
* @param  mixed  l'objet Pear DB de connexion à la base de données.
844 
* @param  string l'identifiant du menu à supprimer
845 
* @return void   le menu classique est supprimé de la base de données.
7 jpm 846 
*/
134 jpm 847 
function ADME_supprimerMenuClassique($db, $id_menu_a_supprimer)
7 jpm 848 
{
134 jpm 849 
    //----------------------------------------------------------------------------
850 
    // Y a t'il des sous_menus
851 
    $requete =  'SELECT COUNT(gm_id_menu) AS compte '.
852 
                'FROM gen_menu, gen_menu_relation '.
853 
                'WHERE gmr_id_menu_02 = '.$id_menu_a_supprimer.' '.
854 
                'AND gmr_id_valeur = 1 '.
855 
                'AND gmr_id_menu_01 = gm_id_menu ';
7 jpm 856 
 
134 jpm 857 
    $resultat = $db->query($requete);
858 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 859 
 
134 jpm 860 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
7 jpm 861 
 
134 jpm 862 
    if ($ligne && ($ligne->compte > 0)) {
150 jpm 863 
        return ADME_LG_ERREUR_EXISTE_SOUS_MENU;
130 jpm 864 
    }
865 
 
134 jpm 866 
    //----------------------------------------------------------------------------
867 
    // S'il n'y a plus de sous niveau, on supprime le menu
868 
    $requete =  'DELETE FROM gen_menu '.
869 
                'WHERE gm_id_menu = '.$id_menu_a_supprimer;
128 jpm 870 
 
134 jpm 871 
    $resultat = $db->query($requete);
872 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 873 
 
134 jpm 874 
    //----------------------------------------------------------------------------
875 
    // Puis on supprime les relations de ce menu
876 
    $requete =  'DELETE FROM gen_menu_relation '.
877 
                'WHERE gmr_id_menu_01 = '.$id_menu_a_supprimer;
7 jpm 878 
 
879 
    $resultat = $db->query($requete);
134 jpm 880 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 881 
}
882 
 
883 
// +------------------------------------------------------------------------------------------------------+
884 
// |                                            PIED du PROGRAMME                                         |
885 
// +------------------------------------------------------------------------------------------------------+
886 
 
887 
 
888 
/* +--Fin du code ----------------------------------------------------------------------------------------+
889 
*
890 
* $Log: not supported by cvs2svn $
150 jpm 891 
* Revision 1.9  2004/11/09 17:53:00  jpm
892 
* Changement des noms des actions sur les menus classiques.
893 
*
143 jpm 894 
* Revision 1.8  2004/11/09 17:48:35  jpm
895 
* Gestion de différentes interfaces d'administration.
896 
*
141 jpm 897 
* Revision 1.7  2004/11/09 12:37:34  jpm
898 
* Fin de gestion des menus et mise en conformité avec la convention de codage.
899 
*
134 jpm 900 
* Revision 1.6  2004/11/08 17:40:07  jpm
901 
* Gestion correcte de l'ouverture et fermeture des menus.
902 
* Utilisation des sessions.
903 
*
130 jpm 904 
* Revision 1.5  2004/11/04 19:11:38  jpm
905 
* Mise en conformité vis à vis de la convention de codage.
906 
* Amélioration de la récursivité de la gestion de l'affichage des menus.
907 
*
128 jpm 908 
* Revision 1.4  2004/10/25 16:27:42  jpm
909 
* Correction d'un bogue dans la gestion du déplacement des menus.
910 
*
110 jpm 911 
* Revision 1.3  2004/09/23 17:45:13  jpm
912 
* Amélioration de la gestion des liens annuler et du selecteur de sites.
913 
*
56 jpm 914 
* Revision 1.2  2004/07/06 17:07:37  jpm
915 
* Modification de la documentation pour une mailleur analyse par PhpDocumentor.
916 
*
25 jpm 917 
* Revision 1.1  2004/06/16 15:04:32  jpm
918 
* Changement de nom de Génésia en Papyrus.
919 
* Changement de l'arborescence.
920 
*
7 jpm 921 
* Revision 1.27  2004/05/10 12:13:03  jpm
922 
* Modification des formulaires.
923 
*
924 
* Revision 1.26  2004/05/07 16:31:20  jpm
925 
* Amélioration du formulaire d'un menu classique.
926 
*
927 
* Revision 1.25  2004/05/07 07:23:53  jpm
928 
* Amélioration du code, des commentaires et correction de bogues.
929 
*
930 
*
931 
* +-- Fin du code ----------------------------------------------------------------------------------------+
932 
*/
933 
?>