2 /***************************************************************************
3 * Copyright (C) 2003-2013 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
44 public $rules = "Vérifier que les balises <salutation>, <prenom>, <nom>, <montant> et <comment> n'ont pas été modifiées.
45 Vérifier que le demandeur n'a pas laissé les crochets [].
46 Si le télépaiement n'est pas lié à un groupe ou supérieur à 51 euros, laisser la validation à un trésorier";
50 public function __construct(User
$_user, $_intitule, $_site, $_montant, $_msg,
51 $_montantmin=0, $_montantmax=999, $_asso_id = 0,
52 $_evt = 0, $_public = false
, $_stamp = 0)
54 parent
::__construct($_user, false
, 'paiements', $_stamp);
56 $this->titre
= $_intitule;
58 $this->msg_reponse
= $_msg;
59 $this->asso_id
= (string)$_asso_id;
60 $this->evt
= (string)$_evt;
61 $this->montant
= $_montant;
62 $this->montant_min
= $_montantmin;
63 $this->montant_max
= $_montantmax;
64 $this->public = $_public;
67 $res = XDB
::query("SELECT nom FROM groups WHERE id = {?}", $_asso_id);
68 $this->asso
= $res->fetchOneCell();
70 if ($_asso_id && $_evt) {
71 $res = XDB
::query("SELECT intitule FROM group_events WHERE asso_id = {?} AND eid = {?}", $_asso_id, $_evt);
72 $this->evt_intitule
= $res->fetchOneCell();
74 // for future use, when anims can choose there bankaccounts
76 $res = XDB
::query("SELECT owner FROM payment_bankaccounts WHERE id = {?}", $this->rib_id
);
77 $this->rib_nom
= $res->fetchOneCell();
82 // {{{ function same_event()
84 static public function same_event($evt, $asso_id)
86 $wevt = 's:3:"evt";s:'.strlen($evt+
"").':"'.$evt.'"';
87 $wassoid = 's:7:"asso_id";s:'.strlen($asso_id +
"").':"'.$asso_id.'"';
88 $where = "%".$wassoid."%".$wevt."%";
93 // {{{ function accept()
96 public function accept()
98 // no text [AI JMIAJM IJA MIJ]
99 if (preg_match('/\[[-\'"a-zA-Z ]+\]/', replace_accent($this->msg_reponse
))) {
100 $this->trigError("La demande de paiement n'est pas valide. Merci de compléter le texte avant de la soumettre");
103 if (!preg_match('/<montant>/', $this->msg_reponse
)) {
104 $this->trigError("Le demande de paiement ne contient pas la balise obligatoire <montant>");
111 // {{{ function submit()
113 // supprime les demandes de paiments pour le meme evenement
114 public function submit()
118 XDB
::execute('DELETE FROM requests WHERE type={?} AND data LIKE {?}', 'paiements', PayReq
::same_event($this->evt
, $this->asso_id
));
123 // {{{ function formu()
125 public function formu()
127 return 'include/form.valid.paiements.tpl';
131 // {{{ function editor()
133 public function editor()
135 return 'include/form.valid.edit-paiements.tpl';
139 // {{{ function handle_editor()
141 protected function handle_editor()
143 $this->titre
= Env
::v('pay_titre');
144 $this->site
= Env
::v('pay_site');
145 $this->montant
= Env
::t('pay_montant');
146 $this->montant_min
= Env
::i('pay_montant_min');
147 $this->montant_max
= Env
::i('pay_montant_max');
148 $this->msg_reponse
= Env
::v('pay_msg_reponse');
149 $this->public = (Env
::v('pay_public') == 'yes');
150 $this->rib_id
= Env
::v('pay_rib_id');
152 $res = XDB
::query("SELECT owner FROM payment_bankaccounts WHERE id = {?}", $this->rib_id
);
153 $this->rib_nom
= $res->fetchOneCell();
155 $this->rib_nom
= null
;
161 // {{{ function _mail_subj
163 protected function _mail_subj()
165 return "[Polytechnique.org/Paiments] Demande de création de paiement {$this->titre}";
169 // {{{ function _mail_body
171 protected function _mail_body($isok)
174 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":"");
176 return " La demande faite pour le paiement de {$this->intitule} a été refusée.";
181 // {{{ function commit()
183 public function commit()
185 $res = XDB
::query("SELECT MAX(id) FROM payments");
186 $id = $res->fetchOneCell()+
1;
187 $ret = XDB
::execute('INSERT INTO payments (id, text, url, amount_def, amount_min, amount_max, mail, confirmation, asso_id, flags, rib_id)
188 VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?})',
189 $id, $this->titre
, $this->site
, $this->montant
, $this->montant_min
,
190 $this->montant_max
, $this->user
->bestEmail(), $this->msg_reponse
, $this->asso_id
,
191 ($this->public ?
'public' : ''), $this->rib_id
);
192 if ($this->asso_id
&& $this->evt
) {
193 XDB
::execute("UPDATE group_events
194 SET paiement_id = {?}
195 WHERE asso_id = {?} AND eid = {?}",
196 $id, $this->asso_id
, $this->evt
);
197 $res = XDB
::query("SELECT a.nom, a.diminutif, e.intitule
199 INNER JOIN group_events AS e ON (a.id = e.asso_id)
202 list($nom, $diminutif, $evt) = $res->fetchOneRow();
203 require_once dirname(__FILE__
) . '/../../modules/xnetevents/xnetevents.inc.php';
204 $participants = get_event_participants(get_event_detail($this->evt
, false
, $this->asso_id
), null
);
205 foreach ($participants as $u) {
206 if (!$u['notify_payment']) {
209 $topay = $u['montant'] - $u['paid'];
211 $mailer = new PlMailer('xnetevents/newpayment.mail.tpl');
212 $mailer->addTo($u['user']);
213 $mailer->assign('asso', $nom);
214 $mailer->assign('diminutif', $diminutif);
215 $mailer->assign('evt', $evt);
216 $mailer->assign('payment', $id);
217 $mailer->assign('prenom', $u['user']->firstName());
218 $mailer->assign('topay', $topay);
231 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: