* Copyright (c) 2004-2011 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, see . */ /** * \file htdocs/compta/deplacement/stats/index.php * \ingroup deplacement * \brief Page des stats deplacement et notes de frais * \version $Id: index.php,v 1.8 2011/08/03 00:46:28 eldy Exp $ */ require("../../../main.inc.php"); require_once(DOL_DOCUMENT_ROOT."/core/class/dolgraph.class.php"); require_once(DOL_DOCUMENT_ROOT."/compta/deplacement/class/deplacementstats.class.php"); $langs->load("trips"); $WIDTH=500; $HEIGHT=200; $userid=GETPOST('userid'); if ($userid < 0) $userid=0; $socid=GETPOST('socid'); if ($socid < 0) $socid=0; // Securite acces client if ($user->societe_id > 0) { $action = ''; $socid = $user->societe_id; } $year = strftime("%Y", time()); $startyear=$year-2; $endyear=$year; $mode=GETPOST("mode")?GETPOST("mode"):'customer'; /* * View */ $form=new Form($db); llxHeader(); $title=$langs->trans("TripsAndExpensesStatistics"); $dir=$conf->deplacement->dir_temp; print_fiche_titre($title, $mesg); create_exdir($dir); $stats = new DeplacementStats($db, $socid, $userid); // Build graphic number of object // $data = array(array('Lib',val1,val2,val3),...) //print "$endyear, $startyear"; $data = $stats->getNbByMonthWithPrevYear($endyear,$startyear); //var_dump($data); $filenamenb = $dir."/tripsexpensesnbinyear-".$year.".png"; $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=tripsexpensesstats&file=tripsexpensesnbinyear-'.$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("Number")); $px->SetShading(3); $px->SetHorizTickIncrement(1); $px->SetPrecisionY(0); $px->mode='depth'; $px->SetTitle($langs->trans("NumberByMonth")); $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."/tripsexpensesamountinyear-".$year.".png"; $fileurlamount = DOL_URL_ROOT.'/viewimage.php?modulepart=tripsexpensesstats&file=tripsexpensesamountinyear-'.$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("Amount")); $px->SetShading(3); $px->SetHorizTickIncrement(1); $px->SetPrecisionY(0); $px->mode='depth'; $px->SetTitle($langs->trans("AmountTotal")); $px->draw($filenameamount); } print ''; print ''; print '

'; // Show filter box print ' '; print ''; print ''; print ''; print ''; print ''; print ' '.$langs->trans("Filter").' '.$langs->trans("ThirdParty").' '; $filter=''; print $form->select_company($socid,'socid',$filter,1,1); print ' '.$langs->trans("User").' '; print $form->select_users($userid,'userid',1); 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("Number").' '.$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: 2011/08/03 00:46:28 $ - $Revision: 1.8 $'); ?>