lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Modif

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2005-12-07 09:33:09 +00:00
parent 4d7ef068b1
commit 4e61b938b9
1 changed files with 28 additions and 43 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

61
htdocs/telephonie/script/tools/graph-conso-jour.php
View File

@ -47,49 +47,39 @@ $error = 0;
$img_root = DOL_DATA_ROOT."/graph/telephonie"; $img_root = DOL_DATA_ROOT."/graph/telephonie";
$data = array();
$xdata = array();
$colors = array(); $colors = array();
$colors[10] = 'yellow'; $colors[10] = 'yellow';
$colors[11] = 'red'; $colors[11] = 'red';
$months = array(10,11); $months = array(10,11);
foreach ($months as $month)
$data = array();
$xdata = array();
print "$month\n";
$sql = "SELECT date_format(date,'%d'), sum(duree)";
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_communications_details";
$sql .= " WHERE date >= '2005-10-01'";
$sql .= " GROUP BY date_format(date,'%Y%m%d') ASC ;";
$resql = $db->query($sql);
if ($resql)
{ {
print "$month\n";
$sql = "SELECT date_format(date,'%d'), sum(duree)";
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_communications_details";
$sql .= " WHERE date_format(date,'%Y%m') ='2005".$month."'";
$sql .= " GROUP BY date_format(date,'%Y%m%d') ASC ;";
$resql = $db->query($sql);
if ($resql)
{
$num = $db->num_rows($resql); $num = $db->num_rows($resql);
$i = 0; $i = 0;
while ($row = $db->fetch_row($resql)) while ($row = $db->fetch_row($resql))
{ {
$xdata[($row[0]*1)] = ($row[1]/60000); $data[$i] = ($row[1]/60000);
$labels[$i] = $row[0]; $labels[$i] = $row[0];
$i++; $i++;
} }
}
else
{
print $db->error();
}
for ($i = 1 ; $i < 32 ; $i++)
{
$data[$month][$i] = $xdata[$i];
$labels[$i] = $i;
}
} }
else
{
print $db->error();
}
$file = "/tmp/conso-jour.png"; $file = "/tmp/conso-jour.png";
@ -103,15 +93,10 @@ $graph->xaxis->scale->SetGrace(20);
$graph->title->Set("Nb minutes en kilos"); $graph->title->Set("Nb minutes en kilos");
$graph->xaxis->SetTickLabels($labels); $graph->xaxis->SetTickLabels($labels);
foreach ($months as $month) $b2plot = new LinePlot($data);
{ $b2plot->SetWeight(2);
$b2plot = new LinePlot($data[$month]); $graph->Add($b2plot);
$b2plot->SetColor($colors[$month]);
$lineplot->SetWeight(2);
$graph->Add($b2plot);
}
$graph->img->SetImgFormat("png"); $graph->img->SetImgFormat("png");
$graph->Stroke($file); $graph->Stroke($file);
?> ?>