forked from Wavyzz/dolibarr
Utilisation d'artichow
This commit is contained in:
@@ -1,5 +1,5 @@
|
|||||||
<?PHP
|
<?PHP
|
||||||
/* Copyright (C) 2005 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
/* Copyright (C) 2005-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
||||||
*
|
*
|
||||||
* This program is free software; you can redistribute it and/or modify
|
* 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
|
* it under the terms of the GNU General Public License as published by
|
||||||
@@ -25,17 +25,14 @@ require_once("../../htdocs/master.inc.php");
|
|||||||
require_once(DOL_DOCUMENT_ROOT."/energie/EnergieCompteur.class.php");
|
require_once(DOL_DOCUMENT_ROOT."/energie/EnergieCompteur.class.php");
|
||||||
require_once(DOL_DOCUMENT_ROOT."/energie/EnergieGroupe.class.php");
|
require_once(DOL_DOCUMENT_ROOT."/energie/EnergieGroupe.class.php");
|
||||||
|
|
||||||
include_once(JPGRAPH_DIR."jpgraph.php");
|
require_once (DOL_DOCUMENT_ROOT."/../external-libs/Artichow/LinePlot.class.php");
|
||||||
include_once(JPGRAPH_DIR."jpgraph_line.php");
|
|
||||||
|
|
||||||
$error = 0;
|
$error = 0;
|
||||||
|
|
||||||
$labels = array();
|
$labels = array();
|
||||||
$datas = array();
|
$datas = array();
|
||||||
|
|
||||||
$sql_c = "SELECT rowid";
|
$sql_c = "SELECT rowid FROM ".MAIN_DB_PREFIX."energie_compteur";
|
||||||
$sql_c .= " FROM ".MAIN_DB_PREFIX."energie_compteur";
|
|
||||||
|
|
||||||
$resql_c = $db->query($sql_c);
|
$resql_c = $db->query($sql_c);
|
||||||
|
|
||||||
$user = New User($db);
|
$user = New User($db);
|
||||||
@@ -72,8 +69,6 @@ if ($resql_c)
|
|||||||
{
|
{
|
||||||
$obj = $db->fetch_object($resql);
|
$obj = $db->fetch_object($resql);
|
||||||
|
|
||||||
//print strftime("%Y-%m-%d", $obj->date_releve) . "\t\t".$obj->valeur."\n";
|
|
||||||
|
|
||||||
$previous_date = $obj->date_releve;
|
$previous_date = $obj->date_releve;
|
||||||
$previous_value = $obj->valeur;
|
$previous_value = $obj->valeur;
|
||||||
|
|
||||||
@@ -153,50 +148,51 @@ if ($resql_c)
|
|||||||
{
|
{
|
||||||
$width = 750;
|
$width = 750;
|
||||||
$height = 300;
|
$height = 300;
|
||||||
$graph = new Graph($width, $height,"auto");
|
|
||||||
$graph->SetScale("textlin");
|
|
||||||
|
|
||||||
$graph->yaxis->scale->SetGrace(2);
|
|
||||||
$graph->SetFrame(1);
|
|
||||||
$graph->img->SetMargin(40,20,20,35);
|
|
||||||
|
|
||||||
$b2plot = new LinePlot($xydatas);
|
|
||||||
|
|
||||||
$b2plot->SetColor("blue");
|
|
||||||
|
|
||||||
$graph->title->Set("Consommation journali<6C>re");
|
|
||||||
|
|
||||||
$graph->xaxis->Hide();
|
|
||||||
|
|
||||||
$graph->Add($b2plot);
|
|
||||||
$graph->img->SetImgFormat("png");
|
|
||||||
|
|
||||||
$file= DOL_DATA_ROOT."/energie/graph/all.".$obj_c->rowid.".png";
|
$file= DOL_DATA_ROOT."/energie/graph/all.".$obj_c->rowid.".png";
|
||||||
|
|
||||||
$graph->Stroke($file);
|
$group = new PlotGroup;
|
||||||
|
$group->setPadding(30, 10, NULL, NULL);
|
||||||
|
|
||||||
|
$graph = new Graph($width, $height);
|
||||||
|
$graph->border->hide();
|
||||||
|
$graph->setAntiAliasing(true);
|
||||||
|
|
||||||
|
$graph->title->set("Consommation journali<6C>re");
|
||||||
|
$graph->title->setFont(new Tuffy(10));
|
||||||
|
|
||||||
|
$bgcolor= new Color(222,231,236);
|
||||||
|
$graph->setBackgroundColor($bgcolor);
|
||||||
|
|
||||||
|
$plot = new LinePlot($xydatas);
|
||||||
|
$plot->xAxis->Hide();
|
||||||
|
|
||||||
|
$graph->add($plot);
|
||||||
|
$graph->draw($file);
|
||||||
|
|
||||||
|
|
||||||
$width = 300;
|
$width = 300;
|
||||||
$height = 90;
|
$height = 90;
|
||||||
$graph = new Graph($width, $height,"auto");
|
|
||||||
$graph->SetScale("textlin");
|
|
||||||
|
|
||||||
$graph->yaxis->scale->SetGrace(2);
|
|
||||||
$graph->SetFrame(1);
|
|
||||||
$graph->img->SetMargin(30,10,10,10);
|
|
||||||
|
|
||||||
$b2plot = new LinePlot($xydatas);
|
|
||||||
|
|
||||||
$b2plot->SetColor("blue");
|
|
||||||
|
|
||||||
$graph->xaxis->Hide();
|
|
||||||
|
|
||||||
$graph->Add($b2plot);
|
|
||||||
$graph->img->SetImgFormat("png");
|
|
||||||
|
|
||||||
$file= DOL_DATA_ROOT."/energie/graph/small-all.".$obj_c->rowid.".png";
|
$file= DOL_DATA_ROOT."/energie/graph/small-all.".$obj_c->rowid.".png";
|
||||||
|
|
||||||
$graph->Stroke($file);
|
$group = new PlotGroup;
|
||||||
|
$group->setPadding(30, 10, NULL, NULL);
|
||||||
|
|
||||||
|
$graph = new Graph($width, $height);
|
||||||
|
$graph->border->hide();
|
||||||
|
$graph->setAntiAliasing(true);
|
||||||
|
|
||||||
|
$graph->title->set("Consommation journali<6C>re");
|
||||||
|
$graph->title->setFont(new Tuffy(10));
|
||||||
|
|
||||||
|
$bgcolor= new Color(222,231,236);
|
||||||
|
$graph->setBackgroundColor($bgcolor);
|
||||||
|
|
||||||
|
$plot = new LinePlot($xydatas);
|
||||||
|
$plot->xAxis->Hide();
|
||||||
|
|
||||||
|
$graph->add($plot);
|
||||||
|
$graph->draw($file);
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
|
|||||||
Reference in New Issue
Block a user