* Copyright (C) 2004-2006 Laurent Destailleur * Copyright (C) 2005-2006 Regis Houssin * * 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$ */ /** \file htdocs/fourn/stats.php \ingroup fournisseur \brief Page accueil de la zone fournisseurs \version $Revision$ */ require("./pre.inc.php"); if (!$user->rights->societe->lire) accessforbidden(); $page = isset($_GET["page"])?$_GET["page"]:''; $sortorder = isset($_GET["sortorder"])?$_GET["sortorder"]:''; $sortfield = isset($_GET["sortfield"])?$_GET["sortfield"]:''; $socname = isset($_GET["socname"])?$_GET["socname"]:''; $search_nom = isset($_GET["search_nom"])?$_GET["search_nom"]:''; $search_ville = isset($_GET["search_ville"])?$_GET["search_ville"]:''; $langs->load("suppliers"); $langs->load("orders"); $langs->load("companies"); // Sécurité accés client $socid=''; if ($user->societe_id > 0) { $action = ''; $socid = $user->societe_id; } if ($page == -1) { $page = 0 ; } $offset = $conf->liste_limit * $page ; if (! $sortorder) $sortorder="ASC"; if (! $sortfield) $sortfield="year"; $years=array(); $fourns=array(); /* * Affichage liste * */ llxHeader(); $sql = "SELECT s.idp, s.nom, s.ville, ca.ca_genere as ca, ca.year"; $sql.= " , code_fournisseur, code_compta_fournisseur"; if (!$user->rights->commercial->client->voir && !$socid) $sql .= ", sc.fk_soc, sc.fk_user "; $sql.= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."c_stcomm as st, ".MAIN_DB_PREFIX."fournisseur_ca as ca"; if ($_GET["cat"]) $sql .= ", ".MAIN_DB_PREFIX."categorie_fournisseur as cf"; if (!$user->rights->commercial->client->voir && !$socid) $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE s.fk_stcomm = st.id AND s.fournisseur=1 AND s.idp = ca.fk_societe"; if ($_GET["cat"]) $sql .= " AND cf.fk_societe=s.idp AND cf.fk_categorie='".$_GET["cat"]."'"; if (!$user->rights->commercial->client->voir && !$socid) $sql .= " AND s.idp = sc.fk_soc AND sc.fk_user = " .$user->id; if ($socid) $sql .= " AND s.idp=".$socid; if ($socname) { $sql .= " AND lower(s.nom) like '%".strtolower($socname)."%'"; $sortfield = "lower(s.nom)"; $sortorder = "ASC"; } if ($search_nom) { $sql .= " AND s.nom LIKE '%".$search_nom."%'"; } if ($search_ville) { $sql .= " AND s.ville LIKE '%".$search_ville."%'"; } $sql .= " AND ca.year > (date_format(now(),'%Y') - 5)"; $sql .= " ORDER BY $sortfield $sortorder " . $db->plimit($conf->liste_limit+1, $offset); $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; while ($i < min($num,$conf->liste_limit)) { $obj = $db->fetch_object($resql); $var=!$var; $i++; $fourns[$obj->idp] = $obj->nom; $years[$obj->year] = $obj->year; $ca[$obj->idp][$obj->year] = $obj->ca; } } else { dolibarr_print_error($db); } print_barre_liste($langs->trans("SuppliersProductsSellSalesTurnover"), $page, "stats.php", "", $sortfield, $sortorder, '', $num); print '

'; print ''; print ''; print_liste_field_titre($langs->trans("Company"),$_SERVER["PHP_SELF"],"s.nom","","",'valign="middle"',$sortfield); print_liste_field_titre($langs->trans("Town"),$_SERVER["PHP_SELF"],"s.ville","","",'valign="middle"',$sortfield); print ''; foreach($years as $year) { print ''; } print ''; print "\n"; print ''; print ''; print ''; foreach($years as $year) { print ''; } print ''; print ''; $var=True; foreach($fourns as $fid => $fnom) { $var=!$var; print ""; print '\n"; print "\n"; print ''; foreach($years as $year) { print ''; } print ''; print "\n"; } print "

	'.$langs->trans("CA") .' '.$year.'
		'; print '
'.img_object($langs->trans("ShowSupplier"),"company").''; print " $fnom	".$obj->ville."	'.$obj->code_fournisseur.'	'.price($ca[$fid][$year]).'

\n"; print "

\n"; $db->free($resql); $db->close(); llxFooter('$Date$ - $Revision$'); ?>