Subversion Repositories eFlore/Archives.herbiers

Rev

Rev 7 | Go to most recent revision | Details | 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
// +------------------------------------------------------------------------------------------------------+
24
// CVS : $Id: hba_manipulation.fonct.php,v 1.1 2005-11-23 10:32:32 jp_milcent Exp $
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
37
*@version       $Revision: 1.1 $ $Date: 2005-11-23 10:32:32 $
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 = '';
283
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], '');
284
    $form = $form->acquerir('HERBIERS_ORGANISATION');
285
    $id = $form->insertMySQL();
286
    if ($_POST['INSTITUTION_NAME'] == '') {
287
        $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_ORGANISATION', 'MOD', $id, 'ID_ORG');
288
        form_administratif(&$form, $un_herbier);
289
        $retour .=  '<h1>'.'Vous devez saisir un nom d\'institution'.'</h1>'."\n";
290
        $retour .=  $form->printForm(sprintf($un_herbier->url_action, HBA_ACTION_HERBIER_VERIF), 'onsubmit="javascript:return validateAndSubmitAdd(this);"');
291
        return $retour;
292
    }
293
    $une_organisation = new H_organisation();
294
    $une_organisation->setId($id);
295
    if (!$un_herbier->utilisateur->getAdminBool()) {
296
        $un_herbier->utilisateur->insererOrganisationListe($une_organisation);
297
    }
298
    return TRUE;
299
}
300
 
301
function form_administratif(&$form, &$un_herbier)
302
{
303
    // Définition des styles
304
    $form->style_general = 'hba_formulaire';
305
    $form->style_label = 'hba_label';
306
    $form->style_button = 'hba_bouton';
307
    $form->style_commentaire = 'hba_commentaire';
308
    $form->style_radiocheckbox = 'hba_radio';
309
 
310
    // Choix des champs
311
    $form->addChamps('INSTITUTION_NAME', 'Nom de l\'institution <span class="symbole_obligatoire">*</span> : ');
312
    $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.');
313
    $form->addChamps('ADRESS_LINE', 'Adresse : ');
314
    $form->addChamps('INDEX_HERB', 'Index Herbariorum : ');
315
    $form->addCommentaire('<br />'.'Ne saisir que des chiffres, sans espace ( 54789 oui, F-54789 non )');
316
    $form->addChamps('ZIP', 'Code postal <span class="symbole_obligatoire">*</span> : ');
317
    $form->addChamps('TOWN', 'Ville : ');
318
    $form->addChamps('REGION', 'Région : ');
319
    $form->selectFromTable('COUNTRY_CODE par gen_COUNTRY', 'fr', 'GC_ID', 'GC_NAME', 'Pays : ');
320
    $form->addChamps('TEL', 'Téléphone : ');
321
    $form->addChamps('FAX', 'fax : ') ;
322
    $form->addCommentaire('Saisir l\'e-mail de l\'organisation (ex: accueil@organisation.org), pas de mail individuel.');
323
    $form->addChamps('EMAIL', 'E-mail : ');
324
    $form->addCommentaire('<br />'.'Un lien internet vers l\'institution, de la forme <b>http://www.mon_institution.org</b>.');
325
    $form->addChamps('HO_URL', 'URL : ');
326
    $form->addChamps('LOGO', 'Logo (URL vers un fichier graphique) : ');
327
    $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...');
328
    $form->addChamps('ACCESS_RESTRICTION', 'Conditions d\'accès : ');
329
    $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.');
330
    $form->addChamps('SOURCE_DES_DONNEES', 'Source des informations');
331
    $form->addCommentaire('<strong><span class="symbole_obligatoire">'.'*'.'</span>'.' : '.'</strong>'.'champ obligatoire.');
332
 
333
    if ($form->id != HBA_EXEMPLE_ID) {
334
        $form->submit('Valider', 'herbier_pere');
335
    }
336
    $form->annuler('Annuler', sprintf($un_herbier->url_action, HBA_ACTION_ANNULER));
337
}
338
 
339
function mod_adm($un_herbier)
340
{
341
    $retour = '<h1>'.'Modification d\'une institution'.' - '.$un_herbier->organisation->getNom().'</h1>';
342
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_ORGANISATION', 'MOD', $un_herbier->organisation->getId(), 'ID_ORG');
343
    form_administratif(&$form, $un_herbier);
344
    $retour .= $form->printForm(sprintf($un_herbier->url_action_org, MOD_ADM_V, $un_herbier->organisation->getId()));
345
    $form->finalise('un_form');
346
    return $retour;
347
}
348
 
349
function mod_adm_v(&$un_herbier)
350
{
351
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_ORGANISATION');
352
    $form = $form->acquerir('HERBIERS_ORGANISATION');
353
 
354
    if (($_POST['gen_COUNTRY'] == 'fr') and (!checkZip($_POST['ZIP']))) {
355
        $retour .= checkvalue('Le code postal n\'a pas la forme adéquate', '');
356
        return $retour;
357
    }
358
 
359
    $form->updateMySQL('ID_ORG', $un_herbier->organisation->getId());
360
}
361
 
362
function suppr_herb(&$un_herbier)
363
{
364
    // Initialisation des variables
365
    $id_org = $un_herbier->organisation->getId();
366
 
367
    // Supression des collections (et par cascades des notes, indic...) des collections de l'organisation
368
    $requete =  'SELECT ID '.
369
                'FROM HERBIERS_COLLECTION '.
370
                'WHERE PARENT_ID = '.$id_org;
371
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
372
    while ($ligne = mysql_fetch_object($resultat)) {
373
        suppr_coll($un_herbier, $ligne->ID);
374
    }
375
 
376
    // Suppression de l'organisation
377
    $requete = 'DELETE FROM HERBIERS_ORGANISATION WHERE ID_ORG = '.$id_org;
378
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
379
 
380
    // Supression de chaque membre de l'équipe (ou contact) de l'organisation
381
    $requete_01 = 'SELECT ID_STAFF '.
382
            'FROM HERBIERS_ont_un_staff '.
383
            'WHERE ID_ORG = '.$id_org;
384
    $resultat_01 = mysql_query($requete_01) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete_01));
385
    while ($ligne_01 = mysql_fetch_object($resultat_01)) {
386
        $requete_02 =   'DELETE FROM HERBIERS_STAFF '.
387
                        'WHERE ID_STAFF = '.$ligne_01->ID_STAFF;
388
        mysql_query($requete_02) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete_02));
389
    }
390
    // Suppression de la liste des équipiers (et/ou contacts) de l'organisation
391
    $requete =  'DELETE FROM HERBIERS_ont_un_staff '.
392
                'WHERE ID_ORG = '.$id_org;
393
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
394
 
395
    // Suppression de l'organisation dans la liste des organisations (= herbiers) de l'utilisateur (HERBIERS_ADMINISTRER)
396
    $requete =  'DELETE FROM HERBIERS_ADMINISTRER '.
397
                'WHERE HA_ID_ORG = '.$id_org;
398
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
399
}
400
 
401
// +------------------------------------------------------------------------------------------------------+
402
// GESTION de l'ÉQUIPE, d'un ÉQUIPIER et d'un CONTACT
403
 
404
function team_liste(&$un_herbier)
405
{
406
    $retour = '';
407
 
408
    $requete =  'SELECT HERBIERS_STAFF.* '.
409
                'from HERBIERS_STAFF, HERBIERS_ont_un_staff, HERBIERS_ORGANISATION '.
410
                'WHERE HERBIERS_ORGANISATION.ID_ORG = '.$un_herbier->organisation->getId().' '.
411
                'AND HERBIERS_ont_un_staff.ID_ORG = HERBIERS_ORGANISATION.ID_ORG '.
412
                'AND HERBIERS_STAFF.ID_STAFF = HERBIERS_ont_un_staff.ID_STAFF';
413
 
414
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
415
    if (mysql_num_rows($resultat) == 0) {
416
        $retour .= '<p class="hba_attention">'.'Aucune équipe renseignée !'.'</p>'."\n";
417
        return $retour;
418
    }
419
    $retour .= '<div class="hba_liste_equipe">'."\n";
420
    $retour .= '<table>'."\n";
421
    $retour .= '<thead><tr><th>'.'Nom'.'</th><th>'.'Prénom'.'</th><th colspan="2">'.'Actions'.'</th></tr></thead>'."\n";
422
    $retour .= '<tbody>'."\n";
423
    while ($ligne = mysql_fetch_object($resultat)) {
424
        $retour .= '<tr class="'.color_alterne(&$flag).'"><td>'.$ligne->NOM.'</td><td>'.$ligne->PRENOM.'</td>'."\n";
425
        $retour .=  '<td><a href="'.sprintf($un_herbier->url_action_org_equipe, MOD_STAFF, $un_herbier->organisation->getId(), $ligne->ID_STAFF).'">'.
426
                    'modifier'.'</a></td>'."\n";
427
 
428
        if ($un_herbier->organisation->getId() != HBA_EXEMPLE_ID) {
429
            $retour .=  '<td><a href="'.sprintf($un_herbier->url_action_org_equipe, SUPPR_STAFF, $un_herbier->organisation->getId(), $ligne->ID_STAFF).'" '.
430
                        ' onclick="javascript:return confirm(\''.'Êtes-vous sûr de vouloir supprimer : '.$ligne->NOM.' '.$ligne->PRENOM.' ?'.'\');">'.
431
                        'supprimer'.'</a></td>'."\n";
432
        }
433
        $retour .= '</tr>'."\n";
434
    }
435
    $retour .= '</tbody>'."\n".'</table>'."\n".'</div>'."\n";
436
 
437
    return $retour;
438
}
439
 
440
function nouv_team(&$un_herbier)
441
{
442
    $retour = '<h1>'.'Ajout d\'un membre'.'</h1>'."\n";
443
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_STAFF');
444
    form_team($form, $un_herbier);
445
    $retour .= $form->printForm(sprintf($un_herbier->url_action_org, NOUV_TEAM_V, $un_herbier->organisation->getId()))."\n";
446
    $form->finalise('form_team');
447
    return $retour;
448
}
449
 
450
function nouv_team_v(&$un_herbier)
451
{
452
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_STAFF');
453
    $form = $form->acquerir('HERBIERS_STAFF');
454
    $un_herbier->organisation->insererMembreEquipe($form->insertMySQL());
455
}
456
 
457
function form_team(&$form , &$un_herbier)
458
{
459
    // Définition des styles
460
    $form->style_general = 'hba_formulaire';
461
    $form->style_label = 'hba_label';
462
    $form->style_button = 'hba_bouton';
463
    $form->style_commentaire = 'hba_commentaire';
464
    $form->style_radiocheckbox = 'hba_radio';
465
 
466
    // Propose par defaut l'adresse de l'organisation
467
    $requete =    'SELECT ADRESS_LINE, TOWN, ZIP '.
468
                'FROM HERBIERS_ORGANISATION '.
469
                'WHERE ID_ORG = '.$un_herbier->organisation->getId();
470
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
471
    $ligne = mysql_fetch_object($resultat);
472
 
473
    $form->addChamps('NOM', 'Nom : ');
474
    $form->addChamps('PRENOM', 'Prénom : ');
475
    $form->addChamps('ADRESSE1', 'Adresse : ', $ligne->ADRESS_LINE);
476
    $form->addChamps('ADRESSE2', 'Adresse : ');
477
    $form->addChamps('CP', 'Code postal : ', $ligne->ZIP);
478
    $form->addChamps('VILLE', 'Ville : ', $ligne->TOWN);
479
    $form->addChamps('MAIL', 'email : ');
480
    $form->addChamps('TEL', 'Tél : ');
481
    $form->addChamps('FAX', 'Fax : ');
482
    $form->addChamps('FONCTION', 'Fonction : ');
483
    $form->radioEnum('CONTACT', 'La personne est-elle contact ? : ','non');
484
    if ($un_herbier->organisation->getId() != HBA_EXEMPLE_ID) {
485
        $form->submit('Valider');
486
    }
487
    $form->annuler('Annuler', sprintf($un_herbier->url_action_org, MOD_HERB, $un_herbier->organisation->getId()));
488
}
489
 
490
function suppr_staff(&$un_herbier)
491
{
492
    $requete =  'DELETE FROM HERBIERS_ont_un_staff '.
493
                'WHERE ID_STAFF = '.$un_herbier->equipe->getId().' '.
494
                'AND ID_ORG = '.$un_herbier->organisation->getId();
495
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
496
    // Verification que la fiche de herbiers_staff ai encore une utilite
497
    $requete = 'SELECT ID_STAFF FROM HERBIERS_ont_un_staff WHERE ID_STAFF = '.$un_herbier->equipe->getId();
498
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
499
    // le membre n'est plus dans aucun herbier, on le supprime
500
    if (mysql_num_rows($resultat) == 0) {
501
        $requete = 'DELETE FROM HERBIERS_STAFF WHERE ID_STAFF = '.$un_herbier->equipe->getId();
502
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
503
    }
504
}
505
 
506
function mod_staff(&$un_herbier)
507
{
508
    // Initialisation de variables
509
    $id_equipe = $un_herbier->equipe->getId();
510
    $id_org = $un_herbier->organisation->getId();
511
 
512
    // Création du formulaire de modification
513
    $retour = '<h1>'.'Modification d\'un membre de l\'équipe'.'</h1>'."\n";
514
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_STAFF', 'MOD', $id_equipe, 'ID_STAFF');
515
    form_team($form, $un_herbier);
516
    $url = sprintf($un_herbier->getUrlActionOrgEquipe(), MOD_STAFF_V, $id_org, $id_equipe);
517
    $retour .= $form->printForm($url);
518
    $form->finalise('form_staff');
519
    return $retour;
520
}
521
 
522
function mod_staff_v(&$un_herbier)
523
{
524
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_STAFF');
525
    $form = $form->acquerir('HERBIERS_STAFF');
526
    $form->updateMySQL('ID_STAFF', $un_herbier->equipe->getId());
527
}
528
 
529
// +------------------------------------------------------------------------------------------------------+
530
// GESTION des COLLECTIONS
531
 
532
function liste_coll(&$un_herbier)
533
{
534
    // Initialisation de variables
535
    $retour = '';
536
    $id_action = $un_herbier->getAction();
537
    $id_org = $un_herbier->organisation->getId();
538
    $id_coll = null;
539
    if (is_object($un_herbier->getCollection())) {
540
        $id_coll = $un_herbier->collection->getId();
541
    }
542
 
543
    $requete =  'SELECT NOM_COLLECTION,ID '.
544
                'FROM HERBIERS_COLLECTION '.
545
                'WHERE PARENT_ID = '.$id_org;
546
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
547
 
548
    if (mysql_num_rows($resultat) == 0) {
549
        $retour .= '<p class="hba_attention">'.'Aucune collection renseignée !'.'</p>'."\n";
550
        return $retour;
551
    }
552
    $retour .=  '<div class="hba_liste_collection">'."\n".
553
                '<table>'."\n".
554
                '<thead><tr><th colspan="2">'.'Nom'.'</th><th colspan="3">'.'Actions'.'</th></tr></thead>'."\n".
555
                '<tbody>'."\n";
556
    while ($ligne = mysql_fetch_object($resultat)) {
557
        $retour .= '<tr class="'.color_alterne(&$flag).'"><td class="hb_plier_deplier">';
558
        $requete_indic =    'SELECT ID_INDIC '.
559
                            'FROM HERBIERS_INDIC '.
560
                            'WHERE ID = '.$ligne->ID;
561
        $resultat_indic = mysql_query($requete_indic) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete_indic));
562
        if (mysql_num_rows($resultat_indic) > 0) {
563
            $xhtml_fermer = '<a href="'.sprintf($un_herbier->getUrlActionOrgColl(), MOD_HERB, $id_org, $ligne->ID).'">'."\n".
564
                            '<img class="'.HB_CLASS_IMG_FERMER.'" src="'.HB_IMG_FERMER.'" alt="fermer" />'."\n".
565
                            '</a>'."\n";
566
            $xhtml_ouvrir = '<a href="'.sprintf($un_herbier->getUrlActionOrgColl(), HBA_ACTION_COLL_DEROULER, $id_org, $ligne->ID).'">'."\n".
567
                            '<img class="'.HB_CLASS_IMG_ICONE.'" src="'.HB_IMG_OUVRIR.'" alt="dérouler" />'."\n".
568
                            '</a>'."\n";
569
            if ($id_coll == $ligne->ID) {
570
                switch ($id_action) {
571
                    case HBA_ACTION_COLL_DEROULER :
572
                    case SUPPR_NOTE :
573
                    case MOD_NOTE :
574
                    case MOD_NOTE_V :
575
                        $retour .= $xhtml_fermer;
576
                    break;
577
                    default :
578
                        $retour .= $xhtml_ouvrir;
579
                }
580
            } else {
581
                $retour .= $xhtml_ouvrir;
582
            }
583
        }
584
        $retour .= '</td><td>';
585
        $retour .= $ligne->NOM_COLLECTION.'</td>';
586
        $retour .=  '<td><a href="'.
587
                    sprintf($un_herbier->getUrlActionOrgColl(), MOD_DESC, $id_org, $ligne->ID).
588
                    '">'.'modifier'.'</a></td>'."\n";
589
        if ($id_org != HBA_EXEMPLE_ID) {
590
            $retour .=  '<td><a href="'.
591
                        sprintf($un_herbier->getUrlActionOrgColl(), SUPPR_COLL, $id_org, $ligne->ID).
592
                        '" onclick="javascript:return confirm(\''.'Étes vous sûr de vouloir supprimer cette collection ?'.'\');">'.
593
                        'supprimer'.'</a>&nbsp;</td>'."\n";
594
        }
595
        $retour .=  '<td><a href="'.
596
                    sprintf($un_herbier->getUrlActionOrgColl(), NOUV_INDIC, $id_org, $ligne->ID).
597
                    '">'.'ajouter note'.'</a></td>'."\n";
598
        $retour .= '</tr>';
599
 
600
        switch ($id_action) {
601
            case HBA_ACTION_COLL_DEROULER :
602
            case SUPPR_NOTE :
603
            case MOD_NOTE :
604
            case MOD_NOTE_V :
605
                if ($id_coll == $ligne->ID) {
606
                    $retour .= '<tr class="hba_liste_note"><td colspan="5">'.liste_indic($un_herbier).'</td></tr>'."\n";
607
                }
608
                break;
609
        }
610
    }
611
    $retour .= '</tbody>'."\n".'</table>'."\n".'</div>';
612
 
613
    return $retour;
614
}
615
 
616
function nouv_coll(&$un_herbier)
617
{
618
    $retour = '<h1>'.'Ajout d\'une collection'.'</h1>'."\n";
619
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_COLLECTION');
620
    $form->style_general = 'insInputForm';
621
    form_herb_2($form, $un_herbier);
622
    $retour .= $form->printForm(sprintf($un_herbier->url_action_org, NOUVEAU_HERB4, $un_herbier->organisation->getId()))."\n";//, null, 'liste'
623
    $form->finalise('form_2');
624
    return $retour;
625
}
626
 
627
function form_herb_2(&$form, &$un_herbier)
628
{
629
    // Définition des styles
630
    $form->style_general = 'hba_formulaire';
631
    $form->style_label = 'hba_label';
632
    $form->style_button = 'hba_bouton';
633
    $form->style_commentaire = 'hba_commentaire';
634
    $form->style_radiocheckbox = 'hba_radio';
635
 
636
    // Choix des champs
637
    $form->addChamps('NOM_COLLECTION', 'Nom de la collection : ');
638
    $form->addChamps('COLLECTION_CODE', 'Sigle d\'usage de la collection : ');
639
    $form->addChamps('DESCRIPTION', 'Description générale : ');
640
    $form->radioFromTable('STATUT par HERBIERS_COLL_STATUT', 1, 'Statut de la collection : ');
641
    $form->addCommentaire('Les collecteurs doivent être séparés par un retour à la ligne (entrée)');
642
    $form->addChamps('COLLECTEURS', 'Collecteurs : ');
643
    $form->addCommentaire('<b>Dates extrêmes de récolte des spécimens</b>');
644
    $form->addCommentaire('Les dates doivent être saisies selon le format jj-mm-année, par ex: 05-06-1956');
645
    $form->addCommentaire('Laisser en blanc la date de fin si la collection est encore alimentée');
646
 
647
    // Les dates de début et fin de récolte
648
    $form->addChamps('DATE_DEBUT', 'Date extrême de récolte des spécimens (début) : ', '', 'text', MEME_LIGNE);
649
    $form->addChamps('DATE_FIN', '(fin) : ');
650
    $form->radioFromTable('DATE_DEBUT_CARAC par HERBIERS_DATE_DEBUT_CARAC', '', 'Caractériser les dates : ', MEME_LIGNE);
651
    $form->radioFromTable('DATE_FIN_CARAC par HERBIERS_DATE_FIN_CARAC', '', 'Caractériser les dates : ');
652
 
653
    // L'url de la collection
654
    $form->addChamps('URL', 'URL vers le site de la collection (optionnel) : ');
655
 
656
    // Types, spécimens et dénombrement
657
    $radio = array('0', 'indéterminé', '1', 'non', '2', 'oui');
658
    $form->radio('INCLUDED_TYPE', $radio, 'Y-a-t\'il des échantillons-types : ');
659
    $form->addCommentaire('<b>Mode de conservation des spécimens :</b>');
660
    $form->checkboxFromTable('HERBIERS_COLLECTION par HERBIERS_ont_pres et HERBIERS_PRES', 'Cocher les cases : ', '','LIGNE', 'ID', 'ID_PRES', 'ID_PRES');
661
    $form->addChamps('NUM_SPECIMENS', 'Nombre de spécimens : ');
662
    $form->radioFromTable('PREC_SPECIMENS par HERBIERS_DENOMBREMENT_CARAC_SP', '', 'Caractériser le dénombrement');
663
    $form->addChamps('NUM_SPECIES', 'Nombre d\'espèces : ');
664
    $form->radioFromTable('PREC_SPECIES par HERBIERS_DENOMBREMENT_CARAC_SC', '', 'Caractériser le dénombrement');
665
 
666
    // État de la collection
667
    $form->addCommentaire('État de la collection : de 1 (= inconnu) à 4 (= excellent, parfait)');
668
    $form->radioEnum('ETAT_SPECIMENS', 'État des spécimens : ');
669
    $form->radioEnum('ETAT_CLASSEMENT', 'État du classement : ');
670
    $form->radioEnum('ETAT_PRESENTATION', 'État de la présentation : ');
671
    $form->addCommentaire('<br />');
672
 
673
    // Classement
674
    $form->addChamps('MODE_CLASSEMENT', 'Méthode de classement : ');
675
 
676
    // Documentation
677
    $form->addCommentaire(  '<h2>'.'Informations sur la documentation disponible :'.'</h2>'.
678
                            '<ul>'."\n".
679
                            '<li>'.'documents associés à la collection (publications directement liées comme Flores, '.
680
                            'documents in&eacute;dits tels que dessins, aquarelles, carnets de notes de terrain...)'.'</li>'.
681
                            '<li>'.'documents sur la collection ou les collecteurs (publications relatant '.
682
                            'l\'acquisition, notices nécrologiques et/ou biographiques...)'.'</li>'.
683
                            '</ul>'."\n"
684
                        );
685
    $form->addChamps('DOC_STATE', 'État de la documentation : ');
686
    $form->addChamps('PERCENT_DATABASED', '% de la documentation en base de données : ');
687
    if ($un_herbier->organisation->getId() != HBA_EXEMPLE_ID) {
688
        $form->submit('Valider');
689
    }
690
    $form->annuler('Annuler', sprintf($un_herbier->url_action_org, MOD_HERB, $un_herbier->organisation->getId()));
691
}
692
 
693
function nouveau_herb4(&$un_herbier)
694
{
695
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], '');
696
    $form = $form->acquerir('HERBIERS_COLLECTION');
697
    $form->insertMySQL('PARENT_ID = '.$un_herbier->organisation->getId());
698
}
699
 
700
function mod_desc(&$un_herbier)
701
{
702
    // Intitialisation de variables
703
    $id_coll = $un_herbier->collection->getId();
704
    $id_org = $un_herbier->organisation->getId();
705
 
706
    // Création du formulaire de modification
707
    $retour = '<h1>'.'Modification d\'une collection'.'</h1>'."\n";
708
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_COLLECTION', 'MOD', $id_coll, 'ID');
709
    form_herb_2($form, $un_herbier);
710
    $retour .= $form->printForm(sprintf($un_herbier->getUrlActionOrgColl(), MOD_DESC_V, $id_org, $id_coll));
711
    $form->finalise('un_form');
712
 
713
    return $retour;
714
}
715
 
716
function mod_desc_v(&$un_herbier)
717
{
718
    // Intitialisation de variables
719
    $id_coll = $un_herbier->collection->getId();
720
 
721
    // Insertion des infos après vérification
722
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_COLLECTION');
723
    $form = $form->acquerir('HERBIERS_COLLECTION');
724
    $form->updateMySQL('ID', $id_coll);
725
}
726
 
727
function suppr_coll(&$un_herbier, $id_coll_param = null)
728
{
729
    // Initialisation de variables
730
    // Si l'identifiant de la collection est passé comme argument de la fonction
731
    if (!is_null($id_coll_param)) {
732
        $id_coll = $id_coll_param;
733
    } else {
734
        $id_coll = $un_herbier->collection->getId();
735
    }
736
 
737
    $requete =  'DELETE FROM HERBIERS_COLLECTION '.
738
                'WHERE ID = '.$id_coll;
739
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
740
    $requete =  'SELECT ID_INDIC '.
741
                'FROM HERBIERS_INDIC '.
742
                'WHERE ID = '.$id_coll;
743
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
744
    while ($ligne = mysql_fetch_object($resultat)) {
745
        suppr_note($un_herbier, $ligne->ID_INDIC);
746
    }
747
}
748
 
749
// +------------------------------------------------------------------------------------------------------+
750
// GESTION des NOTES
751
 
752
function liste_indic(&$un_herbier)
753
{
754
    // Initialisation des variables
755
    $id_org = $un_herbier->organisation->getId();
756
    $id_coll = $un_herbier->collection->getId();
757
 
758
    $requete =  'SELECT ID_INDIC, TXT_INDIC '.
759
                'FROM HERBIERS_INDIC WHERE ID = '.$id_coll;
760
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
761
 
762
    $retour =   '<div class="hba_liste_note">'."\n".
763
                '<table>'."\n";
764
    $num_row = mysql_num_rows($resultat);
765
    $compteur = 0;
766
    while ($row = mysql_fetch_object($resultat)) {
767
        $compteur++;
768
        $retour .= '<tr class="hb_arborescence"><td>';
769
        if ($compteur == $num_row) {
770
            $retour .= '<img src="'.HB_IMG_ARBO_FIN.'" alt="|_" />';
771
        } else {
772
            $retour .= '<img src="'.HB_IMG_ARBO.'" alt="|-" />';
773
        }
774
        $retour .= '</td><td>';
775
        if ($txt_court = raccourcirTexte($row->TXT_INDIC, HBA_LONGUEUR_NOTE_TXT)) {
776
            $retour .= '<abbr title="'.$row->TXT_INDIC.'">'.$txt_court.'</abbr>';
777
        } else {
778
            $retour .= $row->TXT_INDIC;
779
        }
780
        $retour .= '</td>'."\n";
781
        $retour .= '<td><a href="'.
782
                    sprintf($un_herbier->getUrlActionOrgCollNote(), MOD_NOTE, $id_org, $id_coll, $row->ID_INDIC).
783
                    '">'.'modifier'.'</a></td>'."\n";
784
        if ($id_org != HBA_EXEMPLE_ID) {
785
            $retour .=  '<td><a href="'.
786
                        sprintf($un_herbier->getUrlActionOrgCollNote(), SUPPR_NOTE, $id_org, $id_coll, $row->ID_INDIC).'" '.
787
                        'onclick="javascript:return confirm(\''.'Êtes-vous sûr de vouloir supprimer cette note ?'.'\');"'.
788
                        '>'.'supprimer'.'</a></td></tr>'."\n";
789
        }
790
    }
791
    $retour .= '</table>'."\n".'</div>'."\n";
792
    return $retour;
793
}
794
 
795
function nouv_indic(&$un_herbier)
796
{
797
    // Initialisation des variables
798
    $id_org = $un_herbier->organisation->getId();
799
    $id_coll = $un_herbier->collection->getId();
800
 
801
    $retour = '<h1>'.'Ajout d\'une note'.'</h1>'."\n";
802
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_INDIC');
803
    form_indic($form, $un_herbier);
804
    $retour .= $form->printForm(sprintf($un_herbier->getUrlActionOrgColl(), NOUV_INDIC_V, $id_org, $id_coll));
805
    $form->finalise('form_indic');
806
    return $retour;
807
}
808
 
809
function form_indic(&$form, &$un_herbier)
810
{
811
    // Initialisation des variables
812
    $id_org = $un_herbier->organisation->getId();
813
    $id_coll = $un_herbier->collection->getId();
814
 
815
    // Définition des styles
816
    $form->style_general = 'hba_formulaire';
817
    $form->style_label = 'hba_label';
818
    $form->style_button = 'hba_bouton';
819
    $form->style_commentaire = 'hba_commentaire';
820
    $form->style_radiocheckbox = 'hba_radio';
821
 
822
    $form->addChamps('TXT_INDIC', 'Texte de la note : ');
823
    $form->addChamps('REM_INDIC', 'Remarque : ');
824
    $form->checkboxFromTable(   'HERBIERS_INDIC par HERBIERS_A_UN_TYPE et HERBIERS_TYPE',
825
                                'Cocher les cases : ', '', 'LIGNE', 'ID_INDIC', 'ID_TYPE', 'ID_TYPE');
826
    $form->submit('Valider');
827
    $form->annuler('Annuler', sprintf($un_herbier->getUrlActionOrgColl(), HBA_ACTION_COLL_DEROULER, $id_org, $id_coll));
828
}
829
 
830
function nouv_indic_v(&$un_herbier)
831
{
832
    // Initialisation des variables
833
    $id_coll = $un_herbier->collection->getId();
834
    $id_utilisateur = $un_herbier->utilisateur->getId();
835
 
836
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_INDIC');
837
    $form = $form->acquerir('HERBIERS_INDIC');
838
    $id_note = $form->insertMySQL('ID = '.$id_coll.', MAJ_INDIC = UNIX_TIMESTAMP()');
839
 
840
    // Insertion dans la table des historiques des indications
841
    $requete = 'INSERT INTO HERBIERS_INDIC_HISTORIQUE VALUES ("", '.$id_note.', UNIX_TIMESTAMP(), '.$id_utilisateur.' )';
842
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
843
}
844
 
845
function mod_note(&$un_herbier)
846
{
847
    // Initialisation des variables
848
    $id_org = $un_herbier->organisation->getId();
849
    $id_coll = $un_herbier->collection->getId();
850
    $id_note = $un_herbier->note->getId();
851
 
852
    $retour = '<h1>'.'Modification d\'une note'.'</h1>'."\n";
853
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_INDIC', 'MOD', $id_note, 'ID_INDIC') ;
854
    form_indic($form, $un_herbier);
855
    $retour .= $form->printForm(sprintf($un_herbier->getUrlActionOrgCollNote(), MOD_NOTE_V, $id_org, $id_coll, $id_note));
856
    $form->finalise('form_indic');
857
    return $retour;
858
}
859
 
860
function mod_note_v(&$un_herbier)
861
{
862
    // Initialisation des variables
863
    $id_note = $un_herbier->note->getId();
864
    $id_utilisateur = $un_herbier->utilisateur->getId();
865
 
866
    $form = new formFromTable($GLOBALS['_HERBIER_']['bdd'], 'HERBIERS_INDIC');
867
    $form = $form->acquerir('HERBIERS_INDIC');
868
    $form->updateMySQL('ID_INDIC', $id_note, 'MAJ_INDIC = UNIX_TIMESTAMP()');
869
    // Insertion dans la table des historiques des indications
870
    $requete = 'INSERT INTO HERBIERS_INDIC_HISTORIQUE VALUES("", '.$id_note.', UNIX_TIMESTAMP(), '.$id_utilisateur.')';
871
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
872
}
873
 
874
function suppr_note(&$un_herbier, $id_note_param = null)
875
{
876
    // Initialisation de variables
877
    // Si l'identifiant de la note est passé comme argument de la fonction
878
    if (!is_null($id_note_param)) {
879
        $id_note = $id_note_param;
880
    } else {
881
        $id_note = $un_herbier->note->getId();
882
    }
883
 
884
    $requete =  'DELETE FROM HERBIERS_INDIC '.
885
                'WHERE ID_INDIC = '.$id_note;
886
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
887
 
888
    $requete =  'DELETE FROM HERBIERS_A_UN_TYPE '.
889
                'WHERE ID_INDIC = '.$id_note;
890
    mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
891
}
892
 
893
// +------------------------------------------------------------------------------------------------------+
894
// GESTION des CORRESPONDANTS
895
// renvoie le code html d'une liste de correspondant
896
function liste_corr(&$un_herbier)
897
{
898
    // Initialisation de variables
899
    $retour = '';
900
    $id_action = $un_herbier->getAction();
901
 
902
    $id_cor = null;
903
    if (is_object($un_herbier->getCorrespondant())) {
904
        $id_cor = $un_herbier->correspondant->getId();
905
    }
906
 
907
    $retour .= '<h1 class="hba_titre">'.'Liste des correspondants régionaux'.'</h1>'."\n";
908
 
909
    $requete =  'SELECT '.HB_BDD_TAB_ANNUAIRE_CHP_ID.', '.HB_BDD_TAB_ANNUAIRE_CHP_NOM.', '.HB_BDD_TAB_ANNUAIRE_CHP_PRENOM.' '.
910
                'FROM '.HB_BDD_TAB_ANNUAIRE.', '.HB_BDD_NOM.'.EFLORE_DROIT_POSSEDER '.
911
                'WHERE '.HB_BDD_TAB_ANNUAIRE_CHP_ID.' = EDP_ID_UTILISATEUR '.
912
                'ORDER BY '.HB_BDD_TAB_ANNUAIRE_CHP_NOM.' ASC';
913
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
914
    if (mysql_num_rows($resultat) == 0) {
915
        $retour .= '<p class="hba_attention">'.'Aucun correspondant inscrit !'.'</p>'."\n";
916
        return $retour;
917
    }
918
 
919
    $liste_inst = '';
920
    $retour .=  '<div class="hba_liste_correspondant">'."\n".
921
                '<table>'."\n".
922
                '<thead><tr><th colspan="2">'.'Nom'.'</th><th>'.'Prénom'.'</th><th colspan="2">'.'Actions'.'</th></tr></thead>'."\n".
923
                '<tbody>'."\n";
924
    while ($ligne = mysql_fetch_object($resultat)) {
925
        // Recherche des institutions dont ils ont la responsabilité
926
        $requete_inst = 'SELECT INSTITUTION_NAME '.
927
                        'FROM '.HB_BDD_NOM.'.HERBIERS_ORGANISATION, '.HB_BDD_NOM.'.HERBIERS_ADMINISTRER '.
928
                        'WHERE HA_ID_ANNUAIRE = '.$ligne->U_ID.' '.
929
                        'AND HA_ID_ORG = ID_ORG '.
930
                        'ORDER BY INSTITUTION_NAME ASC';
931
        $resultat_inst = mysql_query($requete_inst) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete_inst));
932
 
933
        $retour .=  '<tr class="'.color_alterne(&$flag).'"><td id="hba_correspondant_'.$ligne->U_ID.'" class="hb_plier_deplier">';
934
        if (mysql_num_rows($resultat_inst) > 0) {
935
            $nbre_ligne = mysql_num_rows($resultat_inst);
936
            $compteur = 0;
937
            $liste_inst = '<table>'."\n";
938
            while ($ligne_inst = mysql_fetch_object($resultat_inst)) {
939
                $compteur++;
940
                $liste_inst .= '<tr class="hb_arborescence"><td>';
941
                if ($compteur == $nbre_ligne) {
942
                    $liste_inst .= '<img src="'.HB_IMG_ARBO_FIN.'" alt="|_" />';
943
                } else {
944
                    $liste_inst .= '<img src="'.HB_IMG_ARBO.'" alt="|-" />';
945
                }
946
                $liste_inst .= '</td><td>'.$ligne_inst->INSTITUTION_NAME.'</td></tr>'."\n";
947
            }
948
            $liste_inst .= '</table>'."\n";
949
            $xhtml_fermer = '<a href="'.sprintf($un_herbier->getUrlActionCor(), HBA_ACTION_ANNULER, $ligne->U_ID, $ligne->U_ID).'">'."\n".
950
                            '<img class="'.HB_CLASS_IMG_FERMER.'" src="'.HB_IMG_FERMER.'" alt="fermer" />'."\n".
951
                            '</a>'."\n";
952
            $xhtml_ouvrir = '<a href="'.sprintf($un_herbier->getUrlActionCor(), HBA_ACTION_COR_DEROULER, $ligne->U_ID, $ligne->U_ID).'">'."\n".
953
                            '<img class="'.HB_CLASS_IMG_ICONE.'" src="'.HB_IMG_OUVRIR.'" alt="dérouler" />'."\n".
954
                            '</a>'."\n";
955
            if ($id_cor == $ligne->U_ID) {
956
                switch ($id_action) {
957
                    case HBA_ACTION_COR_DEROULER :
958
                        $retour .= $xhtml_fermer;
959
                    break;
960
                    default :
961
                        $retour .= $xhtml_ouvrir;
962
                }
963
            } else {
964
                $retour .= $xhtml_ouvrir;
965
            }
966
        } else {
967
            $retour .= '&nbsp;';
968
        }
969
        $retour .= '</td>';
970
        $retour .= '<td>'.$ligne->U_NAME.'</td>';
971
        $retour .= '<td>'.$ligne->U_SURNAME.'</td>';
972
        $retour .=  '<td><a href="'.sprintf($un_herbier->getUrlActionCor(), SUPPR_CORR, $ligne->U_ID, $ligne->U_ID).'" '.
973
                    'onclick="javascript:return confirm(\''.'Êtes-vous sûr de vouloir supprimer ce correspondant ?'.'\');"'.
974
                    '>'.'supprimer'.'</a></td></tr>'."\n";
975
 
976
        switch ($id_action) {
977
            case HBA_ACTION_COR_DEROULER :
978
                if ($id_cor == $ligne->U_ID) {
979
                    $retour .= '<tr class="hba_liste_organisation"><td colspan="4">'.$liste_inst.'</td></tr>'."\n";
980
                }
981
                break;
982
        }
983
    }
984
    $retour .= '</tbody>'."\n".'</table>'."\n".'</div>'."\n";
985
    return $retour;
986
}
987
 
988
function nouveau_corr_v(&$un_herbier)
989
{
990
    $id_cor = $un_herbier->correspondant->getId();
991
 
992
    $requete =  'SELECT EDP_ID_DROIT '.
993
                'FROM EFLORE_DROIT_POSSEDER '.
994
                'WHERE EDP_ID_UTILISATEUR = '.$id_cor.' '.
995
                'AND EDP_ID_PROJET = 1 '.
996
                'AND EDP_ID_DROIT < 3';
997
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
998
    if (mysql_num_rows($resultat) == 0) {
999
        $requete =  'INSERT INTO EFLORE_DROIT_POSSEDER '.
1000
                    'SET EDP_ID_DROIT = 2, EDP_ID_PROJET = 1, EDP_ID_UTILISATEUR = '.$id_cor;
1001
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1002
        $retour = '<p class="hba_information">'.'Le correspondant a été ajouté'.'</p>'."\n";
1003
    } else {
1004
        $retour = '<p class="hba_attention">'.'L\'utilisateur est déjà inscrit comme correspondant régional'.'</p>'."\n";
1005
    }
1006
    return $retour;
1007
}
1008
 
1009
function suppr_corr(&$un_herbier)
1010
{
1011
    // Initialisation des variables
1012
    $id_cor = $un_herbier->correspondant->getId();
1013
 
1014
    $requete =  'SELECT EDP_ID_UTILISATEUR '.
1015
                'FROM EFLORE_DROIT_POSSEDER '.
1016
                'WHERE EDP_ID_PROJET = 1 '.
1017
                'AND EDP_ID_UTILISATEUR = '.$id_cor;
1018
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1019
    if (mysql_num_rows($resultat) != 0) {
1020
        $requete =  'DELETE FROM EFLORE_DROIT_POSSEDER '.
1021
                    'WHERE EDP_ID_UTILISATEUR = '.$id_cor.' '.
1022
                    'AND EDP_ID_PROJET = 1';
1023
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1024
        $retour = '<p class="hba_information">'.'Le correspondant a été supprimé de la base'.'</p>'."\n";
1025
    } else {
1026
        $retour = '<p class="hba_attention">'.'L\'utilisateur n\'était pas un correspondant régional'.'</p>'."\n";
1027
    }
1028
    return $retour;
1029
}
1030
 
1031
// +------------------------------------------------------------------------------------------------------+
1032
// GESTION des RÉDACTEURS
1033
 
1034
// renvoie le code html d'une liste de rédacteur
1035
function liste_red(&$un_herbier)
1036
{
1037
    $retour = '';
1038
    $retour .= '<h1 class="hba_titre">'.'Liste de vos rédacteurs'.'</h1>'."\n";
1039
 
1040
    $requete =  'SELECT '.HB_BDD_TAB_ANNUAIRE_CHP_ID.', '.HB_BDD_TAB_ANNUAIRE_CHP_NOM.', '.HB_BDD_TAB_ANNUAIRE_CHP_PRENOM.' '.
1041
                'FROM '.HB_BDD_TAB_ANNUAIRE.', '.HB_BDD_NOM.'.HERBIERS_COORDONNE '.
1042
                'WHERE '.HB_BDD_TAB_ANNUAIRE_CHP_ID.' = HC_ID_REDACTEUR '.
1043
                'AND HC_ID_COORDINATEUR = '.$un_herbier->utilisateur->getId();
1044
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1045
    if (mysql_num_rows($resultat) == 0) {
1046
        $retour .= '<p class="hba_attention">'.'Aucun rédacteur inscrit !'.'</p>'."\n";
1047
        return $retour;
1048
    }
1049
    $retour .=  '<div class="hba_liste_redacteur">'."\n".
1050
                '<table>';
1051
    while ($ligne = mysql_fetch_object($resultat)) {
1052
        $retour .=  '<tr class="'.color_alterne(&$flag).'"><td class="hb_plier_deplier">';
1053
        /*
1054
        if (mysql_num_rows($resultat_indic) > 0) {
1055
            $xhtml_fermer = '<a href="'.sprintf($un_herbier->getUrlActionOrgColl(), MOD_HERB, $id_org, $ligne->ID).'">'."\n".
1056
                            '<img class="'.HB_CLASS_IMG_FERMER.'" src="'.HB_IMG_FERMER.'" alt="fermer" />'."\n".
1057
                            '</a>'."\n";
1058
            $xhtml_ouvrir = '<a href="'.sprintf($un_herbier->getUrlActionOrgColl(), HBA_ACTION_RED_DEROULER, $id_org, $ligne->ID).'">'."\n".
1059
                            '<img class="'.HB_CLASS_IMG_ICONE.'" src="'.HB_IMG_OUVRIR.'" alt="dérouler" />'."\n".
1060
                            '</a>'."\n";
1061
            if ($id_coll == $ligne->ID) {
1062
                switch ($id_action) {
1063
                    case HBA_ACTION_RED_DEROULER :
1064
                        $retour .= $xhtml_fermer;
1065
                    break;
1066
                    default :
1067
                        $retour .= $xhtml_ouvrir;
1068
                }
1069
            } else {
1070
                $retour .= $xhtml_ouvrir;
1071
            }
1072
        }
1073
        */
1074
        $retour .=  '</td><td>'.$ligne->U_NAME.'</td>'.
1075
                    '<td>'.$ligne->U_SURNAME.'</td>'."\n".
1076
                    '<td><a href="'.sprintf($un_herbier->getUrlActionRed(), SUPPR_RED, $ligne->U_ID).'" '.
1077
                    'onclick="javascript:return confirm(\''.'Êtes-vous sûr de vouloir supprimer ce rédacteur ?'.'\');">'.
1078
                    'supprimer'.
1079
                    '</a></td>'.
1080
                    '</tr>'."\n";
1081
    }
1082
    $retour .= '</table>'."\n".'</div>'."\n";
1083
 
1084
    return $retour;
1085
}
1086
 
1087
function nouveau_red_v(&$un_herbier)
1088
{
1089
    $id_red = $un_herbier->redacteur->getId();
1090
    $id_utilisateur = $un_herbier->utilisateur->getId();
1091
 
1092
    $requete =  'SELECT HERBIERS_COORDONNE.HC_ID_REDACTEUR '.
1093
                'FROM HERBIERS_COORDONNE, EFLORE_DROIT_POSSEDER '.
1094
                'WHERE HC_ID_REDACTEUR = '.$id_red.' '.
1095
                'AND HC_ID_COORDINATEUR = EDP_ID_UTILISATEUR '.
1096
                'AND EFLORE_DROIT_POSSEDER.EDP_ID_UTILISATEUR = '.$id_utilisateur.' '.
1097
                'AND EFLORE_DROIT_POSSEDER.EDP_ID_DROIT < 3 '.
1098
                'AND EFLORE_DROIT_POSSEDER.EDP_ID_PROJET = 1';
1099
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1100
    if (mysql_num_rows($resultat) == 0) {
1101
        $requete =  'INSERT INTO HERBIERS_COORDONNE '.
1102
                    'SET HC_ID_REDACTEUR = '.$id_red.', HC_ID_COORDINATEUR = '.$id_utilisateur;
1103
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1104
 
1105
        // Insertion du rédacteur dans EFLORE_DROIT_POSSEDER, s'il n'y est pas déjà
1106
        $requete =  'SELECT * '.
1107
                    'FROM EFLORE_DROIT_POSSEDER '.
1108
                    'WHERE EDP_ID_PROJET = 1 '.
1109
                    'AND EDP_ID_UTILISATEUR = '.$id_red;
1110
        $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1111
 
1112
        // Si le rédacteur n'existe pas on l'insere avec le droit 3 (modération ou ici rédacteur)
1113
        if (mysql_num_rows($resultat) == 0) {
1114
            $requete =  'INSERT INTO EFLORE_DROIT_POSSEDER '.
1115
                        'SET EDP_ID_DROIT = 3, EDP_ID_PROJET = 1, EDP_ID_UTILISATEUR = '.$id_red;
1116
            mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1117
        }
1118
        $retour = '<p class="hba_information">'.'Le correspondant a été ajouté'.'</p>'."\n";
1119
    } else {
1120
        $retour = '<p class="hba_attention">'.'L\'utilisateur est déjà inscrit comme rédacteur'.'</p>'."\n";
1121
    }
1122
    return $retour;
1123
}
1124
 
1125
function suppr_red(&$un_herbier)
1126
{
1127
    // Initialisation des variables
1128
    $id_red = $un_herbier->redacteur->getId();
1129
    $id_utilisateur = $un_herbier->utilisateur->getId();
1130
 
1131
    $requete =  'SELECT EDP_ID_UTILISATEUR '.
1132
                'FROM EFLORE_DROIT_POSSEDER '.
1133
                'WHERE EDP_ID_PROJET = 1 '.
1134
                'AND EDP_ID_UTILISATEUR = '.$id_red.' '.
1135
                'AND EDP_ID_DROIT = 3';
1136
    $resultat = mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1137
    if (mysql_num_rows($resultat) != 0) {
1138
        $requete =  'DELETE FROM EFLORE_DROIT_POSSEDER '.
1139
                    'WHERE EDP_ID_UTILISATEUR = '.$id_red.' '.
1140
                    'AND EDP_ID_PROJET = 1';
1141
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1142
        $requete =  'DELETE FROM HERBIERS_COORDONNE '.
1143
                    'WHERE HC_ID_REDACTEUR = '.$id_red;
1144
        mysql_query($requete) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $requete));
1145
        $retour = '<p class="hba_information">'.'Le rédacteur a été supprimé de la base'.'</p>'."\n";
1146
    } else {
1147
        $retour = '<p class="hba_attention">'.'L\'utilisateur n\'était pas un rédacteur'.'</p>'."\n";
1148
    }
1149
    return $retour;
1150
}
1151
 
1152
// +------------------------------------------------------------------------------------------------------+
1153
// GESTION des AIDES
1154
 
1155
function fournirAideInscription()
1156
{
1157
    $retour =  '<h1>'.'Interface d\'administration de la base de données des herbiers de France'.'</h1>'."\n".
1158
                '<p class="hba_aide">'.
1159
                'Vous n\'êtes pas inscrit comme '.'<strong>'.'correspondant régional'.'</strong>'.' ou '.
1160
                '<strong>'.'rédacteur'.'</strong>'.'. '.'<br />'.
1161
                'Si vous souhaitez participer activement au projet d\'inventaire des herbiers de France, vous '.
1162
                'pouvez envoyer un courriel à :'.
1163
                '</p>'."\n".
1164
                '<ul class="hba_aide">'."\n".
1165
                '<li><a href="mailto:mathezf@wanadoo.fr">'.'Joël MATHEZ'.'</a>'.' ou à '.
1166
                '<a href="mailto:pasch@isem.univ-montp2.fr">'.'P.A. Schäfer'.'</a>'.
1167
                ' : pour des questions sur le contenu'.'</li>'."\n".
1168
                '<li><a href="mailto:jpm@tela-botanica.org">'.'Jean-Pascal MILCENT'.'</a>'.
1169
                ' : pour obtenir un droit d\'accès'.'</li>'."\n".
1170
                '</ul>'."\n";
1171
    return $retour;
1172
}
1173
 
1174
function fournirAideAccueil()
1175
{
1176
    $retour =   '<p class="hba_aide">'.
1177
                'Vous devriez voir, ci-contre, un "cartouche" contenant des '.'<emphasis>'.'informations'.'</emphasis>'.
1178
                ' sur votre compte utilisateur (nom, droit d\'accès...)'.
1179
                'ainsi qu\'un '.'<emphasis>'.'menu'.'</emphasis>'.' qui vous permet d\'accèder aux différents '.
1180
                'formulaires de saisi composant l\'interface d\'admnistration des herbiers.'.
1181
                '</p>'."\n".
1182
                '<p class="hba_aide">'.
1183
                'La saisie d\'une nouvelle collection commence par la saisie d\'une structure accueillant '.
1184
                'la ou les collections.'.'<br />'.
1185
                'Pour ce faire, il vous faut cliquez sur le lien "Ajouter une institution (herbier)" présent '.
1186
                'dans le cartouche.'.
1187
                '</p>'."\n";
1188
    return $retour;
1189
}
1190
 
1191
function fournirAideAccueilOrganisation()
1192
{
1193
    $retour =  '<p class="hba_aide">'.
1194
                'Pour <b>créer</b> une institution, il vous faut cliquez sur le lien "Ajouter une institution (herbier)" présent '.
1195
                'dans le cartouche ci-contre.'.'<br />'.
1196
                'Pour <b>éditer</b> une institution existante, son équipe et ses collections, cliquez sur le lien '.
1197
                '<b>modifier</b> situé sur la même ligne que l\'institution que vous avez choisie.'.'<br />'.
1198
                'Vous pouvez également la supprimer en cliquant sur le lien <b>supprimer</b>.'.
1199
                '</p>'."\n";
1200
    return $retour;
1201
}
1202
 
1203
function fournirAideOrganisation()
1204
{
1205
    $retour =  '<p class="hba_aide">'.
1206
                'Le "cartouche" contenant le menu vous propose maintenant de :'.
1207
                '</p>'."\n".
1208
                '<ul class="hba_aide">'."\n".
1209
                '<li><strong>'.'Modifier'.'</strong>'.' les renseignements concernant l\'institution '.'<strong>'.
1210
                '->'.'Modifier l\'institution'.'</strong></li>'."\n".
1211
                '<li><strong>'.'Ajouter'.'</strong>'.' des informations sur les membres travaillant dans l\'institution '.
1212
                'ou dans le cas de petites structures pour indiquer qui est le contact.'.'<strong>'.
1213
                '->'.'Ajouter un membre à l\'équipe</strong></li>'."\n".
1214
                '<li><strong>'.'Ajouter'.'</strong>'.' des informations sur les collections possédées par l\'institution'.'<strong>'.
1215
                '->'.'Ajouter une collection'.'</strong></li>'."\n".
1216
                '</ul>'."\n";
1217
    return $retour;
1218
}
1219
 
1220
function fournirAideEquipe()
1221
{
1222
    $retour =   '<p class="hba_aide">'.
1223
                'Pour une institution donnée, on peut ajouter autant de <b>membres d\'équipe (et/ou contacts)</b> '.
1224
                'que nécessaire.'.'<br />'.
1225
                'Cliquez sur le lien <b>modifier</b> situé sur la même ligne que le membre de l\'équipe que vous avez '.
1226
                'choisie, pour mettre à jour ses informations.'.'<br />'.
1227
                'Vous pouvez également le supprimer en cliquant sur le lien <b>supprimer</b>.'.
1228
                '</p>'."\n";
1229
    return $retour;
1230
}
1231
 
1232
 
1233
function fournirAideCollection()
1234
{
1235
    $retour =   '<p class="hba_aide">'.
1236
                'Pour une collection donnée, on peut ajouter autant de <b>notes (compléments '.
1237
                'd\'information)</b> que nécessaire. Lorsqu\'une collection contient des compléments '.
1238
                'd\'information, un <b>+</b> apparait à gauche de son nom, on peut les éditer en '.
1239
                'cliquant dessus.'.
1240
                '</p>'."\n";
1241
    return $retour;
1242
}
1243
 
1244
function fournirAideParcourirAnnuaire()
1245
{
1246
    $retour =   '<p class="hba_aide">'.
1247
                'Cliquez sur une lettre pour afficher la liste des inscrits au site Tela Botanica dont le nom '.
1248
                'débute par cette lettre.'.
1249
                '</p>'."\n";
1250
    return $retour;
1251
}
1252
 
1253
// +------------------------------------------------------------------------------------------------------+
1254
// FONCTIONS COMMUNES
1255
 
1256
// verifie une valeur et affiche du texte en cons&eacute;quence
1257
function checkvalue($prose, $value = '')
1258
{
1259
    if ($value == '') {
1260
        $retour = '<h1>'.$prose.'</h1>'."\n";
1261
        $retour .= '<input type="submit" value="'.'Recommencer'.'" onclick="javascript:history.go(-1);" />'."\n";
1262
        return $retour;
1263
        }
1264
    return false ;
1265
}
1266
 
1267
function color_alterne(&$flag)
1268
{
1269
    if ($flag) {
1270
        $flag = FALSE;
1271
        return 'pair';
1272
    } else {
1273
        $flag = TRUE;
1274
        return 'impair';
1275
    }
1276
}
1277
 
1278
/** Fonction checkZip() - Teste un code postal français.
1279
*
1280
* L'expression régulière ^[0-9]{5}$ est utilisée pour vérifier
1281
* que nous avons à faire à un code postal français.
1282
*
1283
* @param  string  Le code postal à tester.
1284
* @return boolean retourne vrai si code postal est valide.
1285
*/
1286
function checkZip($code)
1287
{
1288
    if (ereg('^[0-9]{5}$', $code, $match)){
1289
        return TRUE;
1290
    } else {
1291
        return FALSE;
1292
    }
1293
}
1294
 
1295
/** Fonction raccourcirTexte() - Raccourci un texte.
1296
*
1297
* Renvoie le $texte coupe a la $taille indique avec 3 point de suspension.
1298
* Si le texte est plus court que $taille, il n'est pas modifie
1299
*
1300
* @param  string le texte à raccourcir.
1301
* @param  integer le nombre de caractère maximum du texte raccourci.
1302
* @param  boolean mettre FALSE pour ne pas afficher de points de suspenssion.
1303
* @return mixed retourne le texte abrégé ou FALSE.
1304
*/
1305
function raccourcirTexte($texte, $taille = null, $bool_suspenssion = TRUE) {
1306
    if (!is_null($taille) && strlen($texte) > $taille) {
1307
        if ($bool_suspenssion) {
1308
            return substr($texte, 0, $taille - 3).'...';
1309
        } else {
1310
            return substr($texte, 0, $taille);
1311
        }
1312
    }
1313
    return FALSE;
1314
}
1315
 
1316
function parcourrirAnnu(&$un_herbier, $id_action)
1317
{
1318
    // Initialisation de variables
1319
    $db =& $GLOBALS['_HERBIER_']['bdd'];
1320
    $retour = '';
1321
 
1322
    if (NOUVEAU_CORR) {
1323
        $retour .= '<h1>'.'Inscription d\'un correspondant'.'</h1>'."\n";
1324
    } elseif (NOUVEAU_RED) {
1325
        $retour .= '<h1>'.'Inscription d\'un rédacteur'.'</h1>'."\n";
1326
    }
1327
    $retour .= fournirAideParcourirAnnuaire();
1328
    $retour .= '<p class="hba_alphabet">';
1329
    // Ecrire toutes les lettres avec un lien
1330
    for ($i = 65 ; $i < 91 ; $i++) {
1331
        $retour .= '<a href="'.sprintf(HB_URL_COURANTE_ADMIN_ACTION_LETTRE, $un_herbier->getAction(), chr($i));
1332
        $retour .= '">'.chr($i).'</a>'."\n";
1333
    }
1334
    $retour .= '</p>';
1335
 
1336
    // si une lettre est selectionne
1337
    if (!empty($_REQUEST['lettre'])) {
1338
        $requete =  'SELECT '.HB_BDD_TAB_ANNUAIRE_CHP_NOM.', '.HB_BDD_TAB_ANNUAIRE_CHP_PRENOM.', '.
1339
                    HB_BDD_TAB_ANNUAIRE_CHP_ID.', '.HB_BDD_TAB_ANNUAIRE_CHP_MAIL.' '.
1340
                    'FROM '.HB_BDD_TAB_ANNUAIRE.' '.
1341
                    'WHERE ';
1342
        if ($_REQUEST['lettre'] != 'tous') {
1343
            $requete .= HB_BDD_TAB_ANNUAIRE_CHP_NOM.' LIKE "'.$_REQUEST['lettre'].'%" ';
1344
        }
1345
        $requete .= 'ORDER BY '.HB_BDD_TAB_ANNUAIRE_CHP_NOM;
1346
        $resultat = $db->query($requete);
1347
        if (DB::isError($resultat)) {
1348
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete, $resultat->getDebugInfo()));
1349
        }
1350
        if ($resultat->numRows() != 0) {
1351
            // Pour chaque nom, inscription des infos
1352
            $retour .= '<h1>'.' Inscrits dont le nom débute par : '.$_REQUEST['lettre'].'</h1>'."\n";
1353
            $retour .= '<div class="hba_liste_inscrit">'."\n";
1354
            $retour .= '<table id="hba_table_annuaire">'."\n";
1355
            $retour .= '<colgroup><col width="30%" /><col width="30%" /><col width="30%" /><col width="10%" /></colgroup>'."\n";
1356
            $retour .= '<thead><tr><th>'.'Nom'.'</th><th>'.'Prénom'.'</th><th>'.'Courriel'.'</th><th>'.'Action'.'</th></tr></thead>'."\n";
1357
            $retour .= '<tbody>'."\n";
1358
            $pair = true;
1359
            while ($row = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
1360
                $retour .= '<tr ';
1361
                if ($pair) {
1362
                    $retour .= 'class="impair"';
1363
                    $pair = false ;
1364
                } else {
1365
                    $retour .= 'class="pair"';
1366
                    $pair = true;
1367
                }
1368
                $retour .= '>';
1369
                $retour .=  '<td>'.$row[HB_BDD_TAB_ANNUAIRE_CHP_NOM].'</td>'.
1370
                            '<td>'.$row[HB_BDD_TAB_ANNUAIRE_CHP_PRENOM].'</td>'.
1371
                            '<td>'.$row[HB_BDD_TAB_ANNUAIRE_CHP_MAIL].'</td>'."\n";
1372
                if ($un_herbier->getAction() == NOUVEAU_CORR) {
1373
                    $retour .= '<td><a href="'.
1374
                                sprintf($un_herbier->getUrlActionCor(), $id_action, $row[HB_BDD_TAB_ANNUAIRE_CHP_ID], $row[HB_BDD_TAB_ANNUAIRE_CHP_ID]).
1375
                                '">'.'inscrire'.'</a></td>'."\n";
1376
                } elseif ($un_herbier->getAction() == NOUV_RED) {
1377
                    $retour .=  '<td><a href="'.
1378
                                sprintf($un_herbier->getUrlActionRed(), $id_action, $row[HB_BDD_TAB_ANNUAIRE_CHP_ID]).
1379
                                '">'.'inscrire'.'</a></td>'."\n";
1380
                }
1381
                $retour .= '</tr>'."\n";
1382
            }
1383
            $retour .= '</tbody>'."\n".'</table>'."\n".'</div>'."\n";
1384
        } else {
1385
            $retour .= '<p class="hba_attention">'.'Aucun inscrit!'.'</p>'."\n";
1386
        }
1387
    }
1388
    return $retour;
1389
}
1390
// +------------------------------------------------------------------------------------------------------+
1391
 
1392
/* +--Fin du code ----------------------------------------------------------------------------------------+
1393
*
1394
* $Log: not supported by cvs2svn $
1395
* Revision 1.5  2005/06/09 17:31:42  jpm
1396
* Affichage en permanence dans le menu du lien vers l'accueil.
1397
*
1398
* Revision 1.4  2005/06/07 15:30:44  jpm
1399
* Modid esthetique.
1400
*
1401
* Revision 1.3  2005/06/02 17:53:37  jpm
1402
* Modification de l'affichage du menu.
1403
*
1404
* Revision 1.2  2005/05/18 07:30:13  jpm
1405
* Correction des bogues et derniers réglages avant mise en ligne du site v4.
1406
*
1407
* Revision 1.1  2005/04/06 13:33:40  jpm
1408
* Ajout du fichier contenant les fonctions réalisant la mise en page et la gestion des données.
1409
* Cela devrait normalement être divisé en un modèle et une vue...
1410
*
1411
*
1412
* +-- Fin du code ----------------------------------------------------------------------------------------+
1413
*/
1414
?>