Nouveau fichier

This commit is contained in:
Rodolphe Quiedeville 2005-02-08 15:28:02 +00:00
parent 1c8c7a0e3c
commit 4830dc48e3
3 changed files with 296 additions and 0 deletions

View File

@ -0,0 +1,100 @@
<?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$
*
*
* Generation des graphiques
*
*
*
*/
require ("../../master.inc.php");
require_once (DOL_DOCUMENT_ROOT."/telephonie/lignetel.class.php");
require_once (DOL_DOCUMENT_ROOT."/telephonie/facturetel.class.php");
require_once (DOL_DOCUMENT_ROOT."/telephonie/telephonie-tarif.class.php");
require_once (DOL_DOCUMENT_ROOT."/telephonie/communication.class.php");
require_once (DOL_DOCUMENT_ROOT."/telephonie/stats/graph/bar.class.php");
require_once (DOL_DOCUMENT_ROOT."/telephonie/stats/graph/camenbert.class.php");
require_once (DOL_DOCUMENT_ROOT."/telephonie/stats/commerciaux/commercial.ca.class.php");
$error = 0;
/*
* Création des répertoires
*
*/
$dirs[0] = DOL_DATA_ROOT."/graph/";
$dirs[1] = DOL_DATA_ROOT."/graph/telephonie/";
$dirs[2] = DOL_DATA_ROOT."/graph/telephonie/commercials/";
$img_root = DOL_DATA_ROOT."/graph/telephonie/";
if (is_array($dirs))
{
foreach ($dirs as $key => $value)
{
$dir = $value;
if (! file_exists($dir))
{
umask(0);
if (! @mkdir($dir, 0755))
{
print "Erreur: Le répertoire '$dir' n'existe pas et Dolibarr n'a pu le créer.";
}
else
{
print $dir ." créé\n";
}
}
}
}
/***********************************************************************/
/*
/* Chiffre d'affaire mensuel
/*
/***********************************************************************/
$sql = "SELECT distinct fk_commercial";
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_societe_ligne";
$result = $db->query($sql);
if ($result)
{
$num = $db->num_rows();
$i = 0;
while ($i < $num)
{
$row = $db->fetch_row();
$file = $img_root . "commercials/".$row[0]."/ca.mensuel.png";
print "Graph : Lignes commandes$file\n";
$graph = new GraphCommercialChiffreAffaire($db, $file);
$graph->width = 400;
$graph->GraphMakeGraph($row[0]);
$i++;
}
}
?>

View File

@ -0,0 +1,86 @@
<?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/bar.class.php");
class GraphCommercialChiffreAffaire extends GraphBar {
Function GraphCommercialChiffreAffaire($DB, $file)
{
$this->db = $DB;
$this->file = $file;
$this->client = 0;
$this->titre = "Chiffre d'affaire";
$this->barcolor = "blue";
$this->showframe = true;
}
Function GraphMakeGraph($commercial=0)
{
$num = 0;
$sql = "SELECT date_format(f.date,'%Y%m'), sum(f.cout_vente)";
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_facture as f";
$sql .= " , ".MAIN_DB_PREFIX."telephonie_societe_ligne as l";
$sql .= " WHERE l.rowid = f.fk_ligne";
$sql .= " AND l.fk_commercial_sign = ".$commercial;
$sql .= " GROUP BY date_format(f.date,'%Y%m') ASC";
$result = $this->db->query($sql);
if ($result)
{
$num = $this->db->num_rows();
$i = 0;
$j = -1;
$datas = array();
$labels = array();
while ($i < $num)
{
$row = $this->db->fetch_row();
$datas[$i] = $row[1];
$labels[$i] = substr($row[0],-2)."/".substr($row[0],2,2);
$i++;
}
$this->db->free();
}
else
{
print $this->db->error() . ' ' . $sql;
}
if (sizeof($datas))
{
$this->GraphDraw($this->file, $datas, $labels);
}
}
}
?>

View File

@ -0,0 +1,110 @@
<?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("./pre.inc.php");
if (!$user->rights->telephonie->lire) accessforbidden();
llxHeader('','Telephonie - Statistiques - Commerciaux');
/*
*
*
*
*/
$h = 0;
$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/commerciaux/index.php';
$head[$h][1] = "Global";
$h++;
if ($_GET["commid"])
{
$comm = new User($db, $_GET["commid"]);
$comm->fetch();
$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/commerciaux/commercial.php?commid='.$comm->id;
$head[$h][1] = $comm->fullname;
$h++;
$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/commerciaux/commercialca.php?commid='.$comm->id;
$head[$h][1] = "CA";
$hselected = $h;
$h++;
dolibarr_fiche_head($head, $hselected, "Commerciaux");
print '<table class="noborder" width="100%" cellspacing="0" cellpadding="4">';
print '<tr><td width="30%" valign="top">';
print '<table class="border" width="100%" cellspacing="0" cellpadding="4">';
print '<tr class="liste_titre"><td width="50%" valign="top">Nom</td><td align="center">Nb Lignes</td></tr>';
$sql = "SELECT count(*) as cc,date_format(date_commande,'%m %Y')";
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_societe_ligne as l";
$sql .= " WHERE l.fk_commercial = ".$comm->id;
$sql .= " AND date_commande IS NOT NULL";
$sql .= " GROUP BY date_format(date_commande,'%Y/%m') DESC";
$result = $db->query($sql);
if ($result)
{
$num = $db->num_rows();
$i = 0;
$datas = array();
$legends = array();
while ($i < $num)
{
$row = $db->fetch_row($i);
$var=!$var;
print "<tr $bc[$var]>";
print '<td width="50%" valign="top">';
print $row[2]." ". $row[1].'</td><td align="center">'.$row[0].'</td></tr>';
$i++;
}
$db->free();
}
else
{
print $db->error() . ' ' . $sql;
}
print '</table>';
print '</td><td valign="top" width="70%">';
print '<img src="'.DOL_URL_ROOT.'/showgraph.php?graph='.DOL_DATA_ROOT.'/graph/telephonie/commercials/'.$comm->id.'/ca.mensuel.png" alt="Commandes de ligne par mois" title="Lignes Actives"><br /><br />'."\n";
print '</td></tr>';
print '</table>';
$db->close();
}
llxFooter("<em>Derni&egrave;re modification $Date$ r&eacute;vision $Revision$</em>");
?>