Subversion Repositories Sites.tela-botanica.org

Rev

Rev 263 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 263 Rev 549
1
<?php
1
<?php
2
 
2
 
3
// +--------------------------------------------------------------------------------+
3
// +--------------------------------------------------------------------------------+
4
// | admin_annu.php 				                          						|
4
// | admin_annu.php 				                          						|
5
// +--------------------------------------------------------------------------------+
5
// +--------------------------------------------------------------------------------+
6
// | Copyright (c) 2002 					   							        	|
6
// | Copyright (c) 2002 					   							        	|
7
// +--------------------------------------------------------------------------------+
7
// +--------------------------------------------------------------------------------+
8
// | Administration des inscrits à un annuaire de type annuaire_tela			    |
8
// | Administration des inscrits à un annuaire de type annuaire_tela			    |
9
// | de Gsite, 													                    |
9
// | de Gsite, 													                    |
10
// | Sont également mises en jeux les tables gen_COUNTRY, gen_FRENCH_DPT,	        |
10
// | Sont également mises en jeux les tables gen_COUNTRY, gen_FRENCH_DPT,	        |
11
// | LABELS															                |
11
// | LABELS															                |
12
// | Plus spécifique la fonction cotisation($id) en bas permet de				    |
12
// | Plus spécifique la fonction cotisation($id) en bas permet de				    |
13
// | gérer les cotisations versées par les inscrits, avec la table					|
13
// | gérer les cotisations versées par les inscrits, avec la table					|
14
// | annuaire_COTISATION													                |
14
// | annuaire_COTISATION													                |
15
// +--------------------------------------------------------------------------------+
15
// +--------------------------------------------------------------------------------+
16
// | Auteur : Alexandre Granier <alexandre@tela-botanica.org> 		  		        |
16
// | Auteur : Alexandre Granier <alexandre@tela-botanica.org> 		  		        |
17
// +--------------------------------------------------------------------------------+
17
// +--------------------------------------------------------------------------------+
18
//
18
//
19
// $Id: admin_annu.php,v 1.1 2005/03/24 08:47:31 alex Exp $
19
// $Id: admin_annu.php,v 1.1 2005/03/24 08:47:31 alex Exp $
20
 
20
 
21
 
21
 
22
define ("URL_RECU", $GLOBALS['ann_url']->protocol. '://'.$GLOBALS['ann_url']->host."/client/annuaire/voir_recu_pdf.php") ;
22
define ("URL_RECU", $GLOBALS['ann_url']->protocol. '://'.$GLOBALS['ann_url']->host."/client/annuaire/voir_recu_pdf.php") ;
23
 
23
 
24
include_once ("HTML/Table.php") ;
24
include_once ("HTML/Table.php") ;
25
include_once 'api/formulaire/FORM_formulaire.class.php' ;
25
include_once 'api/formulaire/FORM_formulaire.class.php' ;
26
 
26
 
27
// admin_annu est une application cliente de gsite elle commence donc
27
// admin_annu est une application cliente de gsite elle commence donc
28
// dans une fonction putFrame()
28
// dans une fonction putFrame()
29
 
29
 
30
 
30
 
31
function putFrame()
31
function putFrame()
32
{
32
{
33
	global $u_id, $cotisation_id ;
33
	global $u_id, $cotisation_id ;
34
    global $action ;
34
    global $action ;
35
 
35
 
36
    if (empty($action)) $action = false  ;
36
    if (empty($action)) $action = false  ;
37
 
37
 
38
    $url = $GLOBALS['ann_url']->getURL() ;
38
    $url = $GLOBALS['ann_url']->getURL() ;
39
 
39
 
40
    // mise à jour si il y lieu
40
    // mise à jour si il y lieu
41
 
41
 
42
    if ($action == "up") {
42
    if ($action == "up") {
43
        upSQL() ;
43
        upSQL() ;
44
	}
44
	}
45
 
45
 
46
    // Requete de pour récupérer toutes les infos d'un usager
46
    // Requete de pour récupérer toutes les infos d'un usager
47
 
47
 
48
    $query = "select annuaire_tela.*,annuaire_LABEL_ACT.*,annuaire_LABEL_ASS.*,gen_COUNTRY.GC_NAME" ;
48
    $query = "select annuaire_tela.*,annuaire_LABEL_ACT.*,annuaire_LABEL_ASS.*,gen_COUNTRY.GC_NAME" ;
49
    $query .= ", annuaire_LABEL_NIV.*" ;
49
    $query .= ", annuaire_LABEL_NIV.*" ;
50
    $query .= " from annuaire_tela,gen_COUNTRY,gen_FRENCH_DPT," ;
50
    $query .= " from annuaire_tela,gen_COUNTRY,gen_FRENCH_DPT," ;
51
    $query .= " annuaire_LABEL_ACT,annuaire_LABEL_ASS, annuaire_LABEL_NIV" ;
51
    $query .= " annuaire_LABEL_ACT,annuaire_LABEL_ASS, annuaire_LABEL_NIV" ;
52
    $query .= " where U_ID=$u_id" ;
52
    $query .= " where U_ID=$u_id" ;
53
    //$query .= " and annuaire_tela.U_FRENCH_DPT=gen_FRENCH_DPT.GFD_ID" ;
53
    //$query .= " and annuaire_tela.U_FRENCH_DPT=gen_FRENCH_DPT.GFD_ID" ;
54
    $query .= " and annuaire_tela.U_COUNTRY=gen_COUNTRY.GC_ID" ;
54
    $query .= " and annuaire_tela.U_COUNTRY=gen_COUNTRY.GC_ID" ;
55
    $query .= " and annuaire_tela.U_ACT=annuaire_LABEL_ACT.ID_LABEL_ACT" ;
55
    $query .= " and annuaire_tela.U_ACT=annuaire_LABEL_ACT.ID_LABEL_ACT" ;
56
    $query .= " and annuaire_tela.U_ASS=annuaire_LABEL_ASS.ID_LABEL_ASS" ;
56
    $query .= " and annuaire_tela.U_ASS=annuaire_LABEL_ASS.ID_LABEL_ASS" ;
57
    $query .= " and annuaire_tela.U_NIV=annuaire_LABEL_NIV.ID_LABEL_NIV" ;
57
    $query .= " and annuaire_tela.U_NIV=annuaire_LABEL_NIV.ID_LABEL_NIV" ;
58
 
58
 
59
    $resultat = $GLOBALS['ann_db']->query($query) ;
59
    $resultat = $GLOBALS['ann_db']->query($query) ;
60
	if (DB::isError($resultat)) {
60
	if (DB::isError($resultat)) {
61
		return $resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'.$query ;
61
		return $resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'.$query ;
62
	}
62
	}
63
    $row = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ;
63
    $row = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ;
64
 
64
 
65
    $res = "<h1>Edition d'un adh&eacute;rent : $row->U_NAME $row->U_SURNAME</h1>\n" ;
65
    $res = "<h1>Edition d'un adh&eacute;rent : $row->U_NAME $row->U_SURNAME</h1>\n" ;
66
    $res .= "<div>".form("Nom : ", "U_NAME", $row->U_NAME)."</div>\n" ;
66
    $res .= "<div>".form("Nom : ", "U_NAME", $row->U_NAME)."</div>\n" ;
67
    $res .= "<div>".form("Pr&eacute;nom : ", "U_SURNAME", $row->U_SURNAME)."</div>\n" ;
67
    $res .= "<div>".form("Pr&eacute;nom : ", "U_SURNAME", $row->U_SURNAME)."</div>\n" ;
68
    $res .= "<div>".form("Adresse mail : ", "U_MAIL", $row->U_MAIL)."</div>\n" ;
68
    $res .= "<div>".form("Adresse mail : ", "U_MAIL", $row->U_MAIL)."</div>\n" ;
69
    $res .= "<div>".form("Date d'inscription : ", "U_DATE", $row->U_DATE)."</div>\n" ;
69
    $res .= "<div>".form("Date d'inscription : ", "U_DATE", $row->U_DATE)."</div>\n" ;
70
    $res .= "<div>".form("Adresse 1 : ", "U_ADDR1", $row->U_ADDR1)."</div>\n" ;
70
    $res .= "<div>".form("Adresse 1 : ", "U_ADDR1", $row->U_ADDR1)."</div>\n" ;
71
    $res .= "<div>".form("Adresse 2 : ", "U_ADDR2", $row->U_ADDR2)."</div>\n" ;
71
    $res .= "<div>".form("Adresse 2 : ", "U_ADDR2", $row->U_ADDR2)."</div>\n" ;
72
    $res .= "<div>".form("Région : ", "U_STATE", $row->U_STATE)."</div>\n" ;
72
    $res .= "<div>".form("Région : ", "U_STATE", $row->U_STATE)."</div>\n" ;
73
    $res .= "<div>".form("Code postal : ", "U_ZIP_CODE", $row->U_ZIP_CODE)."</div>\n" ;
73
    $res .= "<div>".form("Code postal : ", "U_ZIP_CODE", $row->U_ZIP_CODE)."</div>\n" ;
74
    $res .= "<div>".form("Ville : ", "U_CITY", $row->U_CITY)."</div>\n" ;
74
    $res .= "<div>".form("Ville : ", "U_CITY", $row->U_CITY)."</div>\n" ;
75
    $res .= "<div>".form("Pays : ", "U_COUNTRY", $row->U_COUNTRY)."</div>\n" ;
75
    $res .= "<div>".form("Pays : ", "U_COUNTRY", $row->U_COUNTRY)."</div>\n" ;
76
    $res .= "<div>".form("Site web personnel : ", "U_WEB", $row->U_WEB)."</div>\n" ;
76
    $res .= "<div>".form("Site web personnel : ", "U_WEB", $row->U_WEB)."</div>\n" ;
77
    $res .= "<div>".form("Organisme : ", "U_TITLE", $row->U_TITLE)."</div>\n" ;
77
    $res .= "<div>".form("Organisme : ", "U_TITLE", $row->U_TITLE)."</div>\n" ;
78
    $res .= "<div>".form("Fonction : ", "U_FONCTION", $row->U_FONCTION)."</div>\n" ;
78
    $res .= "<div>".form("Fonction : ", "U_FONCTION", $row->U_FONCTION)."</div>\n" ;
79
    $res .= "<div>".form("Niveau en botanique : ", "LABEL_NIV", $row->LABEL_NIV)."</div>\n" ;
79
    $res .= "<div>".form("Niveau en botanique : ", "LABEL_NIV", $row->LABEL_NIV)."</div>\n" ;
80
    $res .= "<div>".form("Activit&eacute; : ", "LABEL_ACT", $row->LABEL_ACT)."</div>\n" ;
80
    $res .= "<div>".form("Activit&eacute; : ", "LABEL_ACT", $row->LABEL_ACT)."</div>\n" ;
81
    $res .= "<div>".form("Secteur associatif : ", "LABEL_ASS", $row->LABEL_ASS)."</div>\n" ;
81
    $res .= "<div>".form("Secteur associatif : ", "LABEL_ASS", $row->LABEL_ASS)."</div>\n" ;
82
    $res .= "<div>".form("Sp&eacute;cialit&eacute; : ", "U_SPE", $row->U_SPE)."</div>\n" ;
82
    $res .= "<div>".form("Sp&eacute;cialit&eacute; : ", "U_SPE", $row->U_SPE)."</div>\n" ;
83
    $res .= "<div>".form("Sp&eacute;cialit&eacute; g&eacute;ographique : ", "U_GEO", $row->U_GEO)."</div>\n" ;
83
    $res .= "<div>".form("Sp&eacute;cialit&eacute; g&eacute;ographique : ", "U_GEO", $row->U_GEO)."</div>\n" ;
84
    
84
    
85
    if (isset($cotisation_id) && $cotisation_id != "") {
85
    if (isset($cotisation_id) && $cotisation_id != "") {
86
        $db = & $GLOBALS['ann_db'];
86
        $db = & $GLOBALS['ann_db'];
87
        include_once ANN_CHEMIN_APPLI."recu_pdf_corps.php" ;
87
        include_once ANN_CHEMIN_APPLI."recu_pdf_corps.php" ;
88
        // buffer est une propriété de la classe FPDF qui contient les données au format PDF.
88
        // buffer est une propriété de la classe FPDF qui contient les données au format PDF.
89
        // habituellement on ne l'utilise pas, on appelle $pdf->Output() qui envoie les
89
        // habituellement on ne l'utilise pas, on appelle $pdf->Output() qui envoie les
90
        // entete HTTP du document généré
90
        // entete HTTP du document généré
91
 
91
 
92
        $pdf->Close() ;
92
        $pdf->Close() ;
93
        $buf = $pdf->buffer;
93
        $buf = $pdf->buffer;
94
 
94
 
95
        // Inclusion des bibliothèques PEAR
95
        // Inclusion des bibliothèques PEAR
96
 
96
 
97
        include_once ('Mail.php');
97
        include_once ('Mail.php');
98
        include_once ('Mail/mime.php');
98
        include_once ('Mail/mime.php');
99
 
99
 
100
        $file = 'Recu_Fiscal_Tela_Botanica.pdf';
100
        $file = 'Recu_Fiscal_Tela_Botanica.pdf';
101
        $crlf = "\r\n";
101
        $crlf = "\r\n";
102
        $hdrs = array(
102
        $hdrs = array(
103
              'From'    => 'accueil@tela-botanica.org',
103
              'From'    => 'accueil@tela-botanica.org',
104
              'Subject' => 'Reçu pour don à Tela Botanica'
104
              'Subject' => 'Reçu pour don à Tela Botanica'
105
              );
105
              );
106
 
106
 
107
        $mime = new Mail_mime($crlf);
107
        $mime = new Mail_mime($crlf);
108
        $text = "Bonjour !\n\n".
108
        $text = "Bonjour !\n\n".
109
            "Le Réseau Tela Botanica vous remercie du soutien financier que vous lui avez apporté. Votre contribution permettra au réseau :\n\n".
109
            "Le Réseau Tela Botanica vous remercie du soutien financier que vous lui avez apporté. Votre contribution permettra au réseau :\n\n".
110
            "- de continuer à encourager et accompagner des projets botaniques,\n".
110
            "- de continuer à encourager et accompagner des projets botaniques,\n".
111
            "- de maintenir et d'améliorer nos services Internet dédiés à la botanique.\n\n".
111
            "- de maintenir et d'améliorer nos services Internet dédiés à la botanique.\n\n".
112
            "Vous trouverez en pièce jointe à ce message un document PDF contenant le reçu fiscal à imprimer".
112
            "Vous trouverez en pièce jointe à ce message un document PDF contenant le reçu fiscal à imprimer".
113
            " et à joindre à votre déclaration d'impôts. Si vous n'arrivez pas à imprimer ce document, veuillez".
113
            " et à joindre à votre déclaration d'impôts. Si vous n'arrivez pas à imprimer ce document, veuillez".
114
            " nous le signaler en répondant à ce mail et en indiquant votre nom et votre adresse postale. Nous vous".
114
            " nous le signaler en répondant à ce mail et en indiquant votre nom et votre adresse postale. Nous vous".
115
            " ferons parvenir le reçu imprimé à cette adresse.\n\n".
115
            " ferons parvenir le reçu imprimé à cette adresse.\n\n".
116
            "Rappel : Votre contribution financière ne constitue pas une adhésion à l'Association Tela Botanica mais ".
116
            "Rappel : Votre contribution financière ne constitue pas une adhésion à l'Association Tela Botanica mais ".
117
            "bien un soutien aux actions menées par le Réseau Tela Botanica.\n\n".
117
            "bien un soutien aux actions menées par le Réseau Tela Botanica.\n\n".
118
            "Si ce n'est déjà fait, n'oubliez pas de vous inscrire au Réseau sur le site Internet, à l'adresse : ".
118
            "Si ce n'est déjà fait, n'oubliez pas de vous inscrire au Réseau sur le site Internet, à l'adresse : ".
119
            "http://www.tela-botanica.org (menu « Inscription», onglet « Inscription»), afin que vous puissiez :\n\n".
119
            "http://www.tela-botanica.org (menu « Inscription», onglet « Inscription»), afin que vous puissiez :\n\n".
120
            "- consulter l'annuaire des personnes inscrites au Réseau ;\n- localiser les membres du Réseau dans tous".
120
            "- consulter l'annuaire des personnes inscrites au Réseau ;\n- localiser les membres du Réseau dans tous".
121
            " les pays;\n- accédez à certaines données diffusées sur le site ;\n- vous inscrire à des projets ".
121
            " les pays;\n- accédez à certaines données diffusées sur le site ;\n- vous inscrire à des projets ".
122
            "botaniques ;\n- être informé personnellement des actualités du Réseau.\n\n".
122
            "botaniques ;\n- être informé personnellement des actualités du Réseau.\n\n".
123
            "Bien cordialement,\n\n".
123
            "Bien cordialement,\n\n".
124
            "Tela Botanica\nLe Réseau des Botanistes Francophones\n163, rue A. Broussonnet\n34090 Montpellier\n".
124
            "Tela Botanica\nLe Réseau des Botanistes Francophones\n163, rue A. Broussonnet\n34090 Montpellier\n".
125
            "Tél. : 04-67-52-41-22\naccueil@tela-botanica.org\nhttp://www.tela-botanica.org\n" ;
125
            "Tél. : 04-67-52-41-22\naccueil@tela-botanica.org\nhttp://www.tela-botanica.org\n" ;
126
        $mime->setTXTBody($text);
126
        $mime->setTXTBody($text);
127
 
127
 
128
        // On attache le document PDF grace à $buf, et en indiquant son type MIME
128
        // On attache le document PDF grace à $buf, et en indiquant son type MIME
129
        $mime->addAttachment($buf, 'application/pdf', $file, false, 'base64') ;
129
        $mime->addAttachment($buf, 'application/pdf', $file, false, 'base64') ;
130
 
130
 
131
        $body = $mime->get();
131
        $body = $mime->get();
132
        $hdrs = $mime->headers($hdrs);
132
        $hdrs = $mime->headers($hdrs);
133
 
133
 
134
        $mail =& Mail::factory('mail');
134
        $mail =& Mail::factory('mail');
135
        $mail->send($ligne->U_MAIL, $hdrs, $body);
135
        $mail->send($ligne->U_MAIL, $hdrs, $body);
136
 
136
 
137
        // On insere le numéro du reçu dans la table annuaire_COTISATION
137
        // On insere le numéro du reçu dans la table annuaire_COTISATION
138
        @mysql_query("update annuaire_COTISATION set IC_RECU=$num_recu, IC_DATE_ENVOIE_RECU=NOW() where IC_ID=$cotisation_id") ;
138
        @mysql_query("update annuaire_COTISATION set IC_RECU=$num_recu, IC_DATE_ENVOIE_RECU=NOW() where IC_ID=$cotisation_id") ;
139
 
139
 
140
        // On incrémente le compteur de mail de 1
140
        // On incrémente le compteur de mail de 1
141
        if (!$deja_envoye) {
141
        if (!$deja_envoye) {
142
            $num_recu++ ;
142
            $num_recu++ ;
143
            mysql_query("update COMPTEUR_COTISATION set COMPTEUR=$num_recu ") ;
143
            mysql_query("update COMPTEUR_COTISATION set COMPTEUR=$num_recu ") ;
144
        }
144
        }
145
        $res .= "<div>Le reçu a été envoyé</div>\n" ;
145
        $res .= "<div>Le reçu a été envoyé</div>\n" ;
146
    }
146
    }
147
    $res .= cotisation($u_id) ;
147
    $res .= cotisation($u_id) ;
148
    $res .= suppression($u_id) ;
148
    $res .= suppression($u_id) ;
149
    return $res ;
149
    return $res ;
150
}
150
}
151
 
151
 
152
 
152
 
153
// form construit soit un formulaire de type <input type="text" ...> et
153
// form construit soit un formulaire de type <input type="text" ...> et
154
// de nom $field_ et place un $label devant
154
// de nom $field_ et place un $label devant
155
// soit construit un lien vers un formulaire à partir du champs $field_
155
// soit construit un lien vers un formulaire à partir du champs $field_
156
 
156
 
157
 
157
 
158
function form($label, $field_, $value)
158
function form($label, $field_, $value)
159
{
159
{
160
    global $u_id, $GS_GLOBAL, $field ;
160
    global $u_id, $GS_GLOBAL, $field ;
161
 
161
 
162
    $url = $GLOBALS['ann_url']->getURL() ;
162
    $url = $GLOBALS['ann_url']->getURL() ;
163
 
163
 
164
    if ($field != $field_) {
164
    if ($field != $field_) {
165
        $res = "<b>$label</b>" ;
165
        $res = "<b>$label</b>" ;
166
        $res .= "<a href=\"$url&amp;field=$field_\">" ;
166
        $res .= "<a href=\"$url&amp;field=$field_\">" ;
167
				if ($field_ == 'LABEL_NIV' || $field_ == 'LABEL_ACT' || $field_== 'LABEL_ASS') {
167
				if ($field_ == 'LABEL_NIV' || $field_ == 'LABEL_ACT' || $field_== 'LABEL_ASS') {
168
                    $res .= $value ? $value : "(vide)";
168
                    $res .= $value ? $value : "(vide)";
169
				} else if ($field_ == "U_COT") {
169
				} else if ($field_ == "U_COT") {
170
						if ($value == 0) {
170
						if ($value == 0) {
171
								$res .= "non" ;
171
								$res .= "non" ;
172
						} else {
172
						} else {
173
								$res .= "oui" ;
173
								$res .= "oui" ;
174
						}
174
						}
175
				} else {
175
				} else {
176
						$res .= $value ? $value : "(vide)";
176
						$res .= $value ? $value : "(vide)";
177
				}
177
				}
178
				$res .= "</a>\n" ;
178
				$res .= "</a>\n" ;
179
		}
179
		}
180
		if ($field == $field_) {
180
		if ($field == $field_) {
181
						$res = "\n<form action=\"$url&amp;u_id=$u_id&amp;action=up&amp;field_=$field_\" method=\"post\">" ;
181
						$res = "\n<form action=\"$url&amp;u_id=$u_id&amp;action=up&amp;field_=$field_\" method=\"post\">" ;
182
						$res .= "<b>$label</b>\n" ;
182
						$res .= "<b>$label</b>\n" ;
183
						switch ($field_) {
183
						switch ($field_) {
184
								case "U_COUNTRY" :
184
								case "U_COUNTRY" :
185
										$select_country = new form($GS_GLOBAL['link']) ;
185
										$select_country = new form($GS_GLOBAL['link']) ;
186
										$res .= ereg_replace("gen_COUNTRY", "U_COUNTRY", $select_country->selectFromTable("gen_COUNTRY", $value, "GC_ID", "GC_NAME")) ;
186
										$res .= ereg_replace("gen_COUNTRY", "U_COUNTRY", $select_country->selectFromTable("gen_COUNTRY", $value, "GC_ID", "GC_NAME")) ;
187
										unset($select_country) ;
187
										unset($select_country) ;
188
								break ;
188
								break ;
189
 
189
 
190
								case "LABEL_NIV" :
190
								case "LABEL_NIV" :
191
										$res .= getFormInsInfo($field_, $value) ;
191
										$res .= getFormInsInfo($field_, $value) ;
192
								break ;
192
								break ;
193
 
193
 
194
								case "LABEL_ASS" :
194
								case "LABEL_ASS" :
195
										$res .= getFormInsInfo($field_, $value) ;
195
										$res .= getFormInsInfo($field_, $value) ;
196
								break ;
196
								break ;
197
 
197
 
198
								case "LABEL_ACT" :
198
								case "LABEL_ACT" :
199
										$res .= getFormInsInfo($field_, $value) ;
199
										$res .= getFormInsInfo($field_, $value) ;
200
								break ;
200
								break ;
201
 
201
 
202
                                case "LABEL_STATUT" :
202
                                case "LABEL_STATUT" :
203
                                        $res .= getFormInsInfo($field_, $value) ;
203
                                        $res .= getFormInsInfo($field_, $value) ;
204
                                break ;
204
                                break ;
205
 
205
 
206
								case "U_COT" :
206
								case "U_COT" :
207
										$res .= "<select class=\"insInputForm\" name=\"II_COT\">\n" ;
207
										$res .= "<select class=\"insInputForm\" name=\"II_COT\">\n" ;
208
										if ($value == 0) {
208
										if ($value == 0) {
209
												$check0 = " selected" ;
209
												$check0 = " selected" ;
210
												$check1 = "" ;
210
												$check1 = "" ;
211
										} else {
211
										} else {
212
												$check1 = " selected" ;
212
												$check1 = " selected" ;
213
												$check0 = "" ;
213
												$check0 = "" ;
214
										}
214
										}
215
										$res .= "<option value=\"0\"$check0>non</option>\n" ;
215
										$res .= "<option value=\"0\"$check0>non</option>\n" ;
216
										$res .= "<option value=\"1\"$check1>oui</option>\n" ;
216
										$res .= "<option value=\"1\"$check1>oui</option>\n" ;
217
										$res .= "</select>\n" ;
217
										$res .= "</select>\n" ;
218
								break ;
218
								break ;
219
 
219
 
220
								default :
220
								default :
221
										$res .= "<input type=\"text\" size=\"40\" name=\"$field_\" value=\"$value\">\n" ;
221
										$res .= "<input type=\"text\" size=\"40\" name=\"$field_\" value=\"$value\">\n" ;
222
						}
222
						}
223
						$res .= "<input type=\"submit\" value=\"valider\" class=\"texte_tb\">\n" ;
223
						$res .= "<input type=\"submit\" value=\"valider\" class=\"texte_tb\">\n" ;
224
						$res .= "</form>" ;
224
						$res .= "</form>" ;
225
				}
225
				}
226
				return $res ;
226
				return $res ;
227
}
227
}
228
 
228
 
229
 
229
 
230
// upSQL met à jour la table annuaire_tela
230
// upSQL met à jour la table annuaire_tela
231
 
231
 
232
function upSQL()
232
function upSQL()
233
{
233
{
234
    global $field_ ;
234
    global $field_ ;
235
    global  $u_id ;
235
    global  $u_id ;
236
    global $HTTP_POST_VARS ;
236
    global $HTTP_POST_VARS ;
237
        switch ($field_) {
237
        switch ($field_) {
238
            case "LABEL_NIV" : $field_ = "U_NIV" ;
238
            case "LABEL_NIV" : $field_ = "U_NIV" ;
239
                                $id_field = "ID_LABEL_NIV";
239
                                $id_field = "ID_LABEL_NIV";
240
            break ;
240
            break ;
241
            case "LABEL_ACT" : $field_ = "U_ACT" ;
241
            case "LABEL_ACT" : $field_ = "U_ACT" ;
242
                                $id_field = "ID_LABEL_ACT";
242
                                $id_field = "ID_LABEL_ACT";
243
            break ;
243
            break ;
244
            case "LABEL_ASS" : $field_ = "U_ACT" ;
244
            case "LABEL_ASS" : $field_ = "U_ACT" ;
245
                                $id_field = "ID_LABEL_ASS";
245
                                $id_field = "ID_LABEL_ASS";
246
            break ;
246
            break ;
247
            default :$id_field = $field_ ;
247
            default :$id_field = $field_ ;
248
        }
248
        }
249
 
249
 
250
    // Recherche de l'ancien mail
250
    // Recherche de l'ancien mail
251
    $req_am = "select U_MAIL from annuaire_tela where U_ID = $u_id" ;
251
    $req_am = "select U_MAIL from annuaire_tela where U_ID = $u_id" ;
252
    $res_am = mysql_query ($req_am) or die ("Echec ".mysql_error()) ;
252
    $res_am = mysql_query ($req_am) or die ("Echec ".mysql_error()) ;
253
    $ligne_am = mysql_fetch_object ($res_am) ;
253
    $ligne_am = mysql_fetch_object ($res_am) ;
254
    $ancien_mail = $ligne_am->U_MAIL ;
254
    $ancien_mail = $ligne_am->U_MAIL ;
255
 
255
 
256
    $query = "update annuaire_tela set $field_=\"".$HTTP_POST_VARS[$id_field]."\" where U_ID = $u_id" ;
256
    $query = "update annuaire_tela set $field_=\"".$HTTP_POST_VARS[$id_field]."\" where U_ID = $u_id" ;
257
    mysql_query($query) or die ("<br>Echec de la requete de mise à jour<br>\n") ;
257
    mysql_query($query) or die ("<br>Echec de la requete de mise à jour<br>\n") ;
258
 
258
 
259
    // Traitement du département
259
    // Traitement du département
260
    if ($field_ == "U_ZIP_CODE") {
260
    if ($field_ == "U_ZIP_CODE") {
261
        if (preg_match("/^97|98[0-9]*/", $HTTP_POST_VARS['U_ZIP_CODE'])) {
261
        if (preg_match("/^97|98[0-9]*/", $HTTP_POST_VARS['U_ZIP_CODE'])) {
262
            $n_dpt = substr($HTTP_POST_VARS['U_ZIP_CODE'], 0, 3) ;
262
            $n_dpt = substr($HTTP_POST_VARS['U_ZIP_CODE'], 0, 3) ;
263
        } else {
263
        } else {
264
            $n_dpt = substr($HTTP_POST_VARS['U_ZIP_CODE'], 0, 2) ;
264
            $n_dpt = substr($HTTP_POST_VARS['U_ZIP_CODE'], 0, 2) ;
265
        }
265
        }
266
        mysql_query ("update annuaire_tela set U_FRENCH_DPT='$n_dpt' where U_ID='$u_id'") ;
266
        mysql_query ("update annuaire_tela set U_FRENCH_DPT='$n_dpt' where U_ID='$u_id'") ;
267
    }
267
    }
268
 
268
 
269
    // Traitement de l'adresse mail
269
    // Traitement de l'adresse mail
270
 
270
 
271
 
271
 
272
    if ($field_ == "U_MAIL") {
272
    if ($field_ == "U_MAIL") {
273
        $requete = "update ins_STATS set IS_MAIL=\"".$HTTP_POST_VARS['U_MAIL']."\" where IS_MAIL=\"$ancien_mail\"" ;
273
        $requete = "update ins_STATS set IS_MAIL=\"".$HTTP_POST_VARS['U_MAIL']."\" where IS_MAIL=\"$ancien_mail\"" ;
274
        mysql_query ($requete) ;
274
        mysql_query ($requete) ;
275
    }
275
    }
276
}
276
}
277
 
277
 
278
function getFormInsInfo($field, $value)
278
function getFormInsInfo($field, $value)
279
{
279
{
280
 
280
 
281
    $query = "select * from annuaire_$field" ;
281
    $query = "select * from annuaire_$field" ;
282
    $id_field = "ID_$field" ;
282
    $id_field = "ID_$field" ;
283
    $result = mysql_query($query) or die ("Echec de la requete sur ID_$field<br>".mysql_error()) ;
283
    $result = mysql_query($query) or die ("Echec de la requete sur ID_$field<br>".mysql_error()) ;
284
 
284
 
285
    $res = "<select name=\"$id_field\" class=\"insInputForm\">\n" ;
285
    $res = "<select name=\"$id_field\" class=\"insInputForm\">\n" ;
286
    $i = 0 ;
286
    $i = 0 ;
287
    while ($row = mysql_fetch_object($result)) {
287
    while ($row = mysql_fetch_object($result)) {
288
 
288
 
289
        $res .= "<option value=\"".$row->$id_field."\"" ;
289
        $res .= "<option value=\"".$row->$id_field."\"" ;
290
	if ($value == $row->$field) $res .= " selected";
290
	if ($value == $row->$field) $res .= " selected";
291
	$res .= ">" ;
291
	$res .= ">" ;
292
    $res .= $row->$field ;
292
    $res .= $row->$field ;
293
	$res .= "</option>\n" ;
293
	$res .= "</option>\n" ;
294
	$i++ ;
294
	$i++ ;
295
    }
295
    }
296
    $res .= "</select>\n" ;
296
    $res .= "</select>\n" ;
297
    return $res ;
297
    return $res ;
298
}
298
}
299
 
299
 
300
// Fonction pour gérer les cotisations d'un inscrit, en
300
// Fonction pour gérer les cotisations d'un inscrit, en
301
// fonction de son id  ($u_id)
301
// fonction de son id  ($u_id)
302
 
302
 
303
function cotisation($u_id)
303
function cotisation($u_id)
304
{
304
{
305
    global $action, $IC_MONTANT, $IC_DATE, $id_cot, $IC_MC_ID ;
305
    global $action, $IC_MONTANT, $IC_DATE, $id_cot, $IC_MC_ID ;
306
 
306
 
307
    $res = '' ;
307
    $res = '' ;
308
    // un peu de javascript pour la confirmation en cas de destruction
308
    // un peu de javascript pour la confirmation en cas de destruction
309
 
309
 
310
    $outputText = "function confirmLink(theLink, theSqlQuery)
310
    $outputText = "function confirmLink(theLink, theSqlQuery)
311
    {
311
    {
312
      var is_confirmed = confirm(theSqlQuery);
312
      var is_confirmed = confirm(theSqlQuery);
313
      return is_confirmed;
313
      return is_confirmed;
314
    } " ;
314
    } " ;
315
 
315
 
316
		// fonction gsite pour inclure la fonction Javascript
316
		// fonction gsite pour inclure la fonction Javascript
317
		// au code html
317
		// au code html
318
 
318
 
319
    GEN_stockerCodeScript($outputText) ;
319
    GEN_stockerCodeScript($outputText) ;
320
 
320
 
321
    $url = $GLOBALS['ann_url']->getURL() ;
321
    $url = $GLOBALS['ann_url']->getURL() ;
322
 
322
 
323
		// Ce qui suit sont le traitement des 3 actions ajouter, modifier, supprimer
323
		// Ce qui suit sont le traitement des 3 actions ajouter, modifier, supprimer
324
		// qui agissent sur la table annuaire_COTISATION
324
		// qui agissent sur la table annuaire_COTISATION
325
 
325
 
326
		// l'action 'cu' consiste en l'insertion d'une ligne dans la table annuaire_COTISATION
326
		// l'action 'cu' consiste en l'insertion d'une ligne dans la table annuaire_COTISATION
327
 
327
 
328
    if ($action == "cu") {
328
    if ($action == "cu") {
329
        $date = preg_replace("/([0-9]+)-([0-9]+)-([0-9]+)/", "\\3\\2\\1", $IC_DATE) ;
329
        $date = preg_replace("/([0-9]+)-([0-9]+)-([0-9]+)/", "\\3\\2\\1", $IC_DATE) ;
330
        $query = 'insert into annuaire_COTISATION values ("", '.$IC_MC_ID.', '.$u_id.', '.$date.',"'.$IC_MONTANT.'", 0, "0000-00-00")' ;
330
        $query = 'insert into annuaire_COTISATION values ("", '.$IC_MC_ID.', '.$u_id.', '.$date.',"'.$IC_MONTANT.'", 0, "0000-00-00")' ;
331
			$resultat = $GLOBALS['ann_db']->query ($query) ;
331
			$resultat = $GLOBALS['ann_db']->query ($query) ;
332
			if (DB::isError($resultat)) {
332
			if (DB::isError($resultat)) {
333
		    	echo $resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'.$query ;
333
		    	echo $resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'.$query ;
334
			}   
334
			}   
335
			$GLOBALS['ann_db']->query("update annuaire_tela set U_COT=1 where U_ID=$u_id") ;
335
			$GLOBALS['ann_db']->query("update annuaire_tela set U_COT=1 where U_ID=$u_id") ;
336
    }
336
    }
337
 
337
 
338
		// l'action 'mu' permet de mettre à jour une ligne dans annuaire_COTISATION
338
		// l'action 'mu' permet de mettre à jour une ligne dans annuaire_COTISATION
339
 
339
 
340
    if ($action == "mu") {
340
    if ($action == "mu") {
341
        $date = preg_replace("/([0-9]+)-([0-9]+)-([0-9]+)/", "\\3-\\2-\\1", $IC_DATE) ;
341
        $date = preg_replace("/([0-9]+)-([0-9]+)-([0-9]+)/", "\\3-\\2-\\1", $IC_DATE) ;
342
        $query = 'update annuaire_COTISATION set IC_DATE="'.$date.'", IC_MONTANT="'.$IC_MONTANT.'",
342
        $query = 'update annuaire_COTISATION set IC_DATE="'.$date.'", IC_MONTANT="'.$IC_MONTANT.'",
343
                        IC_MC_ID='.$IC_MC_ID.' where IC_ID='.$id_cot ;
343
                        IC_MC_ID='.$IC_MC_ID.' where IC_ID='.$id_cot ;
344
		$GLOBALS['ann_db']->query ($query) ;
344
		$GLOBALS['ann_db']->query ($query) ;
345
		if (DB::isError($resultat)) {
345
		if (DB::isError($resultat)) {
346
		    	echo $resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'.$query ;
346
		    	echo $resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'.$query ;
347
		} 
347
		} 
348
    }
348
    }
349
 
349
 
350
		// l'action 'rm' retire une ligne de la table annuaire_COTISATION
350
		// l'action 'rm' retire une ligne de la table annuaire_COTISATION
351
 
351
 
352
    if ($action == "rm") {
352
    if ($action == "rm") {
353
        $query = "delete from annuaire_COTISATION where IC_ID=$id_cot" ;
353
        $query = "delete from annuaire_COTISATION where IC_ID=$id_cot" ;
354
		$GLOBALS['ann_db']->query ($query) ;
354
		$GLOBALS['ann_db']->query ($query) ;
355
		if (DB::isError($resultat)) {
355
		if (DB::isError($resultat)) {
356
		    echo $resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'.$query ;
356
		    echo $resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'.$query ;
357
		}
357
		}
358
		$GLOBALS['ann_db']->query("update annuaire_tela set U_COT=0 where U_ID=$u_id") ;
358
		$GLOBALS['ann_db']->query("update annuaire_tela set U_COT=0 where U_ID=$u_id") ;
359
    }
359
    }
360
 
360
 
361
		// Quoi qu'il arrive, on récupère les informations concernant
361
		// Quoi qu'il arrive, on récupère les informations concernant
362
		// les cotisations d'un inscrit et on les affiche sous forme de
362
		// les cotisations d'un inscrit et on les affiche sous forme de
363
		// table HTML
363
		// table HTML
364
 
364
 
365
    $query = "select * from annuaire_COTISATION, MODE_COTISATION where IC_ANNU_ID=$u_id
365
    $query = "select * from annuaire_COTISATION, MODE_COTISATION where IC_ANNU_ID=$u_id
366
                and IC_MC_ID=MC_ID" ;
366
                and IC_MC_ID=MC_ID ORDER BY IC_DATE" ;
367
    $result = $GLOBALS['ann_db']->query($query) ;
367
    $result = $GLOBALS['ann_db']->query($query) ;
368
    if (DB::isError($result)) {
368
    if (DB::isError($result)) {
369
		return $result->getMessage().'<br />'.$result->getDebugInfo().'<br />'.$query;
369
		return $result->getMessage().'<br />'.$result->getDebugInfo().'<br />'.$query;
370
	}
370
	}
371
    $res = "<h1>Etat des cotisations : </h1>" ;
371
    $res = "<h1>Etat des cotisations : </h1>" ;
372
 
372
 
373
		// formatage de la date
373
		// formatage de la date
374
    $date = date("d-m-Y") ;
374
    $date = date("d-m-Y") ;
375
 
375
 
376
 
376
 
377
		// l'action 'sc' correspond à l'édition d'une ligne de la table
377
		// l'action 'sc' correspond à l'édition d'une ligne de la table
378
		// annuaire_COTISATION. Si elle est présente on affiche un formulaire
378
		// annuaire_COTISATION. Si elle est présente on affiche un formulaire
379
		// de modification
379
		// de modification
380
 
380
 
381
    if ($action == "sc") {
381
    if ($action == "sc") {
382
 
382
 
383
        $res .= "<div><form action=\"$url&action=cu\" method=\"post\"><b>Date : </b>" ;
383
        $res .= "<div><form action=\"$url&action=cu\" method=\"post\"><b>Date : </b>" ;
384
				$res .= "<input type=\"text\" size=\"9\" class=\"insInputForm\" name=\"IC_DATE\" value=\"";
384
				$res .= "<input type=\"text\" size=\"9\" class=\"insInputForm\" name=\"IC_DATE\" value=\"";
385
				$res .= $date ;
385
				$res .= $date ;
386
				$res .= "\">\n" ;
386
				$res .= "\">\n" ;
387
				$res .= "<b>Montant : </b><input type=\"text\" class=\"insInputForm\" size=\"5\" name=\"IC_MONTANT\" value=\"30\"> &euro;\n" ;
387
				$res .= "<b>Montant : </b><input type=\"text\" class=\"insInputForm\" size=\"5\" name=\"IC_MONTANT\" value=\"30\"> &euro;\n" ;
388
                $res .= mode_paiement(0) ;
388
                $res .= mode_paiement(0) ;
389
				$res .= "<input type=\"submit\" value=\"Valider\" class=\"texte_tb\">\n" ;
389
				$res .= "<input type=\"submit\" value=\"Valider\" class=\"texte_tb\">\n" ;
390
				$res .= "<input type=\"button\" value=\"Annuler\" class=\"texte_tb\" onclick=\"javascript:window.location.href='$url';\"></form>\n" ;
390
				$res .= "<input type=\"button\" value=\"Annuler\" class=\"texte_tb\" onclick=\"javascript:window.location.href='$url';\"></form>\n" ;
391
				$res .= "</div>\n" ;
391
				$res .= "</div>\n" ;
392
 
392
 
393
		// si l'action 'sc' n'est pas active on affiche toutes les lignes
393
		// si l'action 'sc' n'est pas active on affiche toutes les lignes
394
		// de cotisation de l'inscrit
394
		// de cotisation de l'inscrit
395
 
395
 
396
		} else {
396
		} else {
397
        if ($result->numRows() != 0) {
397
        if ($result->numRows() != 0) {
398
            $res .= "<div>" ;
398
            $res .= "<div>" ;
399
            $table = new HTML_Table(array("class" => "table_cadre")) ;
399
            $table = new HTML_Table(array("class" => "table_cadre")) ;
400
            $table->addRow(array("Date", "Montant", "Mode", "modifier", "supprimer", "Voir le reçu", "Envoyer le reçu",
400
            $table->addRow(array("Date", "Montant", "Mode", "modifier", "supprimer", "Voir le reçu", "Envoyer le reçu",
401
                                        "Date d'envoie du reçu"),'', 'TH') ;
401
                                        "Date d'envoie du reçu"),'', 'TH') ;
402
 
402
 
403
            while ($row = $result->fetchRow(DB_FETCHMODE_OBJECT)) {
403
            while ($row = $result->fetchRow(DB_FETCHMODE_OBJECT)) {
404
                            // Le reçu a t il été envoyé ?
404
                            // Le reçu a t il été envoyé ?
405
                if ($row->IC_RECU != 0) {
405
                if ($row->IC_RECU != 0) {
406
                    $message_envoye =  $row->IC_DATE_ENVOIE_RECU ; ;
406
                    $message_envoye =  $row->IC_DATE_ENVOIE_RECU ; ;
407
                } else  {
407
                } else  {
408
                    $message_envoye = "Reçu non envoyé";
408
                    $message_envoye = "Reçu non envoyé";
409
                }
409
                }
410
                if ($action != "mc" || $id_cot != $row->IC_ID) {
410
                if ($action != "mc" || $id_cot != $row->IC_ID) {
411
                    $table->addRow(array ($row->IC_DATE, $row->IC_MONTANT." <b>&euro;</b>", $row->MC_LABEL,
411
                    $table->addRow(array ($row->IC_DATE, $row->IC_MONTANT." <b>&euro;</b>", $row->MC_LABEL,
412
                                            "<a href=\"$url&amp;action=mc&amp;id_cot=$row->IC_ID\">modifier</a>",
412
                                            "<a href=\"$url&amp;action=mc&amp;id_cot=$row->IC_ID\">modifier</a>",
413
                                            "<a href=\"$url&amp;action=rm&amp;id_cot=$row->IC_ID\"".
413
                                            "<a href=\"$url&amp;action=rm&amp;id_cot=$row->IC_ID\"".
414
                                            " onclick=\"javascript:return confirmLink(this, '&ecirc;tes-vous".
414
                                            " onclick=\"javascript:return confirmLink(this, '&ecirc;tes-vous".
415
                                            " s&ucirc;r de vouloir supprimer cette entr&eacute;e');\">supprimer</a>",
415
                                            " s&ucirc;r de vouloir supprimer cette entr&eacute;e');\">supprimer</a>",
416
                                            "<a href=\"".URL_RECU."?cotisation_id=$row->IC_ID\">Voir le reçu</a>",
416
                                            "<a href=\"".URL_RECU."?cotisation_id=$row->IC_ID\">Voir le reçu</a>",
417
                                            "<a href=\"$url&cotisation_id=$row->IC_ID&action=er\">Envoyer le reçu</a>",
417
                                            "<a href=\"$url&cotisation_id=$row->IC_ID&action=er\">Envoyer le reçu</a>",
418
                                            $message_envoye)) ;
418
                                            $message_envoye)) ;
419
                } else {
419
                } else {
420
                    // Recherche du mode de paiement
420
                    // Recherche du mode de paiement
421
 
421
 
422
                    $table->addRow(array("<form action=\"$url&amp;action=mu&amp;id_cot=$row->IC_ID\" method=\"post\">\n".
422
                    $table->addRow(array("<form action=\"$url&amp;action=mu&amp;id_cot=$row->IC_ID\" method=\"post\">\n".
423
                                        "<input type=\"text\" size=\"9\" class=\"insInputForm\" name=\"IC_DATE\" value=\"".date ("j-m-Y", $row->IC_DATE)."\">",
423
                                        "<input type=\"text\" size=\"9\" class=\"insInputForm\" name=\"IC_DATE\" value=\"".date ("j-m-Y", $row->IC_DATE)."\">",
424
                                        "<input type=\"text\" size=\"5\" class=\"insInputForm\" name=\"IC_MONTANT\" value=\"$row->IC_MONTANT\"><b>&euro;</b>",
424
                                        "<input type=\"text\" size=\"5\" class=\"insInputForm\" name=\"IC_MONTANT\" value=\"$row->IC_MONTANT\"><b>&euro;</b>",
425
                                        mode_paiement($row->IC_MC_ID),
425
                                        mode_paiement($row->IC_MC_ID),
426
                                        "<input type=\"submit\" class=\"texte_tb\" value=\"valider\">".
426
                                        "<input type=\"submit\" class=\"texte_tb\" value=\"valider\">".
427
                                        "<input type=\"button\" value=\"Annuler\" class=\"texte_tb\" onclick=\"javascript:window.location.href='$url';\"></form>",
427
                                        "<input type=\"button\" value=\"Annuler\" class=\"texte_tb\" onclick=\"javascript:window.location.href='$url';\"></form>",
428
                                        "&nbsp;")) ;
428
                                        "&nbsp;")) ;
429
                }
429
                }
430
            }
430
            }
431
            $table->altRowAttributes(1, array("class" => "ligne_paire"), array("class" => "ligne_impaire")) ;
431
            $table->altRowAttributes(1, array("class" => "ligne_paire"), array("class" => "ligne_impaire")) ;
432
            $res .= $table->toHTML()."</div>\n" ;
432
            $res .= $table->toHTML()."</div>\n" ;
433
            unset($table) ;
433
            unset($table) ;
434
        } else {
434
        } else {
435
            $res .= "<div>non cotisant</div>\n" ;
435
            $res .= "<div>non cotisant</div>\n" ;
436
        }
436
        }
437
        $res .= "<div><input type=\"button\" class=\"texte_tb\" " ;
437
        $res .= "<div><input type=\"button\" class=\"texte_tb\" " ;
438
        $res .= "value=\"Saisir une cotisation\" onclick=\"javascript:window.location.href='$url&action=sc';\"></div>\n" ;
438
        $res .= "value=\"Saisir une cotisation\" onclick=\"javascript:window.location.href='$url&action=sc';\"></div>\n" ;
439
    }
439
    }
440
 
440
 
441
    return $res ;
441
    return $res ;
442
}
442
}
443
 
443
 
444
function suppression($u_id) {
444
function suppression($u_id) {
445
    global $GS_GLOBAL, $action ;
445
    global $GS_GLOBAL, $action ;
446
 
446
 
447
    // un peu de javascript pour la confirmation en cas de destruction
447
    // un peu de javascript pour la confirmation en cas de destruction
448
 
448
 
449
    $outputText = "function confirmLink(theLink, theSqlQuery)
449
    $outputText = "function confirmLink(theLink, theSqlQuery)
450
    {
450
    {
451
      var is_confirmed = confirm(theSqlQuery);
451
      var is_confirmed = confirm(theSqlQuery);
452
      return is_confirmed;
452
      return is_confirmed;
453
    } " ;
453
    } " ;
454
 
454
 
455
		// fonction gsite pour inclure la fonction Javascript
455
		// fonction gsite pour inclure la fonction Javascript
456
		// au code html
456
		// au code html
457
 
457
 
458
    GEN_stockerCodeScript($outputText) ;
458
    GEN_stockerCodeScript($outputText) ;
459
 
459
 
460
    $url = $GLOBALS['ann_url']->getURL() ;
460
    $url = $GLOBALS['ann_url']->getURL() ;
461
 
461
 
462
    $res = "<div>Supprimer l'inscription</div>\n" ;
462
    $res = "<div>Supprimer l'inscription</div>\n" ;
463
    $res .="<div><form action=\"$url&action=suppr_adh\" method=\"post\">\n" ;
463
    $res .="<div><form action=\"$url&action=suppr_adh\" method=\"post\">\n" ;
464
    $res .= "<input type=\"submit\" class=\"texte_tb\" value=\"Supprimer\" " ;
464
    $res .= "<input type=\"submit\" class=\"texte_tb\" value=\"Supprimer\" " ;
465
    $res .= "onclick=\"javascript:return confirmLink(this, '&ecirc;tes-vous s&ucirc;r de vouloir supprimer cet adh&eacute;rent');\">\n" ;
465
    $res .= "onclick=\"javascript:return confirmLink(this, '&ecirc;tes-vous s&ucirc;r de vouloir supprimer cet adh&eacute;rent');\">\n" ;
466
    $res .= "</form></div>\n" ;
466
    $res .= "</form></div>\n" ;
467
 
467
 
468
    if ($action=="suppr_adh") {
468
    if ($action=="suppr_adh") {
469
        $queryLogin = "select U_MAIL from annuaire_tela where U_ID=$u_id" ;
469
        $queryLogin = "select U_MAIL from annuaire_tela where U_ID=$u_id" ;
470
        $resultLogin = mysql_query($queryLogin) or die ("Echec de la requete sur annu_USERS");
470
        $resultLogin = mysql_query($queryLogin) or die ("Echec de la requete sur annu_USERS");
471
        $rowLogin = mysql_fetch_object($resultLogin) ;
471
        $rowLogin = mysql_fetch_object($resultLogin) ;
472
        $mail = $rowLogin->U_MAIL ;
472
        $mail = $rowLogin->U_MAIL ;
473
        mysql_free_result($resultLogin) ;
473
        mysql_free_result($resultLogin) ;
474
 
474
 
475
        // vérifications
475
        // vérifications
476
        // 1. annu_ADMIN
476
        // 1. annu_ADMIN
477
        $q_annu_ADMIN = "select AA_ID from annu_ADMIN where AA_ID=$u_id" ;
477
        $q_annu_ADMIN = "select AA_ID from annu_ADMIN where AA_ID=$u_id" ;
478
        $r_annu_ADMIN = mysql_query($q_annu_ADMIN) or die ("Echec ..." );
478
        $r_annu_ADMIN = mysql_query($q_annu_ADMIN) or die ("Echec ..." );
479
        if (mysql_num_rows($r_annu_ADMIN) != 0) {
479
        if (mysql_num_rows($r_annu_ADMIN) != 0) {
480
            $res .= "Une référence dans annu_ADMIN" ;
480
            $res .= "Une référence dans annu_ADMIN" ;
481
        }
481
        }
482
 
482
 
483
        // 2.
483
        // 2.
484
        // suppression
484
        // suppression
485
 
485
 
486
        $query = "delete from annuaire_tela where U_ID=$u_id" ;
486
        $query = "delete from annuaire_tela where U_ID=$u_id" ;
487
    }
487
    }
488
    return $res ;
488
    return $res ;
489
}
489
}
490
 
490
 
491
/** function mode_paiement () Produit un champs select avec le mode de paiement
491
/** function mode_paiement () Produit un champs select avec le mode de paiement
492
*
492
*
493
*
493
*
494
*   @param  integer mode de paiement par defaut
494
*   @param  integer mode de paiement par defaut
495
*	@return string  HTML
495
*	@return string  HTML
496
*/
496
*/
497
function mode_paiement ($defaut) {
497
function mode_paiement ($defaut) {
498
    $res = '<select name="IC_MC_ID" >'."\n" ;
498
    $res = '<select name="IC_MC_ID" >'."\n" ;
499
    $req_mode = "select * from MODE_COTISATION" ;
499
    $req_mode = "select * from MODE_COTISATION" ;
500
    $res_mode = $GLOBALS['ann_db']->query($req_mode) ;
500
    $res_mode = $GLOBALS['ann_db']->query($req_mode) ;
501
    while ($ligne_mode = $res_mode->fetchROW(DB_FETCHMODE_OBJECT)) {
501
    while ($ligne_mode = $res_mode->fetchROW(DB_FETCHMODE_OBJECT)) {
502
        $res .= '<option value="'.$ligne_mode->MC_ID.'"' ;
502
        $res .= '<option value="'.$ligne_mode->MC_ID.'"' ;
503
        if ($ligne_mode ->MC_ID == $defaut) $res .= " selected" ;
503
        if ($ligne_mode ->MC_ID == $defaut) $res .= " selected" ;
504
        $res .= ">$ligne_mode->MC_LABEL</option>\n" ;
504
        $res .= ">$ligne_mode->MC_LABEL</option>\n" ;
505
    }
505
    }
506
    $res .= "</select>\n" ;
506
    $res .= "</select>\n" ;
507
    return $res ;
507
    return $res ;
508
}
508
}
509
 
509
 
510
?>
510
?>