Subversion Repositories Applications.papyrus

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
7 jpm 1
<?php
2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3
// +------------------------------------------------------------------------------------------------------+
4
// | PHP version 4.1                                                                                      |
5
// +------------------------------------------------------------------------------------------------------+
6
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7
// +------------------------------------------------------------------------------------------------------+
134 jpm 8
// | This file is part of Papyrus.                                                                        |
7 jpm 9
// |                                                                                                      |
134 jpm 10
// | Foobar is free software; you can redistribute it and/or modify                                       |
11
// | it under the terms of the GNU General Public License as published by                                 |
12
// | the Free Software Foundation; either version 2 of the License, or                                    |
13
// | (at your option) any later version.                                                                  |
14
// |                                                                                                      |
15
// | Foobar is distributed in the hope that it will be useful,                                            |
7 jpm 16
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
134 jpm 17
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
18
// | GNU General Public License for more details.                                                         |
7 jpm 19
// |                                                                                                      |
134 jpm 20
// | You should have received a copy of the GNU General Public License                                    |
21
// | along with Foobar; if not, write to the Free Software                                                |
7 jpm 22
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23
// +------------------------------------------------------------------------------------------------------+
924 jp_milcent 24
// CVS : $Id: adme_menu_commun.fonct.php,v 1.24 2006-09-07 13:45:56 jp_milcent Exp $
7 jpm 25
/**
26
* Application de gestion des menus communs
27
*
28
* Permet de lister, d'ajouter, de modifier, et de déplacer des menus communs.
134 jpm 29
* Par menus communs, nous entendons tous les menus devant paraitre sur l'ensemble des pages de plusieurs site,
7 jpm 30
* comme le lien vers le plan du site, le lien vers la charte d'accessibilité, le flux rss...
31
*
25 jpm 32
*@package Admin_menu
7 jpm 33
*@subpackage Fonctions
34
//Auteur original :
285 jpm 35
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
7 jpm 36
//Autres auteurs :
37
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
410 ddelon 38
*@author        David Delon <david.delon@clapas.net>
285 jpm 39
*@author        Laurent COUDOUNEAU <lc@gsite.org>
7 jpm 40
*@copyright     Tela-Botanica 2000-2004
924 jp_milcent 41
*@version       $Revision: 1.24 $ $Date: 2006-09-07 13:45:56 $
7 jpm 42
// +------------------------------------------------------------------------------------------------------+
43
*/
44
 
45
// +------------------------------------------------------------------------------------------------------+
46
// |                                            ENTÊTE du PROGRAMME                                       |
47
// +------------------------------------------------------------------------------------------------------+
48
 
49
 
50
// +------------------------------------------------------------------------------------------------------+
51
// |                                            CORPS du PROGRAMME                                        |
52
// +------------------------------------------------------------------------------------------------------+
53
 
54
 
55
// +------------------------------------------------------------------------------------------------------+
56
// |                                           LISTE de FONCTIONS                                         |
57
// +------------------------------------------------------------------------------------------------------+
422 ddelon 58
/** Fonction ADME_afficherListeMenuCommun () - Affiche un arbre de menu en xhtml
134 jpm 59
*
60
* Elle forme l'arbre des menus communs à administrer.
61
* Ancien nom : deployer_menu().
62
*
63
* @param  object objet Pear de connection à la base de données.
64
* @param  object objet Pear représentant l'url de base.
65
* @param  integer l'identifiant du menu à administrer.
66
* @param  integer l'identifiant du menu sur lequel on agit.
67
* @param  string le nom de l'action courante.
68
* @param  integer l'identifiant du menu en cours de déploiement.
69
* @param  boolean true indique que l'on a à faire au premier appel de cette fonction récursive.
70
* @return string  le code XHTML constituant l'arbre des menus à administrer.
71
*/
72
function ADME_afficherListeMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $adme_action, $id_menu_a_deployer, $bln_premier_appel = true)
7 jpm 73
{
134 jpm 74
    // Initialisation des variables :
75
    $retour = '';
7 jpm 76
 
134 jpm 77
    // Est-ce que ces menus comporte des sous-menus ?
78
    $requete_sous_menu =    'SELECT gm_id_menu '.
79
                            'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
80
                            'WHERE GMR01.gmr_id_menu_02 = '.$id_menu_a_deployer.' '.
81
                            'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
82
                            //'AND gm_ce_site = '.$adme_site_id.' '.
83
                            'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
84
                            'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
85
                            'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
86
                            'AND GMR02.gmr_id_valeur = 102 '.// 102 = type "menu commun"
87
                            'ORDER BY GMR01.gmr_ordre ASC';
7 jpm 88
 
134 jpm 89
    $resultat_sous_menu = $db->query($requete_sous_menu) ;
90
    if (DB::isError($resultat_sous_menu)) {
91
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_sous_menu->getMessage(), $requete_sous_menu));
7 jpm 92
    }
93
 
134 jpm 94
    // Gestion du stockage ou déstockage des menus ouverts
150 jpm 95
    if (($adme_action == ADME_LG_ACTION_DEPLIER || $adme_action == ADME_LG_ACTION_COMMUN_AJOUTER) && $id_menu_a_deployer != 0) {
134 jpm 96
        $_SESSION['adme_menus_communs_ouverts'][$adme_menu_id] = $adme_menu_id;
97
    }
150 jpm 98
    if ($adme_action == ADME_LG_ACTION_PLIER && $id_menu_a_deployer != 0) {
134 jpm 99
        unset($_SESSION['adme_menus_communs_ouverts'][$adme_menu_id]);
100
        foreach ($_SESSION['adme_menus_communs_ouverts'] as $val) {
101
            if (GEN_etreAncetre($adme_menu_id, $val)) {
102
                unset($_SESSION['adme_menus_communs_ouverts'][$val]);
103
            }
104
        }
105
    }
7 jpm 106
 
134 jpm 107
    // Gestion affichage des menus
108
    if ($resultat_sous_menu->numRows() > 0) {
109
        // Ici, on sait qu'un menu a des sous menus, on commence par l'afficher:
110
        if ($bln_premier_appel == false) {
111
            $retour .= '<li>'."\n";
112
 
113
            if (GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id) ||
150 jpm 114
                ($id_menu_a_deployer == $adme_menu_id && $adme_action == ADME_LG_ACTION_DEPLIER) ||
134 jpm 115
                isset($_SESSION['adme_menus_communs_ouverts'][$id_menu_a_deployer])
116
                ){
117
                // Affiche un -
118
                $retour .= ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $id_menu_a_deployer, 1);
119
            } else if ( !GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id) ||
150 jpm 120
                        ($id_menu_a_deployer == $adme_menu_id && $adme_action == ADME_LG_ACTION_PLIER) ||
134 jpm 121
                        !isset($_SESSION['adme_menus_communs_ouverts'][$id_menu_a_deployer])
122
                        ){
123
                // Affiche un +
124
                $retour .= ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $id_menu_a_deployer, 2);
125
            }
126
        }
127
        if ($bln_premier_appel == true || GEN_etreAncetre($id_menu_a_deployer, $adme_menu_id) ||
150 jpm 128
            ($id_menu_a_deployer == $adme_menu_id && $adme_action == ADME_LG_ACTION_DEPLIER) ||
134 jpm 129
            isset($_SESSION['adme_menus_communs_ouverts'][$id_menu_a_deployer])
130
            ){
131
            $retour .= '<ul>'."\n";
132
            while ($ligne_sous_menu = $resultat_sous_menu->fetchRow(DB_FETCHMODE_OBJECT)) {
133
                $retour .= ADME_afficherListeMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $adme_action, $ligne_sous_menu->gm_id_menu, false);
134
            }
135
            $retour .= '</ul>'."\n";
136
        }
137
        if ($bln_premier_appel == false) {
138
            $retour .= '</li>'."\n";
139
        }
140
    } else if ($resultat_sous_menu->numRows() == 0 && $bln_premier_appel == false) {
141
        $retour .= '<li>'."\n";
142
        $retour .= ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $id_menu_a_deployer, 0);
143
        $retour .= '</li>'."\n";
144
    }
145
 
146
    return $retour;
147
}
148
 
149
/** Fonction ADME_retournerXhtmlMenuCommun() - Effectue une sortie d'un menu en XHTML
150
*
151
* Retourne le XHTML d'une ligne de l'arbre des menus communs permettant de l'administer.
152
* Ancien nom : menu_toHtml().
153
*
154
* @param  object objet Pear de connection à la base de données.
155
* @param  object objet Pear représentant l'url de base.
156
* @param  integer l'identifiant du site à administrer.
157
* @param  integer l'identifiant du menu à administrer.
158
* @param  integer 0 indique que le menu ne possède pas de fils, 1 qu'il faut afficher un - et 2 un +.
159
* @return  string une ligne de liste XHTML
160
*/
877 ddelon 161
function ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $int_deplier,$est_traduction=false,$menu_traduction_defaut=0)
134 jpm 162
{
141 jpm 163
    //-------------------------------------------------------------------------------------------------------------------
164
    // Récupération des infos concernant l'administrateur d'un menu
134 jpm 165
    $requete =  'SELECT gen_menu.*, ga_prenom '.
166
                'FROM gen_menu, gen_annuaire '.
167
                'WHERE gm_id_menu = '.$adme_menu_id.' '.
168
                'AND gm_ce_admin = ga_id_administrateur';
7 jpm 169
 
134 jpm 170
    $resultat = $db->query($requete);
171
    if (DB::isError($resultat)) {
172
        die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
173
    }
174
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
7 jpm 175
 
141 jpm 176
    //-------------------------------------------------------------------------------------------------------------------
177
    // Recupération des infos de l'appli du menu courant.
178
    $ligne_app = GEN_retournerInfoAppliMenu($db, $adme_menu_id);
7 jpm 179
 
134 jpm 180
    //-------------------------------------------------------------------------------------------------------------------
181
    // XHTML image plier-déplier
7 jpm 182
 
134 jpm 183
    $url->addQueryString('adme_site_id', $adme_site_id);
879 ddelon 184
    $url->addQueryString('adme_menu_id', $adme_menu_id);
134 jpm 185
    $xhtml_pd = '';
879 ddelon 186
 
134 jpm 187
    if ($int_deplier != 0) {
188
        if ($int_deplier == 1) {
189
            // Afficher un -
190
            $image_plier_deplier = ADME_IMAGE_MOINS;
150 jpm 191
            $alt = ADME_LG_ACTION_PLIER_ALT;
192
            $url->addQueryString('adme_action', ADME_LG_ACTION_PLIER);
134 jpm 193
            $url_plier_deplier = $url->getURL();
194
        } else if ($int_deplier == 2) {
195
            // Afficher un +
196
            $image_plier_deplier = ADME_IMAGE_PLUS;
150 jpm 197
            $alt = ADME_LG_ACTION_DEPLIER_ALT;
198
            $url->addQueryString('adme_action', ADME_LG_ACTION_DEPLIER);
134 jpm 199
            $url_plier_deplier = $url->getURL();
7 jpm 200
        }
134 jpm 201
        $xhtml_pd = '<a href="'.$url_plier_deplier.'" title="'.$alt.'">'.
202
                        '<img class="'.ADME_CLASS_IMG_PD.'" src="'.$image_plier_deplier.'" alt="'.$alt.'" />'.
203
                    '</a>'.'&nbsp;'."\n";
7 jpm 204
    }
205
 
134 jpm 206
    //-------------------------------------------------------------------------------------------------------------------
207
    // XHTML du nom du menu et de ses infos
150 jpm 208
    $xhtml_info  = htmlentities(empty($ligne->gm_nom) ? ADME_LG_PARENTHESE_OUVRANTE.$ligne->gm_nom.ADME_LG_PARENTHESE_FERMANTE : $ligne->gm_nom);
134 jpm 209
    $xhtml_info .= '&nbsp;';
150 jpm 210
    $xhtml_info .= ADME_LG_PARENTHESE_OUVRANTE.$ligne_app->gap_nom.'&nbsp;'.ADME_LG_SLASH.'&nbsp;'.$ligne->ga_prenom.ADME_LG_PARENTHESE_FERMANTE;
134 jpm 211
    $xhtml_info .= '&nbsp;'."\n";
212
 
213
    //-------------------------------------------------------------------------------------------------------------------
214
    // XHTML actions
215
    $url->removeQueryString('adme_action');
150 jpm 216
    $url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_MODIFIER);
217
    $xhtml_action = '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_MODIFIER_TITLE.'">'.
218
                        '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_VOIR.'" alt="'.ADME_LG_ACTION_COMMUN_MODIFIER_ALT.'" />'.
134 jpm 219
                    '</a>&nbsp;'."\n";
220
    $url->removeQueryString('adme_action');
818 ddelon 221
    if (!$est_traduction) {
222
    	$url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_MONTER);
223
    	$xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_MONTER_TITLE.'">'.
150 jpm 224
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_HAUT.'" alt="'.ADME_LG_ACTION_COMMUN_MONTER_ALT.'" />'.
818 ddelon 225
        	                '</a>&nbsp;'."\n";
226
    	$url->removeQueryString('adme_action');
227
    	$url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_DESCENDRE);
228
    	$xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_DESCENDRE_TITLE.'">'.
150 jpm 229
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_BAS.'" alt="'.ADME_LG_ACTION_COMMUN_DESCENDRE_ALT.'" />'.
818 ddelon 230
        	                '</a>&nbsp;'."\n";
422 ddelon 231
 
818 ddelon 232
    	$url->addQueryString('adme_action',ADME_LG_ACTION_COMMUN_DIMINUER);
233
    	$xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_DIMINUER_TITLE.'">'.
422 ddelon 234
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_GAUCHE.'" alt="'.ADME_LG_ACTION_COMMUN_DIMINUER_ALT.'" />'.
818 ddelon 235
        	                '</a>&nbsp;'."\n";
236
	    $url->removeQueryString('adme_action');
237
	    $url->addQueryString('adme_action',ADME_LG_ACTION_COMMUN_AUGMENTER);
238
    	$xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_AUGMENTER_TITLE.'">'.
239
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_FLECHE_DROITE.'" alt="'.ADME_LG_ACTION_COMMUN_AUGMENTER_ALT.'" />'.
422 ddelon 240
                        '</a>&nbsp;'."\n";
818 ddelon 241
    }
134 jpm 242
    $url->removeQueryString('adme_action');
422 ddelon 243
 
818 ddelon 244
    if (!$est_traduction) {
245
    	$url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_SUPPRIMER);
246
    	$xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_SUPPRIMER_TITLE.'" onclick="javascript:return confirm(\''.ADME_LG_ACTION_SUPPRIMER_CONFIRMATION.'\');">'.
150 jpm 247
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_SUPPRIMER.'" alt="'.ADME_LG_ACTION_COMMUN_SUPPRIMER_ALT.'" />'.
134 jpm 248
                        '</a>&nbsp;'."\n";
818 ddelon 249
    }
250
    else {
251
    	$url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_SUPPRIMER_TRADUCTION);
252
    	$xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_SUPPRIMER_TRADUCTION_TITLE.'" onclick="javascript:return confirm(\''.ADME_LG_ACTION_SUPPRIMER_CONFIRMATION.'\');">'.
253
                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_SUPPRIMER.'" alt="'.ADME_LG_ACTION_COMMUN_SUPPRIMER_TRADUCTION_ALT.'" />'.
254
                        '</a>&nbsp;'."\n";
255
 
256
    }
257
 
134 jpm 258
    $url->removeQueryString('adme_action');
818 ddelon 259
 
260
    if (!$est_traduction) {
261
	   	$url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_AJOUTER);
262
	     $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_AJOUTER_TITLE.'">'.
263
	                            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_NOUVEAU.'" alt="'.ADME_LG_ACTION_COMMUN_AJOUTER_ALT.'" />'.
264
	                        '</a>'.'&nbsp;'."\n";
265
    }
134 jpm 266
 
818 ddelon 267
    $url->removeQueryString('adme_action');
268
 
134 jpm 269
    // Si l'application liée est "texte simple", on ajoute un icone avec un lien vers
270
    // l'administration de cette application.
141 jpm 271
    if ($ligne_app->gap_id_application != 0 && GEN_verifierPresenceInterfaceAdmin($db, $ligne_app->gap_id_application)) { // l'appli afficheur a pour id 3
134 jpm 272
        $url->removeQueryString('adme_action');
150 jpm 273
        $url->addQueryString('adme_action', ADME_LG_ACTION_ADMINISTRER);
274
        $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_ADMINISTRER_TITLE.'">'.
275
                                '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TEXTE.'" alt="'.ADME_LG_ACTION_ADMINISTRER_ALT.'" />'.
134 jpm 276
                            '</a>'.'&nbsp;'."\n";
277
    }
278
 
818 ddelon 279
    if (!$est_traduction) {
280
	    $url->addQueryString('adme_action',ADME_LG_ACTION_COMMUN_TRADUIRE);
281
	    $xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_TRADUIRE_TITLE.'">'.
282
	                        ADME_LG_ACTION_COMMUN_TRADUIRE_ALT.
283
	                        '</a>&nbsp;'."\n";
284
    }
877 ddelon 285
	else {
286
		if ($menu_traduction_defaut==$adme_menu_id) {
287
	        $xhtml_action .=    '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TRADUCTION_DEFAUT_AFFICHAGE.'" alt="'.ADME_LG_ACTION_COMMUN_TRADUCTION_DEFAUT_ALT.'" />'.
288
                            '&nbsp;'."\n";
289
		}
290
		else {
291
				$url->removeQueryString('adme_action');
292
        		$url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_TRADUCTION_DEFAUT);
293
        		$xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_TRADUCTION_DEFAUT_TITLE.'">'.
294
                                '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TRADUCTION_DEFAUT.'" alt="'.ADME_LG_ACTION_COMMUN_TRADUCTION_DEFAUT_ALT.'" />'.
295
                            '</a>'.'&nbsp;'."\n";
296
 
297
		}
298
	}
299
 
818 ddelon 300
 
301
    $xhtml_traduction='';
302
 
303
//    $id_langue = $GLOBALS['_GEN_commun']['i18n'];
304
 
305
 
306
    $requete_traduction =   'SELECT gmr_id_menu_02,  gm_ce_i18n '.
307
			                                    'FROM  gen_menu_relation, gen_menu '.
308
			                                    'WHERE '.$adme_menu_id.' = gmr_id_menu_01 ' .
309
			                                    'AND  gmr_id_menu_02  = gm_id_menu   '.
310
			                                    'AND  gmr_id_valeur  = 2 ';// 2 = "avoir traduction"
311
 
312
	$resultat_traduction = $db->query($requete_traduction);
313
			        (DB::isError($resultat_traduction))             ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction))
314
			                : '';
315
 
877 ddelon 316
	if ($resultat_traduction->numRows() > 0 ) {
317
 
318
		$requete_traduction_defaut =    'SELECT gmr_id_menu_02 '.
319
		                                    'FROM  gen_menu_relation '.
320
		                                    'WHERE '.$adme_menu_id.' = gmr_id_menu_01 ' .
321
		                                    'AND  gmr_id_valeur  = 105 ';// 105 traduction par defaut
322
		$resultat_traduction_defaut = $db->query($requete_traduction_defaut);
323
		(DB::isError($resultat_traduction_defaut))             ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction_defaut))
324
		: '';
325
 
326
 
327
		if ($resultat_traduction_defaut->numRows() == 0 ) {
328
            $menu_traduction_defaut=0;
329
            $xhtml_action .=    '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TRADUCTION_DEFAUT_AFFICHAGE.'" alt="'.ADME_LG_ACTION_COMMUN_TRADUCTION_DEFAUT_ALT.'" />'.
330
                        '&nbsp;'."\n";
331
		}
332
		else {
333
 
334
 
335
			$ligne_traduction_defaut = $resultat_traduction_defaut->fetchRow(DB_FETCHMODE_OBJECT);
336
			$menu_traduction_defaut=$ligne_traduction_defaut->gmr_id_menu_02;
337
 
338
			if ($menu_traduction_defaut!=$adme_menu_id) {
339
				$url->removeQueryString('adme_action');
340
    			$url->addQueryString('adme_action', ADME_LG_ACTION_COMMUN_TRADUCTION_DEFAUT);
341
    			$xhtml_action .=    '<a href="'.$url->getURL().'" title="'.ADME_LG_ACTION_COMMUN_TRADUCTION_DEFAUT_TITLE.'">'.
342
                	            '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TRADUCTION_DEFAUT.'" alt="'.ADME_LG_ACTION_COMMUN_TRADUCTION_DEFAUT_ALT.'" />'.
343
                    	    '</a>'.'&nbsp;'."\n";
344
			}
345
			else {
346
			   $xhtml_action .=    '<img class="'.ADME_CLASS_IMG_ICONE.'" src="'.ADME_IMAGE_TRADUCTION_DEFAUT_AFFICHAGE.'" alt="'.ADME_LG_ACTION_COMMUN_TRADUCTION_DEFAUT_ALT.'" />'.
347
                        '&nbsp;'."\n";
348
 
349
			}
350
 
351
		}
818 ddelon 352
 
877 ddelon 353
		while ($ligne_resultat = $resultat_traduction->fetchRow(DB_FETCHMODE_OBJECT)) {
354
			$xhtml_traduction.="<br><em>".$ligne_resultat->gm_ce_i18n.":&nbsp;".ADME_retournerXhtmlMenuCommun($db, $url, $adme_site_id, $ligne_resultat->gmr_id_menu_02, 0,true,$menu_traduction_defaut)."</em>";
355
 
356
		}
357
 
818 ddelon 358
	}
359
 
134 jpm 360
    //-------------------------------------------------------------------------------------------------------------------
361
    // Envoi du menu.
818 ddelon 362
 
363
    $retour = $xhtml_pd.$xhtml_info.$xhtml_action.$xhtml_traduction;
364
 
134 jpm 365
    return $retour;
7 jpm 366
}
367
 
134 jpm 368
/** Fonction ADME_ajouterMenuCommun() - Ajoute un sous menu commun au menu commun courant
7 jpm 369
*
134 jpm 370
* Fonction ajoutant un menu commun à Papyrus.
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'authentification.
374
* @param integer l'identifiant du site à administrer.
375
* @param integer l'identifiant du menu à administrer.
376
* @return void les changement sont fait dans la base de données.
7 jpm 377
*/
134 jpm 378
function ADME_ajouterMenuCommun($db, $auth, $adme_site_id, $adme_menu_id)
7 jpm 379
{
380
    //----------------------------------------------------------------------------
134 jpm 381
    // Récupération d'infos sur le nouveau menu
382
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
383
    if ($objet_site == false) {
150 jpm 384
        die('ERREUR Génésia Administrateur de Menus : '.ADME_LG_ERREUR_INFO_SITE.'<br />'.
134 jpm 385
            'ID du site : '.$adme_site_id.'<br />'.
7 jpm 386
            'Ligne n° : '. __LINE__ .'<br />'.
387
            'Fichier n° : '. __FILE__ .'<br />');
388
    }
389
    $nouveau_id_menu = SQL_obtenirNouveauId($db, 'gen_menu', 'gm_id_menu');
134 jpm 390
    $auteur = $auth->getAuthData('ga_prenom').' '.$auth->getAuthData('ga_nom');
7 jpm 391
 
392
    //----------------------------------------------------------------------------
393
    // Ajout du nouveau menu
394
    $requete =  'INSERT INTO gen_menu '.
395
                'SET gm_id_menu = '.$nouveau_id_menu.', '.
134 jpm 396
                'gm_ce_site = 0, '.
397
                'gm_ce_i18n = "'.$objet_site->gs_ce_i18n.'", '.
7 jpm 398
                'gm_ce_application = 0, '.
399
                'gm_code_num = '.$nouveau_id_menu.', '.
134 jpm 400
                'gm_code_alpha = "menu_commun_'.$nouveau_id_menu.'", '.
401
                'gm_nom = "menu_commun_'.$nouveau_id_menu.'", '.
402
                'gm_titre = "menu_commun_'.$nouveau_id_menu.'", '.
403
                'gm_description_resume = "menu_commun_'.$nouveau_id_menu.'", '.
7 jpm 404
                'gm_auteur = "'.$auteur.'", '.
405
                'gm_date_creation = "'.date('Y-m-d H:i:s').'", '.
406
                'gm_date_soumission = "'.date('Y-m-d H:i:s').'", '.
407
                'gm_date_acceptation = "'.date('Y-m-d H:i:s').'", '.
408
                'gm_date_publication = "'.date('Y-m-d H:i:s').'", '.
409
                'gm_date_debut_validite = "'.date('Y-m-d H:i:s').'", '.
346 jpm 410
                'gm_date_fin_validite = "0000-00-00 00:00:00", '.
7 jpm 411
                'gm_date_copyright = "'.date('Y-00-00 00:00:00').'", '.
412
                'gm_categorie = "menu", '.
134 jpm 413
                'gm_ce_admin = '.$auth->getAuthData('ga_id_administrateur').' '
7 jpm 414
                ;
415
 
134 jpm 416
    $resultat = $db->query($requete);
417
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 418
 
419
    //----------------------------------------------------------------------------
420
    // Ajout de la relation "père"
421
 
134 jpm 422
    if (!isset($adme_menu_id) && empty($adme_menu_id)) {
423
        $adme_menu_id = 0 ;// Identifiant du père
7 jpm 424
    }
425
    //----------------------------------------------------------------------------
426
    // Récupération d'infos sur la hierarchie du menu
134 jpm 427
    $requete =  'SELECT GMR01.gmr_ordre '.
7 jpm 428
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
134 jpm 429
                'WHERE GMR01.gmr_id_menu_02 = '.$adme_menu_id.' '.
7 jpm 430
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
431
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
432
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
433
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
434
                'ORDER BY GMR01.gmr_ordre DESC';
435
 
134 jpm 436
    $resultat = $db->query($requete);
437
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 438
 
466 ddelon 439
    if ($resultat->numRows()>0) {
440
    	$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
441
    	$nouveau_ordre_menu = $ligne->gmr_ordre + 1;
442
    }
443
    else {
444
    	$nouveau_ordre_menu=1;
445
    }
134 jpm 446
    $resultat->free();
7 jpm 447
 
448
    $requete =  'INSERT INTO gen_menu_relation '.
134 jpm 449
                'SET gmr_id_menu_02 = '.$adme_menu_id.', '.
7 jpm 450
                'gmr_id_menu_01 = '.$nouveau_id_menu.', '.
451
                'gmr_id_valeur = 1, '.
452
                'gmr_ordre = '.$nouveau_ordre_menu;
453
 
134 jpm 454
    $resultat = $db->query($requete);
455
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 456
 
457
    //----------------------------------------------------------------------------
458
    // Ajout de la relation-type "commun"
459
 
134 jpm 460
    // Récupération d'infos sur la hierarchie du menu
7 jpm 461
    $requete =  'SELECT * '.
462
                'FROM gen_menu_relation, gen_menu '.
463
                'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.
464
                'AND gmr_id_valeur = 102 '.// 102 = type "commun"
465
                'AND gmr_id_menu_01 = gm_id_menu '.
134 jpm 466
                'AND gm_ce_site = 0 '.// un menu commun n'a pas de site lié!
7 jpm 467
                'ORDER BY gmr_ordre DESC';
468
 
134 jpm 469
    $resultat = $db->query($requete);
470
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 471
 
466 ddelon 472
    if ($resultat->numRows()>0) {
473
    	$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
474
    	$nouveau_ordre_commun = $ligne->gmr_ordre + 1;
475
    }
476
    else {
477
    	$nouveau_ordre_commun = 0;
478
    }
479
 
134 jpm 480
    $resultat->free();
7 jpm 481
 
482
    $requete =  'INSERT INTO gen_menu_relation '.
483
                'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.
484
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
485
                'gmr_id_valeur = 102, '.
486
                'gmr_ordre = '.$nouveau_ordre_commun;
487
 
134 jpm 488
    $resultat = $db->query($requete);
489
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
7 jpm 490
}
491
 
134 jpm 492
/** Fonction ADME_afficherFormMenuCommun() - Affiche le formulaire pour un menu commun.
7 jpm 493
*
134 jpm 494
* Utilise HTML_QuickForm pour générer le formulaire.
495
* Ancien nom : showUpper().
7 jpm 496
*
134 jpm 497
* @param  object  objet Pear de connection à la base de données.
498
* @param  object  objet Pear représentant l'url de base.
499
* @param  integer l'identifiant du site à administrer.
500
* @param  integer l'identifiant du menu à administrer.
501
* @param  array   le tableau associatif des valeurs à afficher dans le formulaire.
502
* @return string  le formulaire XHTML.
7 jpm 503
*/
818 ddelon 504
function ADME_afficherFormMenuCommun($db, $url, $adme_site_id, $adme_menu_id, $aso_valeurs,$traduction=FALSE)
7 jpm 505
{
134 jpm 506
    // Initialisation de variable
507
    $url->addQueryString('adme_site_id', $adme_site_id);
508
    $url->addQueryString('adme_menu_id', $adme_menu_id);
7 jpm 509
 
510
    // Récupération des informations du menu concerné.
818 ddelon 511
    if (!isset($aso_valeurs[ADME_LG_ACTION_COMMUN_VERIFIER]) && !isset($aso_valeurs[ADME_LG_ACTION_COMMUN_VERIFIER_TRADUCTION])) {
134 jpm 512
        $aso_valeurs = GEN_lireInfoMenu($db, $adme_menu_id, DB_FETCHMODE_ASSOC);
513
 
150 jpm 514
        if ($aso_valeurs === false) {
515
            die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU.'<br />'.
134 jpm 516
                'Idenitifiant du menu n° : '. $adme_menu_id .'<br />'.
517
                'Ligne n° : '. __LINE__ .'<br />'.
518
                'Fichier n° : '. __FILE__ .'<br />');
519
        }
7 jpm 520
    }
818 ddelon 521
 
7 jpm 522
    // Titre de la page
818 ddelon 523
 
524
    if ($traduction) {
525
    	$retour = '<h1>'.ADME_LG_FORM_MENU_COMMUN_TITRE_GENERAL_TRADUCTION.'</h1>'."\n";
526
    }
527
    else {
528
    	$retour = '<h1>'.ADME_LG_FORM_MENU_COMMUN_TITRE_GENERAL.'</h1>'."\n";
529
    }
530
 
150 jpm 531
    $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 532
 
533
    // Création du formulaire
134 jpm 534
    // Notes : Quickform semble remplacer les & des &amp; à nouveau par des &amp; solution utiliser str_replace()...
535
    $form =& new HTML_QuickForm('form_menu_commun', 'post', str_replace('&amp;', '&', $url->getUrl()));
7 jpm 536
    $tab_index = 1000;
537
    $squelette =& $form->defaultRenderer();
538
    $squelette->setFormTemplate("\n".'<form{attributes}>'."\n"."\n".'{content}'."\n"."\n".'</form>'."\n");
539
    $squelette->setElementTemplate(  '<li>'."\n".
540
                                    '{label}'."\n".
541
                                    '{element}'."\n".
150 jpm 542
                                    '<!-- BEGIN required --><span class="symbole_obligatoire">'.ADME_LG_FORM_SYMBOLE_CHP_OBLIGATOIRE.'</span><!-- END required -->'."\n".
7 jpm 543
                                    '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
544
                                    '</li>'."\n");
150 jpm 545
    $squelette->setRequiredNoteTemplate("\n".'<p><span class="symbole_obligatoire">'.ADME_LG_FORM_SYMBOLE_CHP_OBLIGATOIRE.'</span> {requiredNote}</p>'."\n");
7 jpm 546
 
150 jpm 547
    $partie_menu_debut = '<fieldset>'."\n".'<legend>'.ADME_LG_FORM_MENU_COMMUN_TITRE_CONFIG.'</legend>'."\n".'<ul>'."\n";
7 jpm 548
    $form->addElement('html', $partie_menu_debut);
549
 
550
    $id = 'gm_code_num';
380 jpm 551
    $aso_attributs = array('id'=>$id, 'tabindex' => $tab_index++, 'size' => 5, 'maxlength' => 5);
150 jpm 552
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CODE_NUM.'</label>';
7 jpm 553
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 554
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_CODE_NUM, 'required', '', 'client');
7 jpm 555
 
556
    $id = 'gm_code_alpha';
380 jpm 557
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 50);
150 jpm 558
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CODE_ALPHA.'</label>';
7 jpm 559
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 560
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_CODE_ALPHA, 'required', '', 'client');
7 jpm 561
 
562
    $id = 'gm_nom';
563
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 100);
150 jpm 564
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_NOM.'</label>';
7 jpm 565
    $form->addElement('text', $id, $label, $aso_attributs);
150 jpm 566
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_NOM, 'required', '', 'client');
7 jpm 567
    $form->applyFilter($id, 'trim');
568
 
569
    $id = 'gm_raccourci_clavier';
570
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 1, 'maxlength' => 1);
571
    $label = '<label for="'.$id.'">'.'Raccourci clavier'.'</label>';
572
    $form->addElement('text', $id, $label, $aso_attributs);
573
 
574
    $id = 'gm_fichier_squelette';
575
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 255);
150 jpm 576
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_FICHIER_SQUELETTE.'</label>';
7 jpm 577
    $form->addElement('text', $id, $label, $aso_attributs);
578
 
579
    $id = 'gm_description_resume';
580
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 50);
150 jpm 581
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_INFO_BULLE.'</label>';
7 jpm 582
    $form->addElement('textarea', $id, $label, $aso_attributs);
150 jpm 583
    $form->addRule($id, ADME_LG_FORM_MENU_REGLE_INFO_BULLE, 'required', '', 'client');
7 jpm 584
 
585
    // Requête sur les applications
586
    $requete =  'SELECT gap_id_application, gap_nom '.
587
                'FROM gen_application '.
924 jp_milcent 588
                'WHERE gap_bool_applette = 0 '.
589
                'ORDER BY gap_nom ASC';// Pour éviter d'afficher les applettes.
7 jpm 590
    $resultat = $db->query($requete);
591
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
592
 
593
    $aso_options = array();
594
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
595
        $aso_options[$ligne->gap_id_application] = $ligne->gap_nom;
596
    }
597
    $resultat->free();
598
    $id = 'gm_ce_application';
599
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 600
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_APPLI.'</label>';
7 jpm 601
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
602
 
818 ddelon 603
 
604
        if ($traduction) {
605
 
606
    	// Recherche liste des menu deja traduits
607
 
608
	   	$requete =  'SELECT distinct gm_ce_i18n  '.
609
        	        'FROM gen_menu_relation, gen_menu '.
610
            	    'WHERE gmr_id_menu_01  = ' . $adme_menu_id .' '.
611
                	'AND gm_id_menu  = gmr_id_menu_02  '.
612
                	'AND gmr_id_valeur = 2  '; // 2 = "avoir traduction"
613
 
614
	  	$resultat = $db->query($requete) ;
615
 
616
	    if (DB::isError($resultat)) {
617
	        die( BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete) );
618
	    }
619
 
620
	    $not_in_langue='';
621
	    if ( $resultat->numRows() == 0 ) {
622
			$not_in_langue="gi_id_i18n not in('".$aso_valeurs['gm_ce_i18n']."')";
623
	    }
624
	    else {
625
	    	    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
626
 					$not_in_langue="'".$ligne->gm_ce_i18n."'".",".$not_in_langue;
627
 					$end="'".$ligne->gm_ce_i18n."'";
628
				}
629
	    		if ($not_in_langue) {
630
			    			$not_in_langue="'".$aso_valeurs['gm_ce_i18n']."'".",".$not_in_langue;
631
			    			$not_in_langue=' gi_id_i18n not in('.$not_in_langue.$end.')';
632
			    }
633
	    		else {
634
	    			$not_in_langue="gi_id_i18n not in('".$aso_valeurs['gm_ce_i18n']."')";
635
	    		}
636
	    }
637
 
638
 
639
		$resultat->free();
640
 
641
    	$requete =  "SELECT * FROM gen_i18n where ".$not_in_langue;
642
 
643
    	/*$requete =  'SELECT * '.
644
        	        'FROM gen_i18n ';*/
645
 
646
        $resultat = $db->query($requete);
647
    	(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
648
 
649
    	$aso_options = array();
650
        while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ) {
651
        	$aso_options[$ligne->gi_id_i18n] = $ligne->gi_id_i18n;
652
        }
653
        $resultat->free();
654
    	$id = 'gs_ce_i18n';
655
    	$aso_attributs = array('id' => $id, 'tabindex' => $tab_index++);
656
    	$label = '<label for="'.$id.'">'.'Langue : '.'</label>';
657
    	$form->addElement('select', $id, $label, $aso_options, $aso_attributs);
658
    }
659
 
660
 
661
 
662
 
663
 
7 jpm 664
    $id = 'gm_application_arguments';
665
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 666
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_APPLI_ARGUMENT.'</label>';
7 jpm 667
    $form->addElement('text', $id, $label, $aso_attributs);
668
 
669
    $partie_menu_fin = '</ul>'."\n".'</fieldset>'."\n";
670
    $form->addElement('html', $partie_menu_fin);
671
 
150 jpm 672
    $partie_entete_debut = '<fieldset>'."\n".'<legend>'.ADME_LG_FORM_MENU_COMMUN_TITRE_ENTETE.'</legend>'."\n".'<ul>'."\n";
7 jpm 673
    $form->addElement('html', $partie_entete_debut);
674
 
675
    $id = 'gm_robot';
150 jpm 676
    $aso_options = array(   'index,follow' => ADME_LG_FORM_MENU_INDEX_FOLLOW,
677
                            'index' => ADME_LG_FORM_MENU_INDEX,
678
                            'noindex' => ADME_LG_FORM_MENU_NOINDEX,
679
                            'noindex,nofollow' => ADME_LG_FORM_MENU_NOINDEX_NOFOLLOW,
680
                            '' => ADME_LG_FORM_MENU_INDEX_VIDE);
7 jpm 681
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 682
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ROBOT.'</label>';
7 jpm 683
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
684
 
685
    $id = 'gm_titre';
686
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 687
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TITRE.'</label>';
7 jpm 688
    $form->addElement('text', $id, $label, $aso_attributs);
689
 
690
    $id = 'gm_titre_alternatif';
691
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 692
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TITRE_ALTERNATIF.'</label>';
7 jpm 693
    $form->addElement('text', $id, $label, $aso_attributs);
694
 
695
    $id = 'gm_mots_cles';
696
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 50);
150 jpm 697
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_MOT_CLE.'</label>';
7 jpm 698
    $form->addElement('textarea', $id, $label, $aso_attributs);
699
 
700
    $id = 'gm_description_libre';
701
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
150 jpm 702
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DESCRIPTION.'</label>';
7 jpm 703
    $form->addElement('textarea', $id, $label, $aso_attributs);
704
 
705
    $id = 'gm_description_table_matieres';
706
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);
150 jpm 707
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TABLE_MATIERE.'</label>';
7 jpm 708
    $form->addElement('textarea', $id, $label, $aso_attributs);
709
 
710
    $id = 'gm_source';
711
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 712
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_SOURCE.'</label>';
7 jpm 713
    $form->addElement('text', $id, $label, $aso_attributs);
714
 
715
    $id = 'gm_auteur';
716
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 717
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_AUTEUR.'</label>';
7 jpm 718
    $form->addElement('text', $id, $label, $aso_attributs);
719
 
720
    $id = 'gm_contributeur';
721
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);
150 jpm 722
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CONTRIBUTEUR.'</label>';
7 jpm 723
    $form->addElement('textarea', $id, $label, $aso_attributs);
724
 
725
    $id = 'gm_editeur';
382 jpm 726
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 65000);
150 jpm 727
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_EDITEUR.'</label>';
382 jpm 728
    $form->addElement('text', $id, $label, $aso_attributs);
7 jpm 729
 
317 jpm 730
    $id = 'gm_date_creation';
731
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
732
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_CREATION.'</label>';
733
    $form->addElement('text', $id, $label, $aso_attributs);
734
 
7 jpm 735
    $id = 'gm_date_debut_validite';
736
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 737
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_VALIDITE_DEBUT.'</label>';
7 jpm 738
    $form->addElement('text', $id, $label, $aso_attributs);
739
 
740
    $id = 'gm_date_fin_validite';
741
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 742
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_VALIDITE_FIN.'</label>';
7 jpm 743
    $form->addElement('text', $id, $label, $aso_attributs);
744
 
745
    $id = 'gm_date_copyright';
746
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);
150 jpm 747
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_DATE_COPYRIGHT.'</label>';
7 jpm 748
    $form->addElement('text', $id, $label, $aso_attributs);
749
 
750
    $id = 'gm_licence';
751
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 752
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_URL_LICENCE.'</label>';
7 jpm 753
    $form->addElement('text', $id, $label, $aso_attributs);
754
 
755
    $id = 'gm_categorie';
756
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 757
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_CATEGORIE.'</label>';
7 jpm 758
    $form->addElement('text', $id, $label, $aso_attributs);
759
 
760
    $id = 'gm_public';
761
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);
150 jpm 762
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_PUBLIC.'</label>';
7 jpm 763
    $form->addElement('text', $id, $label, $aso_attributs);
764
 
765
    $id = 'gm_public_niveau';
766
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 25, 'maxlength' => 45);
150 jpm 767
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_PUBLIC_NIVEAU.'</label>';
7 jpm 768
    $form->addElement('text', $id, $label, $aso_attributs);
769
 
770
    $id = 'gm_ce_type_portee_spatiale';
150 jpm 771
    $aso_options = array(   '' => ADME_LG_FORM_MENU_ZG_VIDE,
772
                            'iso3166' => ADME_LG_FORM_MENU_ZG_ISO,
773
                            'Point' => ADME_LG_FORM_MENU_ZG_POINT,
774
                            'Box' => ADME_LG_FORM_MENU_ZG_DC,
775
                            'TGN' => ADME_LG_FORM_MENU_ZG_GTGN);
7 jpm 776
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 777
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ZG_TYPE.'</label>';
7 jpm 778
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
779
 
780
    $id = 'gm_portee_spatiale';
781
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 782
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_ZG_VALEUR.'</label>';
7 jpm 783
    $form->addElement('text', $id, $label, $aso_attributs);
784
 
785
    $id = 'gm_ce_type_portee_temporelle';
150 jpm 786
    $aso_options = array(   '' => ADME_LG_FORM_MENU_TMP_VIDE,
787
                            'W3CDTF' => ADME_LG_FORM_MENU_TMP_W3C,
788
                            'Period' => ADME_LG_FORM_MENU_TMP_DC);
7 jpm 789
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
150 jpm 790
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TMP_TYPE.'</label>';
7 jpm 791
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
792
 
793
    $id = 'gm_portee_temporelle';
794
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);
150 jpm 795
    $label = '<label for="'.$id.'">'.ADME_LG_FORM_MENU_TMP_VALEUR.'</label>';
7 jpm 796
    $form->addElement('text', $id, $label, $aso_attributs);
797
 
798
    $partie_entete_fin = '</ul>'."\n".'</fieldset>'."\n";
799
    $form->addElement('html', $partie_entete_fin);
818 ddelon 800
 
801
	if (!isset($aso_valeurs[ADME_LG_ACTION_COMMUN_VERIFIER]) && !isset($aso_valeurs[ADME_LG_ACTION_COMMUN_VERIFIER_TRADUCTION])) {
7 jpm 802
 
818 ddelon 803
    	// Requete pour connaitre les informations sur l'administrateur ayant fait la dernière modif
804
    	$requete_admin =    'SELECT * '.
805
        	                'FROM gen_annuaire '.
806
            	            'WHERE ga_id_administrateur = '.$aso_valeurs['gm_ce_admin'];
807
    	$resultat_admin = $db->query($requete_admin);
808
    	if (DB::isError($resultat_admin)) {
809
        	die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_admin->getMessage(), $requete_admin));
810
    	}
811
    	$ligne_admin = $resultat_admin->fetchRow(DB_FETCHMODE_OBJECT);
812
    	$info_admin =   '<p class="info">Dernière modification par '.$ligne_admin->ga_prenom.' '.$ligne_admin->ga_nom.'</p>';
813
    	$form->addElement('html', $info_admin);
814
	}
378 jpm 815
 
7 jpm 816
    $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
817
    $form->addElement('html', $liste_bouton_debut);
818
 
818 ddelon 819
    if ($traduction) {
820
    	$form->addElement('submit', ADME_LG_ACTION_COMMUN_VERIFIER_TRADUCTION, ADME_LG_FORM_MENU_VALIDER);
821
		$form->addElement('hidden', 'adme_site_id', $adme_site_id);
822
    }
823
    else {
824
    	$form->addElement('submit', ADME_LG_ACTION_COMMUN_VERIFIER, ADME_LG_FORM_MENU_VALIDER);
825
    }
826
 
150 jpm 827
    $bouton_annuler = '<li><a class="bouton" href="'.$url->getURL().'" title="'.ADME_LG_FORM_MENU_ANNULER.'" >'.ADME_LG_FORM_MENU_ANNULER.'</a>'.'</li>'."\n";
7 jpm 828
    $form->addElement('html', $bouton_annuler);
829
 
830
    $liste_bouton_fin = '</ul>'."\n";
831
    $form->addElement('html', $liste_bouton_fin);
832
 
150 jpm 833
    $form->addElement('hidden', 'gm_id_menu', $aso_valeurs['gm_id_menu']);
834
 
134 jpm 835
    $form->setDefaults($aso_valeurs);
7 jpm 836
 
837
    // Note de fin de formulaire
150 jpm 838
    $form->setRequiredNote(ADME_LG_FORM_TXT_CHP_OBLIGATOIRE);
7 jpm 839
 
134 jpm 840
    $retour .= $form->toHTML()."\n";
841
    return $retour;
7 jpm 842
}
843
 
134 jpm 844
/** Fonction ADME_validerFormAjouterMenuCommun() - Valide les données issues du formulaire pour gen_menu.
845
*
846
* Cette fonction valide les données à ajouter dans la table gen_menu.
847
*
155 jpm 848
* @param  PEAR:DB   l'objet pear de connexion à la base de données.
134 jpm 849
* @param  string   le tableau contenant les valeurs du formulaire.
850
* @return string   retourne les messages d'erreurs sinon rien.
851
*/
852
function ADME_validerFormAjouterMenuCommun($db, $aso_valeurs)
853
{
854
    $message = '';
150 jpm 855
    if ($aso_valeurs['gm_code_alpha'] == '') {
856
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_ALPHA.'</p>';
134 jpm 857
    }
150 jpm 858
    if ($aso_valeurs['gm_code_num'] == '') {
859
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_NUM.'</p>';
134 jpm 860
    }
150 jpm 861
    if ($aso_valeurs['gm_nom'] == '') {
862
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_NOM.'</p>';
863
    }
864
    if ($aso_valeurs['gm_description_resume'] == '') {
865
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_INFO_BULLE.'</p>';
866
    }
134 jpm 867
    return $message;
868
}
869
 
818 ddelon 870
 
871
/** Fonction ADME_validerFormTraduireMenuCommun() - Valide les données issues du formulaire de traduction de menu
872
*
873
* Cette fonction valide les données à ajouter dans la table gen_menu.
874
*
875
* @param  PEAR::DB   l'objet pear de connexion à la base de données.
876
* @param  string   le tableau contenant les valeurs du formulaire.
877
* @return string   retourne les messages d'erreurs sinon rien.
878
*/
879
function ADME_validerFormTraduireMenuCommun($db, $aso_valeurs)
880
{
881
    $message = '';
882
    if ($aso_valeurs['gm_code_alpha'] == '') {
883
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_ALPHA.'</p>';
884
    }
885
    if ($aso_valeurs['gm_code_num'] == '') {
886
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_CODE_NUM.'</p>';
887
    }
888
    if ($aso_valeurs['gm_nom'] == '') {
889
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_NOM.'</p>';
890
    }
891
    if ($aso_valeurs['gm_description_resume'] == '') {
892
        $message .= '<p class="pap_erreur">'.ADME_LG_FORM_MENU_REGLE_INFO_BULLE.'</p>';
893
    }
894
    return $message;
895
}
896
 
897
 
134 jpm 898
/** Fonction ADME_modifierMenuCommun() - Met à jour les infos d'un menu commun
899
*
900
* Fonction modifiant un menu commun à Papyrus.
901
*
902
* @param object objet Pear de connection à la base de données.
903
* @param object objet Pear représentant l'authentification.
904
* @param integer l'identifiant du menu à administrer.
905
* @param array le tableau des valeurs à modifier.
906
* @return void les changement sont fait dans la base de données.
907
*/
150 jpm 908
function ADME_modifierMenuCommun($db, $auth, $adme_menu_id, $aso_valeurs)
134 jpm 909
{
910
    $requete =  'UPDATE gen_menu SET '.
317 jpm 911
                'gm_ce_application = '.$aso_valeurs['gm_ce_application'].', '.
912
                'gm_application_arguments = "'.$aso_valeurs['gm_application_arguments'].'", '.
913
                'gm_fichier_squelette = "'.$aso_valeurs['gm_fichier_squelette'].'", '.
914
                'gm_code_num = '.$aso_valeurs['gm_code_num'].', '.
915
                'gm_code_alpha = "'.$aso_valeurs['gm_code_alpha'].'", '.
916
                'gm_nom = "'.$aso_valeurs['gm_nom'].'", '.
917
                'gm_raccourci_clavier = "'.$aso_valeurs['gm_raccourci_clavier'].'", '.
918
                'gm_robot = "'.$aso_valeurs['gm_robot'].'", '.
919
                'gm_titre = "'.$aso_valeurs['gm_titre'].'", '.
920
                'gm_titre_alternatif = "'.$aso_valeurs['gm_titre_alternatif'].'", '.
921
                'gm_mots_cles = "'.$aso_valeurs['gm_mots_cles'].'", '.
922
                'gm_description_libre = "'.$aso_valeurs['gm_description_libre'].'", '.
923
                'gm_description_resume = "'.$aso_valeurs['gm_description_resume'].'", '.
924
                'gm_description_table_matieres = "'.$aso_valeurs['gm_description_table_matieres'].'", '.
925
                'gm_source = "'.$aso_valeurs['gm_source'].'", '.
926
                'gm_auteur = "'.$aso_valeurs['gm_auteur'].'", '.
927
                'gm_contributeur = "'.$aso_valeurs['gm_contributeur'].'", '.
928
                'gm_editeur = "'.$aso_valeurs['gm_editeur'].'", '.
929
                'gm_date_creation = "'.$aso_valeurs['gm_date_creation'].'", '.
930
                'gm_date_debut_validite = "'.$aso_valeurs['gm_date_debut_validite'].'", '.
931
                'gm_date_fin_validite = "'.$aso_valeurs['gm_date_fin_validite'].'", '.
932
                'gm_date_copyright = "'.$aso_valeurs['gm_date_copyright'].'", '.
933
                'gm_licence = "'.$aso_valeurs['gm_licence'].'", '.
934
                'gm_categorie = "'.$aso_valeurs['gm_categorie'].'", '.
935
                'gm_public = "'.$aso_valeurs['gm_public'].'", '.
936
                'gm_public_niveau = "'.$aso_valeurs['gm_public_niveau'].'", '.
937
                'gm_portee_spatiale = "'.$aso_valeurs['gm_portee_spatiale'].'", '.
938
                'gm_portee_temporelle = "'.$aso_valeurs['gm_portee_temporelle'].'", '.
134 jpm 939
                'gm_ce_admin = "'.$auth->getAuthData('ga_id_administrateur').'" '.
940
                'WHERE gm_id_menu = '.$adme_menu_id;
941
 
942
    $resultat = $db->query($requete);
943
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
944
}
945
 
946
/** Fonction ADME_deplacerMenuCommun() - Permet de déplacer un menu dans la hiérarchie.
947
*
948
* Permet de déplacer un menu dans la hiérarchie des menus communs.
949
* Ancien nom : moveUpper()
950
*
951
* @param  PEAR::DB objet Pear DB de connexion à la base de données.
155 jpm 952
* @param  integer   identifiant du site administré.
134 jpm 953
* @param  integer  identifiant du menu à déplacer.
954
* @param  boolean  indique si on veut monter le menu (true) ou le descendre (false).
955
* @return void     modifie la base de données.
956
*/
957
function ADME_deplacerMenuCommun($db, $adme_site_id, $adme_menu_id, $bln_monter)
958
{
959
    //-------------------------------------------------------------------------------------------------------------------
960
    // Récupération d'informations sur les relations du menu courant.
961
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $adme_menu_id, '1'); // 1 = relation "avoir père"
962
    if ($ligne_menu_courant_relation == false) {
150 jpm 963
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU_RELATION.'<br />'.
134 jpm 964
            'Identifiant menu : '. $adme_menu_id .'<br />'.
965
            'Identifiant valeur relation : 1 <br />'.
966
            'Ligne n° : '. __LINE__ .'<br />'.
967
            'Fichier n° : '. __FILE__ .'<br />');
968
    }
969
 
970
    $id_pere = GEN_lireIdentifiantMenuPere($adme_menu_id);
249 jpm 971
    if ($id_pere === false) {
150 jpm 972
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_ID_MENU_PERE.'<br />'.
134 jpm 973
            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
974
            'Ligne n° : '. __LINE__ .'<br />'.
975
            'Fichier n° : '. __FILE__ .'<br />');
976
    }
977
 
978
    //-------------------------------------------------------------------------------------------------------------------
979
    // Recherche d'information hiérarchiques sur le menu précédent ou suivant le menu courant
980
    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
981
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
982
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
983
                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
984
                'AND gm_ce_site = 0 '.// les menus communs ne sont pas liés à un site!
985
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
986
                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
987
                'AND GMR01.gmr_id_valeur = 1 ';// 1 = relation menu "père"
988
    if ($bln_monter) {
989
        $requete .= 'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
990
                    'ORDER BY GMR01.gmr_ordre DESC';
991
    } else {
992
        $requete .= 'AND GMR01.gmr_ordre > '.$ligne_menu_courant_relation->gmr_ordre.' '.
993
                    'ORDER BY GMR01.gmr_ordre ASC';
994
    }
995
 
996
    $resultat_menu = $db->query($requete);
997
    (DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
998
 
999
    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
1000
    $resultat_menu->free();
1001
 
1002
    //-------------------------------------------------------------------------------------------------------------------
1003
    // Si la requete ne retourne rien nous ne faisons rien.
1004
    if (! $ligne_menu) {
1005
        return null;
1006
    }
1007
 
1008
    //-------------------------------------------------------------------------------------------------------------------
1009
    // Mise à jour des relations hiérarchiques du menu courant
1010
    $requete =  'UPDATE gen_menu_relation SET '.
1011
                'gmr_ordre = '.$ligne_menu->nouvel_ordre.' '.
1012
                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
1013
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
1014
 
1015
    $resultat = $db->query($requete);
1016
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1017
 
1018
    //-------------------------------------------------------------------------------------------------------------------
1019
    // Mise à jour des relations hiérarchiques du menu précédent ou suivant
1020
    $requete =  'UPDATE gen_menu_relation SET '.
1021
                'gmr_ordre = '.$ligne_menu_courant_relation->gmr_ordre.' '.
1022
                'WHERE gmr_id_menu_01 = '.$ligne_menu->id_menu_remplace.' '.
1023
                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
1024
 
1025
    $resultat = $db->query($requete);
1026
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1027
}
1028
 
818 ddelon 1029
/** Fonction ADME_traduireMenuCommun() - Permet de traduire un menu commin
1030
*
1031
* Permet de traduire un menu commun
1032
*
1033
* @param  mixed   objet Pear DB de connexion à la base de données.
1034
* @param  integer  identifiant du site administré.
1035
* @param  integer identifiant du menu à déplacer.
1036
* @return void    modifie la base de données.
1037
*/
1038
function ADME_traduireMenuCommun($db, $auth, $adme_menu_id, $aso_valeurs) {
1039
 
1040
 
1041
    // Récupération d'infos sur le site principal.
1042
    $objet_site = GEN_lireInfoSitePrincipal($db, $aso_valeurs['adme_site_id']);
1043
    if ($objet_site == false) {
1044
        die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.
1045
            'ID du site : '.$aso_valeurs['adme_site_id'].'<br />'.
1046
            'Ligne n° : '. __LINE__ .'<br />'.
1047
            'Fichier n° : '. __FILE__ .'<br />');
1048
    }
1049
 
1050
    $nouveau_id_menu = SQL_obtenirNouveauId($db, 'gen_menu', 'gm_id_menu');
1051
    $auteur = $auth->getAuthData('ga_prenom').' '.$auth->getAuthData('ga_nom');
1052
 
1053
 
1054
 
1055
      $requete =  'INSERT INTO gen_menu '.
1056
                'SET gm_id_menu = '.$nouveau_id_menu.', '.
1057
                'gm_ce_site = '.$aso_valeurs['adme_site_id'].', '.
1058
                'gm_ce_i18n = "'.$aso_valeurs['gs_ce_i18n'].'", '.
1059
                'gm_ce_application = '.$aso_valeurs['gm_ce_application'].', '.
1060
                'gm_application_arguments = "'.$aso_valeurs['gm_application_arguments'].'", '.
1061
                'gm_fichier_squelette = "'.$aso_valeurs['gm_fichier_squelette'].'", '.
1062
                'gm_code_num = '.$aso_valeurs['gm_code_num'].', '.
1063
                'gm_code_alpha = "'.$aso_valeurs['gm_code_alpha'].'", '.
1064
                'gm_nom = "'.$aso_valeurs['gm_nom'].'", '.
1065
                'gm_raccourci_clavier = "'.$aso_valeurs['gm_raccourci_clavier'].'", '.
1066
                'gm_robot = "'.$aso_valeurs['gm_robot'].'", '.
1067
                'gm_titre = "'.$aso_valeurs['gm_titre'].'", '.
1068
                'gm_titre_alternatif = "'.$aso_valeurs['gm_titre_alternatif'].'", '.
1069
                'gm_mots_cles = "'.$aso_valeurs['gm_mots_cles'].'", '.
1070
                'gm_description_libre = "'.$aso_valeurs['gm_description_libre'].'", '.
1071
                'gm_description_resume = "'.$aso_valeurs['gm_description_resume'].'", '.
1072
                'gm_description_table_matieres = "'.$aso_valeurs['gm_description_table_matieres'].'", '.
1073
                'gm_source = "'.$aso_valeurs['gm_source'].'", '.
1074
                'gm_auteur = "'.$aso_valeurs['gm_auteur'].'", '.
1075
                'gm_contributeur = "'.$aso_valeurs['gm_contributeur'].'", '.
1076
                'gm_editeur = "'.$aso_valeurs['gm_editeur'].'", '.
1077
                'gm_date_creation = "'.$aso_valeurs['gm_date_creation'].'", '.
1078
                'gm_date_debut_validite = "'.$aso_valeurs['gm_date_debut_validite'].'", '.
1079
                'gm_date_fin_validite = "'.$aso_valeurs['gm_date_fin_validite'].'", '.
1080
                'gm_date_copyright = "'.$aso_valeurs['gm_date_copyright'].'", '.
1081
                'gm_licence = "'.$aso_valeurs['gm_licence'].'", '.
1082
                'gm_categorie = "'.$aso_valeurs['gm_categorie'].'", '.
1083
                'gm_public = "'.$aso_valeurs['gm_public'].'", '.
1084
                'gm_public_niveau = "'.$aso_valeurs['gm_public_niveau'].'", '.
1085
                'gm_ce_type_portee_spatiale = "'.$aso_valeurs['gm_ce_type_portee_spatiale'].'", '.
1086
                'gm_portee_spatiale = "'.$aso_valeurs['gm_portee_spatiale'].'", '.
1087
                'gm_ce_type_portee_temporelle = "'.$aso_valeurs['gm_ce_type_portee_temporelle'].'", '.
1088
                'gm_portee_temporelle = "'.$aso_valeurs['gm_portee_temporelle'].'", '.
1089
                'gm_ce_admin = "'.$auth->getAuthData('ga_id_administrateur').'" ';
1090
 
1091
    $resultat = $db->query($requete);
1092
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1093
 
1094
    //----------------------------------------------------------------------------
1095
    // Ajout de la relation traduction
1096
 
1097
    if (!isset($adme_menu_id) && empty($adme_menu_id)) {
1098
        $adme_menu_id = 0 ;// Identifiant du père
1099
    }
1100
    //----------------------------------------------------------------------------
1101
    // Récupération d'infos sur la hierarchie du menu
1102
    $requete =  'SELECT GMR01.gmr_ordre '.
1103
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
1104
                'WHERE GMR01.gmr_id_menu_02 = '.$adme_menu_id.' '.
1105
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
1106
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
1107
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
1108
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
1109
                'ORDER BY GMR01.gmr_ordre DESC';
1110
 
1111
    $resultat = $db->query($requete);
1112
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1113
 
1114
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
1115
    $nouveau_ordre_menu = $ligne->gmr_ordre + 1;
1116
    $resultat->free();
1117
 
1118
 
1119
    // Traduction :
1120
    $requete =  'INSERT INTO gen_menu_relation '.
1121
                'SET gmr_id_menu_01 = '.$adme_menu_id.', '.
1122
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
1123
                'gmr_id_valeur = 2, '. // Avoir traduction
1124
                'gmr_ordre = '.$nouveau_ordre_menu;
1125
 
1126
 
1127
    $resultat = $db->query($requete);
1128
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1129
 
1130
    //----------------------------------------------------------------------------
1131
    // Ajout de la relation-type "menu commun"
1132
 
1133
    // Récupération d'infos sur la hierarchie du menu
1134
    $requete =  'SELECT * '.
1135
                'FROM gen_menu_relation, gen_menu '.
1136
                'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.
1137
                'AND gmr_id_valeur = 102 '.// 102 = type menu "commun"
1138
                'AND gmr_id_menu_01 = gm_id_menu '.
1139
                'AND gm_ce_site = '.$aso_valeurs['adme_site_id'].' '.
1140
                'ORDER BY gmr_ordre DESC';
1141
 
1142
    $resultat = $db->query($requete);
1143
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1144
 
1145
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
1146
    $nouveau_ordre_menu_commun = $ligne->gmr_ordre + 1;
1147
    $resultat->free();
1148
 
1149
    $requete =  'INSERT INTO gen_menu_relation '.
1150
                'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.
1151
                'gmr_id_menu_02 = '.$nouveau_id_menu.', '.
1152
                'gmr_id_valeur = 102, '.
1153
                'gmr_ordre = '.$nouveau_ordre_menu_commun;
1154
 
1155
    $result = $db->query($requete);
1156
    (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
1157
 
1158
}
1159
 
1160
 
422 ddelon 1161
function ADME_indenterMenuCommun($db, $adme_site_id, $adme_menu_id, $bln_diminuer) {
1162
 
1163
    //-------------------------------------------------------------------------------------------------------------------
1164
    // Récupération d'information sur le site de ce menu.
1165
    $objet_site = GEN_lireInfoSitePrincipal($db, $adme_site_id);
1166
 
1167
    if ($objet_site == false) {
1168
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_SITE.'<br />'.
1169
            'Id du site : '. $adme_site_id .'<br />'.
1170
            'Ligne n° : '. __LINE__ .'<br />'.
1171
            'Fichier n° : '. __FILE__ .'<br />');
1172
    }
1173
 
1174
    //-------------------------------------------------------------------------------------------------------------------
1175
    // Récupération d'informations sur les relations du menu courant.
1176
    $ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $adme_menu_id, '1');
1177
    if ($ligne_menu_courant_relation == false) {
1178
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU_RELATION.'<br />'.
1179
            'Identifiant menu : '. $adme_menu_id .'<br />'.
1180
            'Identifiant valeur relation : 1 <br />'.
1181
            'Ligne n° : '. __LINE__ .'<br />'.
1182
            'Fichier n° : '. __FILE__ .'<br />');
1183
    }
1184
 
1185
 
1186
 
1187
    //-------------------------------------------------------------------------------------------------------------------
1188
    // Récupération de l'identifiant du menu pére
1189
 
1190
    $id_pere = GEN_lireIdentifiantMenuPere($adme_menu_id);
1191
    if ($id_pere === false) {
1192
        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_ID_MENU_PERE.'<br />'.
1193
            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
1194
            'Ligne n° : '. __LINE__ .'<br />'.
1195
            'Fichier n° : '. __FILE__ .'<br />');
1196
    }
1197
 
1198
	if ($bln_diminuer) {
1199
 
1200
	    // Diminution d'un niveau
1201
 
1202
	    if ($id_pere) {
1203
 
1204
			 // Récupération de l'identifiant du menu grand pére, sera le nouveau pere
1205
 
1206
		    $id_grand_pere = GEN_lireIdentifiantMenuPere($id_pere);
1207
 
1208
		    if ($id_grand_pere === false) {
1209
		        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_ID_MENU_PERE.'<br />'.
1210
		            'Identifiant menu fils : '. $adme_menu_id .'<br />'.
1211
		            'Ligne n° : '. __LINE__ .'<br />'.
1212
		            'Fichier n° : '. __FILE__ .'<br />');
1213
		    }
1214
 
1215
		    // Récupération d'informations sur les relations du menu pere
1216
 
1217
		    $ligne_menu_pere_relation = GEN_lireInfoMenuRelation($db, $id_pere, '1');
1218
 
1219
	    	if ($ligne_menu_pere_relation == false) {
1220
		        die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU_RELATION.'<br />'.
1221
		            'Identifiant menu : '. $adme_menu_id .'<br />'.
1222
		            'Identifiant valeur relation : 1 <br />'.
1223
		            'Ligne n° : '. __LINE__ .'<br />'.
1224
		            'Fichier n° : '. __FILE__ .'<br />');
1225
		    }
1226
 
1227
 
1228
		    //-------------------------------------------------------------------------------------------------------------------
1229
		    // Recherche d'information sur le menu suivant le menu pere
1230
		    //-------------------------------------------------------------------------------------------------------------------
1231
 
1232
		    $requete =  'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.
1233
	                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
1234
	                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
1235
	                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
1236
	                'AND gm_ce_site = 0 '.// les menus communs ne sont pas liés à un site!
1237
	                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun""
1238
	                'AND GMR01.gmr_id_menu_02 = '.$id_grand_pere.' '.
1239
	                'AND GMR01.gmr_id_valeur = 1 '.// 1 = relation menu "père"
1240
				    'AND GMR01.gmr_ordre > '.$ligne_menu_pere_relation->gmr_ordre.' '.
1241
				    'ORDER BY GMR01.gmr_ordre DESC';
1242
 
1243
 
1244
		    $resultat_menu = $db->query($requete);
1245
 
1246
		    (DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
1247
 
1248
		    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
1249
		    $resultat_menu->free();
1250
 
1251
		    //-------------------------------------------------------------------------------------------------------------------
1252
		    // Si la requete ne retourne rien nous ne faisons rien.
1253
		    if (! $ligne_menu) {
1254
		        $no=$ligne_menu_pere_relation->gmr_ordre+1;
1255
		    }
1256
		    else {
1257
		    	$no=$ligne_menu->nouvel_ordre+1;
1258
		    }
1259
 
1260
			// Mise à jour pere menu courant
1261
		   	$requete =  'UPDATE gen_menu_relation SET '.
1262
		                'gmr_id_menu_02 =  '.$id_grand_pere.' ,'.
1263
		                'gmr_ordre = '.$no.' '.
1264
		                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
1265
		                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
1266
 
1267
			$resultat_update = $db->query($requete);
1268
		    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
1269
 
1270
 
1271
 
1272
	    }
1273
	}
1274
	else {
1275
 
1276
	    $requete =  'SELECT GMR01.gmr_id_menu_01 '.
1277
	                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
1278
	                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
1279
	                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
1280
	                'AND gm_ce_site = 0 '.// les menus communs ne sont pas liés à un site!
1281
	                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
1282
	                'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.
1283
	                'AND GMR01.gmr_id_valeur = 1 '.// 1 = relation menu "père"
1284
        			'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.
1285
                    'ORDER BY GMR01.gmr_ordre DESC';
1286
 
1287
	    $resultat_menu = $db->query($requete);
1288
    	(DB::isError($resultat_menu)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_menu->getMessage(), $requete)) : '';
1289
 
1290
	    $ligne_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
1291
	    $resultat_menu->free();
1292
	    //-------------------------------------------------------------------------------------------------------------------
1293
	    // Si la requete ne retourne rien nous ne faisons rien.
1294
	    if (! $ligne_menu) {
1295
	        return null;
1296
	    }
1297
 
1298
    	//----------------------------------------------------------------------------
1299
		// Recherche dernier fils
1300
 
1301
		$requete =  'SELECT GMR01.gmr_ordre '.
1302
                'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
1303
                'WHERE GMR01.gmr_id_menu_02 = '.$ligne_menu->gmr_id_menu_01.' '.
1304
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
1305
                'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
1306
                'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
818 ddelon 1307
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
422 ddelon 1308
                'ORDER BY GMR01.gmr_ordre DESC';
1309
 
1310
		$resultat = $db->query($requete);
1311
		(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1312
 
1313
		$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
1314
		$no = $ligne->gmr_ordre + 1;
1315
		$resultat->free();
1316
 
1317
 
1318
		// Mise à jour pere menu courant
1319
	   	$requete =  'UPDATE gen_menu_relation SET '.
1320
	                'gmr_id_menu_02 =  '.$ligne_menu->gmr_id_menu_01.' ,'.
1321
	                'gmr_ordre = '.$no.' '.
1322
	                'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.
1323
	                'AND gmr_id_valeur = 1';// 1 = relation menu "père"
1324
 
1325
		$resultat_update = $db->query($requete);
1326
	    (DB::isError($resultat_update)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_update->getMessage(), $requete)) : '';
1327
 
1328
 
1329
    }
1330
}
1331
 
1332
 
1333
 
1334
/** Fonction ADME_supprimerMenuCommun() - Supprime un menu commun.
134 jpm 1335
*
422 ddelon 1336
* Supprime de la base de données de Génésia toutes les traces du menu commun
134 jpm 1337
* passé en paramètre.
1338
* Ancien nom : deleteUpper()
1339
*
1340
* @param  PEAR::DB l'objet Pear DB de connexion à la base de données.
155 jpm 1341
* @param  integer   l'identifiant du menu à supprimer
422 ddelon 1342
* @return void     le menu commun est supprimé de la base de données.
134 jpm 1343
*/
1344
function ADME_supprimerMenuCommun($db, $id_menu_a_supprimer)
1345
{
1346
    //-------------------------------------------------------------------------------------------------------------------
1347
    // Y a t'il des sous_menus ?
1348
    $requete =    'SELECT COUNT(gm_id_menu) AS compte '.
1349
                'FROM gen_menu, gen_menu_relation '.
1350
                'WHERE gmr_id_menu_02 = '.$id_menu_a_supprimer.' '.
1351
                'AND gmr_id_valeur = 1 '.
1352
                'AND gmr_id_menu_01 = gm_id_menu ';
1353
 
1354
    $resultat = $db->query($requete);
1355
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1356
 
1357
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
1358
 
1359
    if ($ligne && ($ligne->compte > 0)) {
150 jpm 1360
        return ADME_LG_ERREUR_EXISTE_SOUS_MENU;
134 jpm 1361
    }
1362
 
1363
    //-------------------------------------------------------------------------------------------------------------------
155 jpm 1364
    // Mise à jour de l'ordre des menus
1365
    $ligne_menu_supr_relation = GEN_lireInfoMenuRelation($db, $id_menu_a_supprimer, '1'); // 1 = relation "avoir père"
1366
    $requete =  'SELECT GMR01.gmr_id_menu_01, GMR01.gmr_ordre '.
1367
                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
1368
                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
1369
                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
1370
                'AND gm_ce_site = 0 '.// les menus communs ne sont pas liés à un site!
1371
                'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"
1372
                'AND GMR01.gmr_id_menu_02 = '.$ligne_menu_supr_relation->gmr_id_menu_02.' '.
1373
                'AND GMR01.gmr_id_valeur = 1 '.// 1 = relation menu "père"
1374
                'AND GMR01.gmr_ordre > '.$ligne_menu_supr_relation->gmr_ordre.' '.
1375
                'ORDER BY GMR01.gmr_ordre ASC';
1376
    $resultat = $db->query($requete);
1377
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
1378
        // Mise à jour des relations hiérarchiques du menu courant
1379
        $requete_maj =  'UPDATE gen_menu_relation SET '.
1380
                        'gmr_ordre = '.($ligne->gmr_ordre - 1).' '.
1381
                        'WHERE gmr_id_menu_01 = '.$ligne->gmr_id_menu_01.' '.
1382
                        'AND gmr_id_valeur = 1';// 1 = relation menu "père"
1383
 
1384
        $resultat_maj = $db->query($requete_maj);
1385
        (DB::isError($resultat_maj)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_maj->getMessage(), $requete_maj)) : '';
1386
    }
1387
    $resultat->free();
1388
 
1389
    //-------------------------------------------------------------------------------------------------------------------
134 jpm 1390
    // S'il n'y a plus de sous niveau, on supprime le menu
1391
    $requete =  'DELETE FROM gen_menu '.
1392
                'WHERE gm_id_menu = '.$id_menu_a_supprimer;
1393
 
1394
    $resultat = $db->query($requete);
1395
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1396
 
1397
    //-------------------------------------------------------------------------------------------------------------------
1398
    // Puis on supprime les relations de ce menu
1399
    $requete =  'DELETE FROM gen_menu_relation '.
1400
                'WHERE gmr_id_menu_01 = '.$id_menu_a_supprimer;
1401
 
1402
    $resultat = $db->query($requete);
1403
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
155 jpm 1404
 
818 ddelon 1405
 
1406
 
1407
	 // Suppression du contenu !!!!
1408
 
1409
    $requete =  'DELETE FROM gen_menu_contenu '.
1410
                'WHERE truncate((gmc_ce_type_contenu/10),0)= '.$id_menu_a_supprimer.' '.
1411
                'AND gmc_ce_menu = '.$code_menu['gm_code_num'];
1412
 
1413
    $resultat = $db->query($requete);
1414
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1415
 
1416
 
1417
 
134 jpm 1418
}
1419
 
1420
 
818 ddelon 1421
/** Fonction ADME_supprimerMenuCommunTraduction() - Supprime une traduction de menu commun.
1422
*
1423
* Supprime de la base de données de Papyrus toutes les traces du menu commun
1424
* passé en paramètre.
1425
* Ancien nom : deleteMenu()
1426
*
1427
* @param  mixed  l'objet Pear DB de connexion à la base de données.
1428
* @param  integer l'identifiant du site du menu à supprimer
1429
* @param  integer l'identifiant du menu à supprimer
1430
* @return void   le menu commun est supprimé de la base de données.
1431
*/
1432
function ADME_supprimerMenuCommunTraduction($db, $adme_id_site, $id_menu_a_supprimer)
1433
{
1434
 
1435
 
1436
	$code_menu = GEN_lireInfoMenu($db, $id_menu_a_supprimer, DB_FETCHMODE_ASSOC);
1437
 
1438
 
1439
    if ($code_menu === false) {
1440
            die('ERREUR Papyrus Administrateur de Menus : '.ADME_LG_ERREUR_INFO_MENU.'<br />'.
1441
                'Idenitifiant du menu n° : '. $id_menu_a_supprimer .'<br />'.
1442
                'Ligne n° : '. __LINE__ .'<br />'.
1443
                'Fichier n° : '. __FILE__ .'<br />');
1444
     }
1445
 
1446
 
1447
 
1448
    $requete =  'DELETE FROM gen_menu '.
1449
                'WHERE gm_id_menu = '.$id_menu_a_supprimer;
1450
 
1451
    $resultat = $db->query($requete);
1452
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1453
 
1454
    //----------------------------------------------------------------------------
1455
    // Puis on supprime les relations de ce menu
1456
    $requete =  'DELETE FROM gen_menu_relation '.
1457
                'WHERE gmr_id_menu_01 = '.$id_menu_a_supprimer;
1458
 
1459
    $resultat = $db->query($requete);
1460
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1461
 
1462
        //----------------------------------------------------------------------------
1463
    // Puis on supprime les relations de ce menu
1464
    $requete =  'DELETE FROM gen_menu_relation '.
1465
                'WHERE gmr_id_menu_02 = '.$id_menu_a_supprimer;
1466
 
1467
    $resultat = $db->query($requete);
1468
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1469
 
1470
 
1471
 
1472
	 // Suppression du contenu !!!!
1473
 
1474
    $requete =  'DELETE FROM gen_menu_contenu '.
1475
                'WHERE truncate((gmc_ce_type_contenu/10),0)= '.$id_menu_a_supprimer.' '.
1476
                'AND gmc_ce_menu = '.$code_menu['gm_code_num'];
134 jpm 1477
 
818 ddelon 1478
 
1479
 
1480
    $resultat = $db->query($requete);
1481
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
1482
 
1483
 
1484
}
1485
 
1486
 
877 ddelon 1487
/** Fonction ADME_selectionnerMenuCommunTraduction()() Selection un menu classique comme traduction par defaut
1488
*
1489
*
1490
* @param  mixed  l'objet Pear DB de connexion à la base de données.
1491
* @param  integer l'identifiant du site du menu à supprimer
1492
* @param  integer l'identifiant du menu à supprimer
1493
* @return void   le menu classique est supprimé de la base de données.
1494
*/
1495
function ADME_selectionnerMenuCommunTraduction($db, $adme_id_site, $id_menu)
1496
{
1497
 
1498
	// 1 : Rechercher traduction parente : si presente on est dans une traduc. si absente on
1499
	// est dans un menu traduit.
1500
 
1501
 
1502
	$requete_origine_traduction  =  'SELECT gmr_id_menu_01 '.
1503
        	        				'FROM gen_menu_relation, gen_menu '.
1504
            	    				'WHERE gmr_id_menu_02  = ' . $id_menu .' '.
1505
				                	'AND gmr_id_valeur = 2  '; // 2 = "avoir traduction"
1506
 
1507
	$resultat_origine_traduction = $db->query($requete_origine_traduction) ;
1508
 
1509
	if (DB::isError($resultat_origine_traduction)) {
878 ddelon 1510
	    die( BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_origine_traduction->getMessage(), $requete_origine_traduction) );
877 ddelon 1511
	}
1512
 
1513
 
1514
	if ($resultat_origine_traduction->numRows() > 0) {
1515
		$ligne_origine_traduction = $resultat_origine_traduction->fetchRow(DB_FETCHMODE_OBJECT);
1516
		$id_menu_origine=$ligne_origine_traduction->gmr_id_menu_01;
1517
	}
1518
	else {
1519
		$id_menu_origine=$id_menu;
1520
	}
818 ddelon 1521
 
877 ddelon 1522
	$requete_suppression   = 'DELETE from gen_menu_relation '.
1523
						     'WHERE gmr_id_menu_01 = ' . $id_menu_origine . ' ' .
1524
						     'AND gmr_id_valeur=105 '; // 105  Traduction par defaut
818 ddelon 1525
 
877 ddelon 1526
    $resultat_suppression = $db->query($requete_suppression);
1527
    (DB::isError($resultat_suppression)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_suppression->getMessage(), $requete_suppression)) : '';
1528
 
1529
 
1530
	$requete_insertion   = 'INSERT into gen_menu_relation '.
1531
						     ' SET gmr_id_menu_01 = ' . $id_menu_origine . ', ' .
1532
						     ' gmr_id_menu_02 = ' . $id_menu . ', ' .
1533
						     ' gmr_id_valeur = 105' ;
1534
 
1535
    $resultat_insertion = $db->query($requete_insertion);
1536
    (DB::isError($resultat_insertion)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_insertion->getMessage(), $requete_insertion)) : '';
1537
 
1538
 
1539
 
1540
}
1541
 
1542
 
7 jpm 1543
// +------------------------------------------------------------------------------------------------------+
1544
// |                                            PIED du PROGRAMME                                         |
1545
// +------------------------------------------------------------------------------------------------------+
1546
 
1547
 
134 jpm 1548
 
7 jpm 1549
/* +--Fin du code ----------------------------------------------------------------------------------------+
1550
*
1551
* $Log: not supported by cvs2svn $
924 jp_milcent 1552
* Revision 1.23  2006/06/29 23:04:01  ddelon
1553
* Bug defaut traduction sur menu commun
1554
*
879 ddelon 1555
* Revision 1.22  2006/06/29 19:13:26  ddelon
1556
* Bug defaut traduction sur menu commun
1557
*
878 ddelon 1558
* Revision 1.21  2006/06/29 18:58:57  ddelon
1559
* Multilinguisme : menu par defaut pour les menu commun
1560
*
877 ddelon 1561
* Revision 1.20  2006/04/12 21:11:54  ddelon
1562
* Multilinguisme menus communs
1563
*
818 ddelon 1564
* Revision 1.19  2005/09/27 08:42:49  ddelon
1565
* Menu et Squelette
1566
*
466 ddelon 1567
* Revision 1.18  2005/07/18 16:14:32  ddelon
1568
* css admin + menu communs
1569
*
422 ddelon 1570
* Revision 1.17  2005/07/08 22:01:25  ddelon
1571
* Copyright
1572
*
410 ddelon 1573
* Revision 1.16  2005/05/26 16:13:08  jpm
1574
* Correction taille éditeur: passage en text
1575
*
380 jpm 1576
* Revision 1.14  2005/05/26 15:34:46  jpm
1577
* Ajout d'un espace.
1578
*
379 jpm 1579
* Revision 1.13  2005/05/26 08:54:20  jpm
1580
* Ajout info admin ayant fait la dernière modif.
1581
*
378 jpm 1582
* Revision 1.12  2005/04/19 16:47:16  jpm
1583
* Gestion des dates  de fin de validité des menus.
1584
*
346 jpm 1585
* Revision 1.11  2005/03/29 15:49:12  jpm
1586
* Ajout de la date de création dans le formulaire des menus.
1587
*
317 jpm 1588
* Revision 1.10  2005/02/28 11:05:06  jpm
1589
* Modification des auteurs.
1590
*
285 jpm 1591
* Revision 1.9  2005/01/24 11:28:09  jpm
1592
* Correction bogue.
1593
* Ajout d'un troisième = pour comparer le type.
1594
*
249 jpm 1595
* Revision 1.8  2004/12/01 16:47:28  jpm
1596
* Ajout d'une boite javascript de confirmation de suppression d'un menu.
1597
*
197 jpm 1598
* Revision 1.7  2004/11/15 16:51:12  jpm
1599
* Correction bogue de mise à jour de l'ordre des menus.
1600
*
155 jpm 1601
* Revision 1.6  2004/11/10 17:26:07  jpm
1602
* Fin gestion de la traduction.
1603
*
150 jpm 1604
* Revision 1.5  2004/11/09 17:48:35  jpm
1605
* Gestion de différentes interfaces d'administration.
1606
*
134 jpm 1607
* Revision 1.3  2004/09/23 17:45:13  jpm
1608
* Amélioration de la gestion des liens annuler et du selecteur de sites.
1609
*
56 jpm 1610
* Revision 1.2  2004/07/06 17:07:37  jpm
1611
* Modification de la documentation pour une mailleur analyse par PhpDocumentor.
1612
*
25 jpm 1613
* Revision 1.1  2004/06/16 15:04:32  jpm
1614
* Changement de nom de Génésia en Papyrus.
1615
* Changement de l'arborescence.
1616
*
7 jpm 1617
* Revision 1.10  2004/05/10 12:13:03  jpm
1618
* Modification des formulaires.
1619
*
1620
* Revision 1.9  2004/05/07 16:31:40  jpm
1621
* Amélioration du formulaire d'un menu commun.
1622
*
1623
* Revision 1.8  2004/05/07 09:56:52  jpm
1624
* Correction des noms de constantes d'images.
1625
*
1626
* Revision 1.7  2004/05/07 07:23:54  jpm
1627
* Amélioration du code, des commentaires et correction de bogues.
1628
*
1629
* Revision 1.6  2004/05/04 16:27:55  jpm
1630
* Amélioration gestion du déplacement des menus.
1631
*
1632
*
1633
* +-- Fin du code ----------------------------------------------------------------------------------------+
1634
*/
924 jp_milcent 1635
?>