+++ /dev/null
-<?php
-/***************************************************************************
- * Copyright (C) 2003-2006 Polytechnique.org *
- * http://opensource.polytechnique.org/ *
- * *
- * This program is free software; you can redistribute it and/or modify *
- * it under the terms of the GNU General Public License as published by *
- * the Free Software Foundation; either version 2 of the License, or *
- * (at your option) any later version. *
- * *
- * This program is distributed in the hope that it will be useful, *
- * but WITHOUT ANY WARRANTY; without even the implied warranty of *
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
- * GNU General Public License for more details. *
- * *
- * You should have received a copy of the GNU General Public License *
- * along with this program; if not, write to the Free Software *
- * Foundation, Inc., *
- * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
- ***************************************************************************/
-
-
-$mois_fr = array('01'=>'Janvier',
- '02'=>'Février',
- '03'=>'Mars',
- '04'=>'Avril',
- '05'=>'Mai',
- '06'=>'Juin',
- 'O7'=>'Juillet',
- '08'=>'Août',
- '09'=>'Septembre',
- '10'=>'Octobre',
- '11'=>'Novembre',
- '12'=>'Decembre');
-
-
-$trim_fr = array('01'=>'Janvier-Mars',
- '04'=>'Avril-Juin',
- '07'=>'Juillet-Septembre',
- '10'=>'Octobre-Decembre');
-
-
-function isDate($date)
-{
- list($d, $m, $y) = split('[/.-]', $date);
- $dummy = date("d/m/Y", mktime (0,0,0,$m,$d,$y));
- $date = ereg_replace('-', '/', $date);
- return ($dummy == $date);
-}
-
-
-function solde_until($date='')
-{
- $sql = "SELECT SUM(credit)-SUM(debit) FROM money_trezo";
- if (empty($date)) {
- $res = XDB::query($sql);
- } else {
- $res = XDB::query($sql." WHERE date <= {?}", $date);
- }
- return $res->fetchOneCell();
-}
-
-?>
+++ /dev/null
-<?php
-/***************************************************************************
- * Copyright (C) 2003-2006 Polytechnique.org *
- * http://opensource.polytechnique.org/ *
- * *
- * This program is free software; you can redistribute it and/or modify *
- * it under the terms of the GNU General Public License as published by *
- * the Free Software Foundation; either version 2 of the License, or *
- * (at your option) any later version. *
- * *
- * This program is distributed in the hope that it will be useful, *
- * but WITHOUT ANY WARRANTY; without even the implied warranty of *
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
- * GNU General Public License for more details. *
- * *
- * You should have received a copy of the GNU General Public License *
- * along with this program; if not, write to the Free Software *
- * Foundation, Inc., *
- * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
- ***************************************************************************/
-
-class TrezoModule extends PLModule
-{
- function handlers()
- {
- return array(
- 'trezo' => $this->make_hook('default', AUTH_COOKIE),
- 'trezo/ops' => $this->make_hook('operation', AUTH_COOKIE),
- );
- }
-
- function handler_default(&$page)
- {
- $page->changeTpl('trezo/index.tpl');
-
- require_once 'money/trezo.inc.php';
-
- //table operations :
- //+--------+---------------+------+-----+------------+----------------+
- //| field | type | null | key | default | extra |
- //+--------+---------------+------+-----+------------+----------------+
- //| id | int(11) | | pri | null | auto_increment |
- //| date | date | | | 0000-00-00 | |
- //| label | varchar(80) | | | | |
- //| credit | decimal(10,2) | | | 0.00 | |
- //| debit | decimal(10,2) | | | 0.00 | |
- //+--------+---------------+------+-----+------------+----------------+
-
- $annee_sel = Env::v('annee', date('y'));
- $mois_sel = Env::v('mois', sprintf('%02u', date('m') - (intval(date('m') - 1) % 3)));
-
- $mois_sel_fin = sprintf('%02u',$mois_sel + 2);
- $from_date = "$annee_sel-$mois_sel-01";
- $to_date = "$annee_sel-$mois_sel_fin-31";
- $mon_sel = $trim_fr[$mois_sel]." $annee_sel";
-
- $page->assign('from_solde', solde_until($from_date));
- $page->assign('to_solde', solde_until($to_date));
- $page->assign('annee_sel', $annee_sel);
- $page->assign('mois_sel', $mois_sel);
- $page->assign('mon_sel', $mon_sel);
- $page->assign_by_ref('month_arr', $trim_fr);
-
- $page->assign('ops', XDB::iterator(
- "SELECT date, label, credit, debit
- FROM money_trezo WHERE date >= {?} and date <= {?} order by date",
- $from_date, $to_date));
- }
-
- function handler_operation(&$page)
- {
- $page->changeTpl('trezo/gere_operations.tpl');
-
- require_once 'money/trezo.inc.php';
-
- $page->assign('xorg_title','Polytechnique.org - Administration - Trezo : gestion');
-
- $action = clean_request('action');
- $op_id = clean_request('op_id');
- $op_date = clean_request('op_date');
- $op_label = clean_request('op_label');
- $op_credit = clean_request('op_credit');
- $op_debit = clean_request('op_debit');
-
- $annee_sel = isset($_REQUEST['annee']) ? $_REQUEST['annee'] : date("Y");
- $mois_sel = isset($_REQUEST['mois']) ? $_REQUEST['mois'] : sprintf("%02u", date('m'));
-
- $from_date = "$annee_sel-$mois_sel-01";
- $to_date = "$annee_sel-$mois_sel-31";
- $mon_sel = $trim_fr[$mois_sel]." $annee_sel";
-
- switch($action) {
- case "edit":
- if ($op_id) {
- $res = XDB::query("SELECT date,label,credit,debit FROM money_trezo WHERE id={?}", $op_id);
- list($op_date,$op_label,$op_credit,$op_debit) = $res->fetchOneRow();
- }
- break;
-
- case "update":
- if (isDate($op_date)){
- $mydatefr = explode("/",$op_date);
- $mydate = $mydatefr[2]."-".$mydatefr[1]."-".$mydatefr[0];
- } else {
- $mydate = date("Y-m-d");
- }
-
- $sql = "replace into money_trezo set date='$mydate',label='".addslashes($op_label)."'";
-
- if ($op_credit) { $sql .= ',credit='.$op_credit; }
- if ($op_debit) { $sql .= ',debit='.$op_debit; }
- if ($op_id) { $sql .= ",id='$op_id'"; }
-
- XDB::execute($sql);
- break;
-
- case "del":
- if ($op_id) {
- XDB::execute("DELETE FROM money_trezo WHERE id={?}", $op_id);
- }
- break;
- }
-
- $page->assign('op_id', $op_id);
- $page->assign('annee_sel', $annee_sel);
- $page->assign('mois_sel', $mois_sel);
- $page->assign('op_date', $op_date);
- $page->assign('op_label', $op_label);
- $page->assign('op_debit', $op_debit);
- $page->assign('op_credit', $op_credit);
- $page->assign('mon_sel', $mon_sel);
-
- $page->assign('from_solde', solde_until($from_date));
- $page->assign('to_solde', solde_until($to_date));
- $page->assign('month_arr', $mois_fr);
- $page->assign('ops', XDB::iterator(
- "SELECT id, date, label, credit, debit FROM money_trezo
- WHERE date >= {?} and date <= {?} ORDER BY date",
- $from_date, $to_date));
- }
-}
-
-?>
projects / platal.git / commitdiff