{
return array(
'payment' => $this->make_hook('payment', AUTH_MDP, 'payment'),
- 'payment/cyber_return' => $this->make_hook('cyber_return', AUTH_PUBLIC, 'user', NO_HTTPS),
'payment/cyber2_return' => $this->make_hook('cyber2_return', AUTH_PUBLIC, 'user', NO_HTTPS),
'payment/paypal_return' => $this->make_hook('paypal_return', AUTH_PUBLIC, 'user', NO_HTTPS),
'%grp/paiement' => $this->make_hook('xnet_payment', AUTH_MDP),
'%grp/payment' => $this->make_hook('xnet_payment', AUTH_MDP),
- '%grp/payment/cyber_return' => $this->make_hook('cyber_return', AUTH_PUBLIC, 'user', NO_HTTPS),
+ '%grp/payment/csv' => $this->make_hook('payment_csv', AUTH_MDP, 'groupadmin'),
'%grp/payment/cyber2_return' => $this->make_hook('cyber2_return', AUTH_PUBLIC, 'user', NO_HTTPS),
'%grp/payment/paypal_return' => $this->make_hook('paypal_return', AUTH_PUBLIC, 'user', NO_HTTPS),
'admin/payments' => $this->make_hook('admin', AUTH_MDP, 'admin'),
if ($res->total()) {
$page->assign('transactions', $res);
}
+
+ if ($pay->flags->hasflag('donation')) {
+ $donations = XDB::fetchAllAssoc('SELECT IF(p.display,
+ IF(ap.pid IS NOT NULL, CONCAT(a.full_name, \' (\', pd.promo, \')\'), a.full_name),
+ \'XXXX\') AS name, p.amount
+ FROM payment_transactions AS p
+ INNER JOIN accounts AS a ON (a.uid = p.uid)
+ LEFT JOIN account_profiles AS ap ON (a.uid = ap.uid AND FIND_IN_SET(\'owner\', ap.perms))
+ LEFT JOIN profile_display AS pd ON (ap.pid = pd.pid)
+ WHERE p.ref = {?}
+ ORDER BY LENGTH(p.amount) DESC, p.amount DESC, name',
+ $ref);
+ $sum = 0;
+ foreach ($donations as $d) {
+ $amount = $d['amount'];
+ $sum += trim(strtr(substr($amount, 0, strpos($amount, 'EUR')), ',', '.'));
+ }
+
+ $page->assign('donations', $donations);
+ $page->assign('sum', strtr($sum, '.', ','));
+ }
}
$val = floor($val) . '.' . substr(floor(($val - floor($val)) * 100 + 100), 1);
$page->assign('pay', $pay);
$page->assign('evtlink', $pay->event());
$page->assign('sex', S::user()->isFemale());
- }
-
- function handler_cyber_return($page, $uid = null)
- {
- /* reference banque (numero de transaction) */
- $champ901 = Env::s('CHAMP901');
- /* cle d'acceptation */
- $champ905 = Env::s('CHAMP905');
- /* code retour */
- $champ906 = Env::s('CHAMP906');
- /* email renvoye par la banque */
- $champ104 = Env::s('CHAMP104');
- /* reference complete de la commande */
- $champ200 = Env::s('CHAMP200');
- /* montant de la transaction */
- $champ201 = Env::s('CHAMP201');
- /* devise */
- $champ202 = Env::s('CHAMP202');
- $montant = "$champ201 $champ202";
-
- /* on extrait les informations sur l'utilisateur */
- $user = User::get($uid);
- if (!$user) {
- cb_erreur("uid invalide");
- }
-
-
- /* on extrait la reference de la commande */
- if (!ereg('-xorg-([0-9]+)$', $champ200, $matches)) {
- cb_erreur("référence de commande invalide");
- }
-
- echo ($ref = $matches[1]);
- $res = XDB::query('SELECT mail, text, confirmation
- FROM payments
- WHERE id = {?}', $ref);
- if (!list($conf_mail, $conf_title, $conf_text) = $res->fetchOneRow()) {
- cb_erreur("référence de commande inconnue");
- }
-
- /* on extrait le code de retour */
- if ($champ906 != "0000") {
- $res = XDB::query('SELECT rcb.text, c.id, c.text
- FROM payment_codeRCB AS rcb
- LEFT JOIN payment_codeC AS c ON (rcb.codeC = c.id)
- WHERE rcb.id = {?}', $champ906);
- if (list($rcb_text, $c_id, $c_text) = $res->fetchOneRow()) {
- cb_erreur("erreur lors du paiement : $c_text ($c_id)");
- } else{
- cb_erreur("erreur inconnue lors du paiement");
- }
- }
-
- /* on fait l'insertion en base de donnees */
- XDB::execute('INSERT INTO payment_transactions (id, uid, ref, fullref, amount, pkey, comment)
- VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?})',
- $champ901, $user->id(), $ref, $champ200, $montant, $champ905, Env::v('comment'));
-
- // We check if it is an Xnet payment and then update the related ML.
- $res = XDB::query('SELECT eid
- FROM group_events
- WHERE paiement_id = {?}', $ref);
- if ($eid = $res->fetchOneCell()) {
- require_once dirname(__FILE__) . '/xnetevents/xnetevents.inc.php';
- $evt = get_event_detail($eid);
- subscribe_lists_event($uid, $evt, 1, $montant, true);
- }
-
- /* on genere le mail de confirmation */
- $conf_text = str_replace(
- array('<prenom>', '<nom>', '<promo>', '<montant>', '<salutation>', '<cher>', '<comment>'),
- array($user->firstName(), $user->lastName(), $user->promo(), $montant,
- $user->isFemale() ? 'Chère' : 'Cher', $user->isFemale() ? 'Chère' : 'Cher',
- Env::v('comment')), $conf_text);
-
- global $globals;
- $mymail = new PlMailer();
- $mymail->setFrom($conf_mail);
- $mymail->addCc($conf_mail);
- $mymail->setSubject($conf_title);
- $mymail->setWikiBody($conf_text);
- $mymail->sendTo($user);
-
- /* on envoie les details de la transaction à telepaiement@ */
- $mymail = new PlMailer();
- $mymail->setFrom("webmaster@" . $globals->mail->domain);
- $mymail->addTo($globals->money->email);
- $mymail->setSubject($conf_title);
- $msg = 'utilisateur : ' . $user->login() . ' (' . $user->id() . ')' . "\n" .
- 'mail : ' . $user->forlifeEmail() . "\n\n" .
- "paiement : $conf_title ($conf_mail)\n".
- "reference : $champ200\n".
- "montant : $montant\n\n".
- "dump de REQUEST:\n".
- var_export($_REQUEST,true);
- $mymail->setTxtBody($msg);
- $mymail->send();
- exit;
+ $page->assign('donation', $pay->flags->hasflag('donation'));
}
function handler_cyber2_return($page, $uid = null)
}
/* on fait l'insertion en base de donnees */
- XDB::execute('INSERT INTO payment_transactions (id, uid, ref, fullref, amount, pkey, comment)
- VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?})',
- Env::v('vads_trans_date'), $user->id(), $ref, Env::v('vads_order_id'), $montant, '', Env::v('vads_order_info'));
+ XDB::execute('INSERT INTO payment_transactions (id, uid, ref, fullref, amount, pkey, comment, display)
+ VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?}, {?})',
+ Env::v('vads_trans_date'), $user->id(), $ref, Env::v('vads_order_id'), $montant, '', Env::v('vads_order_info'), Env::i('vads_order_info2'));
echo "Paiement stored.\n";
// We check if it is an Xnet payment and then update the related ML.
list($eid, $asso_id) = $res->fetchOneRow();
require_once dirname(__FILE__) . '/xnetevents/xnetevents.inc.php';
$evt = get_event_detail($eid, false, $asso_id);
- subscribe_lists_event($user->id(), $evt, 1, $amount, true);
+ subscribe_lists_event($user->id(), $evt['short_name'], 1, $amount, true);
}
/* on genere le mail de confirmation */
array('<prenom>', '<nom>', '<promo>', '<montant>', '<salutation>', '<cher>', '<comment>'),
array($user->firstName(), $user->lastName(), $user->promo(), $montant,
$user->isFemale() ? 'Chère' : 'Cher', $user->isFemale() ? 'Chère' : 'Cher',
- Env::v('comment')), $conf_text);
+ Env::v('vads_order_info')), $conf_text);
global $globals;
$mymail = new PlMailer();
}
/* on fait l'insertion en base de donnees */
- XDB::execute("INSERT INTO payment_transactions (id, uid, ref, fullref, amount, pkey, comment)
- VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?})",
- $no_transaction, $user->id(), $ref, $fullref, $montant, $clef, Env::v('comment'));
+ XDB::execute("INSERT INTO payment_transactions (id, uid, ref, fullref, amount, pkey, comment, display)
+ VALUES ({?}, {?}, {?}, {?}, {?}, {?}, {?}, '?})",
+ $no_transaction, $user->id(), $ref, $fullref, $montant, $clef, Env::v('comment'), Get::i('display'));
// We check if it is an Xnet payment and then update the related ML.
$res = XDB::query('SELECT eid
if ($eid = $res->fetchOneCell()) {
require_once dirname(__FILE__) . '/xnetevents/xnetevents.inc.php';
$evt = get_event_detail($eid);
- subscribe_lists_event($user->id(), $evt, 1, $montant, true);
+ subscribe_lists_event($user->id(), $evt['short_name'], 1, $montant, true);
}
/* on genere le mail de confirmation */
- $conf_text = str_replace(array('<prenom>', '<nom>', '<promo>', '<montant>', '<salutation>', '<cher>'),
+ $conf_text = str_replace(array('<prenom>', '<nom>', '<promo>', '<montant>', '<salutation>', '<cher>', '<comment>'),
array($user->firstName(), $user->lastName(), $user->promo(), $montant,
- $user->isFemale() ? 'Chère' : 'Cher',
- $user->isFemale() ? 'Chère' : 'Cher'), $conf_text);
+ $user->isFemale() ? 'Chère' : 'Cher', $user->isFemale() ? 'Chère' : 'Cher',
+ Env::v('comment')), $conf_text);
global $globals;
$mymail = new PlMailer();
$page->assign('event', $event);
}
+ function handler_payment_csv($page, $pid = null)
+ {
+ if (is_null($pid)) {
+ pl_redirect('payment');
+ }
+ if (substr($pid, -4) == '.vcf') {
+ $pid = substr($pid, 0, strlen($pid) - 4);
+ }
+
+ $res = XDB::fetchAllAssoc('SELECT uid, IF(timestamp = \'0000-00-00\', 0, timestamp) AS date, comment, amount
+ FROM payment_transactions
+ WHERE ref = {?}
+ ORDER BY timestamp',
+ $pid);
+ if (is_null($res)) {
+ pl_redirect('payment');
+ }
+
+ $users = User::getBulkUsersWithUIDs($res, 'uid', 'user');
+ $sum = 0;
+
+ pl_cached_content_headers('text/x-csv', 1);
+ $csv = fopen('php://output', 'w');
+ fputcsv($csv, array('Date', 'Nom', 'Prénom', 'Sexe', 'Promotion', 'Email', 'Commentaire', 'Montant'), ';');
+ foreach ($users as $item) {
+ $user = $item['user'];
+ $sum += strtr(substr($item['amount'], 0, strpos($item['amount'], 'EUR')), ',', '.');
+ fputcsv($csv, array(format_datetime($item['date'], '%d/%m/%y'), $user->lastName(), $user->firstName(),
+ ($user->isFemale()) ? 'F' : 'M', $user->promo(), $user->ForlifeEmail(),
+ $item['comment'], str_replace('EUR', '€', $item['amount'])), ';');
+ }
+ fputcsv($csv, array(date('d/m/y'), 'Total', '', '', '' , '', '', strtr($sum, '.', ',') . ' €'), ';');
+
+ fclose($csv);
+ exit;
+ }
+
function handler_admin($page, $action = 'list', $id = null) {
$page->setTitle('Administration - Paiements');
$page->assign('title', 'Gestion des télépaiements');
projects / platal.git / blobdiff