From a187c2a08bad3c3dedfbd026bc731ee52f175108 Mon Sep 17 00:00:00 2001 From: Rodolphe Quiedeville Date: Tue, 8 Feb 2005 10:04:17 +0000 Subject: [PATCH] Nouveau fichier --- htdocs/telephonie/stats/commerciaux/index.php | 109 ++++++++++++++++ .../telephonie/stats/commerciaux/pre.inc.php | 64 ++++++++++ .../stats/communications/lastmonth.php | 112 +++++++++++++++++ .../stats/communications/rentabilite.php | 118 ++++++++++++++++++ 4 files changed, 403 insertions(+) create mode 100644 htdocs/telephonie/stats/commerciaux/index.php create mode 100644 htdocs/telephonie/stats/commerciaux/pre.inc.php create mode 100644 htdocs/telephonie/stats/communications/lastmonth.php create mode 100644 htdocs/telephonie/stats/communications/rentabilite.php diff --git a/htdocs/telephonie/stats/commerciaux/index.php b/htdocs/telephonie/stats/commerciaux/index.php new file mode 100644 index 00000000000..11f6e87d876 --- /dev/null +++ b/htdocs/telephonie/stats/commerciaux/index.php @@ -0,0 +1,109 @@ + + * + * 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"); + +$page = $_GET["page"]; +$sortorder = $_GET["sortorder"]; + +if (!$user->rights->telephonie->lire) + accessforbidden(); + +llxHeader('','Telephonie - Statistiques - Commerciaux'); + +/* + * Sécurité accés client + */ +if ($user->societe_id > 0) +{ + $action = ''; + $socidp = $user->societe_id; +} + +/* + * Mode Liste + * + * + * + */ + +print ''; + +print ''; + +print ''; + + +print '
'; + +print ''; + +print ''; + +$sql = "SELECT count(*) as cc , c.name, c.firstname, c.rowid"; +$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_societe_ligne as l"; +$sql .= " , ".MAIN_DB_PREFIX."user as c"; +$sql .= " WHERE c.rowid = l.fk_commercial GROUP BY c.name ORDER BY cc 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 ""; + + print ''; + + $i++; + } + $db->free(); +} +else +{ + print $db->error() . ' ' . $sql; +} + +print '
NomNb Lignes
'; + print ''.$row[2]." ". $row[1].''.$row[0].'
'; + +print '
'; + +print '

'; +print '

'; + +print '
'; + + + +$db->close(); + +llxFooter("Dernière modification $Date$ révision $Revision$"); +?> diff --git a/htdocs/telephonie/stats/commerciaux/pre.inc.php b/htdocs/telephonie/stats/commerciaux/pre.inc.php new file mode 100644 index 00000000000..f2c2f1c6849 --- /dev/null +++ b/htdocs/telephonie/stats/commerciaux/pre.inc.php @@ -0,0 +1,64 @@ + + * + * 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("../../../main.inc.php"); +require(DOL_DOCUMENT_ROOT."/telephonie/lignetel.class.php"); + +$user->getrights('telephonie'); + +function llxHeader($head = "", $title="") { + global $user, $conf; + + /* + * + * + */ + top_menu($head, $title); + + $menu = new Menu(); + + $menu->add(DOL_URL_ROOT."/telephonie/index.php", "Telephonie"); + + $menu->add(DOL_URL_ROOT."/telephonie/tarifs/", "Tarifs"); + + $menu->add(DOL_URL_ROOT."/telephonie/client/index.php", "Clients"); + + $menu->add(DOL_URL_ROOT."/telephonie/ligne/index.php", "Lignes"); + + $menu->add(DOL_URL_ROOT."/telephonie/ligne/commande/", "Commandes"); + + $menu->add(DOL_URL_ROOT."/telephonie/facture/", "Factures"); + + $menu->add(DOL_URL_ROOT."/telephonie/fournisseurs.php", "Fournisseurs"); + + $menu->add(DOL_URL_ROOT."/telephonie/stats/", "Stats"); + $menu->add_submenu(DOL_URL_ROOT."/telephonie/stats/clients/", "Clients"); + $menu->add_submenu(DOL_URL_ROOT."/telephonie/stats/commerciaux/", "Commerciaux"); + $menu->add_submenu(DOL_URL_ROOT."/telephonie/stats/lignes/", "Lignes"); + $menu->add_submenu(DOL_URL_ROOT."/telephonie/stats/communications/", "Communications"); + $menu->add_submenu(DOL_URL_ROOT."/telephonie/stats/factures/", "Factures"); + + $menu->add(DOL_URL_ROOT."/telephonie/statca/", "Chiffre d'affaire"); + + left_menu($menu->liste); +} + +?> diff --git a/htdocs/telephonie/stats/communications/lastmonth.php b/htdocs/telephonie/stats/communications/lastmonth.php new file mode 100644 index 00000000000..d0c341caabd --- /dev/null +++ b/htdocs/telephonie/stats/communications/lastmonth.php @@ -0,0 +1,112 @@ + + * + * 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"); + +$page = $_GET["page"]; +$sortorder = $_GET["sortorder"]; + +if (!$user->rights->telephonie->lire) + accessforbidden(); + +llxHeader('','Telephonie - Statistiques'); + +/* + * Sécurité accés client + */ +if ($user->societe_id > 0) +{ + $action = ''; + $socidp = $user->societe_id; +} + +$h = 0; + +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/index.php'; +$head[$h][1] = "Global"; +$h++; +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/lastmonth.php'; +$head[$h][1] = "Durée"; +$hselected = $h; +$h++; +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/destmonth.php'; +$head[$h][1] = "Destinations"; +$h++; +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/rentabilite.php'; +$head[$h][1] = "Rentabilite"; +$h++; + +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/analyse.php'; +$head[$h][1] = "Analyse"; +$h++; + +dolibarr_fiche_head($head, $hselected, "Communications"); + +print ''; + +print ''; + +print '
'; + +$now = time(); +$year = strftime("%Y", $now); +$month = strftime("%m", $now); + +for ($i = 1 ; $i < 4 ; $i++) +{ + $month = $month - 1; + + if ($month == 0) + { + $year = $year - 1; + $month = 12; + } + + + print '

'; + +} +print '
'; + +$year = strftime("%Y", $now); +$month = strftime("%m", $now); + +for ($i = 1 ; $i < 4 ; $i++) +{ + $month = $month - 1; + + if ($month == 0) + { + $year = $year - 1; + $month = 12; + } + + + print '

'; + +} + +print '
'; + +$db->close(); + +llxFooter("Dernière modification $Date$ révision $Revision$"); +?> diff --git a/htdocs/telephonie/stats/communications/rentabilite.php b/htdocs/telephonie/stats/communications/rentabilite.php new file mode 100644 index 00000000000..ee728135445 --- /dev/null +++ b/htdocs/telephonie/stats/communications/rentabilite.php @@ -0,0 +1,118 @@ + + * + * 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"); + +$page = $_GET["page"]; +$sortorder = $_GET["sortorder"]; + +if (!$user->rights->telephonie->lire) + accessforbidden(); + +llxHeader('','Telephonie - Statistiques'); + +/* + * Sécurité accés client + */ +if ($user->societe_id > 0) +{ + $action = ''; + $socidp = $user->societe_id; +} + +$h = 0; + +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/index.php'; +$head[$h][1] = "Global"; +$h++; +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/lastmonth.php'; +$head[$h][1] = "Durée"; +$h++; + +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/destmonth.php'; +$head[$h][1] = "Destinations"; +$h++; + +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/rentabilite.php'; +$head[$h][1] = "Rentabilite"; +$hselected = $h; +$h++; + +$head[$h][0] = DOL_URL_ROOT.'/telephonie/stats/communications/analyse.php'; +$head[$h][1] = "Analyse"; +$h++; + +dolibarr_fiche_head($head, $hselected, "Communications"); + +print ''; + +print ''; + +print '
'; + +$sql = "SELECT date_format(date, '%Y%m'), avg(cout_vente)"; +$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_communications_details"; +$sql .= " GROUP BY date_format(date, '%Y%m') DESC"; + +if ($db->query($sql)) +{ + $num = $db->num_rows(); + $i = 0; + $ligne = new LigneTel($db); + + print ''; + print ''; + print "\n"; + $var=True; + + while ($i < $num) + { + $row = $db->fetch_row(); + + $var=!$var; + + print ""; + print ''."\n"; + print '\n"; + + + print "\n"; + $i++; + } + print "
MoisMarge
'.$row[0].''.round($row[1],4)."
"; + $db->free(); +} +else +{ + print $db->error() . ' ' . $sql; +} + + +print '
'; + + + +print '
'; + +$db->close(); + +llxFooter("Dernière modification $Date$ révision $Revision$"); +?>