* Copyright (C) 2004-2007 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/comm/propal/stats/index.php \ingroup propale \brief Page des stats propositions commerciales \version $Id$ */ require("./pre.inc.php"); require_once(DOL_DOCUMENT_ROOT."/comm/propal/stats/propalestats.class.php"); require_once(DOL_DOCUMENT_ROOT."/core/dolgraph.class.php"); $WIDTH=500; $HEIGHT=200; // Sécurité accés client if ($user->societe_id > 0) { $action = ''; $socid = $user->societe_id; } $year = strftime("%Y", time()); $startyear=$year-2; $endyear=$year; /* * View */ llxHeader(); print_fiche_titre($langs->trans("ProposalsStatistics"), $mesg); $dir=$conf->propal->dir_temp; create_exdir($dir); $stats = new PropaleStats($db, $socid); // Build graphic number of object $data = $stats->getNbByMonthWithPrevYear($endyear,$startyear); //var_dump($data); // $data = array(array('Lib',val1,val2,val3),...) if (!$user->rights->societe->client->voir || $user->societe_id) { $filenamenb = $dir.'/proposalsnbinyear-'.$user->id.'-'.$year.'.png'; $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=propalstats&file=proposalsnbinyear-'.$user->id.'-'.$year.'.png'; } else { $filenamenb = $dir.'/proposalsnbinyear-'.$year.'.png'; $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=propalstats&file=proposalsnbinyear-'.$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->SetMinValue(min(0,$px->GetFloorMinValue())); $px->SetWidth($WIDTH); $px->SetHeight($HEIGHT); $px->SetYLabel($langs->trans("NbOfProposals")); $px->SetShading(3); $px->SetHorizTickIncrement(1); $px->SetPrecisionY(0); $px->mode='depth'; $px->SetTitle($langs->trans("NumberOfProposalsByMonth")); $px->draw($filenamenb); } // Build graphic amount of object $data = $stats->getAmountByMonthWithPrevYear($endyear,$startyear); //var_dump($data); // $data = array(array('Lib',val1,val2,val3),...) if (!$user->rights->societe->client->voir || $user->societe_id) { $filenameamount = $dir.'/proposalsamountinyear-'.$user->id.'-'.$year.'.png'; $fileurlamount = DOL_URL_ROOT.'/viewimage.php?modulepart=propalstats&file=proposalsamountinyear-'.$user->id.'-'.$year.'.png'; } else { $filenameamount = $dir.'/proposalsamountinyear-'.$year.'.png'; $fileurlamount = DOL_URL_ROOT.'/viewimage.php?modulepart=propalstats&file=proposalsamountinyear-'.$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->SetMinValue(min(0,$px->GetFloorMinValue())); $px->SetWidth($WIDTH); $px->SetHeight($HEIGHT); $px->SetYLabel($langs->trans("AmountOfProposals")); $px->SetShading(3); $px->SetHorizTickIncrement(1); $px->SetPrecisionY(0); $px->mode='depth'; $px->SetTitle($langs->trans("AmountOfProposalsByMonthHT")); $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']; print $avg; while ($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("NbOfProposals").' '.$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).' '; print '

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

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