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

Bugfix

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2005-11-09 10:08:26 +00:00
parent e6d4be8594
commit d5f87fad5f
1 changed files with 16 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
htdocs/telephonie/script/graph-statistiques-ca.php
View File

@ -43,9 +43,7 @@ require_once (DOL_DOCUMENT_ROOT."/telephonie/stats/graph/comm.nbmensuel.class.ph
$error = 0; $error = 0;
$datetime = time(); $datetime = time();
$date = strftime("%d%h%Y%Hh%Mm%S",$datetime); $date = strftime("%d%h%Y%Hh%Mm%S",$datetime);
$month = strftime("%m", $datetime); $month = strftime("%m", $datetime);
$year = strftime("%Y", $datetime); $year = strftime("%Y", $datetime);
@ -74,7 +72,7 @@ $sql .= " WHERE graph IN ('factures.facture_moyenne','factures.ca_mensuel','fact
$resql = $db->query($sql); $resql = $db->query($sql);
$sql = "SELECT date_format(tf.date,'%m'), sum(tf.cout_vente), sum(tf.cout_achat), sum(tf.gain), count(tf.cout_vente)"; $sql = "SELECT date_format(tf.date,'%Y%m'), sum(tf.cout_vente), sum(tf.cout_achat), sum(tf.gain), count(tf.cout_vente)";
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_facture as tf"; $sql .= " FROM ".MAIN_DB_PREFIX."telephonie_facture as tf";
$sql .= " GROUP BY date_format(tf.date,'%Y%m') ASC "; $sql .= " GROUP BY date_format(tf.date,'%Y%m') ASC ";
@ -95,7 +93,6 @@ if ($resql)
$gain_moyen = array(); $gain_moyen = array();
$num = $db->num_rows($resql); $num = $db->num_rows($resql);
$i = 0; $i = 0;
while ($i < $num) while ($i < $num)
@ -118,6 +115,7 @@ if ($resql)
$cout_vente_moyen[$i] = ($row[1]/$row[4]); $cout_vente_moyen[$i] = ($row[1]/$row[4]);
$nb_factures[$i] = $row[4]; $nb_factures[$i] = $row[4];
$labels[$i] = $row[0]; $labels[$i] = $row[0];
$short_labels[$i] = substr($row[0],-2);
$sqli = " INSERT INTO ".MAIN_DB_PREFIX."telephonie_stats"; $sqli = " INSERT INTO ".MAIN_DB_PREFIX."telephonie_stats";
$sqli .= " (graph, ord, legend, valeur) VALUES ("; $sqli .= " (graph, ord, legend, valeur) VALUES (";
@ -142,38 +140,42 @@ else
print $db->error(); print $db->error();
} }
$file = $img_root . "/factures/ca_mensuel.png"; $file = $img_root . "/factures/ca_mensuel.png";
print "Graph $file\n";
$graph = new GraphBar ($db, $file); $graph = new GraphBar ($db, $file);
$graph->titre = "Chiffre d'affaire par mois en euros HT"; $graph->titre = "Chiffre d'affaire par mois en euros HT";
$graph->width = 440; $graph->width = 440;
$graph->GraphDraw($file, $cout_vente, $labels); $graph->GraphDraw($file, $cout_vente, $short_labels);
$file = $img_root . "/factures/facture_moyenne.png"; $file = $img_root . "/factures/facture_moyenne.png";
print "Graph $file\n";
$graph = new GraphBar ($db, $file, $labels); $graph = new GraphBar ($db, $file, $labels);
$graph->titre = "Facture moyenne"; $graph->titre = "Facture moyenne";
$graph->barcolor = "blue"; $graph->barcolor = "blue";
$graph->width = 440; $graph->width = 440;
$graph->GraphDraw($file, $cout_vente_moyen, $labels); $graph->GraphDraw($file, $cout_vente_moyen, $short_labels);
$file = $img_root . "/factures/gain_mensuel.png"; $file = $img_root . "/factures/gain_mensuel.png";
print "Graph $file\n";
$graph = new GraphBar ($db, $file); $graph = new GraphBar ($db, $file);
$graph->titre = "Gain par mois en euros HT"; $graph->titre = "Gain par mois en euros HT";
$graph->width = 440; $graph->width = 440;
$graph->GraphDraw($file, $gain, $labels); $graph->GraphDraw($file, $gain, $short_labels);
$file = $img_root . "/factures/gain_moyen.png"; $file = $img_root . "/factures/gain_moyen.png";
print "Graph $file\n";
$graph = new GraphBar ($db, $file); $graph = new GraphBar ($db, $file);
$graph->titre = "Gain moyen par facture par mois"; $graph->titre = "Gain moyen par facture par mois";
$graph->width = 440; $graph->width = 440;
$graph->barcolor = "blue"; $graph->barcolor = "blue";
$graph->GraphDraw($file, $gain_moyen, $labels); $graph->GraphDraw($file, $gain_moyen, $short_labels);
$file = $img_root . "/factures/nb_facture.png"; $file = $img_root . "/factures/nb_facture.png";
print "Graph $file\n";
$graph = new GraphBar ($db, $file); $graph = new GraphBar ($db, $file);
$graph->titre = "Nb de facture mois"; $graph->titre = "Nb de facture mois";
$graph->width = 440; $graph->width = 440;
$graph->barcolor = "yellow"; $graph->barcolor = "yellow";
$graph->GraphDraw($file, $nb_factures, $labels); $graph->GraphDraw($file, $nb_factures, $short_labels);
$sql = "DELETE FROM ".MAIN_DB_PREFIX."telephonie_stats"; $sql = "DELETE FROM ".MAIN_DB_PREFIX."telephonie_stats";
@ -264,7 +266,6 @@ if ($resql)
while ($i < $num) while ($i < $num)
{ {
$row = $db->fetch_row($resql); $row = $db->fetch_row($resql);
$cvc[$row[0]] = $row[1]; $cvc[$row[0]] = $row[1];
$i++; $i++;
@ -288,6 +289,7 @@ foreach ($labels as $labl)
$file = $img_root . "/factures/ca_mensuel_preleve.png"; $file = $img_root . "/factures/ca_mensuel_preleve.png";
print "Graph $file\n";
$graph = new GraphBarAccumul ($db, $file); $graph = new GraphBarAccumul ($db, $file);
$graph->titre = "Chiffre d'affaire par méthode de réglement"; $graph->titre = "Chiffre d'affaire par méthode de réglement";
$graph->width = 640; $graph->width = 640;
@ -296,7 +298,7 @@ $graph->barcolor = "yellow";
$xdatas[0] = array($cout_vente_prelev, $cout_vente_autre); $xdatas[0] = array($cout_vente_prelev, $cout_vente_autre);
$xdatas[1] = array($cout_achat); $xdatas[1] = array($cout_achat);
print_r($xdatas);
$graph->legend[0][0] = "Factures prélevées"; $graph->legend[0][0] = "Factures prélevées";
$graph->legend[0][1] = "Factures non-prélevées"; $graph->legend[0][1] = "Factures non-prélevées";
$graph->legend[1][0] = "Coût fournisseur"; $graph->legend[1][0] = "Coût fournisseur";