Rev 7 | Rev 134 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php/*vim: set expandtab tabstop=4 shiftwidth=4: */// +------------------------------------------------------------------------------------------------------+// | PHP version 4.1 |// +------------------------------------------------------------------------------------------------------+// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) |// +------------------------------------------------------------------------------------------------------+// | This library is free software; you can redistribute it and/or |// | modify it under the terms of the GNU Lesser General Public |// | License as published by the Free Software Foundation; either |// | version 2.1 of the License, or (at your option) any later version. |// | |// | This library is distributed in the hope that it will be useful, |// | but WITHOUT ANY WARRANTY; without even the implied warranty of |// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |// | Lesser General Public License for more details. |// | |// | 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_commun.fonct.php,v 1.2 2004-07-06 17:07:37 jpm Exp $/*** Application de gestion des menus communs** Permet de lister, d'ajouter, de modifier, et de déplacer des menus communs.* Par menus communs nous entendons tous les menus devant paraitre sur l'ensemble des pages d'un site,* comme le lien vers le plan du site, le lien vers la charte d'accessibilité, le flux rss...**@package Admin_menu*@subpackage Fonctions//Auteur original :*@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.2 $ $Date: 2004-07-06 17:07:37 $// +------------------------------------------------------------------------------------------------------+*/// +------------------------------------------------------------------------------------------------------+// | ENTÊTE du PROGRAMME |// +------------------------------------------------------------------------------------------------------+/*Mettre ici les inclusions de fichiers*/// +------------------------------------------------------------------------------------------------------+// | CORPS du PROGRAMME |// +------------------------------------------------------------------------------------------------------+/*Mettre ici le code du programme*/// +------------------------------------------------------------------------------------------------------+// | LISTE de FONCTIONS |// +------------------------------------------------------------------------------------------------------+/*Mettre ici la liste de fonctions.*/function listUpper($db,$baseURL, $baseURLjs, $baseHidden,$adminProject, $adminLocale, $adminAnnu,$menu1id, $upperid,$doccmd,$menu1open){//----------------------------------------------------------------------------// Get infos about the project.$requete = 'SELECT * '.'FROM gen_site, gen_site_relation '.'WHERE gs_code_alpha = "'.$adminProject.'" '.'AND gsr_id_site_01 = gs_id_site '.'AND gsr_id_site_01 = gsr_id_site_02 '.'AND gsr_id_valeur = 102 '; // 102 = site "principal"$result = $db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';if ($result->numRows() != 1) {return '';}$PRJrow = $result->fetchRow(DB_FETCHMODE_OBJECT);$result->free();$lookName = $PRJrow->gs_fichier_squelette;//----------------------------------------------------------------------------// Labels.$etiquette_alt_modifier = 'Modifier';$etiquette_title_modifier = 'Modifier ce menu commun';$etiquette_alt_supprimer = 'Supprimer';$etiquette_title_supprimer = 'Supprimer ce menu commun';$etiquette_alt_monter = 'Monter';$etiquette_title_monter = 'Monter ce menu commun';$etiquette_alt_descendre = 'Descendre';$etiquette_title_descendre = 'Descendre ce menu commun';$etiquette_alt_redaction = 'Rédiger';$etiquette_title_redaction = 'Rédiger le contenu de ce menu commun';//----------------------------------------------------------------------------// Javascript.$goMsg = addslashes('Supprimer');$fullURLjs = $baseURLjs.'&menuview=upper&menu1open=1';GEN_stockerFonctionScript( 'deleteUpper'," function deleteUpper (iUpperId) {"."\n"." var url = '$fullURLjs'+'&doccmd=delupper&upperid='+iUpperId;"."\n"." if (window.confirm ('$goMsg')) document.location = url;"."\n"." }"."\n");//----------------------------------------------------------------------------// Début du xhtml$outputText = '';//----------------------------------------------------------------------------// Liste des menus communs.$requete = 'SELECT *, gap_nom AS nom_appli, ga_prenom AS prenom '.'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02, gen_application, gen_annuaire '.'WHERE gm_ce_site = "'.$PRJrow->gs_id_site.'" '.'AND gm_ce_i18n = "'.$adminLocale.'" '.'AND gm_ce_admin = ga_id_administrateur '.'AND gm_ce_application = gap_id_application '.'AND GMR02.gmr_id_menu_02 = gm_id_menu '.'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.'AND GMR02.gmr_id_valeur = 102 '.// 100 = type "menu classique"'AND GMR01.gmr_id_menu_01 = gm_id_menu '.'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"'ORDER BY GMR01.gmr_ordre ASC';$UPresult = $db->query($requete);if (DB::isError ($UPresult)) {die(BOG_afficherErreurSql(__FILE__, __LINE__, $UPresult->getMessage(), $requete));}// Récupération de l'identifiant de la personne administrateur//global $_GEN_commun;//$userID = $_GEN_commun['pear_auth']->getAuthData('ga_id_administrateur');// Pour chaque menu commun trouvé, nous affichons les commandes.$outputText .= "\n".'<ul class="text">';while ($UProw = $UPresult->fetchRow(DB_FETCHMODE_OBJECT)) {//--------------------------------------------------------------------------// Nous avons un menu commun$img = '';//--------------------------------------------------------------------------// Menu text.$menuText = htmlentities($UProw->gm_nom).' '.'('.htmlentities($UProw->nom_appli).' - '.htmlentities($UProw->prenom).') ';$menuText = (empty($menuText) ? '(...)' : $menuText);$actionIcons = ' ';//$commitIcons = ' ';//------------------------------------------------------------------------// Ajout de l'identifiant du menu commun à l'url des boutons d'action.$pageHREF = $baseURL.'&upperid='.$UProw->gm_id_menu ;/*if ($doccmd == 'upduppertxt' && $upperid == $UProw->gm_id_menu) {$cancelLabel = 'Annuler';$menuText = '<input type="text" name="upper_text" size="32" '.'maxlength="64" value="'.$menuText.'" '.'class="contentDocument">'.'<input type="hidden" name="doccmd" value="commitupduppertxt">';$commitIcons .= '<input type="image" src="'.DOCADM_IMAGE_VALIDER.'">'."\n".'<a'."\n".'href="'.$pageHREF.'">'.'<img src="'.DOCADM_IMAGE_ANNULER.'" alt="'.$cancelLabel.'" width="16" height="16" border="0" />'.'</a>';} else {$txtHREF = $pageHREF.'&doccmd=upduppertxt';$menuText = '<a href="'.$txtHREF.'" class="anchor">'.$menuTextFull.'</a>';}*///------------------------------------------------------------------------// Les icones d'action.$actionIcons ='<a href="'.$pageHREF.'&doccmd=upduppertxt" title="'.$etiquette_title_modifier.'">'.'<img src="'.ADME_IMAGE_VOIR.'" alt="'.$etiquette_alt_modifier.'" width="16" height="16" border="0" />'.'</a>'."\n".'<a'."\n".'href="'.$pageHREF.'&doccmd=upupper" title="'.$etiquette_title_monter.'">'.'<img src="'.ADME_IMAGE_FLECHE_HAUT.'" alt="'.$etiquette_alt_monter.'" width="16" height="16" border="0" />'.'</a>'."\n".'<a'."\n".'href="'.$pageHREF.'&doccmd=dnupper" title="'.$etiquette_title_descendre.'">'.'<img src="'.ADME_IMAGE_FLECHE_BAS.'" alt="'.$etiquette_alt_descendre.'" width="16" height="16" border="0" />'.'</a>'."\n".'<a'."\n".'href="javascript:deleteUpper('.$UProw->gm_id_menu.')" title="'.$etiquette_title_supprimer.'">'.'<img src="'.ADME_IMAGE_SUPPRIMER.'" alt="'.$etiquette_alt_supprimer.'" width="16" height="16" border="0" />'.'</a>';// Si l'application liée est "texte simple", on ajoute un icone avec un lien vers// l'administration de cette application.if ($UProw->gm_ce_application == 3) { // l'appli afficheur a pour id 3//$url_popup = ADME_CHEMIN_APPLICATION."docpopup.php?admproject=$adminProject&locale=$locale&menu=$UProw->gm_id_menu" ;$icon_vers_texte = "\n ".'<a href="'.$pageHREF.'&doccmd=contenuredac" title="'.$etiquette_title_redaction.'">'.'<img src="'.ADME_IMAGE_TEXTE.'" alt="'.$etiquette_alt_redaction.'"'.' width="16" height="16" border="0" />'.'</a>';} else {$icon_vers_texte = '';}//--------------------------------------------------------------------------// Ligne du menu commun.$outputText .= "\n".'<li class="contentDocument">'.$menuText.$actionIcons.$icon_vers_texte.'</li>';}$outputText .= "\n".'</ul>';//----------------------------------------------------------------------------// Nettoyage$UPresult->free();return $outputText;}//==============================================================================//==============================================================================/** Fonction addUpper() - Ajoute un sous menu commun au menu commun courant**** @param mixed Une instance de la classse PEAR_DB* @param string Le nom du projet qu'on administre* @param string La langue du projet qu'on administre* @return void les changement sont fait dans la base de données.*/function addUpper($db, $adminProject, $adminLocale){//----------------------------------------------------------------------------// Get project row.global $_GEN_commun;//----------------------------------------------------------------------------// Récupération d'infos sur le site principal.$PRJrow = GEN_lireInfoSitePrincipalCodeAlpha($db, $adminProject);if ($PRJrow == false) {die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.'Code alpha du site : '. $adminProject .'<br />'.'Ligne n° : '. __LINE__ .'<br />'.'Fichier n° : '. __FILE__ .'<br />');}//----------------------------------------------------------------------------// Récupération d'infos sur le nouveau menuif ($adminLocale == $PRJrow->gs_ce_i18n) {$id_site = $PRJrow->gs_id_site;} else {$ligne_admin_site_i18n = getSiteI18nInfos($db, $adminProject, $adminLocale);// Info du site en cours d'administration$id_site = $ligne_admin_site_i18n->gs_id_site;}$nouveau_id_menu = SQL_obtenirNouveauId($db, 'gen_menu', 'gm_id_menu');$auteur = $_GEN_commun['pear_auth']->getAuthData('ga_prenom').' '.$_GEN_commun['pear_auth']->getAuthData('ga_nom');//----------------------------------------------------------------------------// Ajout du nouveau menu$requete = 'INSERT INTO gen_menu '.'SET gm_id_menu = '.$nouveau_id_menu.', '.'gm_ce_site = '.$id_site.', '.'gm_ce_i18n = "'.$adminLocale.'", '.'gm_ce_application = 0, '.'gm_code_num = '.$nouveau_id_menu.', '.'gm_code_alpha = "menu_'.$nouveau_id_menu.'", '.'gm_nom = "menu_'.$nouveau_id_menu.'", '.'gm_auteur = "'.$auteur.'", '.'gm_editeur = "'.$PRJrow->gs_auteur.'", '.'gm_date_creation = "'.date('Y-m-d H:i:s').'", '.'gm_date_soumission = "'.date('Y-m-d H:i:s').'", '.'gm_date_acceptation = "'.date('Y-m-d H:i:s').'", '.'gm_date_publication = "'.date('Y-m-d H:i:s').'", '.'gm_date_debut_validite = "'.date('Y-m-d H:i:s').'", '.'gm_date_copyright = "'.date('Y-00-00 00:00:00').'", '.'gm_categorie = "menu", '.'gm_ce_admin = '.$_GEN_commun['pear_auth']->getAuthData('ga_id_administrateur').' ';$result = $db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';//----------------------------------------------------------------------------// Ajout de la relation "père"if (!isset($menuid) && empty($menuid)) {$menuid = 0 ;// Identifiant du père}//----------------------------------------------------------------------------// Récupération d'infos sur la hierarchie du menu$requete = 'SELECT * '.'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.'WHERE GMR01.gmr_id_menu_02 = '.$menuid.' '.'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"'AND GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"'ORDER BY GMR01.gmr_ordre DESC';$result = $db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';$row = $result->fetchRow(DB_FETCHMODE_OBJECT);$nouveau_ordre_menu = $row->gmr_ordre + 1;$result->free();$requete = 'INSERT INTO gen_menu_relation '.'SET gmr_id_menu_02 = '.$menuid.', '.'gmr_id_menu_01 = '.$nouveau_id_menu.', '.'gmr_id_valeur = 1, '.'gmr_ordre = '.$nouveau_ordre_menu;$result = $db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';//----------------------------------------------------------------------------// Ajout de la relation-type "commun"// Récupération d'infos sur le n$requete = 'SELECT * '.'FROM gen_menu_relation, gen_menu '.'WHERE gmr_id_menu_02 = gmr_id_menu_01 '.'AND gmr_id_valeur = 102 '.// 102 = type "commun"'AND gmr_id_menu_01 = gm_id_menu '.'AND gm_ce_site = '.$id_site.' '.'ORDER BY gmr_ordre DESC';$result = $db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';$row = $result->fetchRow(DB_FETCHMODE_OBJECT);$nouveau_ordre_commun = $row->gmr_ordre + 1;$result->free();$requete = 'INSERT INTO gen_menu_relation '.'SET gmr_id_menu_01 = '.$nouveau_id_menu.', '.'gmr_id_menu_02 = '.$nouveau_id_menu.', '.'gmr_id_valeur = 102, '.'gmr_ordre = '.$nouveau_ordre_commun;$result = $db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';}//==============================================================================//==============================================================================function commitUpdateUpperText($db, $adminProject, $adminLocale, $upperid){global $_GEN_commun;$requete = 'UPDATE gen_menu SET '.'gm_ce_application = '.$_POST['gm_ce_application'].', '.'gm_application_arguments = "'.$_POST['gm_application_arguments'].'", '.'gm_fichier_squelette = "'.$_POST['gm_fichier_squelette'].'", '.'gm_code_num = '.$_POST['gm_code_num'].', '.'gm_code_alpha = "'.$_POST['gm_code_alpha'].'", '.'gm_nom = "'.$_POST['gm_nom'].'", '.'gm_raccourci_clavier = "'.$_POST['gm_raccourci_clavier'].'", '.'gm_robot = "'.$_POST['gm_robot'].'", '.'gm_titre = "'.$_POST['gm_titre'].'", '.'gm_titre_alternatif = "'.$_POST['gm_titre_alternatif'].'", '.'gm_mots_cles = "'.$_POST['gm_mots_cles'].'", '.'gm_description_libre = "'.$_POST['gm_description_libre'].'", '.'gm_description_resume = "'.$_POST['gm_description_resume'].'", '.'gm_description_table_matieres = "'.$_POST['gm_description_table_matieres'].'", '.'gm_source = "'.$_POST['gm_source'].'", '.'gm_auteur = "'.$_POST['gm_auteur'].'", '.'gm_contributeur = "'.$_POST['gm_contributeur'].'", '.'gm_editeur = "'.$_POST['gm_editeur'].'", '.'gm_date_debut_validite = "'.$_POST['gm_date_debut_validite'].'", '.'gm_date_fin_validite = "'.$_POST['gm_date_fin_validite'].'", '.'gm_date_copyright = "'.$_POST['gm_date_copyright'].'", '.'gm_licence = "'.$_POST['gm_licence'].'", '.'gm_categorie = "'.$_POST['gm_categorie'].'", '.'gm_public = "'.$_POST['gm_public'].'", '.'gm_public_niveau = "'.$_POST['gm_public_niveau'].'", '.'gm_portee_spatiale = "'.$_POST['gm_portee_spatiale'].'", '.'gm_portee_temporelle = "'.$_POST['gm_portee_temporelle'].'", '.'gm_ce_admin = "'.$_GEN_commun['pear_auth']->getAuthData('ga_id_administrateur').'" '.'WHERE gm_id_menu = '.$upperid;$result = $db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';}/** Fonction moveUpper() - Permet de déplacer un menu commun dans la hiérarchie.** Permet de déplacer un menu dans la hiérarchie des menus communs.** @param mixed objet Pear DB de connexion à la base de données.* @param string code alpha du site administré.* @param string identifiant de l'i18n du site administré.* @param int identifiant du menu commun à 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 moveUpper($db, $adminProject, $adminLocale, $upperid, $up){//----------------------------------------------------------------------------// Récupération d'information sur le site de ce menu.$PRJrow = GEN_lireInfoSitePrincipalCodeAlpha($db, $adminProject);if ($PRJrow == false) {die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.'Code alpha du site : '. $adminProject .'<br />'.'Ligne n° : '. __LINE__ .'<br />'.'Fichier n° : '. __FILE__ .'<br />');}//----------------------------------------------------------------------------// Récupération d'informations sur les relations du menu courant.$ligne_menu_courant_relation = GEN_lireInfoMenuRelation($db, $upperid, '1'); // 1 = relation "avoir père"if ($ligne_menu_courant_relation == false) {die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos sur les relations du menu.<br />'.'Identifiant menu : '. $upperid .'<br />'.'Identifiant valeur relation : 1 <br />'.'Ligne n° : '. __LINE__ .'<br />'.'Fichier n° : '. __FILE__ .'<br />');}$id_pere = $ligne_menu_courant_relation->gmr_id_menu_02;// Il serait mieux d'utiliser la fonction ci-dessous.// Mais cela ne semble pas fonctionner!!!/*$id_pere = GEN_lireIdentifiantMenuPere($upperid);if ($id_pere == false) {die('ERREUR Génésia Administrateur de Menus : impossible de lire identifiant du menu père.<br />'.'Identifiant menu fils : '. $upperid .'<br />'.'Ligne n° : '. __LINE__ .'<br />'.'Fichier n° : '. __FILE__ .'<br />');}*///----------------------------------------------------------------------------// Recherche d'information hiérarchiques sur le menu précédent ou suivant le menu courant$requete = 'SELECT GMR01.gmr_ordre AS nouvel_ordre, GMR01.gmr_id_menu_01 AS id_menu_remplace '.'FROM gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.'WHERE GMR02.gmr_id_menu_01 = GMR01.gmr_id_menu_01 '.'AND GMR02.gmr_id_valeur = 102 '.// 102 = menu type "commun"'AND GMR01.gmr_id_menu_02 = '.$id_pere.' '.'AND GMR01.gmr_id_valeur = 1 ';// 1 = relation menu "père"if ($up) {$requete .= 'AND GMR01.gmr_ordre < '.$ligne_menu_courant_relation->gmr_ordre.' '.'ORDER BY GMR01.gmr_ordre DESC';} else {$requete .= 'AND GMR01.gmr_ordre > '.$ligne_menu_courant_relation->gmr_ordre.' '.'ORDER BY GMR01.gmr_ordre ASC';}$MENUresult = $db->query($requete);(DB::isError($MENUresult)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $MENUresult->getMessage(), $requete)) : '';$MENUrow = $MENUresult->fetchRow(DB_FETCHMODE_OBJECT);$MENUresult->free() ;//----------------------------------------------------------------------------// Si la requete ne retourne rien nous ne faisons rien.if (! $MENUrow) {return;}//----------------------------------------------------------------------------// Mise à jour des relations hiérarchiques du menu courant$requete = 'UPDATE gen_menu_relation SET '.'gmr_ordre = '.$MENUrow->nouvel_ordre.' '.'WHERE gmr_id_menu_01 = '.$ligne_menu_courant_relation->gmr_id_menu_01.' '.'AND gmr_id_valeur = 1';// 1 = relation menu "père"$result = $db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';//----------------------------------------------------------------------------// Mise à jour des relations hiérarchiques du menu précédent ou suivant$requete = 'UPDATE gen_menu_relation SET '.'gmr_ordre = '.$ligne_menu_courant_relation->gmr_ordre.' '.'WHERE gmr_id_menu_01 = '.$MENUrow->id_menu_remplace.' '.'AND gmr_id_valeur = 1';// 1 = relation menu "père"$result = $db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';}/** Fonction deleteUpper() - Détruit un menu commun.** Détruit définitivement un menu commun de la base de données.** @return void le menu commun est supprimé de la base de données.*/function deleteUpper($objet_pear_db, $adminProject, $adminLocale, $id_menu_commun){//----------------------------------------------------------------------------// Y a t'il des sous_menus$requete = 'SELECT COUNT(gm_id_menu) AS compte '.'FROM gen_menu, gen_menu_relation '.'WHERE gmr_id_menu_02 = '.$id_menu_commun.' '.'AND gmr_id_valeur = 1 '.'AND gmr_id_menu_01 = gm_id_menu ';$result = $objet_pear_db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';$row = $result->fetchRow(DB_FETCHMODE_OBJECT);if ($row && ($row->compte > 0)) {return "Il reste des menus attachés à ce menu commun !";}//----------------------------------------------------------------------------// S'il n'y a plus de sous niveau, on supprime le menu$requete = 'DELETE FROM gen_menu '.'WHERE gm_id_menu = '.$id_menu_commun;$result = $objet_pear_db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';//----------------------------------------------------------------------------// Puis on supprime les relations de ce menu$requete = 'DELETE FROM gen_menu_relation '.'WHERE gmr_id_menu_01 = '.$id_menu_commun;$result = $objet_pear_db->query($requete);(DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';}/** Fonction showUpper () Affiche le formulaire pour un menu commun** Utilise HTML_QuickForm pour générer le formulaire*** @return string Le code HTML du formulaire*/function showUpper( $db,$adminProject, $adminLocale,$baseURL, $baseURLjs, $baseHidden,$upperid, $menuopen, $docopen){//----------------------------------------------------------------------------// Labels.$cancelLabel = 'Annuler';$closeURL = $baseURL.'&upperid='.$upperid;//----------------------------------------------------------------------------// Récupération d'infos sur le site principal.$PRJrow = GEN_lireInfoSitePrincipalCodeAlpha($db, $adminProject);if ($PRJrow == false) {die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du site.<br />'.'Code alpha du site : '. $adminProject .'<br />'.'Ligne n° : '. __LINE__ .'<br />'.'Fichier n° : '. __FILE__ .'<br />');}//----------------------------------------------------------------------------// Récupération des informations du menu concerné.$ligne_menu = GEN_lireInfoMenu($db, $upperid, DB_FETCHMODE_ASSOC);if ($ligne_menu == false) {die('ERREUR Génésia Administrateur de Menus : impossible de lire les infos du menu.<br />'.'Idenitifiant du menu n° : '. $upperid .'<br />'.'Ligne n° : '. __LINE__ .'<br />'.'Fichier n° : '. __FILE__ .'<br />');}//----------------------------------------------------------------------------// Titre de la page$res = '<h1>'.'Modification menu commun'.'</h1>'."\n";//----------------------------------------------------------------------------// Création du formulaire$form =& new HTML_QuickForm('updform', 'post', $baseURLjs);$tab_index = 1000;$squelette =& $form->defaultRenderer();$squelette->setFormTemplate("\n".'<form{attributes}>'."\n"."\n".'{content}'."\n"."\n".'</form>'."\n");$squelette->setElementTemplate( '<li>'."\n".'{label}'."\n".'{element}'."\n".'<!-- BEGIN required --><span class="symbole_obligatoire">*</span><!-- END required -->'."\n".'<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".'</li>'."\n");$squelette->setRequiredNoteTemplate("\n".'<p><span class="symbole_obligatoire">*</span> {requiredNote}</p>'."\n");$partie_menu_debut = '<fieldset>'."\n".'<legend>Configuration du menu commun</legend>'."\n".'<ul>'."\n";$form->addElement('html', $partie_menu_debut);$id = 'gm_code_num';$aso_attributs = array('id'=>$id, 'tabindex' => $tab_index++, 'size' => 5, 'maxlength' => 100);$label = '<label for="'.$id.'">'.'Code numérique du menu'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$form->addRule($id, 'Un code numérique est requis pour le menu !', 'required', '', 'client');$id = 'gm_code_alpha';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 20, 'maxlength' => 20);$label = '<label for="'.$id.'">'.'Code alphanumérique du menu'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$form->addRule($id, 'Un code alphanumérique est requis pour le menu !', 'required', '', 'client');$id = 'gm_nom';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 100);$label = '<label for="'.$id.'">'.'Nom du menu'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$form->addRule($id, 'Un nom est requis pour le menu !', 'required', '', 'client');$form->applyFilter($id, 'trim');$id = 'gm_raccourci_clavier';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 1, 'maxlength' => 1);$label = '<label for="'.$id.'">'.'Raccourci clavier'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_fichier_squelette';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 50, 'maxlength' => 255);$label = '<label for="'.$id.'">'.'Fichier squelette'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_description_resume';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 50);$label = '<label for="'.$id.'">'.'Contenu info-bulle'.'</label>';$form->addElement('textarea', $id, $label, $aso_attributs);$form->addRule($id, 'Une description courte pour l\'info-bulle est requise pour ce menu !', 'required', '', 'client');// Requête sur les applications$requete = 'SELECT gap_id_application, gap_nom '.'FROM gen_application '.'WHERE gap_bool_applette = 0';// Pour éviter d'afficher les applettes.$resultat = $db->query($requete);(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';$aso_options = array();while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {$aso_options[$ligne->gap_id_application] = $ligne->gap_nom;}$resultat->free();$id = 'gm_ce_application';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);$label = '<label for="'.$id.'">'.'Application'.'</label>';$form->addElement('select', $id, $label, $aso_options, $aso_attributs);$id = 'gm_application_arguments';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);$label = '<label for="'.$id.'">'.'Arguments de l\'application'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$partie_menu_fin = '</ul>'."\n".'</fieldset>'."\n";$form->addElement('html', $partie_menu_fin);$partie_entete_debut = '<fieldset>'."\n".'<legend>Entête des pages du menu commun</legend>'."\n".'<ul>'."\n";$form->addElement('html', $partie_entete_debut);$id = 'gm_robot';$aso_options = array( 'index,follow' => 'Indexer cette page et les suivantes','index' => 'Indexer seulement cette page','noindex' => 'Ne pas indexer cette page','noindex,nofollow' => 'Ne pas indexer cette page et les suivantes','' => 'Auncune');$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);$label = '<label for="'.$id.'">'.'Indexation par robots'.'</label>';$form->addElement('select', $id, $label, $aso_options, $aso_attributs);$id = 'gm_titre';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);$label = '<label for="'.$id.'">'.'Titre de la page'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_titre_alternatif';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);$label = '<label for="'.$id.'">'.'Titre alternatif de la page'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_mots_cles';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 50);$label = '<label for="'.$id.'">'.'Mots-clés'.'</label>';$form->addElement('textarea', $id, $label, $aso_attributs);$id = 'gm_description_libre';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);$label = '<label for="'.$id.'">'.'Description du contenu '.'</label>';$form->addElement('textarea', $id, $label, $aso_attributs);$id = 'gm_description_table_matieres';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 3, 'cols' => 45);$label = '<label for="'.$id.'">'.'Table des matières'.'</label>';$form->addElement('textarea', $id, $label, $aso_attributs);$id = 'gm_source';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);$label = '<label for="'.$id.'">'.'Source'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_auteur';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);$label = '<label for="'.$id.'">'.'Auteur'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_contributeur';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);$label = '<label for="'.$id.'">'.'Contributeur'.'</label>';$form->addElement('textarea', $id, $label, $aso_attributs);$id = 'gm_editeur';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'rows' => 2, 'cols' => 45);$label = '<label for="'.$id.'">'.'Editeur'.'</label>';$form->addElement('textarea', $id, $label, $aso_attributs);$id = 'gm_date_debut_validite';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);$label = '<label for="'.$id.'">'.'Date de début de validité'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_date_fin_validite';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);$label = '<label for="'.$id.'">'.'Date de fin de validité'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_date_copyright';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 19, 'maxlength' => 19);$label = '<label for="'.$id.'">'.'Année pour le copyright'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_licence';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);$label = '<label for="'.$id.'">'.'URL de la licence'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_categorie';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);$label = '<label for="'.$id.'">'.'Catégorie'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_public';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 255);$label = '<label for="'.$id.'">'.'Public pour la page'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_public_niveau';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 25, 'maxlength' => 45);$label = '<label for="'.$id.'">'.'Niveau du public pour la page'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_ce_type_portee_spatiale';$aso_options = array( '' => 'Aucun','iso3166' => 'Code de pays sur deux lettres (iso3166)','Point' => 'Point géographique','Box' => 'Représenation des régions géographiques du Dublin Core','TGN' => 'Noms issus du Getty Thesaurus of Geographic Names');$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);$label = '<label for="'.$id.'">'.'Type de portée spatiale'.'</label>';$form->addElement('select', $id, $label, $aso_options, $aso_attributs);$id = 'gm_portee_spatiale';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);$label = '<label for="'.$id.'">'.'Portée spatiale de la page'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$id = 'gm_ce_type_portee_temporelle';$aso_options = array( '' => 'Aucun','W3CDTF' => 'Codage des dates et heures du W3C','Period' => 'Représentation des intervalles de temps du Dublin Core');$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);$label = '<label for="'.$id.'">'.'Type de portée temporelle'.'</label>';$form->addElement('select', $id, $label, $aso_options, $aso_attributs);$id = 'gm_portee_temporelle';$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'size' => 45, 'maxlength' => 100);$label = '<label for="'.$id.'">'.'Portée temporelle de la page'.'</label>';$form->addElement('text', $id, $label, $aso_attributs);$partie_entete_fin = '</ul>'."\n".'</fieldset>'."\n";$form->addElement('html', $partie_entete_fin);$liste_bouton_debut = '<ul class="liste_bouton">'."\n";$form->addElement('html', $liste_bouton_debut);$form->addElement('submit', 'menu_commun_enregistrer', 'Enregistrer');$bouton_annuler = '<li><a class="bouton" href="'.$closeURL.'" title="'.'Annuler'.'" >'.'Annuler'.'</a>'.'</li>'."\n";$form->addElement('html', $bouton_annuler);$liste_bouton_fin = '</ul>'."\n";$form->addElement('html', $liste_bouton_fin);$partie_cachee_debut = '<p>'."\n";$form->addElement('html', $partie_cachee_debut);$form->addElement('html', $baseHidden);$form->addElement('hidden', 'upperid', $upperid);$form->addElement('hidden', 'menuopen', $menuopen);$form->addElement('hidden', 'docopen', $docopen);$form->addElement('hidden', 'doccmd', 'commitupduppertxt');$form->setDefaults($ligne_menu);$partie_cachee_fin = '</p>'."\n";$form->addElement('html', $partie_cachee_fin);// Javascript pour la validation côté client$regles_javascript = $form->getValidationScript();// Suppression des balises déjà créées par GEN_stockerCodeScript()$regles_javascript = ereg_replace ( '<script type="text\/javascript">', '', $regles_javascript);$regles_javascript = ereg_replace ( '<!--', '', $regles_javascript);$regles_javascript = ereg_replace ( '\/\/-->', '', $regles_javascript);$regles_javascript = ereg_replace ( '<\/script>', '', $regles_javascript);GEN_stockerCodeScript($regles_javascript);// Note de fin de formulaire$form->setRequiredNote('Indique les champs obligatoires');$res .= $form->toHTML()."\n";return $res;}// +------------------------------------------------------------------------------------------------------+// | PIED du PROGRAMME |// +------------------------------------------------------------------------------------------------------+/*Partie non obligatoire*//* +--Fin du code ----------------------------------------------------------------------------------------+** $Log: not supported by cvs2svn $* Revision 1.1 2004/06/16 15:04:32 jpm* Changement de nom de Génésia en Papyrus.* Changement de l'arborescence.** Revision 1.10 2004/05/10 12:13:03 jpm* Modification des formulaires.** Revision 1.9 2004/05/07 16:31:40 jpm* Amélioration du formulaire d'un menu commun.** Revision 1.8 2004/05/07 09:56:52 jpm* Correction des noms de constantes d'images.** Revision 1.7 2004/05/07 07:23:54 jpm* Amélioration du code, des commentaires et correction de bogues.** Revision 1.6 2004/05/04 16:27:55 jpm* Amélioration gestion du déplacement des menus.*** +-- Fin du code ----------------------------------------------------------------------------------------+*/?>