Subversion Repositories Applications.papyrus

Rev

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

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