Subversion Repositories eFlore/Archives.herbiers

Rev

Rev 19 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 jp_milcent 1
<?php
2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3
// +------------------------------------------------------------------------------------------------------+
4
// | PHP version 4.1                                                                                      |
5
// +------------------------------------------------------------------------------------------------------+
6
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7
// +------------------------------------------------------------------------------------------------------+
8
// | This file is part of Herbier - Administration.                                                       |
9
// |                                                                                                      |
10
// | Foobar is free software; you can redistribute it and/or modify                                       |
11
// | it under the terms of the GNU General Public License as published by                                 |
12
// | the Free Software Foundation; either version 2 of the License, or                                    |
13
// | (at your option) any later version.                                                                  |
14
// |                                                                                                      |
15
// | Foobar is distributed in the hope that it will be useful,                                            |
16
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
17
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
18
// | GNU General Public License for more details.                                                         |
19
// |                                                                                                      |
20
// | You should have received a copy of the GNU General Public License                                    |
21
// | along with Foobar; if not, write to the Free Software                                                |
22
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23
// +------------------------------------------------------------------------------------------------------+
20 jp_milcent 24
// CVS : $Id: hba_manipulation.fonct.php,v 1.5 2007-08-22 14:33:44 jp_milcent Exp $
2 jp_milcent 25
/**
26
* Fonctions de manipulation de la base de données Herbier.
27
*
28
* Fonctions permettant d'ajouter, modifier ou supprimer des informations dans la base de données Herbier.
29
*
30
*@package Herbier-Administration
31
*@subpackage Fonctions
32
//Auteur original :
33
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
34
//Autres auteurs :
35
*@author        Jean-Pascal MILCENT <jpm@clapas.org>
36
*@copyright     Tela-Botanica 2000-2005
20 jp_milcent 37
*@version       $Revision: 1.5 $ $Date: 2007-08-22 14:33:44 $
2 jp_milcent 38
// +------------------------------------------------------------------------------------------------------+
39
*/
40
 
41
// +------------------------------------------------------------------------------------------------------+
42
// |                                           LISTE de FONCTIONS                                         |
43
// +------------------------------------------------------------------------------------------------------+
44
 
45
// +------------------------------------------------------------------------------------------------------+
46
// GESTION du MENU
47
 
48
function entete(&$un_herbier)
49
{
50
    $retour =   '<div id="hba_info">'."\n";
51
 
52
    // Gestion des infos
53
    $retour .=  '<h1>'.'Vous êtes'.'</h1>'."\n";
54
    // Affichage des droits
55
    if ($un_herbier->utilisateur->getAdminBool()) {
56
        $retour .=  '<p>'.'Administrateur de ce projet'.'</p>'."\n";
57
    } elseif ($un_herbier->utilisateur->getCoordBool()) {
58
        $retour .=  '<p>'.'Coordinateur de ce projet'.'</p>'."\n";
59
    } elseif ($un_herbier->utilisateur->getRedacBool()) {
60
        $retour .=  '<p>'.'Rédacteur de ce projet'.'</p>'."\n";
61
    }
62
    // Affichage du noms de l'institution
63
    /*
64
    if (is_object($une_organisation = $un_herbier->getOrganisation())) {
65
        $retour .=  '<dt>'.'Institution :'.'</dt>'."\n".'<dd>';
66
        if ($txt_court = raccourcirTexte($une_organisation->getNom(), HBA_LONGUEUR_ORG_NOM)) {
67
            $retour .= '<abbr title="'.$une_organisation->getNom().'">'.$txt_court.'</abbr>';
68
        } else {
69
            $retour .= $une_organisation->getNom();
70
        }
71
        $retour .=  '</dd>'."\n";
72
    }
73
    */
74
 
75
    // Gestion des menus
76
    if ($un_herbier->utilisateur->getDroit()) {
77
        $retour .=  '<ul>'."\n";
78
        $retour .=  '<li><a href="'.sprintf($un_herbier->getUrlAction(), HBA_ACTION_ANNULER).'">'.
79
                        'Accueil'.
80
                        '</a></li>'."\n";
81
        $retour .=  '<li><a href="'.sprintf($un_herbier->getUrlAction(), HBA_ACTION_HERBIER_AJOUT).'">'.
82
                    'Ajouter une institution (herbier)'.
83
                    '</a></li>'."\n";
84
        if ($un_herbier->utilisateur->getAdminBool()) {
85
            $retour .=  '<li><a href="'.sprintf($un_herbier->getUrlAction(), NOUVEAU_CORR).'">'.
86
                        'Inscrire un correspondant'.
87
                        '</a></li>'."\n";
88
        } elseif ($un_herbier->utilisateur->getCoordBool()) {
89
            $retour .=  '<li><a href="'.sprintf($un_herbier->getUrlAction(), NOUV_RED).'">'.
90
                        'Inscrire un rédacteur'.
91
                        '</a></li>'."\n";
92
        }
93
        $retour .=  '</ul>'."\n";
94
        // Gestion du menu contextuel
95
        $menu_contextuel = '';
96
        switch ($un_herbier->getAction()) {
97
            case NOUV_COLL : // 4
98
            case MOD_DESC : // 21
99
            case MOD_ADM : // 22
100
            case NOUV_TEAM : // 30
101
            case MOD_STAFF : // 32
102
            case NOUV_INDIC : // 40
103
            case MOD_NOTE : // 42
104
                $id_org = $un_herbier->organisation->getId();
105
                $menu_contextuel .= '<li><a href="'.
106
                                    sprintf($un_herbier->getUrlActionOrg(), MOD_HERB, $id_org).'">'.
107
                                    'Retour à l\'institution'.
108
                                    '</a></li>'."\n";
109
                break;
110
            case MOD_HERB : // 20
111
            case MOD_ADM_V : // 26
112
            case MOD_DESC_V : // 27
113
            case SUPPR_COLL : // 29
114
            case NOUV_TEAM_V : // 31
115
            case MOD_STAFF_V : // 33
116
            case SUPPR_STAFF : // 34
117
            case NOUV_INDIC_V : // 41
118
            case SUPPR_NOTE : // 43
119
            case MOD_NOTE_V : // 44
120
            case HBA_ACTION_COLL_DEROULER : // 5
121
                $id_org = $un_herbier->organisation->getId();
122
                $menu_contextuel .= '<li><a href="'.
123
                                    sprintf($un_herbier->getUrlActionOrg(), MOD_ADM, $id_org).'">'.
124
                                    'Modifier l\'institution'.
125
                                    '</a></li>'."\n".
126
                                    '<li><a href="'.
127
                                    sprintf($un_herbier->getUrlActionOrg(), NOUV_TEAM, $id_org).'">'.
128
                                    'Ajouter un membre à l\'équipe'.
129
                                    '</a></li>'."\n".
130
                                    '<li><a href="'.
131
                                    sprintf($un_herbier->getUrlActionOrg(), NOUV_COLL, $id_org).'">'.
132
                                    'Ajouter une collection'.
133
                                    '</a></li>'."\n";
134
                break;
135
        }
136
        if (!empty($menu_contextuel)) {
137
            $retour .=  '<hr class="clear"/>'."\n";
138
            $retour .=  '<ul>'."\n";
139
            $retour .=  $menu_contextuel;
140
            $retour .=  '</ul>'."\n";
141
        }
142
    }
143
    $retour .=  '</div>'."\n";
144
    return $retour;
145
}
146
 
147
// +------------------------------------------------------------------------------------------------------+
148
// GESTION de l'ACCUEIL
149
 
150
// Affichage de l'accueil
151
function menu(&$un_herbier)
152
{
153
    $retour = '';
154
 
155
    // Message d'accueil et aide
156
    if (!$un_herbier->utilisateur->recupererOrganisationListe($un_herbier->utilisateur)) {
157
        $retour .= '<h1>'.'Bienvenue sur la console d\'administration du projet Herbiers.'.'</h1>'."\n";
158
        $retour .= fournirAideAccueil();
159
        $retour .= '<h1 class="hba_titre">'.'Liste de vos herbiers'.'</h1>'."\n";
160
    } else {
161
        $retour .= '<h1 class="hba_titre">'.'Liste de vos herbiers'.'</h1>'."\n";
162
        $retour .= fournirAideAccueilOrganisation();
163
    }
164
    // Les herbiers de l'utilisateur courant
165
    $retour .= mesherbiers($un_herbier);
166
 
167
    // Les herbiers des correspondants
168
    if ($un_herbier->utilisateur->getAdminBool()) {
169
        $retour .= liste_corr($un_herbier);
170
    }
171
 
172
    // Les herbiers des rédacteurs
173
    if ($un_herbier->utilisateur->getCoordBool()) {
174
        $retour .= liste_red($un_herbier);
175
    }
176
    return $retour;
177
}
178
 
179
// Affichage des herbiers d'un utilisateur
180
function mesherbiers(&$un_herbier)
181
{
182
    $retour = '';
183
 
184
    if (!$un_herbier->utilisateur->recupererOrganisationListe($un_herbier->utilisateur)) {
185
        $retour .= '<p class="hba_attention">'.'Aucun herbier encore saisi !'.'</p>'."\n";
186
    } else {
187
        // Si l'utilisateur à saisi des herbiers : nous les affichons...
188
        $retour .=  '<div class="hba_liste_organisation">'."\n".
189
                    '<table>'."\n".
190
                    '<thead>'."\n".
191
                    '<tr>'."\n".'<th>'.'Ville'.'</th><th>'.'Institution'.'</th><th colspan="2">'.'Actions'.'</th>'."\n".'</tr>'."\n".
192
                    '</thead>'."\n";
193
        $retour .=  '<tbody>'."\n";
194
        foreach ($un_herbier->utilisateur->getOrganisationListe() as $valeur) {
195
            $retour .=  '<tr class="'.color_alterne(&$flag).'">'."\n";
196
            $retour .= '<td>'.$valeur->TOWN.'</td><td>'.$valeur->INSTITUTION_NAME.'</td>';
197
 
198
            // Gestion des actions
199
            $retour .= '<td><a href="'.sprintf($un_herbier->url_action_org, MOD_HERB, $valeur->ID_ORG).'">'.'modifier'.'</a></td>';
200
            // Protection de l'institution exemple
201
            if ($valeur->ID_ORG != HBA_EXEMPLE_ID) {
202
                $retour .= '<td><a href="'.sprintf($un_herbier->url_action_org, SUPPR_HERB, $valeur->ID_ORG).'"';
203
                $retour .= ' onclick="javascript:return confirm(\''.'Êtes-vous sûr de vouloir supprimer cette institution ?'.'\');"';
204
                $retour .= '>'.'supprimer'.'</a></td>'."\n";
205
            }
206
            $retour .= '</tr>';
207
        }
208
        $retour .=  '</tbody>'."\n".'</table>'."\n".'</div>'."\n";
209
    }
210
    // Si l'utilisateur est un coordinateur nous affichons les herbiers saisis par ses rédacteurs
211
    if ($un_herbier->utilisateur->getCoordBool()) {
212
        $retour .= leursherbiers($un_herbier);
213
    }
214
 
215
    return $retour;
216
}
217
 
218
// Renvoie les herbiers des rédacteurs dépendant d'un coordinateur
219
function leursherbiers(&$un_herbier)
220
{
221
    // Initialisation de variables
222
    $retour = '';
223
 
224
    // Recheche de la liste des rédacteurs
225
    $requete =  'SELECT U_NAME, U_SURNAME, U_ID '.
226
                'FROM '.HB_BDD_NOM_ANNUAIRE.'.annuaire_tela, '.HB_BDD_NOM.'.HERBIERS_COORDONNE '.
227
                'WHERE HC_ID_COORDINATEUR = '.$un_herbier->utilisateur->getId().' '.
228
                'AND HC_ID_REDACTEUR = U_ID';
229
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
230
    $id_utilisateur_courant_tmp = $un_herbier->utilisateur->getId();
231
    while ($ligne = mysql_fetch_object($resultat)) {
232
        $retour .= '<h2>'.'Herbiers de '.$ligne->U_NAME.' '.$ligne->U_SURNAME.'</h2>'."\n";
233
        $un_herbier->utilisateur->setId($ligne->U_ID);
234
        $retour .= mesherbiers($un_herbier)."\n";
235
    }
236
    $un_herbier->utilisateur->setId($id_utilisateur_courant_tmp);
237
    return $retour;
238
}
239
 
240
// +------------------------------------------------------------------------------------------------------+
241
// GESTION de l'ORGANISATION (Institution)
242
 
243
function mod_herb(&$un_herbier)
244
{
245
    // Initialisation de variables
246
    $organisation_nom = $un_herbier->organisation->getNom();
247
 
248
    $retour = '<h1>'.'Édition d\'une institution'.' - '.$organisation_nom.'</h1>';
249
    $retour .= fournirAideOrganisation();
250
    $liste_equipe = team_liste($un_herbier);
251
    if ($liste_equipe != '') {
252
        $retour .= '<h1>'.'L\'équipe de l\'institution'.'</h1>';
253
        $retour .= fournirAideEquipe();
254
        $retour .= $liste_equipe;
255
    }
256
    $liste_coll = liste_coll($un_herbier);
257
    if ($liste_coll != '') {
258
        $retour .= '<h1>'.'Liste des collections de l\'institution'.'</h1>'."\n";
259
        $retour .= fournirAideCollection();
260
        $retour .= $liste_coll;
261
    }
262
 
263
    return $retour;
264
}
265
 
266
function nouveau(&$un_herbier)
267
{
268
    $retour = '<h1>'.'Saisie des renseignements administratifs d\'une institution'.'</h1>'."\n";
269
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_ORGANISATION');
270
    form_administratif(&$form, $un_herbier);
271
    $javascript = 'onsubmit="javascript:return validateAndSubmitAdd(this);"';
272
    $retour .= $form->printForm(sprintf($un_herbier->url_action, HBA_ACTION_HERBIER_VERIF), $javascript, 'liste');
273
    $retour .= '<div class="nettoyage">&nbsp;</div>'."\n";
274
    $form->finalise('un_form');
275
    return $retour;
276
}
277
 
278
// insertion des donnees administrative dans la base
279
// et des informations sur le correspondant
280
function nouveau_v(&$un_herbier)
281
{
282
    $retour = '';
7 jp_milcent 283
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_ORGANISATION');
2 jp_milcent 284
    $form = $form->acquerir('HERBIERS_ORGANISATION');
7 jp_milcent 285
 
2 jp_milcent 286
    $id = $form->insertMySQL();
287
    if ($_POST['INSTITUTION_NAME'] == '') {
288
        $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_ORGANISATION', 'MOD', $id, 'ID_ORG');
289
        form_administratif(&$form, $un_herbier);
290
        $retour .=  '<h1>'.'Vous devez saisir un nom d\'institution'.'</h1>'."\n";
291
        $retour .=  $form->printForm(sprintf($un_herbier->url_action, HBA_ACTION_HERBIER_VERIF), 'onsubmit="javascript:return validateAndSubmitAdd(this);"');
292
        return $retour;
293
    }
294
    $une_organisation = new H_organisation();
295
    $une_organisation->setId($id);
296
    if (!$un_herbier->utilisateur->getAdminBool()) {
297
        $un_herbier->utilisateur->insererOrganisationListe($une_organisation);
298
    }
299
    return TRUE;
300
}
301
 
302
function form_administratif(&$form, &$un_herbier)
303
{
304
    // Définition des styles
305
    $form->style_general = 'hba_formulaire';
306
    $form->style_label = 'hba_label';
307
    $form->style_button = 'hba_bouton';
308
    $form->style_commentaire = 'hba_commentaire';
309
    $form->style_radiocheckbox = 'hba_radio';
310
 
311
    // Choix des champs
312
    $form->addChamps('INSTITUTION_NAME', 'Nom de l\'institution <span class="symbole_obligatoire">*</span> : ');
313
    $form->addCommentaire('Dans le champs "Nom de l\'institution", ne saisissez que le nom de l\'institution, ne saisissez pas l\'adresse ou l\'index herbariorum.');
314
    $form->addChamps('ADRESS_LINE', 'Adresse : ');
315
    $form->addChamps('INDEX_HERB', 'Index Herbariorum : ');
316
    $form->addCommentaire('<br />'.'Ne saisir que des chiffres, sans espace ( 54789 oui, F-54789 non )');
317
    $form->addChamps('ZIP', 'Code postal <span class="symbole_obligatoire">*</span> : ');
318
    $form->addChamps('TOWN', 'Ville : ');
319
    $form->addChamps('REGION', 'Région : ');
320
    $form->selectFromTable('COUNTRY_CODE par gen_COUNTRY', 'fr', 'GC_ID', 'GC_NAME', 'Pays : ');
321
    $form->addChamps('TEL', 'Téléphone : ');
322
    $form->addChamps('FAX', 'fax : ') ;
323
    $form->addCommentaire('Saisir l\'e-mail de l\'organisation (ex: accueil@organisation.org), pas de mail individuel.');
324
    $form->addChamps('EMAIL', 'E-mail : ');
325
    $form->addCommentaire('<br />'.'Un lien internet vers l\'institution, de la forme <b>http://www.mon_institution.org</b>.');
326
    $form->addChamps('HO_URL', 'URL : ');
327
    $form->addChamps('LOGO', 'Logo (URL vers un fichier graphique) : ');
328
    $form->addCommentaire('Indiquez ci-dessous tous les détails concernant l\'accès aux collections de l\'institution, comme les horaires d\'ouverture, les droits à acquitter...');
329
    $form->addChamps('ACCESS_RESTRICTION', 'Conditions d\'accès : ');
330
    $form->addCommentaire('<br />'.'Pensez à supprimer le contenu du champs ci-dessous si les informations que vous saisissez ne viennent pas de l\'Index Herbariorum, remplacez par votre nom.');
331
    $form->addChamps('SOURCE_DES_DONNEES', 'Source des informations');
332
    $form->addCommentaire('<strong><span class="symbole_obligatoire">'.'*'.'</span>'.' : '.'</strong>'.'champ obligatoire.');
12 jp_milcent 333
	// Gestion des métadonnées
334
	gererMetaForm(&$form, &$un_herbier);
335
 
2 jp_milcent 336
    if ($form->id != HBA_EXEMPLE_ID) {
337
        $form->submit('Valider', 'herbier_pere');
338
    }
339
    $form->annuler('Annuler', sprintf($un_herbier->url_action, HBA_ACTION_ANNULER));
340
}
341
 
342
function mod_adm($un_herbier)
343
{
344
    $retour = '<h1>'.'Modification d\'une institution'.' - '.$un_herbier->organisation->getNom().'</h1>';
345
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_ORGANISATION', 'MOD', $un_herbier->organisation->getId(), 'ID_ORG');
346
    form_administratif(&$form, $un_herbier);
347
    $retour .= $form->printForm(sprintf($un_herbier->url_action_org, MOD_ADM_V, $un_herbier->organisation->getId()));
348
    $form->finalise('un_form');
349
    return $retour;
350
}
351
 
352
function mod_adm_v(&$un_herbier)
353
{
354
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_ORGANISATION');
355
    $form = $form->acquerir('HERBIERS_ORGANISATION');
356
 
357
    if (($_POST['gen_COUNTRY'] == 'fr') and (!checkZip($_POST['ZIP']))) {
358
        $retour .= checkvalue('Le code postal n\'a pas la forme adéquate', '');
359
        return $retour;
360
    }
361
 
362
    $form->updateMySQL('ID_ORG', $un_herbier->organisation->getId());
363
}
364
 
365
function suppr_herb(&$un_herbier)
366
{
367
    // Initialisation des variables
368
    $id_org = $un_herbier->organisation->getId();
369
 
370
    // Supression des collections (et par cascades des notes, indic...) des collections de l'organisation
371
    $requete =  'SELECT ID '.
372
                'FROM HERBIERS_COLLECTION '.
373
                'WHERE PARENT_ID = '.$id_org;
374
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
375
    while ($ligne = mysql_fetch_object($resultat)) {
376
        suppr_coll($un_herbier, $ligne->ID);
377
    }
378
 
379
    // Suppression de l'organisation
380
    $requete = 'DELETE FROM HERBIERS_ORGANISATION WHERE ID_ORG = '.$id_org;
381
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
382
 
383
    // Supression de chaque membre de l'équipe (ou contact) de l'organisation
384
    $requete_01 = 'SELECT ID_STAFF '.
385
            'FROM HERBIERS_ont_un_staff '.
386
            'WHERE ID_ORG = '.$id_org;
387
    $resultat_01 = mysql_query($requete_01) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete_01));
388
    while ($ligne_01 = mysql_fetch_object($resultat_01)) {
389
        $requete_02 =   'DELETE FROM HERBIERS_STAFF '.
390
                        'WHERE ID_STAFF = '.$ligne_01->ID_STAFF;
391
        mysql_query($requete_02) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete_02));
392
    }
393
    // Suppression de la liste des équipiers (et/ou contacts) de l'organisation
394
    $requete =  'DELETE FROM HERBIERS_ont_un_staff '.
395
                'WHERE ID_ORG = '.$id_org;
396
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
397
 
398
    // Suppression de l'organisation dans la liste des organisations (= herbiers) de l'utilisateur (HERBIERS_ADMINISTRER)
399
    $requete =  'DELETE FROM HERBIERS_ADMINISTRER '.
400
                'WHERE HA_ID_ORG = '.$id_org;
401
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
402
}
403
 
404
// +------------------------------------------------------------------------------------------------------+
405
// GESTION de l'ÉQUIPE, d'un ÉQUIPIER et d'un CONTACT
406
 
407
function team_liste(&$un_herbier)
408
{
409
    $retour = '';
410
 
411
    $requete =  'SELECT HERBIERS_STAFF.* '.
412
                'from HERBIERS_STAFF, HERBIERS_ont_un_staff, HERBIERS_ORGANISATION '.
413
                'WHERE HERBIERS_ORGANISATION.ID_ORG = '.$un_herbier->organisation->getId().' '.
414
                'AND HERBIERS_ont_un_staff.ID_ORG = HERBIERS_ORGANISATION.ID_ORG '.
415
                'AND HERBIERS_STAFF.ID_STAFF = HERBIERS_ont_un_staff.ID_STAFF';
416
 
417
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
418
    if (mysql_num_rows($resultat) == 0) {
419
        $retour .= '<p class="hba_attention">'.'Aucune équipe renseignée !'.'</p>'."\n";
420
        return $retour;
421
    }
422
    $retour .= '<div class="hba_liste_equipe">'."\n";
423
    $retour .= '<table>'."\n";
424
    $retour .= '<thead><tr><th>'.'Nom'.'</th><th>'.'Prénom'.'</th><th colspan="2">'.'Actions'.'</th></tr></thead>'."\n";
425
    $retour .= '<tbody>'."\n";
426
    while ($ligne = mysql_fetch_object($resultat)) {
427
        $retour .= '<tr class="'.color_alterne(&$flag).'"><td>'.$ligne->NOM.'</td><td>'.$ligne->PRENOM.'</td>'."\n";
428
        $retour .=  '<td><a href="'.sprintf($un_herbier->url_action_org_equipe, MOD_STAFF, $un_herbier->organisation->getId(), $ligne->ID_STAFF).'">'.
429
                    'modifier'.'</a></td>'."\n";
430
 
431
        if ($un_herbier->organisation->getId() != HBA_EXEMPLE_ID) {
432
            $retour .=  '<td><a href="'.sprintf($un_herbier->url_action_org_equipe, SUPPR_STAFF, $un_herbier->organisation->getId(), $ligne->ID_STAFF).'" '.
433
                        ' onclick="javascript:return confirm(\''.'Êtes-vous sûr de vouloir supprimer : '.$ligne->NOM.' '.$ligne->PRENOM.' ?'.'\');">'.
434
                        'supprimer'.'</a></td>'."\n";
435
        }
436
        $retour .= '</tr>'."\n";
437
    }
438
    $retour .= '</tbody>'."\n".'</table>'."\n".'</div>'."\n";
439
 
440
    return $retour;
441
}
442
 
443
function nouv_team(&$un_herbier)
444
{
445
    $retour = '<h1>'.'Ajout d\'un membre'.'</h1>'."\n";
446
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_STAFF');
447
    form_team($form, $un_herbier);
448
    $retour .= $form->printForm(sprintf($un_herbier->url_action_org, NOUV_TEAM_V, $un_herbier->organisation->getId()))."\n";
449
    $form->finalise('form_team');
450
    return $retour;
451
}
452
 
453
function nouv_team_v(&$un_herbier)
454
{
455
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_STAFF');
456
    $form = $form->acquerir('HERBIERS_STAFF');
457
    $un_herbier->organisation->insererMembreEquipe($form->insertMySQL());
458
}
459
 
460
function form_team(&$form , &$un_herbier)
461
{
462
    // Définition des styles
463
    $form->style_general = 'hba_formulaire';
464
    $form->style_label = 'hba_label';
465
    $form->style_button = 'hba_bouton';
466
    $form->style_commentaire = 'hba_commentaire';
467
    $form->style_radiocheckbox = 'hba_radio';
468
 
469
    // Propose par defaut l'adresse de l'organisation
470
    $requete =    'SELECT ADRESS_LINE, TOWN, ZIP '.
471
                'FROM HERBIERS_ORGANISATION '.
472
                'WHERE ID_ORG = '.$un_herbier->organisation->getId();
473
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
474
    $ligne = mysql_fetch_object($resultat);
475
 
476
    $form->addChamps('NOM', 'Nom : ');
477
    $form->addChamps('PRENOM', 'Prénom : ');
478
    $form->addChamps('ADRESSE1', 'Adresse : ', $ligne->ADRESS_LINE);
479
    $form->addChamps('ADRESSE2', 'Adresse : ');
480
    $form->addChamps('CP', 'Code postal : ', $ligne->ZIP);
481
    $form->addChamps('VILLE', 'Ville : ', $ligne->TOWN);
482
    $form->addChamps('MAIL', 'email : ');
483
    $form->addChamps('TEL', 'Tél : ');
484
    $form->addChamps('FAX', 'Fax : ');
485
    $form->addChamps('FONCTION', 'Fonction : ');
486
    $form->radioEnum('CONTACT', 'La personne est-elle contact ? : ','non');
12 jp_milcent 487
    // Gestion des métadonnées
488
	gererMetaForm(&$form, &$un_herbier);
489
 
2 jp_milcent 490
    if ($un_herbier->organisation->getId() != HBA_EXEMPLE_ID) {
491
        $form->submit('Valider');
492
    }
493
    $form->annuler('Annuler', sprintf($un_herbier->url_action_org, MOD_HERB, $un_herbier->organisation->getId()));
494
}
495
 
496
function suppr_staff(&$un_herbier)
497
{
498
    $requete =  'DELETE FROM HERBIERS_ont_un_staff '.
499
                'WHERE ID_STAFF = '.$un_herbier->equipe->getId().' '.
500
                'AND ID_ORG = '.$un_herbier->organisation->getId();
501
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
502
    // Verification que la fiche de herbiers_staff ai encore une utilite
503
    $requete = 'SELECT ID_STAFF FROM HERBIERS_ont_un_staff WHERE ID_STAFF = '.$un_herbier->equipe->getId();
504
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
505
    // le membre n'est plus dans aucun herbier, on le supprime
506
    if (mysql_num_rows($resultat) == 0) {
507
        $requete = 'DELETE FROM HERBIERS_STAFF WHERE ID_STAFF = '.$un_herbier->equipe->getId();
508
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
509
    }
510
}
511
 
512
function mod_staff(&$un_herbier)
513
{
514
    // Initialisation de variables
515
    $id_equipe = $un_herbier->equipe->getId();
516
    $id_org = $un_herbier->organisation->getId();
517
 
518
    // Création du formulaire de modification
519
    $retour = '<h1>'.'Modification d\'un membre de l\'équipe'.'</h1>'."\n";
520
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_STAFF', 'MOD', $id_equipe, 'ID_STAFF');
521
    form_team($form, $un_herbier);
522
    $url = sprintf($un_herbier->getUrlActionOrgEquipe(), MOD_STAFF_V, $id_org, $id_equipe);
523
    $retour .= $form->printForm($url);
524
    $form->finalise('form_staff');
525
    return $retour;
526
}
527
 
528
function mod_staff_v(&$un_herbier)
529
{
530
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_STAFF');
531
    $form = $form->acquerir('HERBIERS_STAFF');
532
    $form->updateMySQL('ID_STAFF', $un_herbier->equipe->getId());
533
}
534
 
535
// +------------------------------------------------------------------------------------------------------+
536
// GESTION des COLLECTIONS
537
 
538
function liste_coll(&$un_herbier)
539
{
540
    // Initialisation de variables
541
    $retour = '';
542
    $id_action = $un_herbier->getAction();
543
    $id_org = $un_herbier->organisation->getId();
544
    $id_coll = null;
545
    if (is_object($un_herbier->getCollection())) {
546
        $id_coll = $un_herbier->collection->getId();
547
    }
548
 
549
    $requete =  'SELECT NOM_COLLECTION,ID '.
550
                'FROM HERBIERS_COLLECTION '.
551
                'WHERE PARENT_ID = '.$id_org;
552
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
553
 
554
    if (mysql_num_rows($resultat) == 0) {
555
        $retour .= '<p class="hba_attention">'.'Aucune collection renseignée !'.'</p>'."\n";
556
        return $retour;
557
    }
558
    $retour .=  '<div class="hba_liste_collection">'."\n".
559
                '<table>'."\n".
560
                '<thead><tr><th colspan="2">'.'Nom'.'</th><th colspan="3">'.'Actions'.'</th></tr></thead>'."\n".
561
                '<tbody>'."\n";
562
    while ($ligne = mysql_fetch_object($resultat)) {
563
        $retour .= '<tr class="'.color_alterne(&$flag).'"><td class="hb_plier_deplier">';
564
        $requete_indic =    'SELECT ID_INDIC '.
565
                            'FROM HERBIERS_INDIC '.
566
                            'WHERE ID = '.$ligne->ID;
567
        $resultat_indic = mysql_query($requete_indic) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete_indic));
568
        if (mysql_num_rows($resultat_indic) > 0) {
569
            $xhtml_fermer = '<a href="'.sprintf($un_herbier->getUrlActionOrgColl(), MOD_HERB, $id_org, $ligne->ID).'">'."\n".
570
                            '<img class="'.HB_CLASS_IMG_FERMER.'" src="'.HB_IMG_FERMER.'" alt="fermer" />'."\n".
571
                            '</a>'."\n";
572
            $xhtml_ouvrir = '<a href="'.sprintf($un_herbier->getUrlActionOrgColl(), HBA_ACTION_COLL_DEROULER, $id_org, $ligne->ID).'">'."\n".
573
                            '<img class="'.HB_CLASS_IMG_ICONE.'" src="'.HB_IMG_OUVRIR.'" alt="dérouler" />'."\n".
574
                            '</a>'."\n";
575
            if ($id_coll == $ligne->ID) {
576
                switch ($id_action) {
577
                    case HBA_ACTION_COLL_DEROULER :
578
                    case SUPPR_NOTE :
579
                    case MOD_NOTE :
580
                    case MOD_NOTE_V :
581
                        $retour .= $xhtml_fermer;
582
                    break;
583
                    default :
584
                        $retour .= $xhtml_ouvrir;
585
                }
586
            } else {
587
                $retour .= $xhtml_ouvrir;
588
            }
589
        }
590
        $retour .= '</td><td>';
591
        $retour .= $ligne->NOM_COLLECTION.'</td>';
592
        $retour .=  '<td><a href="'.
593
                    sprintf($un_herbier->getUrlActionOrgColl(), MOD_DESC, $id_org, $ligne->ID).
594
                    '">'.'modifier'.'</a></td>'."\n";
595
        if ($id_org != HBA_EXEMPLE_ID) {
596
            $retour .=  '<td><a href="'.
597
                        sprintf($un_herbier->getUrlActionOrgColl(), SUPPR_COLL, $id_org, $ligne->ID).
598
                        '" onclick="javascript:return confirm(\''.'Étes vous sûr de vouloir supprimer cette collection ?'.'\');">'.
599
                        'supprimer'.'</a>&nbsp;</td>'."\n";
600
        }
601
        $retour .=  '<td><a href="'.
602
                    sprintf($un_herbier->getUrlActionOrgColl(), NOUV_INDIC, $id_org, $ligne->ID).
603
                    '">'.'ajouter note'.'</a></td>'."\n";
604
        $retour .= '</tr>';
605
 
606
        switch ($id_action) {
607
            case HBA_ACTION_COLL_DEROULER :
608
            case SUPPR_NOTE :
609
            case MOD_NOTE :
610
            case MOD_NOTE_V :
611
                if ($id_coll == $ligne->ID) {
612
                    $retour .= '<tr class="hba_liste_note"><td colspan="5">'.liste_indic($un_herbier).'</td></tr>'."\n";
613
                }
614
                break;
615
        }
616
    }
617
    $retour .= '</tbody>'."\n".'</table>'."\n".'</div>';
618
 
619
    return $retour;
620
}
621
 
622
function nouv_coll(&$un_herbier)
623
{
624
    $retour = '<h1>'.'Ajout d\'une collection'.'</h1>'."\n";
625
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_COLLECTION');
626
    $form->style_general = 'insInputForm';
627
    form_herb_2($form, $un_herbier);
628
    $retour .= $form->printForm(sprintf($un_herbier->url_action_org, NOUVEAU_HERB4, $un_herbier->organisation->getId()))."\n";//, null, 'liste'
629
    $form->finalise('form_2');
630
    return $retour;
631
}
632
 
633
function form_herb_2(&$form, &$un_herbier)
634
{
635
    // Définition des styles
636
    $form->style_general = 'hba_formulaire';
637
    $form->style_label = 'hba_label';
638
    $form->style_button = 'hba_bouton';
639
    $form->style_commentaire = 'hba_commentaire';
640
    $form->style_radiocheckbox = 'hba_radio';
641
 
642
    // Choix des champs
643
    $form->addChamps('NOM_COLLECTION', 'Nom de la collection : ');
644
    $form->addChamps('COLLECTION_CODE', 'Sigle d\'usage de la collection : ');
645
    $form->addChamps('DESCRIPTION', 'Description générale : ');
646
    $form->radioFromTable('STATUT par HERBIERS_COLL_STATUT', 1, 'Statut de la collection : ');
20 jp_milcent 647
    $form->addCommentaire('<strong>Notes sur les collecteurs</strong>');
648
    $form->addCommentaire('Les collecteurs doivent être séparés par un retour à la ligne (entrée).');
649
    $form->addCommentaire('Format : NOM, Prénom (notes) {date de naissance (lieu de naissance) - date de décès (lieu de décès)} [lieu de récolte, date de récolte;lieu de récole, date de récolte...]');
650
    $form->addCommentaire('Exemple : AARONSOHN, Aaron (2ème jeux après AAR) {?-1919} [IL,1905;PS,1906]');
651
    $form->addCommentaire('Pour les lieux de récolte, vous pouvez utiliser <a href="http://fr.wikipedia.org/wiki/ISO_3166-1" class="lien_ext">les codes ISO des pays</a>. '.
652
    		'Pour les données inconnues, un point d\'interrogation. '.
653
    		'Pour les dates, indiquer seulement l\'année sinon utiliser le format : jj/mm/aaaa');
2 jp_milcent 654
    $form->addChamps('COLLECTEURS', 'Collecteurs : ');
655
    $form->addCommentaire('<b>Dates extrêmes de récolte des spécimens</b>');
656
    $form->addCommentaire('Les dates doivent être saisies selon le format jj-mm-année, par ex: 05-06-1956');
657
    $form->addCommentaire('Laisser en blanc la date de fin si la collection est encore alimentée');
658
 
659
    // Les dates de début et fin de récolte
19 jp_milcent 660
    $form->addChamps('DATE_DEBUT', 'Date extrême de récolte des spécimens (début) : ', '', 'text');
661
    $form->radioFromTable('DATE_DEBUT_CARAC par HERBIERS_DATE_DEBUT_CARAC', '', 'Caractériser la date de début : ');
662
    $form->addChamps('DATE_FIN', 'Date extrême de récolte des spécimens (fin) : ');
663
    $form->radioFromTable('DATE_FIN_CARAC par HERBIERS_DATE_FIN_CARAC', '', 'Caractériser la date de fin : ');
2 jp_milcent 664
 
665
    // L'url de la collection
666
    $form->addChamps('URL', 'URL vers le site de la collection (optionnel) : ');
667
 
668
    // Types, spécimens et dénombrement
669
    $radio = array('0', 'indéterminé', '1', 'non', '2', 'oui');
670
    $form->radio('INCLUDED_TYPE', $radio, 'Y-a-t\'il des échantillons-types : ');
671
    $form->addCommentaire('<b>Mode de conservation des spécimens :</b>');
672
    $form->checkboxFromTable('HERBIERS_COLLECTION par HERBIERS_ont_pres et HERBIERS_PRES', 'Cocher les cases : ', '','LIGNE', 'ID', 'ID_PRES', 'ID_PRES');
673
    $form->addChamps('NUM_SPECIMENS', 'Nombre de spécimens : ');
674
    $form->radioFromTable('PREC_SPECIMENS par HERBIERS_DENOMBREMENT_CARAC_SP', '', 'Caractériser le dénombrement');
675
    $form->addChamps('NUM_SPECIES', 'Nombre d\'espèces : ');
676
    $form->radioFromTable('PREC_SPECIES par HERBIERS_DENOMBREMENT_CARAC_SC', '', 'Caractériser le dénombrement');
677
 
678
    // État de la collection
679
    $form->addCommentaire('État de la collection : de 1 (= inconnu) à 4 (= excellent, parfait)');
680
    $form->radioEnum('ETAT_SPECIMENS', 'État des spécimens : ');
681
    $form->radioEnum('ETAT_CLASSEMENT', 'État du classement : ');
682
    $form->radioEnum('ETAT_PRESENTATION', 'État de la présentation : ');
683
    $form->addCommentaire('<br />');
684
 
685
    // Classement
686
    $form->addChamps('MODE_CLASSEMENT', 'Méthode de classement : ');
687
 
688
    // Documentation
689
    $form->addCommentaire(  '<h2>'.'Informations sur la documentation disponible :'.'</h2>'.
690
                            '<ul>'."\n".
691
                            '<li>'.'documents associés à la collection (publications directement liées comme Flores, '.
692
                            'documents in&eacute;dits tels que dessins, aquarelles, carnets de notes de terrain...)'.'</li>'.
693
                            '<li>'.'documents sur la collection ou les collecteurs (publications relatant '.
694
                            'l\'acquisition, notices nécrologiques et/ou biographiques...)'.'</li>'.
695
                            '</ul>'."\n"
696
                        );
697
    $form->addChamps('DOC_STATE', 'État de la documentation : ');
698
    $form->addChamps('PERCENT_DATABASED', '% de la documentation en base de données : ');
12 jp_milcent 699
	// Gestion des métadonnées
700
	gererMetaForm(&$form, &$un_herbier);
7 jp_milcent 701
 
12 jp_milcent 702
 
2 jp_milcent 703
    if ($un_herbier->organisation->getId() != HBA_EXEMPLE_ID) {
704
        $form->submit('Valider');
705
    }
706
    $form->annuler('Annuler', sprintf($un_herbier->url_action_org, MOD_HERB, $un_herbier->organisation->getId()));
707
}
708
 
709
function nouveau_herb4(&$un_herbier)
710
{
711
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], '');
712
    $form = $form->acquerir('HERBIERS_COLLECTION');
713
    $form->insertMySQL('PARENT_ID = '.$un_herbier->organisation->getId());
714
}
715
 
716
function mod_desc(&$un_herbier)
717
{
718
    // Intitialisation de variables
719
    $id_coll = $un_herbier->collection->getId();
720
    $id_org = $un_herbier->organisation->getId();
721
 
722
    // Création du formulaire de modification
723
    $retour = '<h1>'.'Modification d\'une collection'.'</h1>'."\n";
724
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_COLLECTION', 'MOD', $id_coll, 'ID');
725
    form_herb_2($form, $un_herbier);
726
    $retour .= $form->printForm(sprintf($un_herbier->getUrlActionOrgColl(), MOD_DESC_V, $id_org, $id_coll));
727
    $form->finalise('un_form');
728
 
729
    return $retour;
730
}
731
 
732
function mod_desc_v(&$un_herbier)
733
{
734
    // Intitialisation de variables
735
    $id_coll = $un_herbier->collection->getId();
736
 
737
    // Insertion des infos après vérification
738
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_COLLECTION');
739
    $form = $form->acquerir('HERBIERS_COLLECTION');
740
    $form->updateMySQL('ID', $id_coll);
741
}
742
 
743
function suppr_coll(&$un_herbier, $id_coll_param = null)
744
{
745
    // Initialisation de variables
746
    // Si l'identifiant de la collection est passé comme argument de la fonction
747
    if (!is_null($id_coll_param)) {
748
        $id_coll = $id_coll_param;
749
    } else {
750
        $id_coll = $un_herbier->collection->getId();
751
    }
752
 
753
    $requete =  'DELETE FROM HERBIERS_COLLECTION '.
754
                'WHERE ID = '.$id_coll;
755
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
756
    $requete =  'SELECT ID_INDIC '.
757
                'FROM HERBIERS_INDIC '.
758
                'WHERE ID = '.$id_coll;
759
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
760
    while ($ligne = mysql_fetch_object($resultat)) {
761
        suppr_note($un_herbier, $ligne->ID_INDIC);
762
    }
763
}
764
 
765
// +------------------------------------------------------------------------------------------------------+
766
// GESTION des NOTES
767
 
768
function liste_indic(&$un_herbier)
769
{
770
    // Initialisation des variables
771
    $id_org = $un_herbier->organisation->getId();
772
    $id_coll = $un_herbier->collection->getId();
773
 
774
    $requete =  'SELECT ID_INDIC, TXT_INDIC '.
775
                'FROM HERBIERS_INDIC WHERE ID = '.$id_coll;
776
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
777
 
778
    $retour =   '<div class="hba_liste_note">'."\n".
779
                '<table>'."\n";
780
    $num_row = mysql_num_rows($resultat);
781
    $compteur = 0;
782
    while ($row = mysql_fetch_object($resultat)) {
783
        $compteur++;
784
        $retour .= '<tr class="hb_arborescence"><td>';
785
        if ($compteur == $num_row) {
786
            $retour .= '<img src="'.HB_IMG_ARBO_FIN.'" alt="|_" />';
787
        } else {
788
            $retour .= '<img src="'.HB_IMG_ARBO.'" alt="|-" />';
789
        }
790
        $retour .= '</td><td>';
791
        if ($txt_court = raccourcirTexte($row->TXT_INDIC, HBA_LONGUEUR_NOTE_TXT)) {
792
            $retour .= '<abbr title="'.$row->TXT_INDIC.'">'.$txt_court.'</abbr>';
793
        } else {
794
            $retour .= $row->TXT_INDIC;
795
        }
796
        $retour .= '</td>'."\n";
797
        $retour .= '<td><a href="'.
798
                    sprintf($un_herbier->getUrlActionOrgCollNote(), MOD_NOTE, $id_org, $id_coll, $row->ID_INDIC).
799
                    '">'.'modifier'.'</a></td>'."\n";
800
        if ($id_org != HBA_EXEMPLE_ID) {
801
            $retour .=  '<td><a href="'.
802
                        sprintf($un_herbier->getUrlActionOrgCollNote(), SUPPR_NOTE, $id_org, $id_coll, $row->ID_INDIC).'" '.
803
                        'onclick="javascript:return confirm(\''.'Êtes-vous sûr de vouloir supprimer cette note ?'.'\');"'.
804
                        '>'.'supprimer'.'</a></td></tr>'."\n";
805
        }
806
    }
807
    $retour .= '</table>'."\n".'</div>'."\n";
808
    return $retour;
809
}
810
 
811
function nouv_indic(&$un_herbier)
812
{
813
    // Initialisation des variables
814
    $id_org = $un_herbier->organisation->getId();
815
    $id_coll = $un_herbier->collection->getId();
816
 
817
    $retour = '<h1>'.'Ajout d\'une note'.'</h1>'."\n";
818
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_INDIC');
819
    form_indic($form, $un_herbier);
820
    $retour .= $form->printForm(sprintf($un_herbier->getUrlActionOrgColl(), NOUV_INDIC_V, $id_org, $id_coll));
821
    $form->finalise('form_indic');
822
    return $retour;
823
}
824
 
825
function form_indic(&$form, &$un_herbier)
826
{
827
    // Initialisation des variables
828
    $id_org = $un_herbier->organisation->getId();
829
    $id_coll = $un_herbier->collection->getId();
830
 
831
    // Définition des styles
832
    $form->style_general = 'hba_formulaire';
833
    $form->style_label = 'hba_label';
834
    $form->style_button = 'hba_bouton';
835
    $form->style_commentaire = 'hba_commentaire';
836
    $form->style_radiocheckbox = 'hba_radio';
837
 
838
    $form->addChamps('TXT_INDIC', 'Texte de la note : ');
839
    $form->addChamps('REM_INDIC', 'Remarque : ');
840
    $form->checkboxFromTable(   'HERBIERS_INDIC par HERBIERS_A_UN_TYPE et HERBIERS_TYPE',
841
                                'Cocher les cases : ', '', 'LIGNE', 'ID_INDIC', 'ID_TYPE', 'ID_TYPE');
12 jp_milcent 842
 
2 jp_milcent 843
    $form->submit('Valider');
844
    $form->annuler('Annuler', sprintf($un_herbier->getUrlActionOrgColl(), HBA_ACTION_COLL_DEROULER, $id_org, $id_coll));
845
}
846
 
847
function nouv_indic_v(&$un_herbier)
848
{
849
    // Initialisation des variables
850
    $id_coll = $un_herbier->collection->getId();
851
    $id_utilisateur = $un_herbier->utilisateur->getId();
852
 
853
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_INDIC');
854
    $form = $form->acquerir('HERBIERS_INDIC');
855
    $id_note = $form->insertMySQL('ID = '.$id_coll.', MAJ_INDIC = UNIX_TIMESTAMP()');
856
 
857
    // Insertion dans la table des historiques des indications
858
    $requete = 'INSERT INTO HERBIERS_INDIC_HISTORIQUE VALUES ("", '.$id_note.', UNIX_TIMESTAMP(), '.$id_utilisateur.' )';
859
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
860
}
861
 
862
function mod_note(&$un_herbier)
863
{
864
    // Initialisation des variables
865
    $id_org = $un_herbier->organisation->getId();
866
    $id_coll = $un_herbier->collection->getId();
867
    $id_note = $un_herbier->note->getId();
868
 
869
    $retour = '<h1>'.'Modification d\'une note'.'</h1>'."\n";
870
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_INDIC', 'MOD', $id_note, 'ID_INDIC') ;
871
    form_indic($form, $un_herbier);
872
    $retour .= $form->printForm(sprintf($un_herbier->getUrlActionOrgCollNote(), MOD_NOTE_V, $id_org, $id_coll, $id_note));
873
    $form->finalise('form_indic');
874
    return $retour;
875
}
876
 
877
function mod_note_v(&$un_herbier)
878
{
879
    // Initialisation des variables
880
    $id_note = $un_herbier->note->getId();
881
    $id_utilisateur = $un_herbier->utilisateur->getId();
882
 
883
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_INDIC');
884
    $form = $form->acquerir('HERBIERS_INDIC');
885
    $form->updateMySQL('ID_INDIC', $id_note, 'MAJ_INDIC = UNIX_TIMESTAMP()');
886
    // Insertion dans la table des historiques des indications
887
    $requete = 'INSERT INTO HERBIERS_INDIC_HISTORIQUE VALUES("", '.$id_note.', UNIX_TIMESTAMP(), '.$id_utilisateur.')';
888
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
889
}
890
 
891
function suppr_note(&$un_herbier, $id_note_param = null)
892
{
893
    // Initialisation de variables
894
    // Si l'identifiant de la note est passé comme argument de la fonction
895
    if (!is_null($id_note_param)) {
896
        $id_note = $id_note_param;
897
    } else {
898
        $id_note = $un_herbier->note->getId();
899
    }
900
 
901
    $requete =  'DELETE FROM HERBIERS_INDIC '.
902
                'WHERE ID_INDIC = '.$id_note;
903
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
904
 
905
    $requete =  'DELETE FROM HERBIERS_A_UN_TYPE '.
906
                'WHERE ID_INDIC = '.$id_note;
907
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
908
}
909
 
910
// +------------------------------------------------------------------------------------------------------+
911
// GESTION des CORRESPONDANTS
912
// renvoie le code html d'une liste de correspondant
913
function liste_corr(&$un_herbier)
914
{
915
    // Initialisation de variables
916
    $retour = '';
917
    $id_action = $un_herbier->getAction();
918
 
919
    $id_cor = null;
920
    if (is_object($un_herbier->getCorrespondant())) {
921
        $id_cor = $un_herbier->correspondant->getId();
922
    }
923
 
924
    $retour .= '<h1 class="hba_titre">'.'Liste des correspondants régionaux'.'</h1>'."\n";
925
 
926
    $requete =  'SELECT '.HB_BDD_TAB_ANNUAIRE_CHP_ID.', '.HB_BDD_TAB_ANNUAIRE_CHP_NOM.', '.HB_BDD_TAB_ANNUAIRE_CHP_PRENOM.' '.
927
                'FROM '.HB_BDD_TAB_ANNUAIRE.', '.HB_BDD_NOM.'.EFLORE_DROIT_POSSEDER '.
928
                'WHERE '.HB_BDD_TAB_ANNUAIRE_CHP_ID.' = EDP_ID_UTILISATEUR '.
929
                'ORDER BY '.HB_BDD_TAB_ANNUAIRE_CHP_NOM.' ASC';
930
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
931
    if (mysql_num_rows($resultat) == 0) {
932
        $retour .= '<p class="hba_attention">'.'Aucun correspondant inscrit !'.'</p>'."\n";
933
        return $retour;
934
    }
935
 
936
    $liste_inst = '';
937
    $retour .=  '<div class="hba_liste_correspondant">'."\n".
938
                '<table>'."\n".
939
                '<thead><tr><th colspan="2">'.'Nom'.'</th><th>'.'Prénom'.'</th><th colspan="2">'.'Actions'.'</th></tr></thead>'."\n".
940
                '<tbody>'."\n";
941
    while ($ligne = mysql_fetch_object($resultat)) {
942
        // Recherche des institutions dont ils ont la responsabilité
943
        $requete_inst = 'SELECT INSTITUTION_NAME '.
944
                        'FROM '.HB_BDD_NOM.'.HERBIERS_ORGANISATION, '.HB_BDD_NOM.'.HERBIERS_ADMINISTRER '.
945
                        'WHERE HA_ID_ANNUAIRE = '.$ligne->U_ID.' '.
946
                        'AND HA_ID_ORG = ID_ORG '.
947
                        'ORDER BY INSTITUTION_NAME ASC';
948
        $resultat_inst = mysql_query($requete_inst) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete_inst));
949
 
950
        $retour .=  '<tr class="'.color_alterne(&$flag).'"><td id="hba_correspondant_'.$ligne->U_ID.'" class="hb_plier_deplier">';
951
        if (mysql_num_rows($resultat_inst) > 0) {
952
            $nbre_ligne = mysql_num_rows($resultat_inst);
953
            $compteur = 0;
954
            $liste_inst = '<table>'."\n";
955
            while ($ligne_inst = mysql_fetch_object($resultat_inst)) {
956
                $compteur++;
957
                $liste_inst .= '<tr class="hb_arborescence"><td>';
958
                if ($compteur == $nbre_ligne) {
959
                    $liste_inst .= '<img src="'.HB_IMG_ARBO_FIN.'" alt="|_" />';
960
                } else {
961
                    $liste_inst .= '<img src="'.HB_IMG_ARBO.'" alt="|-" />';
962
                }
963
                $liste_inst .= '</td><td>'.$ligne_inst->INSTITUTION_NAME.'</td></tr>'."\n";
964
            }
965
            $liste_inst .= '</table>'."\n";
966
            $xhtml_fermer = '<a href="'.sprintf($un_herbier->getUrlActionCor(), HBA_ACTION_ANNULER, $ligne->U_ID, $ligne->U_ID).'">'."\n".
967
                            '<img class="'.HB_CLASS_IMG_FERMER.'" src="'.HB_IMG_FERMER.'" alt="fermer" />'."\n".
968
                            '</a>'."\n";
969
            $xhtml_ouvrir = '<a href="'.sprintf($un_herbier->getUrlActionCor(), HBA_ACTION_COR_DEROULER, $ligne->U_ID, $ligne->U_ID).'">'."\n".
970
                            '<img class="'.HB_CLASS_IMG_ICONE.'" src="'.HB_IMG_OUVRIR.'" alt="dérouler" />'."\n".
971
                            '</a>'."\n";
972
            if ($id_cor == $ligne->U_ID) {
973
                switch ($id_action) {
974
                    case HBA_ACTION_COR_DEROULER :
975
                        $retour .= $xhtml_fermer;
976
                    break;
977
                    default :
978
                        $retour .= $xhtml_ouvrir;
979
                }
980
            } else {
981
                $retour .= $xhtml_ouvrir;
982
            }
983
        } else {
984
            $retour .= '&nbsp;';
985
        }
986
        $retour .= '</td>';
987
        $retour .= '<td>'.$ligne->U_NAME.'</td>';
988
        $retour .= '<td>'.$ligne->U_SURNAME.'</td>';
989
        $retour .=  '<td><a href="'.sprintf($un_herbier->getUrlActionCor(), SUPPR_CORR, $ligne->U_ID, $ligne->U_ID).'" '.
990
                    'onclick="javascript:return confirm(\''.'Êtes-vous sûr de vouloir supprimer ce correspondant ?'.'\');"'.
991
                    '>'.'supprimer'.'</a></td></tr>'."\n";
992
 
993
        switch ($id_action) {
994
            case HBA_ACTION_COR_DEROULER :
995
                if ($id_cor == $ligne->U_ID) {
996
                    $retour .= '<tr class="hba_liste_organisation"><td colspan="4">'.$liste_inst.'</td></tr>'."\n";
997
                }
998
                break;
999
        }
1000
    }
1001
    $retour .= '</tbody>'."\n".'</table>'."\n".'</div>'."\n";
1002
    return $retour;
1003
}
1004
 
1005
function nouveau_corr_v(&$un_herbier)
1006
{
1007
    $id_cor = $un_herbier->correspondant->getId();
1008
 
1009
    $requete =  'SELECT EDP_ID_DROIT '.
1010
                'FROM EFLORE_DROIT_POSSEDER '.
1011
                'WHERE EDP_ID_UTILISATEUR = '.$id_cor.' '.
1012
                'AND EDP_ID_PROJET = 1 '.
1013
                'AND EDP_ID_DROIT < 3';
1014
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1015
    if (mysql_num_rows($resultat) == 0) {
1016
        $requete =  'INSERT INTO EFLORE_DROIT_POSSEDER '.
1017
                    'SET EDP_ID_DROIT = 2, EDP_ID_PROJET = 1, EDP_ID_UTILISATEUR = '.$id_cor;
1018
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1019
        $retour = '<p class="hba_information">'.'Le correspondant a été ajouté'.'</p>'."\n";
1020
    } else {
1021
        $retour = '<p class="hba_attention">'.'L\'utilisateur est déjà inscrit comme correspondant régional'.'</p>'."\n";
1022
    }
1023
    return $retour;
1024
}
1025
 
1026
function suppr_corr(&$un_herbier)
1027
{
1028
    // Initialisation des variables
1029
    $id_cor = $un_herbier->correspondant->getId();
1030
 
1031
    $requete =  'SELECT EDP_ID_UTILISATEUR '.
1032
                'FROM EFLORE_DROIT_POSSEDER '.
1033
                'WHERE EDP_ID_PROJET = 1 '.
1034
                'AND EDP_ID_UTILISATEUR = '.$id_cor;
1035
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1036
    if (mysql_num_rows($resultat) != 0) {
1037
        $requete =  'DELETE FROM EFLORE_DROIT_POSSEDER '.
1038
                    'WHERE EDP_ID_UTILISATEUR = '.$id_cor.' '.
1039
                    'AND EDP_ID_PROJET = 1';
1040
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1041
        $retour = '<p class="hba_information">'.'Le correspondant a été supprimé de la base'.'</p>'."\n";
1042
    } else {
1043
        $retour = '<p class="hba_attention">'.'L\'utilisateur n\'était pas un correspondant régional'.'</p>'."\n";
1044
    }
1045
    return $retour;
1046
}
1047
 
1048
// +------------------------------------------------------------------------------------------------------+
1049
// GESTION des RÉDACTEURS
1050
 
1051
// renvoie le code html d'une liste de rédacteur
1052
function liste_red(&$un_herbier)
1053
{
1054
    $retour = '';
1055
    $retour .= '<h1 class="hba_titre">'.'Liste de vos rédacteurs'.'</h1>'."\n";
1056
 
1057
    $requete =  'SELECT '.HB_BDD_TAB_ANNUAIRE_CHP_ID.', '.HB_BDD_TAB_ANNUAIRE_CHP_NOM.', '.HB_BDD_TAB_ANNUAIRE_CHP_PRENOM.' '.
1058
                'FROM '.HB_BDD_TAB_ANNUAIRE.', '.HB_BDD_NOM.'.HERBIERS_COORDONNE '.
1059
                'WHERE '.HB_BDD_TAB_ANNUAIRE_CHP_ID.' = HC_ID_REDACTEUR '.
1060
                'AND HC_ID_COORDINATEUR = '.$un_herbier->utilisateur->getId();
1061
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1062
    if (mysql_num_rows($resultat) == 0) {
1063
        $retour .= '<p class="hba_attention">'.'Aucun rédacteur inscrit !'.'</p>'."\n";
1064
        return $retour;
1065
    }
1066
    $retour .=  '<div class="hba_liste_redacteur">'."\n".
1067
                '<table>';
1068
    while ($ligne = mysql_fetch_object($resultat)) {
1069
        $retour .=  '<tr class="'.color_alterne(&$flag).'"><td class="hb_plier_deplier">';
1070
        /*
1071
        if (mysql_num_rows($resultat_indic) > 0) {
1072
            $xhtml_fermer = '<a href="'.sprintf($un_herbier->getUrlActionOrgColl(), MOD_HERB, $id_org, $ligne->ID).'">'."\n".
1073
                            '<img class="'.HB_CLASS_IMG_FERMER.'" src="'.HB_IMG_FERMER.'" alt="fermer" />'."\n".
1074
                            '</a>'."\n";
1075
            $xhtml_ouvrir = '<a href="'.sprintf($un_herbier->getUrlActionOrgColl(), HBA_ACTION_RED_DEROULER, $id_org, $ligne->ID).'">'."\n".
1076
                            '<img class="'.HB_CLASS_IMG_ICONE.'" src="'.HB_IMG_OUVRIR.'" alt="dérouler" />'."\n".
1077
                            '</a>'."\n";
1078
            if ($id_coll == $ligne->ID) {
1079
                switch ($id_action) {
1080
                    case HBA_ACTION_RED_DEROULER :
1081
                        $retour .= $xhtml_fermer;
1082
                    break;
1083
                    default :
1084
                        $retour .= $xhtml_ouvrir;
1085
                }
1086
            } else {
1087
                $retour .= $xhtml_ouvrir;
1088
            }
1089
        }
1090
        */
1091
        $retour .=  '</td><td>'.$ligne->U_NAME.'</td>'.
1092
                    '<td>'.$ligne->U_SURNAME.'</td>'."\n".
1093
                    '<td><a href="'.sprintf($un_herbier->getUrlActionRed(), SUPPR_RED, $ligne->U_ID).'" '.
1094
                    'onclick="javascript:return confirm(\''.'Êtes-vous sûr de vouloir supprimer ce rédacteur ?'.'\');">'.
1095
                    'supprimer'.
1096
                    '</a></td>'.
1097
                    '</tr>'."\n";
1098
    }
1099
    $retour .= '</table>'."\n".'</div>'."\n";
1100
 
1101
    return $retour;
1102
}
1103
 
1104
function nouveau_red_v(&$un_herbier)
1105
{
1106
    $id_red = $un_herbier->redacteur->getId();
1107
    $id_utilisateur = $un_herbier->utilisateur->getId();
1108
 
1109
    $requete =  'SELECT HERBIERS_COORDONNE.HC_ID_REDACTEUR '.
1110
                'FROM HERBIERS_COORDONNE, EFLORE_DROIT_POSSEDER '.
1111
                'WHERE HC_ID_REDACTEUR = '.$id_red.' '.
1112
                'AND HC_ID_COORDINATEUR = EDP_ID_UTILISATEUR '.
1113
                'AND EFLORE_DROIT_POSSEDER.EDP_ID_UTILISATEUR = '.$id_utilisateur.' '.
1114
                'AND EFLORE_DROIT_POSSEDER.EDP_ID_DROIT < 3 '.
1115
                'AND EFLORE_DROIT_POSSEDER.EDP_ID_PROJET = 1';
1116
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1117
    if (mysql_num_rows($resultat) == 0) {
1118
        $requete =  'INSERT INTO HERBIERS_COORDONNE '.
1119
                    'SET HC_ID_REDACTEUR = '.$id_red.', HC_ID_COORDINATEUR = '.$id_utilisateur;
1120
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1121
 
1122
        // Insertion du rédacteur dans EFLORE_DROIT_POSSEDER, s'il n'y est pas déjà
1123
        $requete =  'SELECT * '.
1124
                    'FROM EFLORE_DROIT_POSSEDER '.
1125
                    'WHERE EDP_ID_PROJET = 1 '.
1126
                    'AND EDP_ID_UTILISATEUR = '.$id_red;
1127
        $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1128
 
1129
        // Si le rédacteur n'existe pas on l'insere avec le droit 3 (modération ou ici rédacteur)
1130
        if (mysql_num_rows($resultat) == 0) {
1131
            $requete =  'INSERT INTO EFLORE_DROIT_POSSEDER '.
1132
                        'SET EDP_ID_DROIT = 3, EDP_ID_PROJET = 1, EDP_ID_UTILISATEUR = '.$id_red;
1133
            mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1134
        }
1135
        $retour = '<p class="hba_information">'.'Le correspondant a été ajouté'.'</p>'."\n";
1136
    } else {
1137
        $retour = '<p class="hba_attention">'.'L\'utilisateur est déjà inscrit comme rédacteur'.'</p>'."\n";
1138
    }
1139
    return $retour;
1140
}
1141
 
1142
function suppr_red(&$un_herbier)
1143
{
1144
    // Initialisation des variables
1145
    $id_red = $un_herbier->redacteur->getId();
1146
    $id_utilisateur = $un_herbier->utilisateur->getId();
1147
 
1148
    $requete =  'SELECT EDP_ID_UTILISATEUR '.
1149
                'FROM EFLORE_DROIT_POSSEDER '.
1150
                'WHERE EDP_ID_PROJET = 1 '.
1151
                'AND EDP_ID_UTILISATEUR = '.$id_red.' '.
1152
                'AND EDP_ID_DROIT = 3';
1153
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1154
    if (mysql_num_rows($resultat) != 0) {
1155
        $requete =  'DELETE FROM EFLORE_DROIT_POSSEDER '.
1156
                    'WHERE EDP_ID_UTILISATEUR = '.$id_red.' '.
1157
                    'AND EDP_ID_PROJET = 1';
1158
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1159
        $requete =  'DELETE FROM HERBIERS_COORDONNE '.
1160
                    'WHERE HC_ID_REDACTEUR = '.$id_red;
1161
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1162
        $retour = '<p class="hba_information">'.'Le rédacteur a été supprimé de la base'.'</p>'."\n";
1163
    } else {
1164
        $retour = '<p class="hba_attention">'.'L\'utilisateur n\'était pas un rédacteur'.'</p>'."\n";
1165
    }
1166
    return $retour;
1167
}
1168
 
1169
// +------------------------------------------------------------------------------------------------------+
1170
// GESTION des AIDES
1171
 
1172
function fournirAideInscription()
1173
{
1174
    $retour =  '<h1>'.'Interface d\'administration de la base de données des herbiers de France'.'</h1>'."\n".
1175
                '<p class="hba_aide">'.
1176
                'Vous n\'êtes pas inscrit comme '.'<strong>'.'correspondant régional'.'</strong>'.' ou '.
1177
                '<strong>'.'rédacteur'.'</strong>'.'. '.'<br />'.
1178
                'Si vous souhaitez participer activement au projet d\'inventaire des herbiers de France, vous '.
1179
                'pouvez envoyer un courriel à :'.
1180
                '</p>'."\n".
1181
                '<ul class="hba_aide">'."\n".
1182
                '<li><a href="mailto:mathezf@wanadoo.fr">'.'Joël MATHEZ'.'</a>'.' ou à '.
1183
                '<a href="mailto:pasch@isem.univ-montp2.fr">'.'P.A. Schäfer'.'</a>'.
1184
                ' : pour des questions sur le contenu'.'</li>'."\n".
1185
                '<li><a href="mailto:jpm@tela-botanica.org">'.'Jean-Pascal MILCENT'.'</a>'.
1186
                ' : pour obtenir un droit d\'accès'.'</li>'."\n".
1187
                '</ul>'."\n";
1188
    return $retour;
1189
}
1190
 
1191
function fournirAideAccueil()
1192
{
1193
    $retour =   '<p class="hba_aide">'.
1194
                'Vous devriez voir, ci-contre, un "cartouche" contenant des '.'<emphasis>'.'informations'.'</emphasis>'.
1195
                ' sur votre compte utilisateur (nom, droit d\'accès...)'.
1196
                'ainsi qu\'un '.'<emphasis>'.'menu'.'</emphasis>'.' qui vous permet d\'accèder aux différents '.
1197
                'formulaires de saisi composant l\'interface d\'admnistration des herbiers.'.
1198
                '</p>'."\n".
1199
                '<p class="hba_aide">'.
1200
                'La saisie d\'une nouvelle collection commence par la saisie d\'une structure accueillant '.
1201
                'la ou les collections.'.'<br />'.
1202
                'Pour ce faire, il vous faut cliquez sur le lien "Ajouter une institution (herbier)" présent '.
1203
                'dans le cartouche.'.
1204
                '</p>'."\n";
1205
    return $retour;
1206
}
1207
 
1208
function fournirAideAccueilOrganisation()
1209
{
1210
    $retour =  '<p class="hba_aide">'.
1211
                'Pour <b>créer</b> une institution, il vous faut cliquez sur le lien "Ajouter une institution (herbier)" présent '.
1212
                'dans le cartouche ci-contre.'.'<br />'.
1213
                'Pour <b>éditer</b> une institution existante, son équipe et ses collections, cliquez sur le lien '.
1214
                '<b>modifier</b> situé sur la même ligne que l\'institution que vous avez choisie.'.'<br />'.
1215
                'Vous pouvez également la supprimer en cliquant sur le lien <b>supprimer</b>.'.
1216
                '</p>'."\n";
1217
    return $retour;
1218
}
1219
 
1220
function fournirAideOrganisation()
1221
{
1222
    $retour =  '<p class="hba_aide">'.
1223
                'Le "cartouche" contenant le menu vous propose maintenant de :'.
1224
                '</p>'."\n".
1225
                '<ul class="hba_aide">'."\n".
1226
                '<li><strong>'.'Modifier'.'</strong>'.' les renseignements concernant l\'institution '.'<strong>'.
1227
                '->'.'Modifier l\'institution'.'</strong></li>'."\n".
1228
                '<li><strong>'.'Ajouter'.'</strong>'.' des informations sur les membres travaillant dans l\'institution '.
1229
                'ou dans le cas de petites structures pour indiquer qui est le contact.'.'<strong>'.
1230
                '->'.'Ajouter un membre à l\'équipe</strong></li>'."\n".
1231
                '<li><strong>'.'Ajouter'.'</strong>'.' des informations sur les collections possédées par l\'institution'.'<strong>'.
1232
                '->'.'Ajouter une collection'.'</strong></li>'."\n".
1233
                '</ul>'."\n";
1234
    return $retour;
1235
}
1236
 
1237
function fournirAideEquipe()
1238
{
1239
    $retour =   '<p class="hba_aide">'.
1240
                'Pour une institution donnée, on peut ajouter autant de <b>membres d\'équipe (et/ou contacts)</b> '.
1241
                'que nécessaire.'.'<br />'.
1242
                'Cliquez sur le lien <b>modifier</b> situé sur la même ligne que le membre de l\'équipe que vous avez '.
1243
                'choisie, pour mettre à jour ses informations.'.'<br />'.
1244
                'Vous pouvez également le supprimer en cliquant sur le lien <b>supprimer</b>.'.
1245
                '</p>'."\n";
1246
    return $retour;
1247
}
1248
 
1249
 
1250
function fournirAideCollection()
1251
{
1252
    $retour =   '<p class="hba_aide">'.
1253
                'Pour une collection donnée, on peut ajouter autant de <b>notes (compléments '.
1254
                'd\'information)</b> que nécessaire. Lorsqu\'une collection contient des compléments '.
1255
                'd\'information, un <b>+</b> apparait à gauche de son nom, on peut les éditer en '.
1256
                'cliquant dessus.'.
1257
                '</p>'."\n";
1258
    return $retour;
1259
}
1260
 
1261
function fournirAideParcourirAnnuaire()
1262
{
1263
    $retour =   '<p class="hba_aide">'.
1264
                'Cliquez sur une lettre pour afficher la liste des inscrits au site Tela Botanica dont le nom '.
1265
                'débute par cette lettre.'.
1266
                '</p>'."\n";
1267
    return $retour;
1268
}
1269
 
1270
// +------------------------------------------------------------------------------------------------------+
1271
// FONCTIONS COMMUNES
1272
 
1273
// verifie une valeur et affiche du texte en cons&eacute;quence
1274
function checkvalue($prose, $value = '')
1275
{
1276
    if ($value == '') {
1277
        $retour = '<h1>'.$prose.'</h1>'."\n";
1278
        $retour .= '<input type="submit" value="'.'Recommencer'.'" onclick="javascript:history.go(-1);" />'."\n";
1279
        return $retour;
1280
        }
1281
    return false ;
1282
}
1283
 
1284
function color_alterne(&$flag)
1285
{
1286
    if ($flag) {
1287
        $flag = FALSE;
1288
        return 'pair';
1289
    } else {
1290
        $flag = TRUE;
1291
        return 'impair';
1292
    }
1293
}
1294
 
1295
/** Fonction checkZip() - Teste un code postal français.
1296
*
1297
* L'expression régulière ^[0-9]{5}$ est utilisée pour vérifier
1298
* que nous avons à faire à un code postal français.
1299
*
1300
* @param  string  Le code postal à tester.
1301
* @return boolean retourne vrai si code postal est valide.
1302
*/
1303
function checkZip($code)
1304
{
1305
    if (ereg('^[0-9]{5}$', $code, $match)){
1306
        return TRUE;
1307
    } else {
1308
        return FALSE;
1309
    }
1310
}
1311
 
1312
/** Fonction raccourcirTexte() - Raccourci un texte.
1313
*
1314
* Renvoie le $texte coupe a la $taille indique avec 3 point de suspension.
1315
* Si le texte est plus court que $taille, il n'est pas modifie
1316
*
1317
* @param  string le texte à raccourcir.
1318
* @param  integer le nombre de caractère maximum du texte raccourci.
1319
* @param  boolean mettre FALSE pour ne pas afficher de points de suspenssion.
1320
* @return mixed retourne le texte abrégé ou FALSE.
1321
*/
1322
function raccourcirTexte($texte, $taille = null, $bool_suspenssion = TRUE) {
1323
    if (!is_null($taille) && strlen($texte) > $taille) {
1324
        if ($bool_suspenssion) {
1325
            return substr($texte, 0, $taille - 3).'...';
1326
        } else {
1327
            return substr($texte, 0, $taille);
1328
        }
1329
    }
1330
    return FALSE;
1331
}
1332
 
1333
function parcourrirAnnu(&$un_herbier, $id_action)
1334
{
1335
    // Initialisation de variables
1336
    $db =& $GLOBALS['_HERBIER_']['bdd'];
1337
    $retour = '';
1338
 
1339
    if (NOUVEAU_CORR) {
1340
        $retour .= '<h1>'.'Inscription d\'un correspondant'.'</h1>'."\n";
1341
    } elseif (NOUVEAU_RED) {
1342
        $retour .= '<h1>'.'Inscription d\'un rédacteur'.'</h1>'."\n";
1343
    }
1344
    $retour .= fournirAideParcourirAnnuaire();
1345
    $retour .= '<p class="hba_alphabet">';
1346
    // Ecrire toutes les lettres avec un lien
1347
    for ($i = 65 ; $i < 91 ; $i++) {
1348
        $retour .= '<a href="'.sprintf(HB_URL_COURANTE_ADMIN_ACTION_LETTRE, $un_herbier->getAction(), chr($i));
1349
        $retour .= '">'.chr($i).'</a>'."\n";
1350
    }
1351
    $retour .= '</p>';
1352
 
1353
    // si une lettre est selectionne
1354
    if (!empty($_REQUEST['lettre'])) {
1355
        $requete =  'SELECT '.HB_BDD_TAB_ANNUAIRE_CHP_NOM.', '.HB_BDD_TAB_ANNUAIRE_CHP_PRENOM.', '.
1356
                    HB_BDD_TAB_ANNUAIRE_CHP_ID.', '.HB_BDD_TAB_ANNUAIRE_CHP_MAIL.' '.
1357
                    'FROM '.HB_BDD_TAB_ANNUAIRE.' '.
1358
                    'WHERE ';
1359
        if ($_REQUEST['lettre'] != 'tous') {
1360
            $requete .= HB_BDD_TAB_ANNUAIRE_CHP_NOM.' LIKE "'.$_REQUEST['lettre'].'%" ';
1361
        }
1362
        $requete .= 'ORDER BY '.HB_BDD_TAB_ANNUAIRE_CHP_NOM;
1363
        $resultat = $db->query($requete);
1364
        if (DB::isError($resultat)) {
1365
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete, $resultat->getDebugInfo()));
1366
        }
1367
        if ($resultat->numRows() != 0) {
1368
            // Pour chaque nom, inscription des infos
1369
            $retour .= '<h1>'.' Inscrits dont le nom débute par : '.$_REQUEST['lettre'].'</h1>'."\n";
1370
            $retour .= '<div class="hba_liste_inscrit">'."\n";
1371
            $retour .= '<table id="hba_table_annuaire">'."\n";
1372
            $retour .= '<colgroup><col width="30%" /><col width="30%" /><col width="30%" /><col width="10%" /></colgroup>'."\n";
1373
            $retour .= '<thead><tr><th>'.'Nom'.'</th><th>'.'Prénom'.'</th><th>'.'Courriel'.'</th><th>'.'Action'.'</th></tr></thead>'."\n";
1374
            $retour .= '<tbody>'."\n";
1375
            $pair = true;
1376
            while ($row = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
1377
                $retour .= '<tr ';
1378
                if ($pair) {
1379
                    $retour .= 'class="impair"';
1380
                    $pair = false ;
1381
                } else {
1382
                    $retour .= 'class="pair"';
1383
                    $pair = true;
1384
                }
1385
                $retour .= '>';
1386
                $retour .=  '<td>'.$row[HB_BDD_TAB_ANNUAIRE_CHP_NOM].'</td>'.
1387
                            '<td>'.$row[HB_BDD_TAB_ANNUAIRE_CHP_PRENOM].'</td>'.
1388
                            '<td>'.$row[HB_BDD_TAB_ANNUAIRE_CHP_MAIL].'</td>'."\n";
1389
                if ($un_herbier->getAction() == NOUVEAU_CORR) {
1390
                    $retour .= '<td><a href="'.
1391
                                sprintf($un_herbier->getUrlActionCor(), $id_action, $row[HB_BDD_TAB_ANNUAIRE_CHP_ID], $row[HB_BDD_TAB_ANNUAIRE_CHP_ID]).
1392
                                '">'.'inscrire'.'</a></td>'."\n";
1393
                } elseif ($un_herbier->getAction() == NOUV_RED) {
1394
                    $retour .=  '<td><a href="'.
1395
                                sprintf($un_herbier->getUrlActionRed(), $id_action, $row[HB_BDD_TAB_ANNUAIRE_CHP_ID]).
1396
                                '">'.'inscrire'.'</a></td>'."\n";
1397
                }
1398
                $retour .= '</tr>'."\n";
1399
            }
1400
            $retour .= '</tbody>'."\n".'</table>'."\n".'</div>'."\n";
1401
        } else {
1402
            $retour .= '<p class="hba_attention">'.'Aucun inscrit!'.'</p>'."\n";
1403
        }
1404
    }
1405
    return $retour;
1406
}
12 jp_milcent 1407
 
1408
function gererMetaForm(&$form, &$herbier)
1409
{
1410
	// Pour écraser ces valeurs même en modification nous métons temporairement le mode à vide.
1411
    $mode = '';
1412
    if ($form->mode == 'MOD') {
1413
    	$form->mode = '';
1414
    	$mode = 'MOD';
1415
    }
1416
    $form->addChamps('DATE_DERNIERE_MODIF', '', date('Y-m-j H:i:s', time()), $type = 'hidden');
1417
    $form->addChamps('CE_MODIFIER_PAR', '',  $herbier->utilisateur->getId(), $type = 'hidden');
1418
    $form->mode = $mode;
1419
}
2 jp_milcent 1420
// +------------------------------------------------------------------------------------------------------+
1421
 
1422
/* +--Fin du code ----------------------------------------------------------------------------------------+
1423
*
1424
* $Log: not supported by cvs2svn $
20 jp_milcent 1425
* Revision 1.4  2007-02-02 14:59:16  jp_milcent
1426
* Agrandissement du champ "Collecteurs".
1427
*
19 jp_milcent 1428
* Revision 1.3  2006/10/31 15:06:44  jp_milcent
1429
* Fin de gestion des flux rss.
1430
*
12 jp_milcent 1431
* Revision 1.2  2006/10/30 18:57:46  jp_milcent
1432
* Ajout de champs pour les flux rss.
1433
*
7 jp_milcent 1434
* Revision 1.1  2005/11/23 10:32:32  jp_milcent
1435
* Ajout au dépot de l'application Herbiers.
1436
* Elle doit à terme migrer dans eFlore.
1437
*
2 jp_milcent 1438
* Revision 1.5  2005/06/09 17:31:42  jpm
1439
* Affichage en permanence dans le menu du lien vers l'accueil.
1440
*
1441
* Revision 1.4  2005/06/07 15:30:44  jpm
1442
* Modid esthetique.
1443
*
1444
* Revision 1.3  2005/06/02 17:53:37  jpm
1445
* Modification de l'affichage du menu.
1446
*
1447
* Revision 1.2  2005/05/18 07:30:13  jpm
1448
* Correction des bogues et derniers réglages avant mise en ligne du site v4.
1449
*
1450
* Revision 1.1  2005/04/06 13:33:40  jpm
1451
* Ajout du fichier contenant les fonctions réalisant la mise en page et la gestion des données.
1452
* Cela devrait normalement être divisé en un modèle et une vue...
1453
*
1454
*
1455
* +-- Fin du code ----------------------------------------------------------------------------------------+
1456
*/
1457
?>