/htdocs/compta/deplacement/stats/index.php
PHP | 213 lines | 140 code | 38 blank | 35 comment | 11 complexity | 55d56ed97618f30d68c1bac874f10291 MD5 | raw file
Possible License(s): LGPL-2.0
- <?php
- /* Copyright (C) 2003-2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
- * Copyright (c) 2004-2011 Laurent Destailleur <eldy@users.sourceforge.net>
- *
- * 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 <http://www.gnu.org/licenses/>.
- */
- /**
- * \file htdocs/compta/deplacement/stats/index.php
- * \ingroup deplacement
- * \brief Page des stats deplacement et notes de frais
- */
- 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 '<table class="notopnoleftnopadd" width="100%"><tr>';
- print '<td align="center" valign="top">';
- // Show filter box
- print '<form name="stats" method="POST" action="'.$_SERVER["PHP_SELF"].'">';
- print '<table class="border" width="100%">';
- print '<tr><td class="liste_titre" colspan="2">'.$langs->trans("Filter").'</td></tr>';
- print '<tr><td>'.$langs->trans("ThirdParty").'</td><td>';
- $filter='';
- print $form->select_company($socid,'socid',$filter,1,1);
- print '</td></tr>';
- print '<tr><td>'.$langs->trans("User").'</td><td>';
- print $form->select_users($userid,'userid',1);
- print '</td></tr>';
- print '<tr><td align="center" colspan="2"><input type="submit" name="submit" class="button" value="'.$langs->trans("Refresh").'"></td></tr>';
- print '</table>';
- print '</form>';
- print '<br><br>';
- // Show array
- $data = $stats->getAllByYear();
- print '<table class="border" width="100%">';
- print '<tr height="24">';
- print '<td align="center">'.$langs->trans("Year").'</td>';
- print '<td align="center">'.$langs->trans("Number").'</td>';
- print '<td align="center">'.$langs->trans("AmountTotal").'</td>';
- print '<td align="center">'.$langs->trans("AmountAverage").'</td>';
- print '</tr>';
- $oldyear=0;
- foreach ($data as $val)
- {
- $year = $val['year'];
- while ($year && $oldyear > $year+1)
- { // If we have empty year
- $oldyear--;
- print '<tr height="24">';
- print '<td align="center"><a href="month.php?year='.$oldyear.'&mode='.$mode.'">'.$oldyear.'</a></td>';
- print '<td align="right">0</td>';
- print '<td align="right">0</td>';
- print '<td align="right">0</td>';
- print '</tr>';
- }
- print '<tr height="24">';
- print '<td align="center"><a href="month.php?year='.$year.'&mode='.$mode.'">'.$year.'</a></td>';
- print '<td align="right">'.$val['nb'].'</td>';
- print '<td align="right">'.price(price2num($val['total'],'MT'),1).'</td>';
- print '<td align="right">'.price(price2num($val['avg'],'MT'),1).'</td>';
- print '</tr>';
- $oldyear=$year;
- }
- print '</table>';
- $db->close();
- print '</td>';
- print '<td align="center" valign="top">';
- // Show graphs
- print '<table class="border" width="100%"><tr valign="top"><td align="center">';
- if ($mesg) { print $mesg; }
- else {
- print '<img src="'.$fileurlnb.'" title="'.$langs->trans("Number").'" alt="'.$langs->trans("Number").'">';
- print "<br>\n";
- print '<img src="'.$fileurlamount.'" title="'.$langs->trans("Amount").'" alt="'.$langs->trans("Amount").'">';
- }
- print '</td></tr></table>';
- print '</td></tr></table>';
- llxFooter();
- ?>