Proof of concept:
[platal.git] / htdocs / paiement / index.php
CommitLineData
0337d704 1<?php
2/***************************************************************************
50a40a33 3 * Copyright (C) 2003-2006 Polytechnique.org *
0337d704 4 * http://opensource.polytechnique.org/ *
5 * *
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. *
10 * *
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. *
15 * *
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 *
18 * Foundation, Inc., *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
21
22require_once("xorg.inc.php");
23new_skinned_page('paiement/index.tpl', AUTH_MDP);
d9a33f98 24$page->assign('xorg_title','Polytechnique.org - Télépaiements');
0337d704 25require_once('profil.func.inc.php');
26require_once('money.inc.php');
27
28// initialisation
29$op = Env::get('op', 'select');
30$meth = new PayMethod(Env::getInt('methode', -1));
31$pay = new Payment(Env::getInt('ref', -1));
32
33if($pay->flags->hasflag('old')){
34 $page->trig("La transaction selectionnée est périmée.");
35 $pay = new Payment();
36}
a75f6a97 37$val = (Env::has('montant') && Env::get('montant')!=0) ? Env::get('montant') : $pay->montant_def;
0337d704 38
39if (($e = $pay->check($val)) !== true) {
40 $page->trig($e);
41}
42
43if ($op=='submit') {
44 $pay->init($val, $meth);
45 $pay->prepareform($pay);
46} else {
47 $res = $globals->xdb->iterator("SELECT timestamp, montant FROM paiement.transactions WHERE uid = {?} AND ref = {?} ORDER BY timestamp DESC", Session::getInt('uid', -1), Env::getInt('ref', -1));
48
49 if ($res->total()) $page->assign('transactions', $res);
50}
51
3b3e9d15 52$val = floor($val).".".substr(floor(($val - floor($val))*100+100),1);
0337d704 53$page->assign('montant',$val);
54
55$page->assign('meth', $meth);
56$page->assign('pay', $pay);
3b3e9d15 57$page->assign('evtlink', $pay->event());
0337d704 58
59$page->assign('prefix',$globals->money->mpay_tprefix);
60$page->run();
61?>