2 /***************************************************************************
3 * Copyright (C) 2003-2011 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
6 * This program is free software; you can redistribute it and/or modify *
7 * it under the terms of the GNU General Public License as published by *
8 * the Free Software Foundation; either version 2 of the License, or *
9 * (at your option) any later version. *
11 * This program is distributed in the hope that it will be useful, *
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
14 * GNU General Public License for more details. *
16 * You should have received a copy of the GNU General Public License *
17 * along with this program; if not, write to the Free Software *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
24 class PayReq
extends Validate
42 public $rules = "Vérifier que les balises <salutation>, <prenom>, <nom>, <montant> et <comment> n'ont pas été modifiées.
43 Vérifier que le demandeur n'a pas laissé les crochets [].
44 Si le télépaiement n'est pas lié à un groupe ou supérieur à 51 euros, laisser la validation à un trésorier";
48 public function __construct(User
$_user, $_intitule, $_site, $_montant, $_msg,
49 $_montantmin=0, $_montantmax=999, $_asso_id = 0,
50 $_evt = 0, $_donation = false
, $_stamp=0)
52 parent
::__construct($_user, false
, 'paiements', $_stamp);
54 $this->titre
= $_intitule;
56 $this->msg_reponse
= $_msg;
57 $this->asso_id
= (string)$_asso_id;
58 $this->evt
= (string)$_evt;
59 $this->donation
= $_donation;
60 $this->montant
= $_montant;
61 $this->montant_min
= $_montantmin;
62 $this->montant_max
= $_montantmax;
65 $res = XDB
::query("SELECT nom FROM groups WHERE id = {?}", $_asso_id);
66 $this->asso
= $res->fetchOneCell();
68 if ($_asso_id && $_evt) {
69 $res = XDB
::query("SELECT intitule FROM group_events WHERE asso_id = {?} AND eid = {?}", $_asso_id, $_evt);
70 $this->evt_intitule
= $res->fetchOneCell();
75 // {{{ function same_event()
77 static public function same_event($evt, $asso_id)
79 $wevt = 's:3:"evt";s:'.strlen($evt+
"").':"'.$evt.'"';
80 $wassoid = 's:7:"asso_id";s:'.strlen($asso_id +
"").':"'.$asso_id.'"';
81 $where = "%".$wassoid."%".$wevt."%";
86 // {{{ function accept()
89 public function accept()
91 // no text [AI JMIAJM IJA MIJ]
92 if (preg_match('/\[[-\'"A-Z ]+\]/', $this->msg_reponse
)) {
93 $this->trigError("La demande de paiement n'est pas valide. Merci de compléter le texte avant de la soumettre");
96 if (!preg_match('/<montant>/', $this->msg_reponse
)) {
97 $this->trigError("Le demande de paiement ne contient pas la balise obligatoire <montant>");
104 // {{{ function submit()
106 // supprime les demandes de paiments pour le meme evenement
107 public function submit()
111 XDB
::execute('DELETE FROM requests WHERE type={?} AND data LIKE {?}', 'paiements', PayReq
::same_event($this->evt
, $this->asso_id
));
116 // {{{ function formu()
118 public function formu()
120 return 'include/form.valid.paiements.tpl';
124 // {{{ function editor()
126 public function editor()
128 return 'include/form.valid.edit-paiements.tpl';
132 // {{{ function handle_editor()
134 protected function handle_editor()
136 $this->titre
= Env
::v('pay_titre');
137 $this->site
= Env
::v('pay_site');
138 $this->montant
= Env
::i('pay_montant');
139 $this->montant_min
= Env
::i('pay_montant_min');
140 $this->montant_max
= Env
::i('pay_montant_max');
141 $this->msg_reponse
= Env
::v('pay_msg_reponse');
146 // {{{ function _mail_subj
148 protected function _mail_subj()
150 return "[Polytechnique.org/Paiments] Demande de création de paiement {$this->titre}";
154 // {{{ function _mail_body
156 protected function _mail_body($isok)
159 return " Le paiement demandé pour {$this->titre} vient d'être créé.".($this->evt?
" Il a bien été associé à la gestion de l'événement du groupe":"");
161 return " La demande faite pour le paiement de {$this->intitule} a été refusée.";
166 // {{{ function commit()
168 public function commit()
170 $res = XDB
::query("SELECT MAX(id) FROM payments");
171 $id = $res->fetchOneCell()+
1;
172 $flags = ($this->donation ?
'donation' : '');
173 $ret = XDB
::execute('INSERT INTO payments (id, text, url, flags, amount_def, amount_min, amount_max, mail, confirmation, asso_id)
174 VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?})',
175 $id, $this->titre
, $this->site
, $flags, $this->montant
, $this->montant_min
,
176 $this->montant_max
, $this->user
->bestEmail(), $this->msg_reponse
, $this->asso_id
);
177 if ($this->asso_id
&& $this->evt
) {
178 XDB
::execute("UPDATE group_events
179 SET paiement_id = {?}
180 WHERE asso_id = {?} AND eid = {?}",
181 $id, $this->asso_id
, $this->evt
);
182 $res = XDB
::query("SELECT a.nom, a.diminutif, e.intitule
184 INNER JOIN group_events AS e ON (a.id = e.asso_id)
187 list($nom, $diminutif, $evt) = $res->fetchOneRow();
188 require_once dirname(__FILE__
) . '/../../modules/xnetevents/xnetevents.inc.php';
189 $participants = get_event_participants(get_event_detail($this->evt
, false
, $this->asso_id
), null
);
190 foreach ($participants as $u) {
191 if (!$u['notify_payment']) {
194 $topay = $u['montant'] - $u['paid'];
196 $mailer = new PlMailer('xnetevents/newpayment.mail.tpl');
197 $mailer->addTo($u['user']);
198 $mailer->assign('asso', $nom);
199 $mailer->assign('diminutif', $diminutif);
200 $mailer->assign('evt', $evt);
201 $mailer->assign('payment', $id);
202 $mailer->assign('prenom', $u['user']->firstName());
203 $mailer->assign('topay', $topay);
216 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: