2 /***************************************************************************
3 * Copyright (C) 2003-2014 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 la présence d'un montant, de la balise <montant>, et associer le RIB du groupe. Si le groupe n'a pas de RIB "used" ou en a plusieurs, laisser au trésorier.";
48 public function __construct(User
$_user, $_intitule, $_site, $_montant, $_msg,
49 $_montantmin=0, $_montantmax=999, $_asso_id = 0,
50 $_evt = 0, $_public = 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->montant
= $_montant;
60 $this->montant_min
= $_montantmin;
61 $this->montant_max
= $_montantmax;
62 $this->public = $_public;
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();
72 // for future use, when anims can choose there bankaccounts
74 $res = XDB
::query("SELECT owner FROM payment_bankaccounts WHERE id = {?}", $this->rib_id
);
75 $this->rib_nom
= $res->fetchOneCell();
80 // {{{ function same_event()
82 static public function same_event($evt, $asso_id)
84 $wevt = 's:3:"evt";s:'.strlen($evt+
"").':"'.$evt.'"';
85 $wassoid = 's:7:"asso_id";s:'.strlen($asso_id +
"").':"'.$asso_id.'"';
86 $where = "%".$wassoid."%".$wevt."%";
91 // {{{ function accept()
94 public function accept()
96 // no text [AI JMIAJM IJA MIJ]
97 if (preg_match('/\[[-\'"a-zA-Z ]+\]/', replace_accent($this->msg_reponse
))) {
98 $this->trigError("La demande de paiement n'est pas valide. Merci de compléter le texte avant de la soumettre");
101 if (!preg_match('/<montant>/', $this->msg_reponse
)) {
102 $this->trigError("Le demande de paiement ne contient pas la balise obligatoire <montant>");
109 // {{{ function submit()
111 // supprime les demandes de paiments pour le meme evenement
112 public function submit()
116 XDB
::execute('DELETE FROM requests WHERE type={?} AND data LIKE {?}', 'paiements', PayReq
::same_event($this->evt
, $this->asso_id
));
121 // {{{ function formu()
123 public function formu()
125 return 'include/form.valid.paiements.tpl';
129 // {{{ function editor()
131 public function editor()
133 return 'include/form.valid.edit-paiements.tpl';
137 // {{{ function handle_editor()
139 protected function handle_editor()
141 $this->titre
= Env
::v('pay_titre');
142 $this->site
= Env
::v('pay_site');
143 $this->montant
= Env
::t('pay_montant');
144 $this->montant_min
= Env
::i('pay_montant_min');
145 $this->montant_max
= Env
::i('pay_montant_max');
146 $this->msg_reponse
= Env
::v('pay_msg_reponse');
147 $this->public = (Env
::v('pay_public') == 'yes');
148 $this->rib_id
= Env
::v('pay_rib_id');
150 $res = XDB
::query("SELECT owner FROM payment_bankaccounts WHERE id = {?}", $this->rib_id
);
151 $this->rib_nom
= $res->fetchOneCell();
153 $this->rib_nom
= null
;
159 // {{{ function _mail_subj
161 protected function _mail_subj()
163 return "[Polytechnique.org/Paiments] Demande de création de paiement {$this->titre}";
167 // {{{ function _mail_body
169 protected function _mail_body($isok)
172 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":"");
174 return " La demande faite pour le paiement de {$this->intitule} a été refusée.";
179 // {{{ function commit()
181 public function commit()
183 $res = XDB
::query("SELECT MAX(id) FROM payments");
184 $id = $res->fetchOneCell()+
1;
185 $ret = XDB
::execute('INSERT INTO payments (id, text, url, amount_def, amount_min, amount_max, mail, confirmation, asso_id, flags, rib_id)
186 VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?})',
187 $id, $this->titre
, $this->site
, $this->montant
, $this->montant_min
,
188 $this->montant_max
, $this->user
->bestEmail(), $this->msg_reponse
, $this->asso_id
,
189 ($this->public ?
'public' : ''), $this->rib_id
);
190 if ($this->asso_id
&& $this->evt
) {
191 XDB
::execute("UPDATE group_events
192 SET paiement_id = {?}
193 WHERE asso_id = {?} AND eid = {?}",
194 $id, $this->asso_id
, $this->evt
);
195 $res = XDB
::query("SELECT a.nom, a.diminutif, e.intitule
197 INNER JOIN group_events AS e ON (a.id = e.asso_id)
200 list($nom, $diminutif, $evt) = $res->fetchOneRow();
201 require_once dirname(__FILE__
) . '/../../modules/xnetevents/xnetevents.inc.php';
202 $participants = get_event_participants(get_event_detail($this->evt
, false
, $this->asso_id
), null
);
203 foreach ($participants as $u) {
204 if (!$u['notify_payment']) {
207 $topay = $u['montant'] - $u['paid'];
209 $mailer = new PlMailer('xnetevents/newpayment.mail.tpl');
210 $mailer->addTo($u['user']);
211 $mailer->assign('asso', $nom);
212 $mailer->assign('diminutif', $diminutif);
213 $mailer->assign('evt', $evt);
214 $mailer->assign('eid', $this->evt
);
215 $mailer->assign('prenom', $u['user']->firstName());
228 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8: