WebSVN – Applications.papyrus – Diff – /trunk/papyrus/applications/admin_menu/bibliotheque/adme_menu_classique.fonct.php

 // |                                                                                                      |
 // | You should have received a copy of the GNU Lesser General Public                                     |
 // | License along with this library; if not, write to the Free Software                                  |
 // | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
 // +------------------------------------------------------------------------------------------------------+
-// CVS : $Id: adme_menu_classique.fonct.php,v 1.11 2004-11-10 19:41:14 jpm Exp $
+// CVS : $Id: adme_menu_classique.fonct.php,v 1.12 2004-11-15 16:51:12 jpm Exp $
 /**
 * Fonctions de gestion des menus classiques
+*
 * Permet de lister, d'ajouter, de modifier, et de déplacer des menus classiques.
 * Par menus classiques nous entendons tous les menus devant paraitre dans l'arborescences
 *@author        Laurent COUDOUNEAU <lc@gsite.org>
 //Autres auteurs :
 *@author        Alexandre GRANIER <alexandre@tela-botanica.org>
 *@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
 *@copyright     Tela-Botanica 2000-2004
-*@version       $Revision: 1.11 $ $Date: 2004-11-10 19:41:14 $
+*@version       $Revision: 1.12 $ $Date: 2004-11-15 16:51:12 $
 // +------------------------------------------------------------------------------------------------------+
 */
 // +------------------------------------------------------------------------------------------------------+
 * @param  object objet Pear de connection à la base de données.
 * @param  object objet Pear représentant l'url de base.
 * @param  integer l'identifiant du site à administrer.
 * @param  integer l'identifiant du menu à administrer.
 * @param  integer 0 indique que le menu ne possède pas de fils, 1 qu'il faut afficher un - et 2 un +.
-* @return  string une ligne de liste XHTML
+* @return string une ligne de liste XHTML
 */
 function ADME_retournerXhtmlMenuClassique($db, $url, $adme_site_id, $adme_menu_id, $int_deplier)
+{
     //-------------------------------------------------------------------------------------------------------------------
     // Initialisation des variables
 /** Fonction ADME_validerFormAjouterMenuClassique() - Valide les données issues du formulaire pour gen_menu.
+*
 * Cette fonction valide les données à ajouter dans la table gen_menu.
 *
-* @param  string   l'objet pear de connexion à la base de données.
+* @param  PEAR::DB   l'objet pear de connexion à la base de données.
 * @param  string   le tableau contenant les valeurs du formulaire.
 * @return string   retourne les messages d'erreurs sinon rien.
 */
 function ADME_validerFormAjouterMenuClassique($db, $aso_valeurs)
+*
 * Permet de déplacer un menu dans la hiérarchie des menus classiques.
 * Ancien nom : moveMenu()
+*
 * @param  mixed   objet Pear DB de connexion à la base de données.
-* @param  string  identifiant du site administré.
+* @param  integer  identifiant du site administré.
 * @param  integer identifiant du menu à déplacer.
 * @param  boolean indique si on veut monter le menu (true) ou le descendre (false).
 * @return void    modifie la base de données.
 */
 function ADME_deplacerMenuClassique($db, $adme_site_id, $adme_menu_id, $bln_monter)
 * Supprime de la base de données de Génésia toutes les traces du menu classiques
 * passé en paramètre.
 * Ancien nom : deleteMenu()
+*
 * @param  mixed  l'objet Pear DB de connexion à la base de données.
+* @param  integer l'identifiant du site du menu à supprimer
-* @param  string l'identifiant du menu à supprimer
+* @param  integer l'identifiant du menu à supprimer
 * @return void   le menu classique est supprimé de la base de données.
 */
-function ADME_supprimerMenuClassique($db, $id_menu_a_supprimer)
+function ADME_supprimerMenuClassique($db, $adme_id_site, $id_menu_a_supprimer)
+{
     //----------------------------------------------------------------------------
     // Y a t'il des sous_menus
     $requete =  'SELECT COUNT(gm_id_menu) AS compte '.
                 'FROM gen_menu, gen_menu_relation '.
     if ($ligne && ($ligne->compte > 0)) {
         return ADME_LG_ERREUR_EXISTE_SOUS_MENU;
+    }
+    //-------------------------------------------------------------------------------------------------------------------
+    // Mise à jour de l'ordre des menus
+    $ligne_menu_supr_relation = GEN_lireInfoMenuRelation($db, $id_menu_a_supprimer, '1'); // 1 = relation "avoir père"
+    $requete =  'SELECT GMR01.gmr_id_menu_01, GMR01.gmr_ordre '.
+                'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
+                'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.
+                'AND GMR01.gmr_id_menu_01 = gm_id_menu './/jonction avec la table GEN_MENU
+                'AND gm_ce_site = '.$adme_id_site.' '.// le site du menu!
+                'AND GMR02.gmr_id_valeur = 100 '.// 100 = menu type "classique"
+                'AND GMR01.gmr_id_menu_02 = '.$ligne_menu_supr_relation->gmr_id_menu_02.' '.
+                'AND GMR01.gmr_id_valeur = 1 '.// 1 = relation menu "père"
+                'AND GMR01.gmr_ordre > '.$ligne_menu_supr_relation->gmr_ordre.' '.
+                'ORDER BY GMR01.gmr_ordre ASC';
+    $resultat = $db->query($requete);
+    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
+        // Mise à jour des relations hiérarchiques du menu courant
+        $requete_maj =  'UPDATE gen_menu_relation SET '.
+                        'gmr_ordre = '.($ligne->gmr_ordre - 1).' '.
+                        'WHERE gmr_id_menu_01 = '.$ligne->gmr_id_menu_01.' '.
+                        'AND gmr_id_valeur = 1';// 1 = relation menu "père"
+        $resultat_maj = $db->query($requete_maj);
+        (DB::isError($resultat_maj)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_maj->getMessage(), $requete_maj)) : '';
+    }
     $resultat->free();
     //----------------------------------------------------------------------------
     // S'il n'y a plus de sous niveau, on supprime le menu
 /* +--Fin du code ----------------------------------------------------------------------------------------+
+*
+* $Log: not supported by cvs2svn $
+* Revision 1.11  2004/11/10 19:41:14  jpm
 * Correction bogue.
 * $Log: not supported by cvs2svn $
 * Revision 1.10  2004/11/10 17:26:07  jpm
 * Fin gestion de la traduction.
+*

Subversion Repositories Applications.papyrus

(root)/trunk/papyrus/applications/admin_menu/bibliotheque/adme_menu_classique.fonct.php @ 1052 – Rev 152 → 155