diff --git a/htdocs/compta/pmt.php b/htdocs/compta/pmt.php deleted file mode 100644 index 9561f834900..00000000000 --- a/htdocs/compta/pmt.php +++ /dev/null @@ -1,139 +0,0 @@ - - * Copyright (C) 2004 Laurent Destailleur - * - * $Id$ - * $Source$ - * - * 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. - * - */ -require("./pre.inc.php"); - - -/* - * - */ - -llxHeader(); - -print "Point mort"; - - - -if ($action == 'update') { - $datepm = mktime(12, 0 , 0, $pmonth, 1, $pyear); - - $sql = "DELETE FROM ".MAIN_DB_PREFIX."pointmort WHERE int(month) = $datepm ;"; - $sql .= "INSERT INTO ".MAIN_DB_PREFIX."pointmort VALUES ($datepm, $pm)"; - $result = $db->query($sql); -} - - - -print ""; -print "
"; - -$sql = "SELECT amount, int(month) as dm FROM ".MAIN_DB_PREFIX."pointmort ORDER BY month DESC"; - -$result = $db->query($sql); - -if ($result) { - - print ""; - print ""; - print ""; - print ""; - print "\n"; - - $bc[0]="bgcolor=\"#90c090\""; - $bc[1]="bgcolor=\"#b0e0b0\""; - $var = 1 ; - - $i = 0; - $num = $db->num_rows(); - while ($i < $num) { - $obj = $db->fetch_object($result); - $var=!$var; - - print ""; - - print "\n"; - print "\n"; - - - print "\n"; - - - $i++; - } - - print "
".$langs->trans("Month")."".$langs->trans("Amount")."
".strftime("%Y %B",$obj->dm)."$obj->amount
"; -} - -print "		"; - -print '
'; -print ""; - -$strmonth[1] = "Janvier"; -$strmonth[2] = "Février"; -$strmonth[3] = "Mars"; -$strmonth[4] = "Avril"; -$strmonth[5] = "Mai"; -$strmonth[6] = "Juin"; -$strmonth[7] = "Juillet"; -$strmonth[8] = "Août"; -$strmonth[9] = "Septembre"; -$strmonth[10] = "Octobre"; -$strmonth[11] = "Novembre"; -$strmonth[12] = "Décembre"; - -print "Date :"; -$cmonth = date("n", time()); -print ""; - -print "
"; - -print "Valeur :
"; -print ""; -print "
"; - - - - -print "
"; - -$db->close(); - - -llxFooter("Dernière modification $Date$ révision $Revision$"); -?> diff --git a/htdocs/compta/pointmort.php b/htdocs/compta/pointmort.php deleted file mode 100644 index c6d606bdfb5..00000000000 --- a/htdocs/compta/pointmort.php +++ /dev/null @@ -1,180 +0,0 @@ - - * Copyright (C) 2004 Laurent Destailleur - * - * 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. - * - * $Id$ - * $Source$ - * - */ -require("./pre.inc.php"); - -function pt ($db, $sql) { - $result = $db->query($sql); - if ($result) { - $num = $db->num_rows(); - $i = 0; - $total = 0 ; - $month = 1 ; - while ($i < $num) { - $obj = $db->fetch_object($result); - - $ca[$obj->dm] = $obj->sum; - - $i++; - } - - $db->free(); - return $ca; - } -} - -function pm ($db) { - $sql = "SELECT amount, date_format('%Y%m',month) as dm FROM ".MAIN_DB_PREFIX."pointmort"; - $result = $db->query($sql); - if ($result) { - $num = $db->num_rows(); - $i = 0; $total = 0 ; - - $month = 1 ; - while ($i < $num) { - $obj = $db->fetch_object($result); - - $ca[$obj->dm] = $obj->amount; - - print $obj->dm ."=". $obj->amount ."
"; - - $i++; - } - - $db->free(); - return $ca; - } -} - - -function ppt ($db) { - - $sql = "SELECT sum(f.amount), date_format(f.datef,'%Y%m') as dm"; - $sql .= " FROM ".MAIN_DB_PREFIX."facture as f WHERE f.paye = 1"; - $sql .= " GROUP BY dm"; - - $ca = pt($db, $sql); - $ptmt = pm($db); - - - print ""; - print ""; - print ""; - print ""; - print ""; - print ""; - print ""; - print ""; - print ""; - print ""; - print ""; - print "\n"; - $bc[0]="bgcolor=\"#90c090\""; - $bc[1]="bgcolor=\"#b0e0b0\""; - $var = 1 ; - $pmt = 0 ; - $subpmt = 0 ; $totalca = 0 ; - $totalpm = 0; - $xdate = mktime(0, 0, 0, 7 , 1, 2000); - $oldyear = 0; - $i = 1; - while ($xdate < time()) { - if ($oldyear <> date("Y",$xdate)) { - $oldyear = date("Y",$xdate); - $subpmt = 0 ; - print ''; - print ''; - } - - $var=!$var; - - print ""; - print "\n"; - - $b = strftime("%Y", $xdate) . strftime("%m", $xdate); - $totalca = $ca[$b] + $totalca; - $totalpm = $ptmt[$b] + $totalpm; - $pm = $ca[$b] - $ptmt[$b]; - $pmt = $pmt + $pm; - $subpmt = $subpmt + $pm; - - if ($ca[$b]) { - print "\n"; - } else { - print "\n"; - } - - print "\n"; - if ($pm > 0) { - print "\n"; - } else { - print "\n"; - } - print "\n"; - print "\n"; - - $pmbymonth = round($pmt/$i); - - print "\n"; - - $pmbymdelta = ($pmbymonth - $pmbymontha); - - if ( $pmbymdelta > 0 ) { - print "\n"; - } else { - print "\n"; - } - - $pmbymontha = $pmbymonth; - - print "\n"; - - $xdate = mktime(0, 0, 0, date("m", $xdate + (33 * 24 * 3600)), 1 , date("Y", $xdate + (33 * 24 * 3600))) ; - $i++; - } - print ""; - print ""; - print ""; - print "
 ".$langs->trans("Month")."CAPoint mortDeltaSommeSomme par anSomme / nb moisEcart
 '.$oldyear.' 
$i".strftime("%Y %B", $xdate)."".$ca[$b]."0".$ptmt[$b]."+$pm$pm$pmt$subpmt$pmbymonth +$pmbymdelta$pmbymdelta
Totaux:$totalca$totalpm$pmt 
"; -} - - -/* - * - */ - -llxHeader(); - -print "Point mort"; - -ppt($db, 0); - - -print "


"; -print ""; -print "
Paramétrer le point mort
"; - - -$db->close(); - -llxFooter("Dernière modification $Date$ révision $Revision$"); -?>