migrate trezo
[platal.git] / include / money / trezo.inc.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2006 Polytechnique.org *
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
22
23 $mois_fr = array('01'=>'Janvier',
24 '02'=>'Février',
25 '03'=>'Mars',
26 '04'=>'Avril',
27 '05'=>'Mai',
28 '06'=>'Juin',
29 'O7'=>'Juillet',
30 '08'=>'Août',
31 '09'=>'Septembre',
32 '10'=>'Octobre',
33 '11'=>'Novembre',
34 '12'=>'Decembre');
35
36
37 $trim_fr = array('01'=>'Janvier-Mars',
38 '04'=>'Avril-Juin',
39 '07'=>'Juillet-Septembre',
40 '10'=>'Octobre-Decembre');
41
42
43 function isDate($date)
44 {
45 list($d, $m, $y) = split('[/.-]', $date);
46 $dummy = date("d/m/Y", mktime (0,0,0,$m,$d,$y));
47 $date = ereg_replace('-', '/', $date);
48 return ($dummy == $date);
49 }
50
51
52 function solde_until($date='')
53 {
54 global $globals;
55 $sql = "SELECT SUM(credit)-SUM(debit) FROM money_trezo";
56 if (empty($date)) {
57 $res = $globals->xdb->query($sql);
58 } else {
59 $res = $globals->xdb->query($sql." WHERE date <= {?}", $date);
60 }
61 return $res->fetchOneCell();
62 }
63
64 ?>