Subversion Repositories Applications.papyrus

Rev

Rev 56 | Rev 141 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 56 Rev 134
Line 3... Line 3...
3 
// +------------------------------------------------------------------------------------------------------+
 3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1                                                                                      |
 4 
// | PHP version 4.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
 5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
 6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
 7 
// +------------------------------------------------------------------------------------------------------+
8 
// | This library is free software; you can redistribute it and/or                                        |
 8 
// | This file is part of Papyrus.                                                                        |
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 
// |                                                                                                      |
 9 
// |                                                                                                      |
- 
 
 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 
// |                                                                                                      |
13 
// | This library is distributed in the hope that it will be useful,                                      |
 15 
// | Foobar is distributed in the hope that it will be useful,                                            |
14 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
 16 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
15 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
 17 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
16 
// | Lesser General Public License for more details.                                                      |
 18 
// | GNU General Public License for more details.                                                         |
17 
// |                                                                                                      |
 19 
// |                                                                                                      |
18 
// | You should have received a copy of the GNU Lesser General Public                                     |
 20 
// | You should have received a copy of the GNU General Public License                                    |
19 
// | License along with this library; if not, write to the Free Software                                  |
 21 
// | along with Foobar; if not, write to the Free Software                                                |
20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
 22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21 
// +------------------------------------------------------------------------------------------------------+
 23 
// +------------------------------------------------------------------------------------------------------+
22 
// CVS : $Id: adme_menu_commun.fonct.php,v 1.3 2004-09-23 17:45:13 jpm Exp $
 24 
// CVS : $Id: adme_menu_commun.fonct.php,v 1.4 2004-11-09 12:37:34 jpm Exp $
23 
/**
 25 
/**
24 
* Application de gestion des menus communs
 26 
* Application de gestion des menus communs
25 
*
 27 
*
26 
* Permet de lister, d'ajouter, de modifier, et de déplacer des menus communs.
 28 
* Permet de lister, d'ajouter, de modifier, et de déplacer des menus communs.
27 
* Par menus communs nous entendons tous les menus devant paraitre sur l'ensemble des pages d'un site,
 29 
* Par menus communs, nous entendons tous les menus devant paraitre sur l'ensemble des pages de plusieurs site,
28 
* comme le lien vers le plan du site, le lien vers la charte d'accessibilité, le flux rss...
 30 
* comme le lien vers le plan du site, le lien vers la charte d'accessibilité, le flux rss...
29 
*
 31 
*
30 
*@package Admin_menu
 32 
*@package Admin_menu
31 
*@subpackage Fonctions
 33 
*@subpackage Fonctions
32 
//Auteur original :
 34 
//Auteur original :
33 
*@author        Laurent COUDOUNEAU <lc@gsite.org>
 35 
*@author        Laurent COUDOUNEAU <lc@gsite.org>
34 
//Autres auteurs :
 36 
//Autres auteurs :
35 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
 37 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
36 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
 38 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
37 
*@copyright     Tela-Botanica 2000-2004
 39 
*@copyright     Tela-Botanica 2000-2004
38 
*@version       $Revision: 1.3 $ $Date: 2004-09-23 17:45:13 $
 40 
*@version       $Revision: 1.4 $ $Date: 2004-11-09 12:37:34 $
39 
// +------------------------------------------------------------------------------------------------------+
 41 
// +------------------------------------------------------------------------------------------------------+
40 
*/
 42 
*/
Line 41... Line 43...
41 
 
 43 
 
42 
// +------------------------------------------------------------------------------------------------------+
 44 
// +------------------------------------------------------------------------------------------------------+
43 
// |                                            ENTÊTE du PROGRAMME                                       |
 45 
// |                                            ENTÊTE du PROGRAMME                                       |
44 
// +------------------------------------------------------------------------------------------------------+
 - 
 
45 
                                    /*Mettre ici les inclusions de fichiers*/
 - 
 
Line 46... Line 46...
46 
 
 46 
// +------------------------------------------------------------------------------------------------------+
47 
 
 47 
 
48 
 
 48 
 
49 
// +------------------------------------------------------------------------------------------------------+
 - 
 
50 
// |                                            CORPS du PROGRAMME                                        |
 - 
 
Line 51... Line 49...
51 
// +------------------------------------------------------------------------------------------------------+
 49 
// +------------------------------------------------------------------------------------------------------+
52 
                                       /*Mettre ici le code du programme*/
 50 
// |                                            CORPS du PROGRAMME                                        |
53 
 
 51 
// +------------------------------------------------------------------------------------------------------+
54 
 
 52 
 
- 
 
 53 
 
- 
 
 54 
// +------------------------------------------------------------------------------------------------------+
55 
 
 55 
// |                                           LISTE de FONCTIONS                                         |
- 
 
 56 
// +------------------------------------------------------------------------------------------------------+
56 
// +------------------------------------------------------------------------------------------------------+
 57 
/** Fonction ADME_afficherListeMenuClassique () - Affiche un arbre de menu en xhtml
- 
 
 58 
*
57 
// |                                           LISTE de FONCTIONS                                         |
 59 
* Elle forme l'arbre des menus communs à administrer.
58 
// +------------------------------------------------------------------------------------------------------+
 60 
* Ancien nom : deployer_menu().
59 
                                        /*Mettre ici la liste de fonctions.*/
 61 
*
60 
function listUpper($db,
62 
* @param  object objet Pear de connection à la base de données.
- 
 
 63 
* @param  object objet Pear représentant l'url de base.
- 
 
 64 
* @param  integer l'identifiant du menu à administrer.
- 
 
 65 
* @param  integer l'identifiant du menu sur lequel on agit.
- 
 
 66 
* @param  string le nom de l'action courante.
61 
                    $baseURL, $baseURLjs, $baseHidden,
 67 
* @param  integer l'identifiant du menu en cours de déploiement.
62 
                    $adminProject, $adminLocale, $adminAnnu,
 - 
 
63 
                    $menu1id, $upperid,
 68 
* @param  boolean true indique que l'on a à faire au premier appel de cette fonction récursive.
64 
                    $doccmd,
 69 
* @return string  le code XHTML constituant l'arbre des menus à administrer.
65 
                    $menu1open)
 - 
 
66 
{
 - 
 
67 
    //----------------------------------------------------------------------------
 - 
 
68 
    // Get infos about the project.
 - 
 
69 
    $requete =  'SELECT * '.
 - 
 
70 
                'FROM gen_site, gen_site_relation '.
 - 
 
71 
                'WHERE gs_code_alpha = "'.$adminProject.'" '.
 - 
 
72 
                'AND gsr_id_site_01 = gs_id_site '.
 - 
 
Line -... Line 70...
- 
 
 70 
*/
- 
 
 71 
function ADME_afficherListeMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $adme_action, $id_menu_a_deployer, $bln_premier_appel = true)
- 
 
 72 
{
- 
 
 73 
    // Initialisation des variables :
- 
 
 74 
    $retour = '';
- 
 
 75
- 
 
 76 
    // Est-ce que ces menus comporte des sous-menus ?
- 
 
 77 
    $requete_sous_menu =    'SELECT gm_id_menu '.
- 
 
 78 
                            'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
- 
 
 79 
                            'WHERE GMR01.gmr_id_menu_02 = '.$id_menu_a_deployer.' '.
- 
 
 80 
                            'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
- 
 
 81 
                            //'AND gm_ce_site = '.$adme_site_id.' '.
- 
 
 82 
                            'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
73 
                'AND gsr_id_site_01 = gsr_id_site_02 '.
 83 
                            'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
- 
 
 84 
                            'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
- 
 
 85 
                            'AND GMR02.gmr_id_valeur = 102 '.// 102 = type "menu commun"
- 
 
 86 
                            'ORDER BY GMR01.gmr_ordre ASC';
- 
 
 87
- 
 
 88 
    $resultat_sous_menu = $db->query($requete_sous_menu) ;
- 
 
 89 
    if (DB::isError($resultat_sous_menu)) {
- 
 
 90 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_sous_menu->getMessage(), $requete_sous_menu));
- 
 
 91 
    }
- 
 
 92
- 
 
 93 
    // Gestion du stockage ou déstockage des menus ouverts
- 
 
 94 
    if (($adme_action == 'adme_menu_ouvrir' || $adme_action == 'menu_commun_ajouter') && $id_menu_a_deployer != 0) {
- 
 
 95 
        $_SESSION['adme_menus_communs_ouverts'][$adme_menu_id] = $adme_menu_id;
74 
                'AND gsr_id_valeur = 102 '; // 102 = site "principal"
 96 
    }
- 
 
 97 
    if ($adme_action == 'adme_menu_fermer' && $id_menu_a_deployer != 0) {
75
98 
        unset($_SESSION['adme_menus_communs_ouverts'][$adme_menu_id]);
76 
    $result = $db->query($requete);
 - 
 
77 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 - 
 
Line 78... Line 99...
78
99 
        foreach ($_SESSION['adme_menus_communs_ouverts'] as $val) {
- 
 
 100 
            if (GEN_etreAncetre($adme_menu_id, $val)) {
- 
 
 101 
                unset($_SESSION['adme_menus_communs_ouverts'][$val]);
- 
 
 102 
            }
- 
 
 103 
        }
- 
 
 104 
    }
- 
 
 105
- 
 
 106 
    // Gestion affichage des menus
- 
 
 107 
    if ($resultat_sous_menu->numRows() > 0) {
- 
 
 108 
        // Ici, on sait qu'un menu a des sous menus, on commence par l'afficher:
- 
 
 109 
        if ($bln_premier_appel == false) {
- 
 
 110 
            $retour .= '<li>'."\n";
- 
 
 111
- 
 
 112 
            if (GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id) ||
- 
 
 113 
                ($id_menu_a_deployer == $adme_menu_id && $adme_action == 'adme_menu_ouvrir') ||
- 
 
 114 
                isset($_SESSION['adme_menus_communs_ouverts'][$id_menu_a_deployer])
- 
 
 115 
                ){
- 
 
 116 
                // Affiche un -
- 
 
 117 
                $retour .= ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $id_menu_a_deployer, 1);
- 
 
 118 
            } else if ( !GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id) ||
- 
 
 119 
                        ($id_menu_a_deployer == $adme_menu_id && $adme_action == 'adme_menu_fermer') ||
- 
 
 120 
                        !isset($_SESSION['adme_menus_communs_ouverts'][$id_menu_a_deployer])
- 
 
 121 
                        ){
- 
 
 122 
                // Affiche un +
- 
 
 123 
                $retour .= ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $id_menu_a_deployer, 2);
- 
 
 124 
            }
- 
 
 125 
        }
- 
 
 126 
        if ($bln_premier_appel == true || GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id) ||
- 
 
 127 
            ($id_menu_a_deployer == $adme_menu_id && $adme_action == 'adme_menu_ouvrir') ||
- 
 
 128 
            isset($_SESSION['adme_menus_communs_ouverts'][$id_menu_a_deployer])
- 
 
 129 
            ){
- 
 
 130 
            $retour .= '<ul>'."\n";
- 
 
 131 
            while ($ligne_sous_menu = $resultat_sous_menu->fetchRow(DB_FETCHMODE_OBJECT)) {
- 
 
 132 
                $retour .= ADME_afficherListeMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $adme_action, $ligne_sous_menu->gm_id_menu, false);
- 
 
 133 
            }
- 
 
 134 
            $retour .= '</ul>'."\n";
- 
 
 135 
        }
- 
 
 136 
        if ($bln_premier_appel == false) {
Line -... Line 137...
- 
 
 137 
            $retour .= '</li>'."\n";
- 
 
 138 
        }
- 
 
 139 
    } else if ($resultat_sous_menu->numRows() == 0 && $bln_premier_appel == false) {
79 
    if ($result->numRows() != 1) {
 140 
        $retour .= '<li>'."\n";
- 
 
 141 
        $retour .= ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $id_menu_a_deployer, 0);
- 
 
 142 
        $retour .= '</li>'."\n";
80 
        return '';
 143 
    }
- 
 
 144
- 
 
 145 
    return $retour;
- 
 
 146 
}
- 
 
 147 
 
- 
 
 148 
/** Fonction ADME_retournerXhtmlMenuCommun() - Effectue une sortie d'un menu en XHTML
- 
 
 149 
*
- 
 
 150 
* Retourne le XHTML d'une ligne de l'arbre des menus communs permettant de l'administer.
- 
 
 151 
* Ancien nom : menu_toHtml().
- 
 
 152 
*
- 
 
 153 
* @param  object objet Pear de connection à la base de données.
- 
 
 154 
* @param  object objet Pear représentant l'url de base.
81 
    }
 155 
* @param  integer l'identifiant du site à administrer.
82 
    $PRJrow = $result->fetchRow(DB_FETCHMODE_OBJECT);
 156 
* @param  integer l'identifiant du menu à administrer.
83 
    $result->free();
 157 
* @param  integer 0 indique que le menu ne possède pas de fils, 1 qu'il faut afficher un - et 2 un +.
84
158 
* @return  string une ligne de liste XHTML
- 
 
 159 
*/
- 
 
 160 
function ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $int_deplier)
85 
    $lookName = $PRJrow->gs_fichier_squelette;
 161 
{
86
162 
    $etiquette_annuler = 'Annuler';
87 
    //----------------------------------------------------------------------------
 163 
    $etiquette_alt_modifier     = 'Modifier';
88 
    // Labels.
 164 
    $etiquette_title_modifier     = 'Modifier ce menu';
89 
    $etiquette_alt_modifier   = 'Modifier';
 165 
    $etiquette_alt_supprimer   = 'Supprimer';
90 
    $etiquette_title_modifier   = 'Modifier ce menu commun';
 166 
    $etiquette_title_supprimer   = 'Supprimer ce menu';
- 
 
 167 
    $etiquette_alt_ajouter = 'Ajouter';
- 
 
 168 
    $etiquette_title_ajouter = 'Ajouter un menu inférieur';
- 
 
 169 
    $etiquette_alt_monter = 'Monter';
- 
 
 170 
    $etiquette_title_monter = 'Monter ce menu';
- 
 
 171 
    $etiquette_alt_descendre = 'Descendre';
- 
 
 172 
    $etiquette_title_descendre = 'Descendre ce menu';
- 
 
 173 
    $etiquette_alt_redaction = 'Rédiger';
Line 91... Line -...
91 
    $etiquette_alt_supprimer = 'Supprimer';
 - 
 
92 
    $etiquette_title_supprimer = 'Supprimer ce menu commun';
 - 
 
93 
    $etiquette_alt_monter = 'Monter';
 - 
 
94 
    $etiquette_title_monter = 'Monter ce menu commun';
 - 
 
95 
    $etiquette_alt_descendre = 'Descendre';
 - 
 
96 
    $etiquette_title_descendre = 'Descendre ce menu commun';
 - 
 
97 
    $etiquette_alt_redaction = 'Rédiger';
 - 
 
98 
    $etiquette_title_redaction = 'Rédiger le contenu de ce menu commun';
 - 
 
99
- 
 
100 
    //----------------------------------------------------------------------------
 - 
 
101 
    // Javascript.
 - 
 
102 
    $goMsg = addslashes('Supprimer');
 - 
 
103 
    $fullURLjs = $baseURLjs.'&menuview=upper&menu1open=1';
 - 
 
104 
    GEN_stockerFonctionScript(  'deleteUpper',
 - 
 
105 
                                "  function deleteUpper (iUpperId) {"."\n".
 - 
 
106 
                                "    var url = '$fullURLjs'+'&doccmd=delupper&upperid='+iUpperId;"."\n".
 - 
 
107 
                                "    if (window.confirm ('$goMsg')) document.location = url;"."\n".
 - 
 
108 
                                "  }"."\n");
 - 
 
109
- 
 
110 
    //----------------------------------------------------------------------------
 - 
 
111 
    // Début du xhtml
 - 
 
112 
    $outputText = '';
 - 
 
113
- 
 
114 
    //----------------------------------------------------------------------------
 - 
 
115 
    // Liste des menus communs.
 - 
 
116 
    $requete =  'SELECT *, gap_nom AS nom_appli, ga_prenom AS prenom '.
 - 
 
117 
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02, gen_application, gen_annuaire '.
 - 
 
118 
                'WHERE gm_ce_site = "'.$PRJrow->gs_id_site.'" '.
 - 
 
119 
                'AND gm_ce_i18n = "'.$adminLocale.'" '.
 - 
 
120 
                'AND gm_ce_admin = ga_id_administrateur '.
 174 
    $etiquette_title_redaction = 'Rédiger le contenu de ce menu';
121 
                'AND gm_ce_application = gap_id_application '.
 175 
    $etiquette_deplier = 'Déplier';
122 
                'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
 176 
    $etiquette_plier = 'Plier';
123 
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
 - 
 
124 
                'AND GMR02.gmr_id_valeur = 102 '.// 100 = type "menu classique"
 - 
 
125 
                'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
 - 
 
126 
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
 - 
 
127 
                'ORDER BY GMR01.gmr_ordre ASC';
 - 
 
128
- 
 
129 
    $UPresult = $db->query($requete);
 - 
 
130 
    if (DB::isError ($UPresult)) {
 - 
 
131 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $UPresult->getMessage(), $requete));
 - 
 
132 
    }
 - 
 
133
- 
 
134 
    // Récupération de l'identifiant de la personne administrateur
 - 
 
135 
    //global $_GEN_commun;
 - 
 
136 
    //$userID = $_GEN_commun['pear_auth']->getAuthData('ga_id_administrateur');
 - 
 
137
- 
 
138 
    // Pour chaque menu commun trouvé, nous affichons les commandes.
 - 
 
139 
    $outputText .= "\n".'<ul class="text">';
 - 
 
140 
    while ($UProw = $UPresult->fetchRow(DB_FETCHMODE_OBJECT)) {
 - 
 
141 
        //--------------------------------------------------------------------------
 - 
 
142 
        // Nous avons un menu commun
 - 
 
143 
        $img = '';
 - 
 
144
- 
 
145 
        //--------------------------------------------------------------------------
 - 
 
146 
        // Menu text.
 - 
 
147 
        $menuText = htmlentities($UProw->gm_nom).'&nbsp;'.
 - 
 
148 
                    '('.htmlentities($UProw->nom_appli).'&nbsp;-&nbsp;'.htmlentities($UProw->prenom).')&nbsp;';
 - 
 
149 
        $menuText = (empty($menuText) ? '(...)' : $menuText);
 - 
 
150 
        $actionIcons  = '&nbsp;';
 - 
 
151 
        //$commitIcons  = '&nbsp;';
 - 
 
152
- 
 
153 
        //------------------------------------------------------------------------
 - 
 
154 
        // Ajout de l'identifiant du menu commun à l'url des boutons d'action.
 - 
 
155 
        $pageHREF = $baseURLjs.'&amp;upperid='.$UProw->gm_id_menu ;
 - 
 
156
- 
 
157 
        /*if ($doccmd == 'upduppertxt' && $upperid == $UProw->gm_id_menu) {
 - 
 
158 
            $cancelLabel = 'Annuler';
 - 
 
159 
            $menuText = '<input type="text" name="upper_text" size="32" '.
 - 
 
160 
                            'maxlength="64" value="'.$menuText.'" '.
 - 
 
161 
                            'class="contentDocument">'.
 - 
 
162 
                        '<input type="hidden" name="doccmd" value="commitupduppertxt">';
 - 
 
163
- 
 
164 
            $commitIcons .= '<input type="image" src="'.DOCADM_IMAGE_VALIDER.'">'.
 - 
 
165 
                            "\n".
 - 
 
166 
                            '<a'."\n".'href="'.$pageHREF.'">'.
 - 
 
167 
                            '<img src="'.DOCADM_IMAGE_ANNULER.'" alt="'.$cancelLabel.'" width="16" height="16" border="0" />'.
 - 
 
168 
                            '</a>';
 - 
 
169 
        } else {
 - 
 
170 
            $txtHREF  = $pageHREF.'&amp;doccmd=upduppertxt';
 - 
 
171 
            $menuText = '<a href="'.$txtHREF.'" class="anchor">'.$menuTextFull.'</a>';
 - 
 
172 
        }*/
 - 
 
173
- 
 
174 
        //------------------------------------------------------------------------
 - 
 
175 
        // Les icones d'action.
 - 
 
176 
        $actionIcons =
 - 
 
177 
            '<a href="'.$pageHREF.'&amp;doccmd=upduppertxt" title="'.$etiquette_title_modifier.'">'.
 - 
 
178 
            '<img src="'.ADME_IMAGE_VOIR.'" alt="'.$etiquette_alt_modifier.'" width="16" height="16" border="0" />'.
 - 
 
179 
            '</a>'.
 - 
 
180 
            "\n".
 - 
 
181 
            '<a'."\n".'href="'.$pageHREF.'&amp;doccmd=upupper" title="'.$etiquette_title_monter.'">'.
 - 
 
182 
            '<img src="'.ADME_IMAGE_FLECHE_HAUT.'" alt="'.$etiquette_alt_monter.'" width="16" height="16" border="0" />'.
 - 
 
183 
            '</a>'.
 - 
 
184 
            "\n".
 - 
 
185 
            '<a'."\n".'href="'.$pageHREF.'&amp;doccmd=dnupper" title="'.$etiquette_title_descendre.'">'.
 - 
 
186 
            '<img src="'.ADME_IMAGE_FLECHE_BAS.'" alt="'.$etiquette_alt_descendre.'" width="16" height="16" border="0" />'.
 - 
 
187 
            '</a>'.
 - 
 
188 
            "\n".
 - 
 
189 
            '<a'."\n".'href="javascript:deleteUpper('.$UProw->gm_id_menu.')" title="'.$etiquette_title_supprimer.'">'.
 - 
 
190 
            '<img src="'.ADME_IMAGE_SUPPRIMER.'" alt="'.$etiquette_alt_supprimer.'" width="16" height="16" border="0" />'.
 - 
 
191 
            '</a>';
 - 
 
192
- 
 
193 
        // Si l'application liée est "texte simple", on ajoute un icone avec un lien vers
 - 
 
194 
        // l'administration de cette application.
 - 
 
195 
        if ($UProw->gm_ce_application == 3) {     // l'appli afficheur a pour id 3
 - 
 
196 
            //$url_popup = ADME_CHEMIN_APPLICATION."docpopup.php?admproject=$adminProject&locale=$locale&menu=$UProw->gm_id_menu" ;
 - 
 
197 
            $icon_vers_texte = "\n&nbsp;&nbsp;".
 - 
 
198 
                                '<a href="'.$pageHREF.'&amp;doccmd=contenuredac" title="'.$etiquette_title_redaction.'">'.
 - 
 
199 
                                '<img src="'.ADME_IMAGE_TEXTE.'" alt="'.$etiquette_alt_redaction.'"'.' width="16" height="16" border="0" />'.
 177
200 
                                '</a>';
 - 
 
201 
        } else {
 - 
 
202 
            $icon_vers_texte = '';
 - 
 
203 
        }
 178 
    $requete =  'SELECT gen_menu.*, ga_prenom '.
Line -... Line 179...
- 
 
 179 
                'FROM gen_menu, gen_annuaire '.
- 
 
 180 
                'WHERE gm_id_menu = '.$adme_menu_id.' '.
- 
 
 181 
                'AND gm_ce_admin = ga_id_administrateur';
- 
 
 182
- 
 
 183 
    $resultat = $db->query($requete);
- 
 
 184 
    if (DB::isError($resultat)) {
- 
 
 185 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
- 
 
 186 
    }
- 
 
 187 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
- 
 
 188
- 
 
 189 
    // recherche de l'application liée
- 
 
 190 
    $requete_app =  'SELECT gap_nom '.
- 
 
 191 
                    'FROM gen_application '.
- 
 
 192 
                    'WHERE gap_id_application = '.$ligne->gm_ce_application;
- 
 
 193
- 
 
 194 
    $resultat_app = $db->query($requete_app);
- 
 
 195 
    if (DB::isError($resultat_app)) {
- 
 
 196 
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_app->getMessage(), $requete_app));
- 
 
 197 
    }
- 
 
 198 
    $ligne_app = $resultat_app->fetchRow(DB_FETCHMODE_OBJECT);
- 
 
 199 
    $resultat_app->free();
- 
 
 200
- 
 
 201 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 202 
    // XHTML image plier-déplier
- 
 
 203
- 
 
 204 
    $url->addQueryString('adme_site_id', $adme_site_id);
- 
 
 205 
    $url->addQueryString('adme_menu_id', $ligne->gm_id_menu);
- 
 
 206 
    $xhtml_pd = '';
- 
 
 207 
    if ($int_deplier != 0) {
- 
 
 208 
        if ($int_deplier == 1) {
- 
 
 209 
            // Afficher un -
- 
 
 210 
            $image_plier_deplier = ADME_IMAGE_MOINS;
- 
 
 211 
            $alt = $etiquette_plier;
- 
 
 212 
            $url->addQueryString('adme_action', 'adme_menu_fermer');
- 
 
 213 
            $url_plier_deplier = $url->getURL();
- 
 
 214 
        } else if ($int_deplier == 2) {
- 
 
 215 
            // Afficher un +
- 
 
 216 
            $image_plier_deplier = ADME_IMAGE_PLUS;
- 
 
 217 
            $alt = $etiquette_deplier;
- 
 
 218 
            $url->addQueryString('adme_action', 'adme_menu_ouvrir');
- 
 
 219 
            $url_plier_deplier = $url->getURL();
- 
 
 220 
        }
- 
 
 221 
        $xhtml_pd = '<a href="'.$url_plier_deplier.'" title="'.$alt.'">'.
- 
 
 222 
                        '<img class="'.ADME_CLASS_IMG_PD.'" src="'.$image_plier_deplier.'" alt="'.$alt.'" />'.
- 
 
 223 
                    '</a>'.'&nbsp;'."\n";
- 
 
 224 
    }
- 
 
 225
- 
 
 226 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 227 
    // XHTML du nom du menu et de ses infos
- 
 
 228 
    $xhtml_info  = htmlentities(empty($ligne->gm_nom) ? '('.$ligne->gm_nom.')' : $ligne->gm_nom);
- 
 
 229 
    $xhtml_info .= '&nbsp;';
- 
 
 230 
    $xhtml_info .= '('.$ligne_app->gap_nom.' / '.$ligne->ga_prenom.')';
- 
 
 231 
    $xhtml_info .= '&nbsp;'."\n";
- 
 
 232
- 
 
 233 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 234 
    // XHTML actions
- 
 
 235 
    $url->removeQueryString('adme_action');
- 
 
 236 
    $url->addQueryString('adme_action', 'menu_commun_modifier');
- 
 
 237 
    $xhtml_action = '<a href="'.$url->getURL().'" title="'.$etiquette_title_modifier.'">'.
- 
 
 238 
                        '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_VOIR.'" alt="'.$etiquette_alt_modifier.'" />'.
- 
 
 239 
                    '</a>&nbsp;'."\n";
- 
 
 240 
    $url->removeQueryString('adme_action');
- 
 
 241 
    $url->addQueryString('adme_action', 'menu_commun_monter');
- 
 
 242 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_monter.'">'.
- 
 
 243 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_HAUT.'" alt="'.$etiquette_alt_monter.'" />'.
- 
 
 244 
                        '</a>&nbsp;'."\n";
- 
 
 245 
    $url->removeQueryString('adme_action');
- 
 
 246 
    $url->addQueryString('adme_action', 'menu_commun_descendre');
- 
 
 247 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_descendre.'">'.
- 
 
 248 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_BAS.'" alt="'.$etiquette_alt_descendre.'" />'.
- 
 
 249 
                        '</a>&nbsp;'."\n";
- 
 
 250 
    $url->removeQueryString('adme_action');
- 
 
 251 
    $url->addQueryString('adme_action', 'menu_commun_supprimer');
- 
 
 252 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_supprimer.'">'.
- 
 
 253 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_SUPPRIMER.'" alt="'.$etiquette_alt_supprimer.'" />'.
- 
 
 254 
                        '</a>&nbsp;'."\n";
- 
 
 255 
    $url->removeQueryString('adme_action');
- 
 
 256 
    $url->addQueryString('adme_action', 'menu_commun_ajouter');
- 
 
 257 
    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_ajouter.'">'.
- 
 
 258 
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_NOUVEAU.'" alt="'.$etiquette_alt_ajouter.'" />'.
- 
 
 259 
                        '</a>'.'&nbsp;'."\n";
- 
 
 260
- 
 
 261 
    // Si l'application liée est "texte simple", on ajoute un icone avec un lien vers
- 
 
 262 
    // l'administration de cette application.
- 
 
 263 
    if ($ligne->gm_ce_application == 3) { // l'appli afficheur a pour id 3
204
264 
        $url->removeQueryString('adme_action');
205 
        //--------------------------------------------------------------------------
 265 
        $url->addQueryString('adme_action', 'contenu_rediger');
Line 206... Line -...
206 
        // Ligne du menu commun.
 - 
 
207 
        $outputText .= "\n".'<li class="contentDocument">'.$menuText.$actionIcons.$icon_vers_texte.'</li>';
 - 
 
208 
    }
 - 
 
209 
    $outputText .= "\n".'</ul>';
 266 
        $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.$etiquette_title_redaction.'">'.
210 
    //----------------------------------------------------------------------------
 267 
                                '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TEXTE.'" alt="'.$etiquette_alt_redaction.'" />'.
- 
 
 268 
                            '</a>'.'&nbsp;'."\n";
211 
    // Nettoyage
 269 
    }
212 
    $UPresult->free();
 - 
 
213
270
- 
 
 271 
    //-------------------------------------------------------------------------------------------------------------------
214 
    return $outputText;
 272 
    // Envoi du menu.
215 
}
 273 
    $retour = $xhtml_pd.$xhtml_info.$xhtml_action;
216 
 
 274 
    return $retour;
217 
//==============================================================================
 275 
}
218 
//==============================================================================
 276 
 
219 
 
 277 
/** Fonction ADME_ajouterMenuCommun() - Ajoute un sous menu commun au menu commun courant
220 
/** Fonction addUpper() - Ajoute un sous menu commun au menu commun courant
 278 
*
221 
*
 - 
 
222 
*
 - 
 
223 
*
 - 
 
224 
*   @param  mixed   Une instance de la classse PEAR_DB
 - 
 
225 
*   @param  string  Le nom du projet qu'on administre
 279 
* Fonction ajoutant un menu commun à Papyrus.
226 
*   @param  string  La langue du projet qu'on administre
 280 
*
227 
*   @return void les changement sont fait dans la base de données.
 281 
* @param object objet Pear de connection à la base de données.
228 
*/
 282 
* @param object objet Pear représentant l'authentification.
229 
function addUpper($db, $adminProject, $adminLocale)
 283 
* @param integer l'identifiant du site à administrer.
230 
{
 284 
* @param integer l'identifiant du menu à administrer.
231 
    //----------------------------------------------------------------------------
 285 
* @return void les changement sont fait dans la base de données.
232 
    // Get project row.
 286 
*/
233 
    global $_GEN_commun;
 - 
 
234
- 
 
235 
    //----------------------------------------------------------------------------
 - 
 
236 
    // Récupération d'infos sur le site principal.
 - 
 
237 
    $PRJrow = GEN_lireInfoSitePrincipalCodeAlpha($db, $adminProject);
 - 
 
238 
    if ($PRJrow == false) {
 - 
 
239 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
 - 
 
240 
            'Code alpha du site : '. $adminProject .'<br />'.
 - 
 
241 
            'Ligne n° : '. __LINE__ .'<br />'.
 - 
 
242 
            'Fichier n° : '. __FILE__ .'<br />');
 287 
function ADME_ajouterMenuCommun($db, $auth, $adme_site_id, $adme_menu_id)
243 
    }
 288 
{
Line 244... Line 289...
244
289 
    //----------------------------------------------------------------------------
245 
    //----------------------------------------------------------------------------
 290 
    // Récupération d'infos sur le nouveau menu
246 
    // Récupération d'infos sur le nouveau menu
 291 
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
247 
    if ($adminLocale == $PRJrow->gs_ce_i18n) {
 292 
    if ($objet_site == false) {
248 
        $id_site = $PRJrow->gs_id_site;
 293 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
249 
    } else {
 294 
            'ID du site : '.$adme_site_id.'<br />'.
250 
        $ligne_admin_site_i18n = getSiteI18nInfos($db, $adminProject, $adminLocale);// Info du site en cours d'administration
 295 
            'Ligne n° : '. __LINE__ .'<br />'.
251 
        $id_site = $ligne_admin_site_i18n->gs_id_site;
 296 
            'Fichier n° : '. __FILE__ .'<br />');
252 
    }
 297 
    }
253 
    $nouveau_id_menu = SQL_obtenirNouveauId($db, 'gen_menu', 'gm_id_menu');
 298 
    $nouveau_id_menu = SQL_obtenirNouveauId($db, 'gen_menu', 'gm_id_menu');
- 
 
 299 
    $auteur = $auth->getAuthData('ga_prenom').' '.$auth->getAuthData('ga_nom');
- 
 
 300
254 
    $auteur = $_GEN_commun['pear_auth']->getAuthData('ga_prenom').' '.$_GEN_commun['pear_auth']->getAuthData('ga_nom');
 301 
    //----------------------------------------------------------------------------
255
- 
 
256 
    //----------------------------------------------------------------------------
 302 
    // Ajout du nouveau menu
257 
    // Ajout du nouveau menu
 303 
    $requete =  'INSERT INTO gen_menu '.
258 
    $requete =  'INSERT INTO gen_menu '.
 304 
                'SET gm_id_menu = '.$nouveau_id_menu.', '.
259 
                'SET gm_id_menu = '.$nouveau_id_menu.', '.
 305 
                'gm_ce_site = 0, '.
260 
                'gm_ce_site = '.$id_site.', '.
 306 
                'gm_ce_i18n = "'.$objet_site->gs_ce_i18n.'", '.
261 
                'gm_ce_i18n = "'.$adminLocale.'", '.
 307 
                'gm_ce_application = 0, '.
262 
                'gm_ce_application = 0, '.
 308 
                'gm_code_num = '.$nouveau_id_menu.', '.
263 
                'gm_code_num = '.$nouveau_id_menu.', '.
 309 
                'gm_code_alpha = "menu_commun_'.$nouveau_id_menu.'", '.
264 
                'gm_code_alpha = "menu_'.$nouveau_id_menu.'", '.
 310 
                'gm_nom = "menu_commun_'.$nouveau_id_menu.'", '.
Line 265... Line 311...
265 
                'gm_nom = "menu_'.$nouveau_id_menu.'", '.
 311 
                'gm_titre = "menu_commun_'.$nouveau_id_menu.'", '.
266 
                'gm_auteur = "'.$auteur.'", '.
 312 
                'gm_description_resume = "menu_commun_'.$nouveau_id_menu.'", '.
Line 267... Line 313...
267 
                'gm_editeur = "'.$PRJrow->gs_auteur.'", '.
 313 
                'gm_auteur = "'.$auteur.'", '.
268 
                'gm_date_creation = "'.date('Y-m-d H:i:s').'", '.
 314 
                'gm_date_creation = "'.date('Y-m-d H:i:s').'", '.
Line 269... Line 315...
269 
                'gm_date_soumission = "'.date('Y-m-d H:i:s').'", '.
 315 
                'gm_date_soumission = "'.date('Y-m-d H:i:s').'", '.
270 
                'gm_date_acceptation = "'.date('Y-m-d H:i:s').'", '.
 316 
                'gm_date_acceptation = "'.date('Y-m-d H:i:s').'", '.
271 
                'gm_date_publication = "'.date('Y-m-d H:i:s').'", '.
 317 
                'gm_date_publication = "'.date('Y-m-d H:i:s').'", '.
272 
                'gm_date_debut_validite = "'.date('Y-m-d H:i:s').'", '.
 318 
                'gm_date_debut_validite = "'.date('Y-m-d H:i:s').'", '.
273 
                'gm_date_copyright = "'.date('Y-00-00 00:00:00').'", '.
 319 
                'gm_date_copyright = "'.date('Y-00-00 00:00:00').'", '.
274 
                'gm_categorie = "menu", '.
 320 
                'gm_categorie = "menu", '.
275 
                'gm_ce_admin = '.$_GEN_commun['pear_auth']->getAuthData('ga_id_administrateur').' '
 321 
                'gm_ce_admin = '.$auth->getAuthData('ga_id_administrateur').' '
276 
                ;
 322 
                ;
277
323
278 
    $result = $db->query($requete);
 324 
    $resultat = $db->query($requete);
279 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 325 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
280
326
281 
    //----------------------------------------------------------------------------
 327 
    //----------------------------------------------------------------------------
Line 282... Line 328...
282 
    // Ajout de la relation "père"
 328 
    // Ajout de la relation "père"
283
329
Line 284... Line 330...
284 
    if (!isset($menuid) && empty($menuid)) {
 330 
    if (!isset($adme_menu_id) && empty($adme_menu_id)) {
285 
        $menuid = 0 ;// Identifiant du père
 331 
        $adme_menu_id = 0 ;// Identifiant du père
286 
    }
 332 
    }
Line 287... Line 333...
287 
    //----------------------------------------------------------------------------
 333 
    //----------------------------------------------------------------------------
288 
    // Récupération d'infos sur la hierarchie du menu
 334 
    // Récupération d'infos sur la hierarchie du menu
289 
    $requete =  'SELECT * '.
 335 
    $requete =  'SELECT GMR01.gmr_ordre '.
290 
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
 336 
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
291 
                'WHERE GMR01.gmr_id_menu_02 = '.$menuid.' '.
 337 
                'WHERE GMR01.gmr_id_menu_02 = '.$adme_menu_id.' '.
Line 292... Line 338...
292 
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
 338 
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
293 
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
 339 
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
Line 294... Line 340...
294 
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
 340 
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
295 
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
 341 
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
Line 296... Line 342...
296 
                'ORDER BY GMR01.gmr_ordre DESC';
 342 
                'ORDER BY GMR01.gmr_ordre DESC';
297
343
298 
    $result = $db->query($requete);
 344 
    $resultat = $db->query($requete);
299 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 345 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
300
346
301 
    $row = $result->fetchRow(DB_FETCHMODE_OBJECT);
 347 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
302 
    $nouveau_ordre_menu = $row->gmr_ordre + 1;
 348 
    $nouveau_ordre_menu = $ligne->gmr_ordre + 1;
303 
    $result->free();
 349 
    $resultat->free();
Line 304... Line 350...
304
350
305 
    $requete =  'INSERT INTO gen_menu_relation '.
 351 
    $requete =  'INSERT INTO gen_menu_relation '.
Line 306... Line 352...
306 
                'SET gmr_id_menu_02 = '.$menuid.', '.
 352 
                'SET gmr_id_menu_02 = '.$adme_menu_id.', '.
307 
                'gmr_id_menu_01 = '.$nouveau_id_menu.', '.
 353 
                'gmr_id_menu_01 = '.$nouveau_id_menu.', '.
308 
                'gmr_id_valeur = 1, '.
 354 
                'gmr_id_valeur = 1, '.
Line 309... Line 355...
309 
                'gmr_ordre = '.$nouveau_ordre_menu;
 355 
                'gmr_ordre = '.$nouveau_ordre_menu;
310
356
311 
    $result = $db->query($requete);
 357 
    $resultat = $db->query($requete);
312 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 358 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
313
359
Line 314... Line -...
314 
    //----------------------------------------------------------------------------
 - 
 
315 
    // Ajout de la relation-type "commun"
 - 
 
316
- 
 
317 
    // Récupération d'infos sur le n
 - 
 
318 
    $requete =  'SELECT * '.
 - 
 
319 
                'FROM gen_menu_relation, gen_menu '.
 - 
 
320 
                'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.
 - 
 
321 
                'AND gmr_id_valeur = 102 '.// 102 = type "commun"
 - 
 
322 
                'AND gmr_id_menu_01 = gm_id_menu '.
 - 
 
323 
                'AND gm_ce_site = '.$id_site.' '.
 - 
 
324 
                'ORDER BY gmr_ordre DESC';
 - 
 
325
- 
 
326 
    $result = $db->query($requete);
 - 
 
327 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 - 
 
328
- 
 
329 
    $row = $result->fetchRow(DB_FETCHMODE_OBJECT);
 - 
 
330 
    $nouveau_ordre_commun = $row->gmr_ordre + 1;
 - 
 
331 
    $result->free();
 - 
 
332
- 
 
333 
    $requete =  'INSERT INTO gen_menu_relation '.
 - 
 
334 
                'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.
 - 
 
335 
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
 - 
 
336 
                'gmr_id_valeur = 102, '.
 - 
 
337 
                'gmr_ordre = '.$nouveau_ordre_commun;
 - 
 
338
- 
 
339 
    $result = $db->query($requete);
 - 
 
340 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 - 
 
341 
}
 - 
 
342 
 
 - 
 
343 
//==============================================================================
 - 
 
344 
//==============================================================================
 - 
 
345 
 
 - 
 
346 
function commitUpdateUpperText($db, $adminProject, $adminLocale, $upperid)
 - 
 
347 
{
 - 
 
348
- 
 
349 
    global $_GEN_commun;
 - 
 
350
- 
 
351 
    $requete =  'UPDATE gen_menu SET '.
 - 
 
352 
                'gm_ce_application = '.$_POST['gm_ce_application'].', '.
 - 
 
353 
                'gm_application_arguments = "'.$_POST['gm_application_arguments'].'", '.
 - 
 
354 
                'gm_fichier_squelette = "'.$_POST['gm_fichier_squelette'].'", '.
 - 
 
355 
                'gm_code_num = '.$_POST['gm_code_num'].', '.
 - 
 
356 
                'gm_code_alpha = "'.$_POST['gm_code_alpha'].'", '.
 - 
 
357 
                'gm_nom = "'.$_POST['gm_nom'].'", '.
 - 
 
358 
                'gm_raccourci_clavier = "'.$_POST['gm_raccourci_clavier'].'", '.
 - 
 
359 
                'gm_robot = "'.$_POST['gm_robot'].'", '.
 - 
 
360 
                'gm_titre = "'.$_POST['gm_titre'].'", '.
 - 
 
361 
                'gm_titre_alternatif = "'.$_POST['gm_titre_alternatif'].'", '.
 - 
 
362 
                'gm_mots_cles = "'.$_POST['gm_mots_cles'].'", '.
 - 
 
363 
                'gm_description_libre = "'.$_POST['gm_description_libre'].'", '.
 - 
 
364 
                'gm_description_resume = "'.$_POST['gm_description_resume'].'", '.
 - 
 
365 
                'gm_description_table_matieres = "'.$_POST['gm_description_table_matieres'].'", '.
 - 
 
366 
                'gm_source = "'.$_POST['gm_source'].'", '.
 - 
 
367 
                'gm_auteur = "'.$_POST['gm_auteur'].'", '.
 - 
 
368 
                'gm_contributeur = "'.$_POST['gm_contributeur'].'", '.
 - 
 
369 
                'gm_editeur = "'.$_POST['gm_editeur'].'", '.
 - 
 
370 
                'gm_date_debut_validite = "'.$_POST['gm_date_debut_validite'].'", '.
 - 
 
371 
                'gm_date_fin_validite = "'.$_POST['gm_date_fin_validite'].'", '.
 - 
 
372 
                'gm_date_copyright = "'.$_POST['gm_date_copyright'].'", '.
 - 
 
373 
                'gm_licence = "'.$_POST['gm_licence'].'", '.
 - 
 
374 
                'gm_categorie = "'.$_POST['gm_categorie'].'", '.
 - 
 
375 
                'gm_public = "'.$_POST['gm_public'].'", '.
 - 
 
376 
                'gm_public_niveau = "'.$_POST['gm_public_niveau'].'", '.
 - 
 
377 
                'gm_portee_spatiale = "'.$_POST['gm_portee_spatiale'].'", '.
 - 
 
378 
                'gm_portee_temporelle = "'.$_POST['gm_portee_temporelle'].'", '.
 - 
 
379 
                'gm_ce_admin = "'.$_GEN_commun['pear_auth']->getAuthData('ga_id_administrateur').'" '.
 - 
 
380 
                'WHERE gm_id_menu = '.$upperid;
 - 
 
381
- 
 
382 
    $result = $db->query($requete);
 - 
 
383 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 - 
 
384 
}
 - 
 
385 
 
 - 
 
386 
/** Fonction moveUpper() - Permet de déplacer un menu commun dans la hiérarchie.
 - 
 
387 
*
 - 
 
388 
* Permet de déplacer un menu dans la hiérarchie des menus communs.
 - 
 
389 
*
 - 
 
390 
*   @param  mixed   objet Pear DB de connexion à la base de données.
 - 
 
391 
*   @param  string  code alpha du site administré.
 - 
 
392 
*   @param  string  identifiant de l'i18n du site administré.
 - 
 
393 
*   @param  int     identifiant du menu commun à déplacer.
 - 
 
394 
*   @param  boolean indique si on veut monter le menu (true) ou le descendre (false).
 - 
 
395 
*   @return void    Modifie la base de données.
 - 
 
396 
*/
 - 
 
397 
function moveUpper($db, $adminProject, $adminLocale, $upperid, $up)
 - 
 
398 
{
 - 
 
399 
    //----------------------------------------------------------------------------
 - 
 
400 
    // Récupération d'information sur le site de ce menu.
 - 
 
401 
    /*
 - 
 
402 
    $PRJrow = GEN_lireInfoSitePrincipalCodeAlpha($db, $adminProject);
 - 
 
403 
    if ($PRJrow == false) {
 - 
 
404 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
 - 
 
405 
            'Code alpha du site : '. $adminProject .'<br />'.
 - 
 
406 
            'Ligne n° : '. __LINE__ .'<br />'.
 - 
 
407 
            'Fichier n° : '. __FILE__ .'<br />');
 - 
 
408 
    }
 - 
 
409 
    */
 - 
 
410 
    //----------------------------------------------------------------------------
 - 
 
411 
    // Récupération d'informations sur les relations du menu courant.
 - 
 
412 
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $upperid, '1'); // 1 = relation "avoir père"
 - 
 
413 
    if ($ligne_menu_courant_relation == false) {
 - 
 
414 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos sur les relations du menu.<br />'.
 - 
 
415 
            'Identifiant menu : '. $upperid .'<br />'.
 - 
 
416 
            'Identifiant valeur relation : 1 <br />'.
 - 
 
417 
            'Ligne n° : '. __LINE__ .'<br />'.
 - 
 
418 
            'Fichier n° : '. __FILE__ .'<br />');
 - 
 
419 
    }
 - 
 
420 
    $id_pere = $ligne_menu_courant_relation->gmr_id_menu_02;
 - 
 
421
- 
 
422 
    // Il serait mieux d'utiliser la fonction ci-dessous.
 - 
 
423 
    // Mais cela ne semble pas fonctionner!!!
 - 
 
424 
    /*
 - 
 
425 
    $id_pere = GEN_lireIdentifiantMenuPere($upperid);
 - 
 
426 
    if ($id_pere == false) {
 - 
 
427 
        die('ERREUR Génésia Administrateur de Menus : impossible de lire identifiant du menu père.<br />'.
 - 
 
428 
            'Identifiant menu fils : '. $upperid .'<br />'.
 - 
 
429 
            'Ligne n° : '. __LINE__ .'<br />'.
 - 
 
430 
            'Fichier n° : '. __FILE__ .'<br />');
 - 
 
431 
    }
 - 
 
432 
    */
 - 
 
433 
    //----------------------------------------------------------------------------
 - 
 
434 
    // Recherche d'information hiérarchiques sur le menu précédent ou suivant le menu courant
 - 
 
435 
    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
 - 
 
436 
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
 - 
 
437 
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
 - 
 
438 
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
 - 
 
439 
                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
 - 
 
440 
                'AND GMR01.gmr_id_valeur = 1 ';// 1 = relation menu "père"
 - 
 
441 
    if ($up) {
 - 
 
442 
        $requete .= 'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
 - 
 
443 
                    'ORDER BY GMR01.gmr_ordre DESC';
 - 
 
444 
    } else {
 - 
 
445 
        $requete .= 'AND GMR01.gmr_ordre > '.$ligne_menu_courant_relation->gmr_ordre.' '.
 - 
 
446 
                    'ORDER BY GMR01.gmr_ordre ASC';
 - 
 
447 
    }
 - 
 
448
- 
 
449 
    $MENUresult = $db->query($requete);
 - 
 
450 
    (DB::isError($MENUresult)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $MENUresult->getMessage(), $requete)) : '';
 - 
 
451
- 
 
452 
    $MENUrow = $MENUresult->fetchRow(DB_FETCHMODE_OBJECT);
 - 
 
453 
    $MENUresult->free() ;
 360 
    //----------------------------------------------------------------------------
454
361 
    // Ajout de la relation-type "commun"
455 
    //----------------------------------------------------------------------------
 - 
 
456 
    // Si la requete ne retourne rien nous ne faisons rien.
 - 
 
457 
    if (! $MENUrow) {
 - 
 
458 
        return;
 - 
 
459 
    }
 - 
 
460
- 
 
461 
    //----------------------------------------------------------------------------
 - 
 
462 
    // Mise à jour des relations hiérarchiques du menu courant
 - 
 
463 
    $requete =  'UPDATE gen_menu_relation SET '.
 - 
 
464 
                'gmr_ordre = '.$MENUrow->nouvel_ordre.' '.
 - 
 
465 
                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
 - 
 
466 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
 - 
 
467
- 
 
468 
    $result = $db->query($requete);
 - 
 
469 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 - 
 
470
- 
 
471 
    //----------------------------------------------------------------------------
 - 
 
472 
    // Mise à jour des relations hiérarchiques du menu précédent ou suivant
 - 
 
473 
    $requete =  'UPDATE gen_menu_relation SET '.
 - 
 
474 
                'gmr_ordre = '.$ligne_menu_courant_relation->gmr_ordre.' '.
 - 
 
475 
                'WHERE gmr_id_menu_01 = '.$MENUrow->id_menu_remplace.' '.
 - 
 
476 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
 - 
 
477
- 
 
478 
    $result = $db->query($requete);
 - 
 
479 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 - 
 
480 
}
 - 
 
481 
 
 - 
 
482 
/** Fonction deleteUpper() - Détruit un menu commun.
 - 
 
483 
*
 - 
 
484 
*   Détruit définitivement un menu commun de la base de données.
 - 
 
485 
*
 - 
 
486 
*   @return  void  le menu commun est supprimé de la base de données.
 - 
 
487 
*/
 - 
 
488 
function deleteUpper($objet_pear_db, $adminProject, $adminLocale, $id_menu_commun)
 - 
 
489 
{
 - 
 
490 
    //----------------------------------------------------------------------------
 - 
 
491 
    // Y a t'il des sous_menus
 - 
 
492 
    $requete =    'SELECT COUNT(gm_id_menu) AS compte '.
 - 
 
493 
                'FROM gen_menu, gen_menu_relation '.
 - 
 
494 
                'WHERE gmr_id_menu_02 = '.$id_menu_commun.' '.
 - 
 
495 
                'AND gmr_id_valeur = 1 '.
 - 
 
496 
                'AND gmr_id_menu_01 = gm_id_menu ';
 - 
 
497
362
Line 498... Line 363...
498 
    $result = $objet_pear_db->query($requete);
 363 
    // Récupération d'infos sur la hierarchie du menu
499 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 - 
 
500
- 
 
501 
    $row = $result->fetchRow(DB_FETCHMODE_OBJECT);
 364 
    $requete =  'SELECT * '.
- 
 
 365 
                'FROM gen_menu_relation, gen_menu '.
- 
 
 366 
                'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.
502
367 
                'AND gmr_id_valeur = 102 '.// 102 = type "commun"
- 
 
 368 
                'AND gmr_id_menu_01 = gm_id_menu '.
- 
 
 369 
                'AND gm_ce_site = 0 '.// un menu commun n'a pas de site lié!
- 
 
 370 
                'ORDER BY gmr_ordre DESC';
- 
 
 371
- 
 
 372 
    $resultat = $db->query($requete);
503 
    if ($row && ($row->compte > 0)) {
 373 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
504 
        return "Il reste des menus attachés à ce menu commun !";
 374
505 
    }
 - 
 
506
- 
 
507 
    //----------------------------------------------------------------------------
 - 
 
508 
    // S'il n'y a plus de sous niveau, on supprime le menu
 375 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
509 
    $requete =  'DELETE FROM gen_menu '.
 376 
    $nouveau_ordre_commun = $ligne->gmr_ordre + 1;
510 
                'WHERE gm_id_menu = '.$id_menu_commun;
 - 
 
511
377 
    $resultat->free();
512 
    $result = $objet_pear_db->query($requete);
 378
513 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 379 
    $requete =  'INSERT INTO gen_menu_relation '.
Line 514... Line -...
514
- 
 
515 
    //----------------------------------------------------------------------------
 380 
                'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.
- 
 
 381 
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
516 
    // Puis on supprime les relations de ce menu
 382 
                'gmr_id_valeur = 102, '.
- 
 
 383 
                'gmr_ordre = '.$nouveau_ordre_commun;
517 
    $requete =  'DELETE FROM gen_menu_relation '.
 384
518 
                'WHERE gmr_id_menu_01 = '.$id_menu_commun;
 385 
    $resultat = $db->query($requete);
519
386 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
520 
    $result = $objet_pear_db->query($requete);
 387 
}
521 
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
 388 
 
- 
 
 389 
/** Fonction ADME_afficherFormMenuCommun() - Affiche le formulaire pour un menu commun.
522 
}
 390 
*
Line 523... Line -...
523 
 
 - 
 
524 
/** Fonction showUpper ()   Affiche le formulaire pour un menu commun
 391 
* Utilise HTML_QuickForm pour générer le formulaire.
525 
*
 392 
* Ancien nom : showUpper().
Line 526... Line -...
526 
*   Utilise HTML_QuickForm pour générer le formulaire
 - 
 
527 
*
 393 
*
- 
 
 394 
* @param  object  objet Pear de connection à la base de données.
528 
*
 395 
* @param  object  objet Pear représentant l'url de base.
529 
*   @return  string  Le code HTML du formulaire
 396 
* @param  integer l'identifiant du site à administrer.
530 
*/
 397 
* @param  integer l'identifiant du menu à administrer.
531 
function showUpper( $db,
398 
* @param  array   le tableau associatif des valeurs à afficher dans le formulaire.
532 
                    $adminProject, $adminLocale,
 399 
* @return string  le formulaire XHTML.
533 
                    $baseURL, $baseURLjs, $baseHidden,
 400 
*/
Line 754... Line 621...
754 
    $form->addElement('html', $partie_entete_fin);
 621 
    $form->addElement('html', $partie_entete_fin);
Line 755... Line 622...
755
622
756 
    $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
 623 
    $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
Line 757... Line 624...
757 
    $form->addElement('html', $liste_bouton_debut);
 624 
    $form->addElement('html', $liste_bouton_debut);
758
625
759 
    $form->addElement('submit', 'menu_commun_enregistrer', 'Enregistrer');
 626 
    $form->addElement('submit', 'menu_commun_verifier', 'Enregistrer');
Line 760... Line 627...
760 
    $bouton_annuler =   '<li><a class="bouton" href="'.$closeURL.'" title="'.'Annuler'.'" >'.'Annuler'.'</a>'.'</li>'."\n";
 627 
    $bouton_annuler = '<li><a class="bouton" href="'.$url->getURL().'" title="'.'Annuler'.'" >'.'Annuler'.'</a>'.'</li>'."\n";
761 
    $form->addElement('html', $bouton_annuler);
 628 
    $form->addElement('html', $bouton_annuler);
Line 762... Line -...
762
- 
 
763 
    $liste_bouton_fin = '</ul>'."\n";
 - 
 
764 
    $form->addElement('html', $liste_bouton_fin);
 - 
 
765
- 
 
766 
    $partie_cachee_debut = '<p>'."\n";
 - 
 
767 
    $form->addElement('html', $partie_cachee_debut);
 - 
 
768
- 
 
769 
    $form->addElement('html', $baseHidden);
 - 
 
770 
    $form->addElement('hidden', 'upperid', $upperid);
 629
771 
    $form->addElement('hidden', 'menuopen', $menuopen);
 - 
 
772 
    $form->addElement('hidden', 'docopen', $docopen);
 - 
 
773 
    $form->addElement('hidden', 'doccmd', 'commitupduppertxt');
 - 
 
Line 774... Line 630...
774 
    $form->setDefaults($ligne_menu);
 630 
    $liste_bouton_fin = '</ul>'."\n";
775
631 
    $form->addElement('html', $liste_bouton_fin);
776 
    $partie_cachee_fin = '</p>'."\n";
 632
777 
    $form->addElement('html', $partie_cachee_fin);
 633 
    $form->setDefaults($aso_valeurs);
Line 786... Line 642...
786 
    GEN_stockerCodeScript($regles_javascript);
 642 
    GEN_stockerCodeScript($regles_javascript);
Line 787... Line 643...
787
643
788 
    // Note de fin de formulaire
 644 
    // Note de fin de formulaire
Line 789... Line 645...
789 
    $form->setRequiredNote('Indique les champs obligatoires');
 645 
    $form->setRequiredNote('Indique les champs obligatoires');
790
646
- 
 
 647 
    $retour .= $form->toHTML()."\n";
- 
 
 648 
    return $retour;
- 
 
 649 
}
- 
 
 650 
 
- 
 
 651 
/** Fonction ADME_validerFormAjouterMenuCommun() - Valide les données issues du formulaire pour gen_menu.
- 
 
 652 
*
- 
 
 653 
* Cette fonction valide les données à ajouter dans la table gen_menu.
- 
 
 654 
*
- 
 
 655 
* @param  string   l'objet pear de connexion à la base de données.
- 
 
 656 
* @param  string   le tableau contenant les valeurs du formulaire.
- 
 
 657 
* @return string   retourne les messages d'erreurs sinon rien.
- 
 
 658 
*/
- 
 
 659 
function ADME_validerFormAjouterMenuCommun($db, $aso_valeurs)
- 
 
 660 
{
- 
 
 661 
    $message = '';
- 
 
 662 
    // Requete pour vérifier l'abscence du code numérique et alphanumérique de la table gen_menu
- 
 
 663 
    if (GEN_verifierPresenceCodeMenu($db, 'int', $aso_valeurs['gm_code_num'])) {
- 
 
 664 
        $message .= '<p class="pap_erreur">La valeur "'.$aso_valeurs['gm_code_num'].'" pour le champ "Code numérique" existe déjà.</p>';
- 
 
 665 
    }
- 
 
 666 
    if (GEN_verifierPresenceCodeMenu($db, 'int', $aso_valeurs['gm_code_alpha'])) {
- 
 
 667 
        $message .= '<p class="pap_erreur">La valeur "'.$aso_valeurs['gm_code_alpha'].'" pour le champ "Code alphanumérique" existe déjà.</p>';
- 
 
 668 
    }
- 
 
 669 
    return $message;
- 
 
 670 
}
- 
 
 671 
 
- 
 
 672 
/** Fonction ADME_modifierMenuCommun() - Met à jour les infos d'un menu commun
- 
 
 673 
*
- 
 
 674 
* Fonction modifiant un menu commun à Papyrus.
- 
 
 675 
*
- 
 
 676 
* @param object objet Pear de connection à la base de données.
- 
 
 677 
* @param object objet Pear représentant l'authentification.
- 
 
 678 
* @param integer l'identifiant du menu à administrer.
- 
 
 679 
* @param array le tableau des valeurs à modifier.
- 
 
 680 
* @return void les changement sont fait dans la base de données.
- 
 
 681 
*/
- 
 
 682 
function ADME_modifierMenuCommun($db, $auth,  $adme_menu_id, $aso_valeurs)
- 
 
 683 
{
- 
 
 684 
    $requete =  'UPDATE gen_menu SET '.
- 
 
 685 
                'gm_ce_application = '.$_POST['gm_ce_application'].', '.
- 
 
 686 
                'gm_application_arguments = "'.$_POST['gm_application_arguments'].'", '.
- 
 
 687 
                'gm_fichier_squelette = "'.$_POST['gm_fichier_squelette'].'", '.
- 
 
 688 
                'gm_code_num = '.$_POST['gm_code_num'].', '.
- 
 
 689 
                'gm_code_alpha = "'.$_POST['gm_code_alpha'].'", '.
- 
 
 690 
                'gm_nom = "'.$_POST['gm_nom'].'", '.
- 
 
 691 
                'gm_raccourci_clavier = "'.$_POST['gm_raccourci_clavier'].'", '.
- 
 
 692 
                'gm_robot = "'.$_POST['gm_robot'].'", '.
- 
 
 693 
                'gm_titre = "'.$_POST['gm_titre'].'", '.
- 
 
 694 
                'gm_titre_alternatif = "'.$_POST['gm_titre_alternatif'].'", '.
- 
 
 695 
                'gm_mots_cles = "'.$_POST['gm_mots_cles'].'", '.
- 
 
 696 
                'gm_description_libre = "'.$_POST['gm_description_libre'].'", '.
- 
 
 697 
                'gm_description_resume = "'.$_POST['gm_description_resume'].'", '.
- 
 
 698 
                'gm_description_table_matieres = "'.$_POST['gm_description_table_matieres'].'", '.
- 
 
 699 
                'gm_source = "'.$_POST['gm_source'].'", '.
- 
 
 700 
                'gm_auteur = "'.$_POST['gm_auteur'].'", '.
- 
 
 701 
                'gm_contributeur = "'.$_POST['gm_contributeur'].'", '.
- 
 
 702 
                'gm_editeur = "'.$_POST['gm_editeur'].'", '.
- 
 
 703 
                'gm_date_debut_validite = "'.$_POST['gm_date_debut_validite'].'", '.
- 
 
 704 
                'gm_date_fin_validite = "'.$_POST['gm_date_fin_validite'].'", '.
- 
 
 705 
                'gm_date_copyright = "'.$_POST['gm_date_copyright'].'", '.
- 
 
 706 
                'gm_licence = "'.$_POST['gm_licence'].'", '.
- 
 
 707 
                'gm_categorie = "'.$_POST['gm_categorie'].'", '.
- 
 
 708 
                'gm_public = "'.$_POST['gm_public'].'", '.
- 
 
 709 
                'gm_public_niveau = "'.$_POST['gm_public_niveau'].'", '.
- 
 
 710 
                'gm_portee_spatiale = "'.$_POST['gm_portee_spatiale'].'", '.
- 
 
 711 
                'gm_portee_temporelle = "'.$_POST['gm_portee_temporelle'].'", '.
- 
 
 712 
                'gm_ce_admin = "'.$auth->getAuthData('ga_id_administrateur').'" '.
- 
 
 713 
                'WHERE gm_id_menu = '.$adme_menu_id;
- 
 
 714
- 
 
 715 
    $resultat = $db->query($requete);
- 
 
 716 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
- 
 
 717 
}
- 
 
 718 
 
- 
 
 719 
/** Fonction ADME_deplacerMenuCommun() - Permet de déplacer un menu dans la hiérarchie.
- 
 
 720 
*
- 
 
 721 
* Permet de déplacer un menu dans la hiérarchie des menus communs.
- 
 
 722 
* Ancien nom : moveUpper()
- 
 
 723 
*
- 
 
 724 
* @param  PEAR::DB objet Pear DB de connexion à la base de données.
- 
 
 725 
* @param  string   identifiant du site administré.
- 
 
 726 
* @param  integer  identifiant du menu à déplacer.
- 
 
 727 
* @param  boolean  indique si on veut monter le menu (true) ou le descendre (false).
- 
 
 728 
* @return void     modifie la base de données.
- 
 
 729 
*/
- 
 
 730 
function ADME_deplacerMenuCommun($db, $adme_site_id, $adme_menu_id, $bln_monter)
- 
 
 731 
{
- 
 
 732 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 733 
    // Récupération d'informations sur les relations du menu courant.
- 
 
 734 
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $adme_menu_id, '1'); // 1 = relation "avoir père"
- 
 
 735 
    if ($ligne_menu_courant_relation == false) {
- 
 
 736 
        die('ERREUR Papyrus Administrateur de Menus : impossible de lire les infos sur les relations du menu.<br />'.
- 
 
 737 
            'Identifiant menu : '. $adme_menu_id .'<br />'.
- 
 
 738 
            'Identifiant valeur relation : 1 <br />'.
- 
 
 739 
            'Ligne n° : '. __LINE__ .'<br />'.
- 
 
 740 
            'Fichier n° : '. __FILE__ .'<br />');
- 
 
 741 
    }
- 
 
 742 
    //$id_pere = $ligne_menu_courant_relation->gmr_id_menu_02;
- 
 
 743
- 
 
 744 
    $id_pere = GEN_lireIdentifiantMenuPere($adme_menu_id);
- 
 
 745 
    if ($id_pere == false) {
- 
 
 746 
        die('ERREUR Papyrus Administrateur de Menus : impossible de lire identifiant du menu père.<br />'.
- 
 
 747 
            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
- 
 
 748 
            'Ligne n° : '. __LINE__ .'<br />'.
- 
 
 749 
            'Fichier n° : '. __FILE__ .'<br />');
- 
 
 750 
    }
- 
 
 751
- 
 
 752 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 753 
    // Recherche d'information hiérarchiques sur le menu précédent ou suivant le menu courant
- 
 
 754 
    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
- 
 
 755 
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
- 
 
 756 
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
- 
 
 757 
                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
- 
 
 758 
                'AND gm_ce_site = 0 '.// les menus communs ne sont pas liés à un site!
- 
 
 759 
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
- 
 
 760 
                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
- 
 
 761 
                'AND GMR01.gmr_id_valeur = 1 ';// 1 = relation menu "père"
- 
 
 762 
    if ($bln_monter) {
- 
 
 763 
        $requete .= 'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
- 
 
 764 
                    'ORDER BY GMR01.gmr_ordre DESC';
- 
 
 765 
    } else {
- 
 
 766 
        $requete .= 'AND GMR01.gmr_ordre > '.$ligne_menu_courant_relation->gmr_ordre.' '.
- 
 
 767 
                    'ORDER BY GMR01.gmr_ordre ASC';
- 
 
 768 
    }
- 
 
 769
- 
 
 770 
    $resultat_menu = $db->query($requete);
- 
 
 771 
    (DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
- 
 
 772
- 
 
 773 
    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
- 
 
 774 
    $resultat_menu->free();
- 
 
 775
- 
 
 776 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 777 
    // Si la requete ne retourne rien nous ne faisons rien.
- 
 
 778 
    if (! $ligne_menu) {
- 
 
 779 
        return null;
- 
 
 780 
    }
- 
 
 781
- 
 
 782 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 783 
    // Mise à jour des relations hiérarchiques du menu courant
- 
 
 784 
    $requete =  'UPDATE gen_menu_relation SET '.
- 
 
 785 
                'gmr_ordre = '.$ligne_menu->nouvel_ordre.' '.
- 
 
 786 
                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
- 
 
 787 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
- 
 
 788
- 
 
 789 
    $resultat = $db->query($requete);
- 
 
 790 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
- 
 
 791
- 
 
 792 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 793 
    // Mise à jour des relations hiérarchiques du menu précédent ou suivant
- 
 
 794 
    $requete =  'UPDATE gen_menu_relation SET '.
- 
 
 795 
                'gmr_ordre = '.$ligne_menu_courant_relation->gmr_ordre.' '.
- 
 
 796 
                'WHERE gmr_id_menu_01 = '.$ligne_menu->id_menu_remplace.' '.
- 
 
 797 
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
- 
 
 798
- 
 
 799 
    $resultat = $db->query($requete);
- 
 
 800 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
- 
 
 801 
}
- 
 
 802 
 
- 
 
 803 
/** Fonction ADME_supprimerMenuCommun() - Supprime un menu classique.
- 
 
 804 
*
- 
 
 805 
* Supprime de la base de données de Génésia toutes les traces du menu classiques
- 
 
 806 
* passé en paramètre.
- 
 
 807 
* Ancien nom : deleteUpper()
- 
 
 808 
*
- 
 
 809 
* @param  PEAR::DB l'objet Pear DB de connexion à la base de données.
- 
 
 810 
* @param  string   l'identifiant du menu à supprimer
- 
 
 811 
* @return void     le menu classique est supprimé de la base de données.
- 
 
 812 
*/
- 
 
 813 
function ADME_supprimerMenuCommun($db, $id_menu_a_supprimer)
- 
 
 814 
{
- 
 
 815 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 816 
    // Y a t'il des sous_menus ?
- 
 
 817 
    $requete =    'SELECT COUNT(gm_id_menu) AS compte '.
- 
 
 818 
                'FROM gen_menu, gen_menu_relation '.
- 
 
 819 
                'WHERE gmr_id_menu_02 = '.$id_menu_a_supprimer.' '.
- 
 
 820 
                'AND gmr_id_valeur = 1 '.
- 
 
 821 
                'AND gmr_id_menu_01 = gm_id_menu ';
- 
 
 822
- 
 
 823 
    $resultat = $db->query($requete);
- 
 
 824 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
- 
 
 825
- 
 
 826 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
- 
 
 827
- 
 
 828 
    if ($ligne && ($ligne->compte > 0)) {
- 
 
 829 
        return 'Ce menu contient encore des sous menus. Veuillez commencez par supprimer ces sous menus.';
- 
 
 830 
    }
- 
 
 831
- 
 
 832 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 833 
    // S'il n'y a plus de sous niveau, on supprime le menu
- 
 
 834 
    $requete =  'DELETE FROM gen_menu '.
- 
 
 835 
                'WHERE gm_id_menu = '.$id_menu_a_supprimer;
- 
 
 836
- 
 
 837 
    $resultat = $db->query($requete);
- 
 
 838 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
- 
 
 839
- 
 
 840 
    //-------------------------------------------------------------------------------------------------------------------
- 
 
 841 
    // Puis on supprime les relations de ce menu
- 
 
 842 
    $requete =  'DELETE FROM gen_menu_relation '.
- 
 
 843 
                'WHERE gmr_id_menu_01 = '.$id_menu_a_supprimer;
- 
 
 844
791 
    $res .= $form->toHTML()."\n";
 845 
    $resultat = $db->query($requete);
Line -... Line 846...
- 
 
 846 
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
- 
 
 847 
}
792 
    return $res;
 848 
 
793 
}
 849 
 
794 
 
 850 
 
795 
// +------------------------------------------------------------------------------------------------------+
 - 
 
- 
 
 851 
// +------------------------------------------------------------------------------------------------------+
Line 796... Line 852...
796 
// |                                            PIED du PROGRAMME                                         |
 852 
// |                                            PIED du PROGRAMME                                         |
797 
// +------------------------------------------------------------------------------------------------------+
 853 
// +------------------------------------------------------------------------------------------------------+
798 
                                           /*Partie non obligatoire*/
854 
 
- 
 
 855 
 
- 
 
 856 
 
- 
 
 857 
/* +--Fin du code ----------------------------------------------------------------------------------------+
799 
 
 858 
*
800 
 
 859 
* $Log: not supported by cvs2svn $
801 
/* +--Fin du code ----------------------------------------------------------------------------------------+
 860 
* Revision 1.3  2004/09/23 17:45:13  jpm
802 
*
 861 
* Amélioration de la gestion des liens annuler et du selecteur de sites.
803 
* $Log: not supported by cvs2svn $
 862 
*