Subversion Repositories Applications.papyrus

Rev

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

Rev 54 Rev 56
Line 17... Line 17...
17 
// |                                                                                                      |
 17 
// |                                                                                                      |
18 
// | You should have received a copy of the GNU Lesser General Public                                     |
 18 
// | You should have received a copy of the GNU Lesser General Public                                     |
19 
// | License along with this library; if not, write to the Free Software                                  |
 19 
// | License along with this library; if not, write to the Free Software                                  |
20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
 20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21 
// +------------------------------------------------------------------------------------------------------+
 21 
// +------------------------------------------------------------------------------------------------------+
22 
// CVS : $Id: admin_menu.php,v 1.5 2004-09-23 16:49:24 jpm Exp $
 22 
// CVS : $Id: admin_menu.php,v 1.6 2004-09-23 17:45:19 jpm Exp $
23 
/**
 23 
/**
24 
* Application gérant les menus de Papyrus
 24 
* Application gérant les menus de Papyrus
25 
*
 25 
*
26 
* Cette application permet de gérer les menus classiques, les menus communs
26 
* Cette application permet de gérer les menus classiques, les menus communs
27 
* et les liaison d'une application à un menu.
 27 
* et les liaison d'une application à un menu.
Line 31... Line 31...
31 
*@author        Laurent COUDOUNEAU <lc@gsite.org>
 31 
*@author        Laurent COUDOUNEAU <lc@gsite.org>
32 
//Autres auteurs :
 32 
//Autres auteurs :
33 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
 33 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
34 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
 34 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
35 
*@copyright     Tela-Botanica 2000-2004
 35 
*@copyright     Tela-Botanica 2000-2004
36 
*@version       $Revision: 1.5 $ $Date: 2004-09-23 16:49:24 $
 36 
*@version       $Revision: 1.6 $ $Date: 2004-09-23 17:45:19 $
37 
// +------------------------------------------------------------------------------------------------------+
 37 
// +------------------------------------------------------------------------------------------------------+
38 
*/
 38 
*/
Line 39... Line 39...
39 
 
 39 
 
40 
// +------------------------------------------------------------------------------------------------------+
 40 
// +------------------------------------------------------------------------------------------------------+
Line 44... Line 44...
44 
/** Inclusion du fichier de configuration de cette application.*/
 44 
/** Inclusion du fichier de configuration de cette application.*/
45 
require_once GEN_CHEMIN_PAP.'applications/admin_menu/configuration/adme_configuration.inc.php';
 45 
require_once GEN_CHEMIN_PAP.'applications/admin_menu/configuration/adme_configuration.inc.php';
Line 46... Line 46...
46 
 
 46 
 
47 
/** Inclusion de la bibliothèque PEAR de conception de formulaire.*/
 47 
/** Inclusion de la bibliothèque PEAR de conception de formulaire.*/
- 
 
 48 
require_once ADME_CHEMIN_BIBLIOTHEQUE_PEAR.'HTML/QuickForm.php';
Line 48... Line 49...
48 
require_once ADME_CHEMIN_BIBLIOTHEQUE_PEAR.'HTML/QuickForm.php';
 49 
require_once ADME_CHEMIN_BIBLIOTHEQUE_PEAR.'HTML/QuickForm/select.php';
49 
 
 50 
 
Line 50... Line 51...
50 
/** Inclusion de l'API de fonctions gérant les erreurs sql.*/
 51 
/** Inclusion de l'API de fonctions gérant les erreurs sql.*/
Line 336... Line 337...
336 
                                    '<!-- BEGIN required --><span class="symbole_obligatoire">*</span><!-- END required -->'."\n".
 337 
                                    '<!-- BEGIN required --><span class="symbole_obligatoire">*</span><!-- END required -->'."\n".
337 
                                    '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n");
 338 
                                    '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n");
338 
    $partie_site_debut =    '<fieldset>'."\n".
 339 
    $partie_site_debut =    '<fieldset>'."\n".
339 
                            '<legend>Listes des sites</legend>'."\n";
 340 
                            '<legend>Listes des sites</legend>'."\n";
340 
    $form->addElement('html', $partie_site_debut);
 341 
    $form->addElement('html', $partie_site_debut);
- 
 
 342 
    $id = 'adminProject';
- 
 
 343 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'onchange' => 'javascript:this.form.submit();');
- 
 
 344 
    $label = '<label for="'.$id.'">'.'Choix du site à administrer : '.'</label>';
- 
 
 345 
    $objet_select = new HTML_QuickForm_select($id, $label, '', $aso_attributs);
341 
    $aso_options = array();
 346 
    $aso_options = array();
342 
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
 347 
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
343 
        if (empty($adminProject)) {
 348 
        if (empty($adminProject)) {
344 
            $adminProject = $ligne->gs_code_alpha;
 349 
            $adminProject = $ligne->gs_code_alpha;
345 
        }
 350 
        }
- 
 
 351 
        if ($ligne->gs_code_alpha == $adminProject) {
- 
 
 352 
            $objet_select->addOption(htmlentities($ligne->gs_nom.' ('.$ligne->gs_code_alpha.')'), $ligne->gs_code_alpha, 'selected="selected"');
- 
 
 353 
        } else {
346 
        $aso_options[$ligne->gs_code_alpha] = htmlentities($ligne->gs_nom.' ('.$ligne->gs_code_alpha.')');
 354 
            $objet_select->addOption(htmlentities($ligne->gs_nom.' ('.$ligne->gs_code_alpha.')'), $ligne->gs_code_alpha);
- 
 
 355 
        }
347 
    }
 356 
    }
348 
    $resultat->free();
 357 
    $resultat->free();
349 
    $id = 'adminProject';
 358 
    $form->addElement($objet_select);
350 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
 - 
 
351 
    $label = '<label for="'.$id.'">'.'Choix du site à administrer : '.'</label>';
 - 
 
352 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
 - 
 
353 
    $form->addElement('submit', 'choisir_site', 'OK');
 359 
    $form->addElement('submit', 'choisir_site', 'OK');
354 
    $partie_site_fin = '</fieldset>'."\n";
 360 
    $partie_site_fin = '</fieldset>'."\n";
355 
    $form->addElement('html', $partie_site_fin);
 361 
    $form->addElement('html', $partie_site_fin);
Line 356... Line 362...
356
362
Line 450... Line 456...
450 
 
 456 
 
451 
 
 457 
 
452 
/* +--Fin du code ----------------------------------------------------------------------------------------+
 458 
/* +--Fin du code ----------------------------------------------------------------------------------------+
- 
 
 459 
*
- 
 
 460 
* $Log: not supported by cvs2svn $
- 
 
 461 
* Revision 1.5  2004/09/23 16:49:24  jpm
453 
*
 462 
* Correction d'une erreur dans l'url de l'ajout de menu commun.
454 
* $Log: not supported by cvs2svn $
 463 
*
455 
* Revision 1.4  2004/07/06 17:24:54  jpm
 464 
* Revision 1.4  2004/07/06 17:24:54  jpm
456 
* Suppression d'inclusions de fichiers inutiles.
 465 
* Suppression d'inclusions de fichiers inutiles.
457 
*
 466 
*