Subversion Repositories Applications.papyrus

Compare Revisions

Ignore whitespace Rev 154 → Rev 155

/trunk/papyrus/applications/admin_menu/bibliotheque/adme_menu_classique.fonct.php
19,7 → 19,7
// | 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
*
35,7 → 35,7
*@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 $
// +------------------------------------------------------------------------------------------------------+
*/
 
149,7 → 149,7
* @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)
{
629,7 → 629,7
*
* 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.
*/
751,7 → 751,7
* 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.
841,10 → 841,11
* Ancien nom : deleteMenu()
*
* @param mixed l'objet Pear DB de connexion à la base de données.
* @param string l'identifiant du menu à supprimer
* @param integer l'identifiant du site 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
863,6 → 864,32
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
$requete = 'DELETE FROM gen_menu '.
888,6 → 915,9
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.11 2004/11/10 19:41:14 jpm
* Correction bogue.
*
* Revision 1.10 2004/11/10 17:26:07 jpm
* Fin gestion de la traduction.
*