From a52ff54681318f4f44c8b12e558d43fa31c41baa Mon Sep 17 00:00:00 2001
From: Rodolphe Quiedeville <rodolphe@quiedeville.org>
Date: Thu, 24 Feb 2005 12:34:11 +0000
Subject: [PATCH] Nouveau fichier

---
 .../stats/contrats/modereglement.class.php    | 76 ++++++++++++++++
 htdocs/telephonie/stats/graph/pie.class.php   | 89 +++++++++++++++++++
 2 files changed, 165 insertions(+)
 create mode 100644 htdocs/telephonie/stats/contrats/modereglement.class.php
 create mode 100644 htdocs/telephonie/stats/graph/pie.class.php

diff --git a/htdocs/telephonie/stats/contrats/modereglement.class.php b/htdocs/telephonie/stats/contrats/modereglement.class.php
new file mode 100644
index 00000000000..0377c80f003
--- /dev/null
+++ b/htdocs/telephonie/stats/contrats/modereglement.class.php
@@ -0,0 +1,76 @@
+<?PHP
+/* Copyright (C) 2005 Rodolphe Quiedeville <rodolphe@quiedeville.org>
+ *
+ * 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.
+ *
+ * $Id$
+ * $Source$
+ *
+ */
+
+require_once (DOL_DOCUMENT_ROOT."/telephonie/stats/graph/pie.class.php");
+
+class GraphContratModeReglement extends GraphPie {
+
+  Function GraphContratModeReglement($DB, $file)
+  {
+    $this->db = $DB;
+    $this->file = $file;
+
+    $this->client = 0;
+    $this->titre = "Mode de réglement des contrats";
+
+    $this->barcolor = "yellow";
+    $this->showframe = true;
+  }
+
+  Function GraphMakeGraph()
+  {
+    $num = 0;
+
+    $sql = "SELECT mode_paiement, count(*)";
+    $sql .= " FROM ".MAIN_DB_PREFIX."telephonie_contrat";
+    //    $sql .= " WHERE statut = 3";
+    $sql .= " GROUP BY mode_paiement";
+    
+    $result = $this->db->query($sql);
+    if ($result)
+      {
+	$num = $this->db->num_rows();
+	$i = 0;
+	$datas = array();
+	$labels = array();
+	
+	while ($i < $num)
+	  {
+	    $row = $this->db->fetch_row();
+	    
+	    $datas[$i] = $row[1];
+	    $labels[$i] = $row[0];
+	    
+	    $i++;
+	  }
+	
+	$this->db->free();
+      }
+    else 
+      {
+	print $this->db->error() . ' ' . $sql;
+      }
+    
+    $this->GraphDraw($this->file, $datas, $labels);
+  }
+}   
+?>
diff --git a/htdocs/telephonie/stats/graph/pie.class.php b/htdocs/telephonie/stats/graph/pie.class.php
new file mode 100644
index 00000000000..48b0be39c7e
--- /dev/null
+++ b/htdocs/telephonie/stats/graph/pie.class.php
@@ -0,0 +1,89 @@
+<?PHP
+/* Copyright (C) 2005 Rodolphe Quiedeville <rodolphe@quiedeville.org>
+ *
+ * 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.
+ *
+ * $Id$
+ * $Source$
+ *
+ */
+
+require_once (DOL_DOCUMENT_ROOT."/telephonie/stats/graph/graph.class.php");
+
+class GraphPie extends DolibarrGraph {
+
+  Function GraphPie($DB, $file)
+  {
+    $this->db = $DB;
+    $this->file = $file;
+    $this->bgcolor = "#DEE7EC";
+    $this->barcolor = "green";
+    $this->client = 0;
+    $this->showframe = true;
+  }
+  
+  Function GraphDraw($file, $datas, $labels)
+  {
+    // Create the graph. These two calls are always required
+
+    $height = 240;
+    $width = 400;
+
+    if ($this->width <> $width && $this->width > 0)
+      $width = $this->width;
+
+    if ($this->height <> $height && $this->height > 0)
+      $height = $this->height;
+
+    $graph = new PieGraph($width, $height,"auto");    
+
+    $graph->SetColor("gray") ;
+
+    // Create the bar plots
+    
+    $pieplot = new PiePlot($datas);
+    
+    $pieplot->SetCenter(0.33,0.5);
+    
+    // Label font and color setup
+    $pieplot->SetFont(FF_FONT1,FS_BOLD);
+    $pieplot->SetFontColor("darkred");
+    
+    
+    // Size of pie in fraction of the width of the graph
+    $pieplot->SetSize(0.38);
+    
+    // Legends
+    $pieplot->SetLegends($labels);
+    $graph->legend->Pos(0.05,0.15);
+    
+    $graph->Add($pieplot);
+    
+    $graph->title->Set($this->titre);
+    
+    $graph->title->SetFont(FF_FONT1,FS_BOLD);
+    
+    
+    // Display the graph
+    
+    $graph->img->SetImgFormat("png");
+
+    if (sizeof($datas) > 0)
+      {
+	$graph->Stroke($file);
+      }
+  }
+}   
+?>