diff --git a/htdocs/dolgraph.class.php b/htdocs/dolgraph.class.php
index f6f1d823977..8cad4b5f354 100644
--- a/htdocs/dolgraph.class.php
+++ b/htdocs/dolgraph.class.php
@@ -47,9 +47,9 @@
class DolGraph
{
//! Type du graphique
- var $type='bars';
+ var $type='bars'; // bars, lines, ...
//! Tableau de donnees
- var $data;
+ var $data; // array(array('abs1',valA1,valB1), array('abs2',valA2,valB2), ...)
var $width=380;
var $height=200;
var $MaxValue=0;
@@ -64,12 +64,21 @@ class DolGraph
var $library=''; // Par defaut on utiliser PHPlot
+ var $bordercolor; // array(R,G,B)
+ var $bgcolor; // array(R,G,B)
+ var $datacolor; // array(array(R,G,B),...)
+ var $alpha='25'; // % transparancy
+
+ /*
+ * Constructeur
+ */
function DolGraph()
{
global $conf;
global $theme_bordercolor, $theme_datacolor, $theme_bgcolor, $theme_bgcoloronglet;
+
// Test si module GD présent
$modules_list = get_loaded_extensions();
$isgdinstalled=0;
@@ -83,6 +92,7 @@ class DolGraph
return -1;
}
+
// Défini propriétés de l'objet graphe
$this->library=$conf->global->MAIN_GRAPH_LIBRARY;
@@ -138,38 +148,139 @@ class DolGraph
*/
function draw_artichow($file)
{
- require_once DOL_DOCUMENT_ROOT."/../external-libs/Artichow/BarPlot.class.php";
+ dolibarr_syslog("DolGraph.class::draw_artichow this->type=".$this->type);
+
+ // Create graph
+ $class='';
+ if ($this->type == 'bars') $class='BarPlot';
+ if ($this->type == 'lines') $class='LinePlot';
+ include_once DOL_DOCUMENT_ROOT."/../external-libs/Artichow/".$class.".class.php";
+
+ $group = new PlotGroup;
+ $group->setPadding(30, 10, NULL, NULL);
$graph = new Graph($this->width, $this->height);
- if (isset($this->title)) $graph->title->set($this->title);
-
$graph->border->hide();
-
- $color = new Color(244,244,244);
-
- $graph->setAntiAliasing(TRUE);
-
- $graph->setBackgroundColor( $color );
-
- $i = 0;
- foreach($this->data as $key => $value)
+ $graph->setAntiAliasing(true);
+ if (isset($this->title))
{
- $values[$i] = $value[1];
- $legends[$i] = $value[0];
+ $graph->title->set($this->title);
+ $graph->title->setFont(new Tuffy(10));
+ }
+/*
+ if (isset($this->SetShading))
+ {
+ // Ombre ne fonctionne pas. Un Mars a celui qui trouve pourquoi.
+ $shadow=new Shadow(3);
+ $shadow->setSize($this->SetShading);
+ $graph->Shadow=$shadow;
+ }
+*/
+
+ $bgcolor=new Color($this->bgcolor[0],$this->bgcolor[1],$this->bgcolor[2]);
+ $graph->setBackgroundColor($bgcolor);
+ //print "dd".sizeof($this->data);
+
+ // On boucle sur chaque lot de donnees
+ $legends=array();
+ $i=0;
+ $nblot=sizeof($this->data[0])-1;
+ if (! $nblot) $end=1;
+ while ($i < $nblot)
+ {
+ $j=0;
+ $values=array();
+ foreach($this->data as $key => $valarray)
+ {
+ $legends[$j] = $valarray[0];
+ $values[$j] = $valarray[$i+1];
+ $j++;
+ }
+
+ /*
+ print "Lot de donnees $i
";
+ print_r($values);
+ print '
';
+ */
+
+ if ($this->type == 'bars')
+ {
+ // Artichow ne gère pas les valeurs inconnues
+ // Donc si inconnu, on la fixe à null
+ $newvalues=array();
+ foreach($values as $val)
+ {
+ $newvalues[]=(is_numeric($val) ? $val : null);
+ }
+
+ //$plot = new BarPlot($newvalues,1,1,0);
+ $plot = new BarPlot($newvalues);
+
+ $plot->barShadow->setSize(2);
+ $plot->barShadow->setPosition(Shadow::RIGHT_TOP);
+ $plot->barShadow->setColor(new Color(160, 160, 160, 10));
+ $plot->barShadow->smooth(TRUE);
+ //$plot->setSize(1, 0.96);
+ //$plot->setCenter(0.5, 0.52);
+
+ $color=new Color($this->datacolor[$i][0],$this->datacolor[$i][1],$this->datacolor[$i][2],25);
+ $plot->setBarColor($color);
+
+ // Le mode automatique est plus efficace
+ $plot->SetYMax($this->MaxValue);
+ $plot->SetYMin($this->MinValue);
+ }
+
+ if ($this->type == 'lines')
+ {
+ // Artichow ne gère pas les valeurs inconnues
+ // Donc si inconnu, on la fixe à null
+ $newvalues=array();
+ foreach($values as $val)
+ {
+ $newvalues[]=(is_numeric($val) ? $val : null);
+ }
+
+ $plot = new LinePlot($newvalues);
+ //$plot->setSize(1, 0.96);
+ //$plot->setCenter(0.5, 0.52);
+
+ $color=new Color($this->datacolor[$i][0],$this->datacolor[$i][1],$this->datacolor[$i][2],25);
+ $plot->setColor($color);
+
+ // Le mode automatique est plus efficace
+ $plot->SetYMax($this->MaxValue);
+ $plot->SetYMin($this->MinValue);
+ }
+
+ $plot->reduce(80); // Evite temps d'affichage trop long et nombre de ticks absisce saturés
+
+ if ($nblot >= 2)
+ {
+ $group->legend->add($plot, $this->Legend[$i], Legend::MARK);
+
+ $group->add($plot);
+ }
+ else
+ {
+ $plot->xAxis->setLabelText($legends);
+ $plot->xAxis->label->setFont(new Tuffy(7));
+
+ $graph->add($plot);
+ }
+
$i++;
}
+
+ if ($nblot >= 2)
+ {
+ $group->axis->bottom->setLabelText($legends);
+ $group->axis->bottom->label->setFont(new Tuffy(7));
- $plot = new BarPlot($values);
- $plot->setSize(1, 0.96);
- $plot->setCenter(0.5, 0.52);
-
- $plot->setBarColor( new LightGreen(25) );
-
- $plot->xAxis->setLabelText($legends);
- $plot->xAxis->label->setFont(new Tuffy(7));
-
- $graph->add($plot);
-
+ $graph->add($group);
+ }
+
+ // Generate file
$graph->draw($file);
}
@@ -179,33 +290,20 @@ class DolGraph
*/
function draw_phplot($file)
{
- // Prepare parametres
- $this->prepare_phplot($file);
+ dolibarr_syslog("DolGraph.class::draw_phplot this->type=".$this->type);
- $this->generate_phplot();
- }
-
- /**
- * \brief Prépare l'objet PHPlot
- * \param file Nom du fichier image à générer
- */
- function prepare_phplot($file)
- {
// Vérifie que chemin vers PHPLOT_PATH est connu et on definie $graphpathdir
$graphpathdir=DOL_DOCUMENT_ROOT."/includes/phplot";
if (defined('PHPLOT_PATH')) $graphpathdir=PHPLOT_PATH;
if ($conf->global->PHPLOT_PATH) $graphpathdir=$conf->global->PHPLOT_PATH;
if (! eregi('[\\\/]$',$graphpathdir)) $graphpathdir.='/';
include_once($graphpathdir.'phplot.php');
-
- // Define the object
- $this->graph = new PHPlot($this->width, $this->height);
-
$phplotversion=4;
if (defined('TOTY')) $phplotversion=5;
+ // Create graph
+ $this->graph = new PHPlot($this->width, $this->height);
$this->graph->SetIsInline(1);
-
$this->graph->SetPlotType($this->type);
$this->graph->SetDataValues($this->data);
@@ -295,6 +393,7 @@ class DolGraph
{
$this->graph->SetShading($this->SetShading);
}
+
$this->graph->SetTickLength(6);
$this->graph->SetBackgroundColor($this->bgcolor);
@@ -333,28 +432,23 @@ class DolGraph
if ($phplotversion >= 5)
{
- // Ne gere pas la transparence
+ // Ne gere la transparence qu'en phplot >= 5
// $this->graph->SetBgImage(DOL_DOCUMENT_ROOT.'/theme/dolibarr_logo_2.png','tile');
$this->graph->SetDrawPlotAreaBackground(array(255,255,255));
}
$this->graph->SetPlotBorderType("left"); // Affiche axe y a gauche uniquement
$this->graph->SetVertTickPosition('plotleft'); // Affiche tick axe y a gauche uniquement
-
$this->graph->SetOutputFile($file);
- }
-
- /**
- * \brief Génère le graph dans fichier préparer dans $graph
- * \param file Nom du fichier image
- */
- function generate_phplot()
- {
+
+ // Generate file
$this->graph->DrawGraph();
}
+ /*
+ */
function SetPrecisionY($which_prec)
{
$this->PrecisionY = $which_prec;
@@ -546,4 +640,9 @@ class DolGraph
}
}
+
+function setYear($value) {
+ return $value + 2000;
+}
+
?>
diff --git a/htdocs/includes/modules/modBanque.class.php b/htdocs/includes/modules/modBanque.class.php
index 044ea3c8c82..bf02c02b3f4 100644
--- a/htdocs/includes/modules/modBanque.class.php
+++ b/htdocs/includes/modules/modBanque.class.php
@@ -120,8 +120,7 @@ class modBanque extends DolibarrModules
$sql = array();
- $this->dirs[0] = DOL_DATA_ROOT.'/graph/';
- $this->dirs[1] = DOL_DATA_ROOT.'/graph/banque/';
+ $this->dirs[0] = $conf->banque->dir_output;
return $this->_init($sql);
}