Subversion Repositories Applications.bazar

Rev

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

Rev Author Line No. Line
468 mathias 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 library is free software; you can redistribute it and/or                                        |
9
// | modify it under the terms of the GNU Lesser General Public                                           |
10
// | License as published by the Free Software Foundation; either                                         |
11
// | version 2.1 of the License, or (at your option) any later version.                                   |
12
// |                                                                                                      |
13
// | This library is distributed in the hope that it will be useful,                                      |
14
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
15
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
16
// | Lesser General Public License for more details.                                                      |
17
// |                                                                                                      |
18
// | You should have received a copy of the GNU Lesser General Public                                     |
19
// | License along with this library; if not, write to the Free Software                                  |
20
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21
// +------------------------------------------------------------------------------------------------------+
22
// CVS : $Id: bazar.fonct.formulaire.php,v 1.26 2007-06-04 15:24:31 alexandre_tb Exp $
23
/**
24
* Formulaire
25
*
26
* Les fonctions de mise en page des formulaire
27
*
28
*@package bazar
29
//Auteur original :
30
*@author        Florian SCHMITT <florian@ecole-et-nature.org>
31
//Autres auteurs :
32
*@author        Aleandre GRANIER <alexandre@tela-botanica.org>
33
*@copyright     Tela-Botanica 2000-2004
34
*@version       $Revision: 1.26 $ $Date: 2007-06-04 15:24:31 $
35
// +------------------------------------------------------------------------------------------------------+
36
*/
37
 
38
require_once 'bazar.fonct.formulaire.controles.php';
39
 
40
//-------------------FONCTIONS DE MISE EN PAGE DES FORMULAIRES
41
 
479 mathias 42
/** liste() - Ajoute un �l�ment de type liste au formulaire
468 mathias 43
*
44
* @param    mixed   L'objet QuickForm du formulaire
45
* @param    int     identifiant de la liste sur bazar_liste
479 mathias 46
* @param    string  label � afficher dans le formulaire
47
* @param    string  premi�re restriction de la taille des champs du formulaire
48
* @param    string  deuxi�me restriction de la taille des champs du formulaire
49
* @param    string  valeur par d�faut du formulaire
468 mathias 50
* @param    string  table source pour les valeurs de la liste
51
* @param    string  ce champs est il obligatoire? (required)
52
* @param    boolean sommes nous dans le moteur de recherche?
53
* @return   void
54
*/
55
function liste(&$formtemplate, $id_liste , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
56
	$requete = 'SELECT * FROM bazar_liste_valeurs WHERE blv_ce_liste='.$id_liste.' AND blv_ce_i18n="'.$GLOBALS['_BAZAR_']['langue'].'"';
57
	$resultat = & $GLOBALS['_BAZAR_']['db'] -> query($requete) ;
58
	if (DB::isError ($resultat)) {
59
		die ($resultat->getMessage().$resultat->getDebugInfo()) ;
60
	}
61
	if ($dans_moteur_de_recherche==0) {
62
		$select[0]=BAZ_CHOISIR;
63
	}
64
	else {
65
		$select[0]=BAZ_INDIFFERENT;
66
	}
67
	while ($ligne = $resultat->fetchRow()) {
68
		$select[$ligne[1]] = $ligne[2] ;
69
	}
70
	$option=array('style'=>'width: '.$limite1.'px;', 'id' => 'liste'.$id_liste);
71
	require_once PAP_CHEMIN_API_PEAR.'HTML/QuickForm/select.php';
72
	$select= new HTML_QuickForm_select('liste'.$id_liste, $label, $select, $option);
73
	$select->setSize($limite2);
74
	$select->setMultiple(0);
75
	$select->setSelected($defaut);
76
	$formtemplate->addElement($select) ;
77
	if (($dans_moteur_de_recherche==0) && isset($obligatoire) && ($obligatoire==1)) {
78
		$formtemplate->addRule('liste'.$id_liste, BAZ_CHOISIR_OBLIGATOIRE.' '.$label , 'nonzero', '', 'client') ;
79
		$formtemplate->addRule('liste'.$id_liste, $label.' obligatoire', 'required', '', 'client') ;}
80
}
81
 
82
 
479 mathias 83
/** checkbox() - Ajoute un �l�ment de type checkbox au formulaire
468 mathias 84
*
85
* @param    mixed   L'objet QuickForm du formulaire
86
* @param    int     identifiant de la liste sur bazar_liste
479 mathias 87
* @param    string  label � afficher dans le formulaire
88
* @param    string  premi�re restriction de la taille des champs du formulaire
89
* @param    string  deuxi�me restriction de la taille des champs du formulaire
90
* @param    string  valeur par d�faut du formulaire
468 mathias 91
* @param    string  table source pour les valeurs de la liste
92
* @param    string  ce champs est il obligatoire? (required)
93
* @return   void
94
*/
95
function checkbox(&$formtemplate, $id_liste , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
96
	$requete = 'SELECT * FROM bazar_liste_valeurs WHERE blv_ce_liste='.$id_liste.' AND blv_ce_i18n="'.$GLOBALS['_BAZAR_']['langue'].'" ORDER BY blv_label';
97
	$resultat = & $GLOBALS['_BAZAR_']['db'] -> query($requete) ;
98
	if (DB::isError ($resultat)) {
99
		die ($resultat->getMessage().$resultat->getDebugInfo()) ;
100
	}
101
	require_once PAP_CHEMIN_API_PEAR.'HTML/QuickForm/checkbox.php' ;
102
	$i=0;
103
	if (isset($defaut)) $tab=split(', ', $defaut);
104
	while ($ligne = $resultat->fetchRow()) {
105
		if ($i==0) $labelchkbox=$label ; else $labelchkbox='&nbsp;';
106
		$checkbox[$i]= & HTML_Quickform::createElement('checkbox', $ligne[1], $labelchkbox, $ligne[2],
107
						array ('style'=>'display:inline;margin:2px;')) ;
108
		foreach ($tab as $val) {
109
            if ($ligne[1]==$val) $checkbox[$i]->setChecked(1);
110
        }
111
		$i++;
112
	}
113
	$squelette_checkbox =& $formtemplate->defaultRenderer();
114
	$squelette_checkbox->setElementTemplate( '<tr><td colspan="2" style="text-align:left;">'."\n".'<fieldset class="bazar_fieldset">'."\n".'<legend>{label}'.
115
                                             '<!-- BEGIN required --><span class="symbole_obligatoire">&nbsp;*</span><!-- END required -->'."\n".
116
											 '</legend>'."\n".'{element}'."\n".'</fieldset> '."\n".'</td></tr>'."\n", 'checkbox'.$id_liste);
117
  	$squelette_checkbox->setGroupElementTemplate( "\n".'<div class="bazar_checkbox">'."\n".'{element}'."\n".'</div>'."\n", 'checkbox'.$id_liste);
118
 
119
	$formtemplate->addGroup($checkbox, 'checkbox'.$id_liste, $label, "\n");
120
	if (($dans_moteur_de_recherche==0) && isset($obligatoire) && ($obligatoire==1)) {
121
		$formtemplate->addGroupRule('checkbox'.$id_liste, $label.' obligatoire', 'required', null, 1, 'client');
122
	}
123
}
124
 
125
 
479 mathias 126
/** listedatedeb() - Ajoute un �l�ment de type date sous forme de liste au formulaire pour designer une date de d�but
468 mathias 127
*
128
* @param    mixed   L'objet QuickForm du formulaire
479 mathias 129
* @param    string  nom de la table dans la base de donn�e
130
* @param    string  label � afficher dans le formulaire
131
* @param    string  premi�re restriction de la taille des champs du formulaire
132
* @param    string  deuxi�me restriction de la taille des champs du formulaire
133
* @param    string  valeur par d�faut du formulaire
468 mathias 134
* @param    string  table source pour les valeurs de la date
135
* @param    string  ce champs est il obligatoire? (required)
136
* @return   void
137
*/
138
function listedatedeb(&$formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
139
	$optiondate = array('language' => BAZ_LANGUE_PAR_DEFAUT,
140
						'minYear' => date('Y')-4,
141
						'maxYear'=> (date('Y')+10),
142
						'format' => 'd m Y',
143
						'addEmptyOption' => BAZ_DATE_VIDE,
144
						);
145
	$formtemplate->addElement('date', $nom_bdd, $label, $optiondate) ;
479 mathias 146
	//gestion des valeurs par d�faut (date du jour)
468 mathias 147
	if (isset($defaut) && $defaut!='') {
148
		$tableau_date = explode ('-', $defaut);
149
		$formtemplate->setDefaults(array($nom_bdd => array ('d'=> $tableau_date[2], 'm'=> $tableau_date[1], 'Y'=> $tableau_date[0])));
150
	}
151
 
152
	else {
153
		$defauts=array($nom_bdd => array ('d'=>date('d'), 'm'=>date('m'), 'Y'=>date('Y')));
154
		$formtemplate->setDefaults($defauts);
155
	}
156
	//gestion du champs obligatoire
157
	if (($dans_moteur_de_recherche==0) && isset($obligatoire) && ($obligatoire==1)) {
158
		$formtemplate->addRule($nom_bdd, $label.' obligatoire', 'required', '', 'client') ;
159
	}
160
}
161
 
479 mathias 162
/** listedatefin() - Ajoute un �l�ment de type date sous forme de liste au formulaire pour designer une date de fin
468 mathias 163
*
164
* @param    mixed   L'objet QuickForm du formulaire
479 mathias 165
* @param    string  nom de la table dans la base de donn�e
166
* @param    string  label � afficher dans le formulaire
167
* @param    string  premi�re restriction de la taille des champs du formulaire
168
* @param    string  deuxi�me restriction de la taille des champs du formulaire
169
* @param    string  valeur par d�faut du formulaire
468 mathias 170
* @param    string  table source pour les valeurs de la date
171
* @param    string  ce champs est il obligatoire? (required)
172
* @return   void
173
*/
174
function listedatefin(&$formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
175
	listedatedeb($formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche);
176
}
177
 
178
 
479 mathias 179
/** texte() - Ajoute un �l�ment de type texte au formulaire
468 mathias 180
*
181
* @param    mixed   L'objet QuickForm du formulaire
479 mathias 182
* @param    string  nom de la table dans la base de donn�e
183
* @param    string  label � afficher dans le formulaire
184
* @param    string  premi�re restriction de la taille des champs du formulaire
185
* @param    string  deuxi�me restriction de la taille des champs du formulaire
186
* @param    string  valeur par d�faut du formulaire
468 mathias 187
* @param    string  table source pour les valeurs du texte (inutile)
188
* @param    string  ce champs est il obligatoire? (required)
189
* @return   void
190
*/
191
function texte(&$formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
192
	$option=array('size'=>$limite1,'maxlength'=>$limite2, 'id' => $nom_bdd);
193
	$formtemplate->addElement('text', $nom_bdd, $label, $option) ;
479 mathias 194
	//gestion des valeurs par d�faut
468 mathias 195
	$defauts=array($nom_bdd=>$defaut);
196
	$formtemplate->setDefaults($defauts);
197
	$formtemplate->applyFilter($nom_bdd, 'addslashes') ;
198
	//gestion du champs obligatoire
199
	if (($dans_moteur_de_recherche==0) && isset($obligatoire) && ($obligatoire==1)) {
200
		$formtemplate->addRule($nom_bdd,  $label.' obligatoire', 'required', '', 'client') ;
201
	}
202
}
203
 
204
 
479 mathias 205
/** textelong() - Ajoute un �l�ment de type textearea au formulaire
468 mathias 206
*
207
* @param    mixed   L'objet QuickForm du formulaire
479 mathias 208
* @param    string  nom de la table dans la base de donn�e
209
* @param    string  label � afficher dans le formulaire
210
* @param    string  taille des colonnes de l'�l�ment
211
* @param    string  taille des lignes de l'�l�ment
212
* @param    string  valeur par d�faut du formulaire
468 mathias 213
* @param    string  table source pour les valeurs du texte (inutile)
214
* @param    string  ce champs est il obligatoire? (required)
215
* @return   void
216
*/
217
function textelong(&$formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
218
	$formtexte= new HTML_QuickForm_textarea($nom_bdd, $label, array('style'=>'white-space: normal;', 'id' => $nom_bdd));
219
	$formtexte->setCols($limite1);
220
	$formtexte->setRows($limite2);
221
	$formtemplate->addElement($formtexte) ;
479 mathias 222
	//gestion des valeurs par d�faut
468 mathias 223
	$defauts=array($nom_bdd=>$defaut);
224
	$formtemplate->setDefaults($defauts);
225
	$formtemplate->applyFilter($nom_bdd, 'addslashes') ;
226
	//gestion du champs obligatoire
227
	if (($dans_moteur_de_recherche==0) && isset($obligatoire) && ($obligatoire==1)) {
228
		$formtemplate->addRule($nom_bdd,  $label.' obligatoire', 'required', '', 'client') ;
229
	}
230
}
231
 
479 mathias 232
/** url() - Ajoute un �l�ment de type url internet au formulaire
468 mathias 233
*
234
* @param    mixed   L'objet QuickForm du formulaire
479 mathias 235
* @param    string  numero du champs input du formulaire (pour le diff�rencier d'autres champs du meme type dans ce formulaire)
236
* @param    string  label � afficher dans le formulaire
237
* @param    string  taille des colonnes de l'�l�ment
238
* @param    string  taille des lignes de l'�l�ment
239
* @param    string  valeur par d�faut du formulaire
468 mathias 240
* @param    string  table source pour les valeurs du texte (inutile)
241
* @param    string  ce champs est il obligatoire? (required)
242
* @return   void
243
*/
244
function url(&$formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
245
	//recherche des URLs deja entrees dans la base
246
	$html_url= '';
247
	if (isset($GLOBALS['_BAZAR_']["id_fiche"])) {
248
		$requete = 'SELECT bu_id_url, bu_url, bu_descriptif_url FROM bazar_url WHERE bu_ce_fiche='.$GLOBALS['_BAZAR_']["id_fiche"];
249
		$resultat = & $GLOBALS['_BAZAR_']['db'] -> query($requete) ;
250
		if (DB::isError ($resultat)) {
251
			die ($GLOBALS['_BAZAR_']['db']->getMessage().$GLOBALS['_BAZAR_']['db']->getDebugInfo()) ;
252
		}
253
		if ($resultat->numRows()>0) {
254
			$html_url= '<tr>'."\n".'<td colspan="2">'."\n".'<strong>'.BAZ_LISTE_URL.'</strong>'."\n";
255
			$tableAttr = array("class" => "bazar_table") ;
256
			$table = new HTML_Table($tableAttr) ;
257
			$entete = array (BAZ_LIEN , BAZ_SUPPRIMER) ;
258
			$table->addRow($entete) ;
259
			$table->setRowType(0, "th") ;
260
 
261
			$lien_supprimer=$GLOBALS['_BAZAR_']['url'];
262
			$lien_supprimer->addQueryString('action', $_GET['action']);
263
			$lien_supprimer->addQueryString('id_fiche', $GLOBALS['_BAZAR_']["id_fiche"]);
264
			$lien_supprimer->addQueryString('typeannonce', $_REQUEST['typeannonce']);
265
 
266
			while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
267
				$lien_supprimer->addQueryString('id_url', $ligne->bu_id_url);
268
				$table->addRow (array(
269
				'<a href="'.$ligne->bu_url.'" target="_blank"> '.$ligne->bu_descriptif_url.'</a>', // col 1 : le lien
270
				'<a href="'.$lien_supprimer->getURL().'" onclick="javascript:return confirm(\''.BAZ_CONFIRMATION_SUPPRESSION_LIEN.'\');" >'.BAZ_SUPPRIMER.'</a>'."\n")) ; // col 2 : supprimer
271
				$lien_supprimer->removeQueryString('id_url');
272
			}
273
 
274
			// Nettoyage de l'url
275
			$lien_supprimer->removeQueryString('action');
276
			$lien_supprimer->removeQueryString('id_fiche');
277
			$lien_supprimer->removeQueryString('typeannonce');
278
 
279
			$table->altRowAttributes(1, array("class" => "ligne_impaire"), array("class" => "ligne_paire"));
280
			$table->updateColAttributes(1, array("align" => "center"));
281
			$html_url.= $table->toHTML()."\n".'</td>'."\n".'</tr>'."\n" ;
282
		}
283
	}
284
	$html ='<tr>'."\n".'<td colspan="2">'."\n".'<h4>'.$label.'</h4>'."\n".'</td>'."\n".'</tr>'."\n";
285
	$formtemplate->addElement('html', $html) ;
286
	if ($html_url!='') $formtemplate->addElement('html', $html_url) ;
287
	$formtemplate->addElement('text', 'url_lien'.$nom_bdd, BAZ_URL_LIEN) ;
288
	$formtemplate->addElement('text', 'url_texte'.$nom_bdd, BAZ_URL_TEXTE) ;
289
	//gestion du champs obligatoire
290
	if (($dans_moteur_de_recherche==0) && isset($obligatoire) && ($obligatoire==1)) {
291
		$formtemplate->addRule('url_lien'.$nom_bdd, BAZ_URL_LIEN_REQUIS, 'required', '', 'client') ;
292
		$formtemplate->addRule('url_texte'.$nom_bdd, BAZ_URL_TEXTE_REQUIS, 'required', '', 'client') ;
293
	}
294
}
295
 
479 mathias 296
/** fichier() - Ajoute un �l�ment de type fichier au formulaire
468 mathias 297
*
298
* @param    mixed   L'objet QuickForm du formulaire
479 mathias 299
* @param    string  numero du champs input du formulaire (pour le diff�rencier d'autres champs du meme type dans ce formulaire)
300
* @param    string  label � afficher dans le formulaire
301
* @param    string  taille des colonnes de l'�l�ment
302
* @param    string  taille des lignes de l'�l�ment
303
* @param    string  valeur par d�faut du formulaire
468 mathias 304
* @param    string  table source pour les valeurs du texte (inutile)
305
* @param    string  ce champs est il obligatoire? (required)
306
* @return   void
307
*/
308
function fichier(&$formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
309
	//AJOUTER DES FICHIERS JOINTS
310
	$html_fichier= '';
311
	if (isset($GLOBALS['_BAZAR_']["id_fiche"])) {
312
		$requete = 'SELECT * FROM bazar_fichier_joint WHERE bfj_ce_fiche='.$GLOBALS['_BAZAR_']["id_fiche"];
313
		$resultat = & $GLOBALS['_BAZAR_']['db'] -> query($requete) ;
314
		if (DB::isError ($resultat)) {
315
			die ($GLOBALS['_BAZAR_']['db']->getMessage().$GLOBALS['_BAZAR_']['db']->getDebugInfo()) ;
316
		}
317
 
318
		if ($resultat->numRows()>0) {
319
			$html_fichier = '<tr>'."\n".'<td colspan="2">'."\n".'<strong>'.BAZ_LISTE_FICHIERS_JOINTS.'</strong>'."\n";
320
			$tableAttr = array("class" => "bazar_table") ;
321
			$table = new HTML_Table($tableAttr) ;
322
			$entete = array (BAZ_FICHIER , BAZ_SUPPRIMER) ;
323
			$table->addRow($entete) ;
324
			$table->setRowType(0, "th") ;
325
 
326
			$lien_supprimer=$GLOBALS['_BAZAR_']['url'];
327
			$lien_supprimer->addQueryString('action', $_GET['action']);
328
			$lien_supprimer->addQueryString('id_fiche', $GLOBALS['_BAZAR_']["id_fiche"]);
329
			$lien_supprimer->addQueryString('typeannonce', $_REQUEST['typeannonce']);
330
			while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
331
				$lien_supprimer->addQueryString('id_fichier', $ligne->bfj_id_fichier);
479 mathias 332
				$table->addRow(array('<a href="reseau/bazar/upload/'.$ligne->bfj_fichier.'"> '.$ligne->bfj_description.'</a>', // col 1 : le fichier et sa description
468 mathias 333
									 '<a href="'.$lien_supprimer->getURL().'" onclick="javascript:return confirm(\''.BAZ_CONFIRMATION_SUPPRESSION_FICHIER.'\');" >'.BAZ_SUPPRIMER.'</a>'."\n")) ; // col 2 : supprimer
334
				$lien_supprimer->removeQueryString('id_fichier');
335
			}
336
			$table->altRowAttributes(1, array("class" => "ligne_impaire"), array("class" => "ligne_paire"));
337
			$table->updateColAttributes(1, array("align" => "center"));
338
			$html_fichier .= $table->toHTML()."\n".'</td>'."\n".'</tr>'."\n" ;
339
		}
340
	}
341
	$html ='<tr>'."\n".'<td colspan="2">'."\n".'<h4>'.$label.'</h4>'."\n".'</td>'."\n".'</tr>'."\n";
342
	$formtemplate->addElement('html', $html) ;
343
	if ($html_fichier!='') $formtemplate->addElement('html', $html_fichier) ;
344
	$formtemplate->addElement('text', 'texte_fichier'.$nom_bdd, BAZ_FICHIER_DESCRIPTION) ;
345
	$formtemplate->addElement('file', 'fichier'.$nom_bdd, BAZ_FICHIER_JOINT) ;
346
	$formtemplate->addRule('image', BAZ_IMAGE_VALIDE_REQUIS, '', '', 'client') ; //a completer pour checker l'image
347
	$formtemplate->setMaxFileSize($limite1);
348
	//gestion du champs obligatoire
349
	if (($dans_moteur_de_recherche==0) && isset($obligatoire) && ($obligatoire==1)) {
350
		$formtemplate->addRule('texte_fichier'.$nom_bdd, BAZ_FICHIER_LABEL_REQUIS, 'required', '', 'client') ;
351
		$formtemplate->addRule('fichier'.$nom_bdd, BAZ_FICHIER_JOINT_REQUIS, 'required', '', 'client') ;
352
	}
353
}
354
 
479 mathias 355
/** image() - Ajoute un �l�ment de type image au formulaire
468 mathias 356
*
357
* @param    mixed   L'objet QuickForm du formulaire
479 mathias 358
* @param    string  numero du champs input du formulaire (pour le diff�rencier d'autres champs du meme type dans ce formulaire)
359
* @param    string  label � afficher dans le formulaire
360
* @param    string  taille maximum du fichier colonnes de l'�l�ment
361
* @param    string  taille des lignes de l'�l�ment
362
* @param    string  valeur par d�faut du formulaire
468 mathias 363
* @param    string  table source pour les valeurs du texte (inutile)
364
* @param    string  ce champs est il obligatoire? (required)
365
* @return   void
366
*/
367
function image(&$formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
368
	//AJOUTER UNE IMAGE
369
	$html_image= '';
370
	if (isset($GLOBALS['_BAZAR_']["id_fiche"])) {
371
		$requete = 'SELECT bf_url_image FROM bazar_fiche WHERE bf_id_fiche='.$GLOBALS['_BAZAR_']['id_fiche'];
372
		$resultat = & $GLOBALS['_BAZAR_']['db'] -> query($requete) ;
373
		if (DB::isError ($resultat)) {
374
			die ($GLOBALS['_BAZAR_']['db']->getMessage().$GLOBALS['_BAZAR_']['db']->getDebugInfo()) ;
375
		}
376
 
377
		if ($resultat->numRows()>0) {
378
			while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
379
				$image=$ligne->bf_url_image;
380
			}
381
			if ($image!=NULL) {
382
				$lien_supprimer=$GLOBALS['_BAZAR_']['url'];
383
				$lien_supprimer->addQueryString('action', $_GET['action']);
384
				$lien_supprimer->addQueryString('id_fiche', $GLOBALS['_BAZAR_']["id_fiche"]);
385
				$lien_supprimer->addQueryString('typeannonce', $_REQUEST['typeannonce']);
386
				$lien_supprimer->addQueryString('image', 1);
387
				$html_image = '<tr>'."\n".
479 mathias 388
							  '<td>'."\n".'<img src="reseau/bazar/upload/'.$image.'" alt="'.BAZ_TEXTE_IMG_ALTERNATIF.'" width="130" height="130" />'."\n".'</td>'."\n".
468 mathias 389
							  '<td>'."\n".'<a href="'.$lien_supprimer->getURL().'" onclick="javascript:return confirm(\''.BAZ_CONFIRMATION_SUPPRESSION_IMAGE.'\');" >'.BAZ_SUPPRIMER.'</a><br /><br />'."\n".
390
							  '<strong>'.BAZ_POUR_CHANGER_IMAGE.'</strong><br />'."\n".'</td>'."\n".'</tr>'."\n";
391
			}
392
		}
393
	}
394
	$html ='<tr>'."\n".'<td colspan="2">'."\n".'<h4>'.$label.'</h4>'."\n".'</td>'."\n".'</tr>'."\n";
395
	$formtemplate->addElement('html', $html) ;
396
	if ($html_image!='') $formtemplate->addElement('html', $html_image) ;
397
	$formtemplate->addElement('file', 'image', BAZ_IMAGE) ;
398
	//TODO: controler si c'est une image
399
	$formtemplate->setMaxFileSize($limite1);
400
	//gestion du champs obligatoire
401
	if (($dans_moteur_de_recherche==0) && isset($obligatoire) && ($obligatoire==1)) {
402
		$formtemplate->addRule('image', BAZ_IMAGE_VALIDE_REQUIS, 'required', '', 'client') ;
403
	}
404
}
405
 
406
/** wikini() - Ajoute un wikini au formulaire
407
*
408
* @param    mixed   L'objet QuickForm du formulaire
479 mathias 409
* @param    string  numero du champs input du formulaire (pour le diff�rencier d'autres champs du meme type dans ce formulaire)
410
* @param    string  label � afficher dans le formulaire
411
* @param    string  taille maximum du fichier colonnes de l'�l�ment
412
* @param    string  taille des lignes de l'�l�ment
413
* @param    string  valeur par d�faut du formulaire
468 mathias 414
* @param    string  table source pour les valeurs du texte (inutile)
415
* @param    string  ce champs est il obligatoire? (required)
416
* @return   void
417
*/
418
function wikini(&$formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
419
	return;
420
}
421
 
479 mathias 422
/** labelhtml() - Ajoute un �l�ment de type textearea au formulaire
468 mathias 423
*
424
* @param    mixed   L'objet QuickForm du formulaire
479 mathias 425
* @param    string  nom de la table dans la base de donn�e (pas utilis�)
426
* @param    string  label � afficher dans le formulaire
427
* @param    string  taille des colonnes de l'�l�ment (pas utilis�)
428
* @param    string  taille des lignes de l'�l�ment (pas utilis�)
429
* @param    string  valeur par d�faut du formulaire (pas utilis�)
430
* @param    string  table source pour les valeurs du texte (pas utilis�)
431
* @param    string  ce champs est il obligatoire? (required) (pas utilis�)
468 mathias 432
* @return   void
433
*/
434
function labelhtml(&$formtemplate, $nom_bdd , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
435
	require_once PAP_CHEMIN_API_PEAR.'HTML/QuickForm/html.php';
436
	$formhtml= new HTML_QuickForm_html('<tr>'."\n".'<td colspan="2" style="text-align:left;">'."\n".$label."\n".'</td>'."\n".'</tr>'."\n");
437
	$formtemplate->addElement($formhtml) ;
438
}
439
 
479 mathias 440
/** carte_google() - Ajoute un �l�ment de carte google au formulaire
468 mathias 441
*
442
* @param    mixed   L'objet QuickForm du formulaire
443
* @param    string  l url vers la script google
479 mathias 444
* @param    string  label � afficher dans le formulaire
445
* @param    string  premi�re restriction de la taille des champs du formulaire
446
* @param    string  deuxi�me restriction de la taille des champs du formulaire
447
* @param    string  valeur par d�faut du formulaire
468 mathias 448
* @param    string  table source pour les valeurs de la liste
449
* @param    string  ce champs est il obligatoire? (required)
450
* @param    boolean sommes nous dans le moteur de recherche?
451
* @return   void
452
*/
453
function carte_google(&$formtemplate, $url_google_script , $label, $limite1, $limite2, $defaut, $source, $obligatoire, $dans_moteur_de_recherche=0) {
454
 
455
	if (is_array ($defaut)) {
456
    	$formtemplate->setDefaults(array('latitude' => $defaut['latitude'], 'longitude' => $defaut['longitude']));
457
    }
458
 
459
	GEN_stockerFichierScript('googleMapScript', $url_google_script);
460
 
479 mathias 461
	$formtemplate->addElement('button', 'chercher_sur_carte', 'V�rifier mon adresse avec la carte', array("onclick" => "showAddress();"));
468 mathias 462
    $formtemplate->addElement('text', 'latitude', 'Latitude', array('id' => 'latitude', 'size' => 6, 'readonly' => 'readonly'));
463
    $formtemplate->addElement('text', 'longitude', 'longitude', array('id' => 'longitude', 'size' => 6, 'readonly' => 'readonly'));
464
    $formtemplate->addElement('html', '<tr><td colspan="2"	><div id="map" style="width: 600px; height: 450px"></div></td></tr>');
465
 
466
    include_once BAZ_CHEMIN_APPLI.'bibliotheque/bazar.fonct.google.php';
467
    GEN_stockerCodeScript($script);
468
}
469
 
470
/* +--Fin du code ----------------------------------------------------------------------------------------+
471
*
472
* $Log: bazar.fonct.formulaire.php,v $
473
* Revision 1.26  2007-06-04 15:24:31  alexandre_tb
474
* ajout du type carte_google
475
*
476
* Revision 1.25  2007/04/11 08:30:12  neiluj
477
* remise en état du CVS...
478
*
479
* Revision 1.22.2.3  2007/03/16 14:48:32  alexandre_tb
479 mathias 480
* on peut maintenant saisir une date par d�faut
468 mathias 481
* et 0000-00-00 pour des champs vide
482
*
483
* Revision 1.22.2.2  2007/03/07 17:20:19  jp_milcent
479 mathias 484
* Ajout du nettoyage syst�matique des URLs.
468 mathias 485
*
486
* Revision 1.22.2.1  2007/01/17 16:01:37  alexandre_tb
487
* les dates ne s'affichent pas si elles sont vides.
479 mathias 488
* les champs dates propose 4 ann�es avant l'ann�e actuelle
468 mathias 489
*
490
* Revision 1.22  2006/06/02 09:29:07  florian
491
* debut d'integration de wikini
492
*
493
* Revision 1.21  2006/05/19 13:54:11  florian
494
* stabilisation du moteur de recherche, corrections bugs, lien recherche avancee
495
*
496
* Revision 1.20  2006/04/28 12:46:14  florian
497
* integration des liens vers annuaire
498
*
499
* Revision 1.19  2006/03/02 20:36:52  florian
500
* les entrees du formulaire de saisir ne sont plus dans les constantes mias dans des tables qui gerent le multilinguisme.
501
*
502
* Revision 1.18  2006/03/01 16:01:46  florian
503
* correction bug déclaration variable $html
504
*
505
* Revision 1.17  2006/01/30 10:27:03  florian
506
* - ajout des entrées de formulaire fichier, url, et image
507
* - correction bug d'affichage du mode de saisie
508
*
509
* Revision 1.16  2006/01/24 14:11:44  alexandre_tb
479 mathias 510
* ajout du param�tre emptyOptionValue dans les champs de date
468 mathias 511
*
512
* Revision 1.15  2006/01/23 16:57:03  alexandre_tb
513
* correction d'un notice
514
*
515
* Revision 1.14  2006/01/19 17:42:11  florian
516
* ajout des cases à cocher pré-cochées pour les maj
517
*
518
* Revision 1.13  2006/01/13 14:12:51  florian
519
* utilisation des temlates dans la table bazar_nature
520
*
521
* Revision 1.12  2006/01/05 16:28:24  alexandre_tb
479 mathias 522
* prise en chage des checkbox, reste la mise � jour � g�rer
468 mathias 523
*
524
* Revision 1.11  2006/01/02 13:24:07  alexandre_tb
525
* correction de bug d'un mauvais retour en erreur
526
*
527
* Revision 1.10  2005/12/01 16:05:41  florian
528
* changement des chemins pour appli Pear
529
*
530
* Revision 1.9  2005/11/24 16:17:13  florian
531
* corrections bugs, ajout des cases à cocher
532
*
533
* Revision 1.8  2005/11/18 16:03:23  florian
534
* correction bug html entites
535
*
536
* Revision 1.7  2005/11/07 17:51:06  florian
537
* correction bug liste
538
*
539
* Revision 1.6  2005/11/07 17:30:36  florian
540
* ajout controle sur les listes pour la saisie
541
*
542
* Revision 1.5  2005/11/07 17:05:45  florian
543
* amélioration validation conditions de saisie, ajout des règles spécifiques de saisie des formulaires
544
*
545
* Revision 1.4  2005/10/25 13:53:02  alexandre_tb
546
* ajout d'un filtre dans les formulaire texte et textelong
547
*
548
* Revision 1.3  2005/07/21 19:03:12  florian
549
* nouveautés bazar: templates fiches, correction de bugs, ...
550
*
551
* Revision 1.1.1.1  2005/02/17 18:05:11  florian
552
* Import initial de Bazar
553
*
554
* Revision 1.1.1.1  2005/02/17 11:09:50  florian
555
* Import initial
556
*
557
* Revision 1.1.1.1  2005/02/16 18:06:35  florian
558
* import de la nouvelle version
559
*
560
* Revision 1.4  2004/07/08 11:17:59  alex
561
* ajout de commentaires et d'entete
562
*
563
*
564
* +-- Fin du code ----------------------------------------------------------------------------------------+
565
*/
566
?>