Subversion Repositories Applications.papyrus

Rev

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

Rev 195 Rev 198
Line 18... Line 18...
18 
// |                                                                                                      |
 18 
// |                                                                                                      |
19 
// | You should have received a copy of the GNU Lesser General Public                                     |
 19 
// | You should have received a copy of the GNU Lesser General Public                                     |
20 
// | License along with this library; if not, write to the Free Software                                  |
 20 
// | License along with this library; if not, write to the Free Software                                  |
21 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
 21 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
22 
// +------------------------------------------------------------------------------------------------------+
 22 
// +------------------------------------------------------------------------------------------------------+
23 
// CVS : $Id: adsi_site.fonct.php,v 1.11 2004-11-30 16:43:51 jpm Exp $
 23 
// CVS : $Id: adsi_site.fonct.php,v 1.12 2004-12-01 17:22:58 jpm Exp $
24 
/**
 24 
/**
25 
* Bibliothèque de fonctions d'admininistration des projets
 25 
* Bibliothèque de fonctions d'admininistration des projets
26 
*
 26 
*
27 
* Contient un ensemble de fonctions permettant à l'application Administrateur de Papyrus, de modifier des informations
 27 
* Contient un ensemble de fonctions permettant à l'application Administrateur de Papyrus, de modifier des informations
28 
* sur les projets (=sites gérés par Papyrus).
 28 
* sur les projets (=sites gérés par Papyrus).
Line 33... Line 33...
33 
*@author        Laurent COUDOUNEAU <lc@gsite.org>
 33 
*@author        Laurent COUDOUNEAU <lc@gsite.org>
34 
//Autres auteurs :
 34 
//Autres auteurs :
35 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
 35 
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
36 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
 36 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
37 
*@copyright     Tela-Botanica 2000-2004
 37 
*@copyright     Tela-Botanica 2000-2004
38 
*@version       $Revision: 1.11 $ $Date: 2004-11-30 16:43:51 $
 38 
*@version       $Revision: 1.12 $ $Date: 2004-12-01 17:22:58 $
39 
// +------------------------------------------------------------------------------------------------------+
 39 
// +------------------------------------------------------------------------------------------------------+
40 
*/
 40 
*/
Line 41... Line 41...
41 
 
 41 
 
42 
// +------------------------------------------------------------------------------------------------------+
 42 
// +------------------------------------------------------------------------------------------------------+
Line 97... Line 97...
97 
    $aso_options = array();
 97 
    $aso_options = array();
98 
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
 98 
    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
99 
        $aso_options[$ligne->gs_id_site] = htmlentities($ligne->gs_nom.' ('.$ligne->gs_code_alpha.')');
 99 
        $aso_options[$ligne->gs_id_site] = htmlentities($ligne->gs_nom.' ('.$ligne->gs_code_alpha.')');
100 
    }
 100 
    }
101 
    $resultat->free();
 101 
    $resultat->free();
- 
 
 102
102 
    $id = 'form_sites_id_site';
 103 
    $id = 'form_sites_id_site';
103 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
 104 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
104 
    $label = '<label for="'.$id.'">'.'Listes des sites : '.'</label>';
 105 
    $label = '<label for="'.$id.'">'.'Listes des sites : '.'</label>';
105 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
 106 
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
Line 109... Line 110...
109 
    $form->addElement('html', $partie_site_fin);
 110 
    $form->addElement('html', $partie_site_fin);
Line 110... Line 111...
110
111
111 
    $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
 112 
    $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
Line -... Line 113...
- 
 
 113 
    $form->addElement('html', $liste_bouton_debut);
- 
 
 114
- 
 
 115 
    $id = 'form_sites_ajouter';
112 
    $form->addElement('html', $liste_bouton_debut);
 116 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
- 
 
 117 
    $label = 'Ajouter';
- 
 
 118 
    $form->addElement('submit', $id, $label, $aso_attributs);
- 
 
 119
- 
 
 120 
    $id = 'form_sites_modifier';
113
121 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
- 
 
 122 
    $label = 'Modifier';
- 
 
 123 
    $form->addElement('submit', $id, $label, $aso_attributs);
- 
 
 124
- 
 
 125 
    $id = 'form_sites_supprimer';
114 
    $form->addElement('submit', 'form_sites_ajouter', 'Ajouter');
 126 
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'onclick' => 'javascript:return confirm(\''.'Êtes vous sûr de vouloir supprimer ce site ?'.'\');');
Line 115... Line 127...
115 
    $form->addElement('submit', 'form_sites_modifier', 'Modifier');
 127 
    $label = 'Supprimer';
116 
    $form->addElement('submit', 'form_sites_supprimer', 'Supprimer');
 128 
    $form->addElement('submit', $id, $label, $aso_attributs);
Line 117... Line 129...
117
129
Line 1086... Line 1098...
1086 
}
 1098 
}
Line 1087... Line 1099...
1087 
 
 1099 
 
1088 
// +- Fin du code source  --------------------------------------------------------------------------------+
 1100 
// +- Fin du code source  --------------------------------------------------------------------------------+
1089 
/*
 1101 
/*
- 
 
 1102 
* $Log: not supported by cvs2svn $
- 
 
 1103 
* Revision 1.11  2004/11/30 16:43:51  jpm
- 
 
 1104 
* Correction de bogues.
1090 
* $Log: not supported by cvs2svn $
 1105 
*
1091 
* Revision 1.10  2004/11/29 17:05:28  jpm
 1106 
* Revision 1.10  2004/11/29 17:05:28  jpm
1092 
* Correction d'un bogue concernat les cases à cocher.
 1107 
* Correction d'un bogue concernat les cases à cocher.
1093 
*
 1108 
*
1094 
* Revision 1.9  2004/11/26 13:13:51  jpm
 1109 
* Revision 1.9  2004/11/26 13:13:51  jpm