* Copyright (c) 2004-2008 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. */ /** * \file htdocs/compta/facture/stats/index.php * \ingroup facture * \brief Page des stats factures * \version $Id$ */ require("../../../main.inc.php"); require_once(DOL_DOCUMENT_ROOT."/core/class/dolgraph.class.php"); require_once(DOL_DOCUMENT_ROOT."/compta/facture/stats/facturestats.class.php"); $WIDTH=500; $HEIGHT=200; // Securite acces client if ($user->societe_id > 0) { $action = ''; $socid = $user->societe_id; } $year = strftime("%Y", time()); $startyear=$year-2; $endyear=$year; $mode='customer'; if (isset($_GET["mode"])) $mode=$_GET["mode"]; /* * View */ llxHeader(); if ($mode == 'customer') { $title=$langs->trans("BillsStatistics"); $dir=$conf->facture->dir_temp; } if ($mode == 'supplier') { $title=$langs->trans("BillsStatisticsSuppliers"); $dir=$conf->fournisseur->dir_output.'/facture/temp'; } print_fiche_titre($title, $mesg); create_exdir($dir); $stats = new FactureStats($db, $socid, $mode); // Build graphic number of object // $data = array(array('Lib',val1,val2,val3),...) $data = $stats->getNbByMonthWithPrevYear($endyear,$startyear); //var_dump($data); $filenamenb = $dir."/invoicesnbinyear-".$year.".png"; if ($mode == 'customer') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=billstats&file=invoicesnbinyear-'.$year.'.png'; if ($mode == 'supplier') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=billstatssupplier&file=invoicesnbinyear-'.$year.'.png'; $px = new DolGraph(); $mesg = $px->isGraphKo(); if (! $mesg) { $px->SetData($data); $px->SetPrecisionY(0); $i=$startyear; while ($i <= $endyear) { $legend[]=$i; $i++; } $px->SetLegend($legend); $px->SetMaxValue($px->GetCeilMaxValue()); $px->SetWidth($WIDTH); $px->SetHeight($HEIGHT); $px->SetYLabel($langs->trans("NumberOfBills")); $px->SetShading(3); $px->SetHorizTickIncrement(1); $px->SetPrecisionY(0); $px->mode='depth'; $px->SetTitle($langs->trans("NumberOfBillsByMonth")); $px->draw($filenamenb); } // Build graphic amount of object $data = $stats->getAmountByMonthWithPrevYear($endyear,$startyear); //var_dump($data); // $data = array(array('Lib',val1,val2,val3),...) $filenameamount = $dir."/invoicesamountinyear-".$year.".png"; if ($mode == 'customer') $fileurlamount = DOL_URL_ROOT.'/viewimage.php?modulepart=billstats&file=invoicesamountinyear-'.$year.'.png'; if ($mode == 'supplier') $fileurlamount = DOL_URL_ROOT.'/viewimage.php?modulepart=billstatssupplier&file=invoicesamountinyear-'.$year.'.png'; $px = new DolGraph(); $mesg = $px->isGraphKo(); if (! $mesg) { $px->SetData($data); $i=$startyear; while ($i <= $endyear) { $legend[]=$i; $i++; } $px->SetLegend($legend); $px->SetMaxValue($px->GetCeilMaxValue()); $px->SetMinValue(min(0,$px->GetFloorMinValue())); $px->SetWidth($WIDTH); $px->SetHeight($HEIGHT); $px->SetYLabel($langs->trans("AmountOfBills")); $px->SetShading(3); $px->SetHorizTickIncrement(1); $px->SetPrecisionY(0); $px->mode='depth'; $px->SetTitle($langs->trans("AmountOfBillsByMonthHT")); $px->draw($filenameamount); } print ''; print ''; print '

'; // Show array $data = $stats->getAllByYear(); print ''; print ''; print ''; print ''; print ''; print ''; print ''; $oldyear=0; foreach ($data as $val) { $year = $val['year']; while ($year && $oldyear > $year+1) { // If we have empty year $oldyear--; print ''; print ''; print ''; print ''; print ''; print ''; } print ''; print ''; print ''; print ''; print ''; print ''; $oldyear=$year; } print ' '.$langs->trans("Year").' '.$langs->trans("NumberOfBills").' '.$langs->trans("AmountTotal").' '.$langs->trans("AmountAverage").' '.$oldyear.' 0 0 0 '.$year.' '.$val['nb'].' '.price(price2num($val['total'],'MT'),1).' '.price(price2num($val['avg'],'MT'),1).' '; $db->close(); print '

'; // Show graphs print ' '; if ($mesg) { print $mesg; } else { print ''; print " \n"; print ''; } print ' '; print '

'; llxFooter('$Date$ - $Revision$'); ?>