* Copyright (C) 2004-2010 Laurent Destailleur * Copyright (C) 2005-2011 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. */ /** * \file htdocs/societe/index.php * \ingroup societe * \brief Home page for third parties area * \version $Id$ */ require("../main.inc.php"); require_once(DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php'); // Security check $result=restrictedArea($user,'societe',0,'','','',''); $thirdparty_static = new Societe($db); $langs->load("companies"); /* * View */ $transAreaType = $langs->trans("ThirdPartiesArea"); $helpurl='EN:Module_ThirdParty|FR:Module_Tiers|ES:Módulo_Tierceros'; llxHeader("",$langs->trans("ThirdParties"),$helpurl); print_fiche_titre($transAreaType); print ''; print '

'; /* * Zone recherche tiers */ $rowspan=2; print ' '; print ''; print ''; print ""; print ''; print "'; print ''; print "'; //print ''; print ''; print " '.$langs->trans("Search").' "; print $langs->trans("Name").': "; print $langs->trans("Other").': "; /* * Nombre de tiers */ $third = array(); $total=0; $sql = "SELECT s.rowid, s.client, s.fournisseur"; $sql.= " FROM ".MAIN_DB_PREFIX."societe as s"; if (! $user->rights->societe->client->voir) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE s.entity = ".$conf->entity; if (! $user->rights->societe->client->voir) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; $result = $db->query($sql); if ($result) { while ($objp = $db->fetch_object($result)) { if ($objp->client == 1 || $objp->client == 3) $third['customer']++; if ($objp->client == 2 || $objp->client == 3) $third['prospect']++; if ($objp->fournisseur) $third['supplier']++; $total++; } } else dol_print_error($db); print ''; print ''; if ($conf->societe->enabled) { if (empty($conf->global->SOCIETE_DISABLE_PROSPECTS)) { $statProducts = ""; $statProducts.= ''; $statProducts.= ""; } $statProducts.= ""; $statProducts.= ''; $statProducts.= ""; } if ($conf->fournisseur->enabled) { $statServices = ""; $statServices.= ''; $statServices.= ""; } print $statProducts; print $statServices; print ''; print ' '.$langs->trans("Statistics").' '.$langs->trans("Prospects").' '.round($third['prospect']).' '.$langs->trans("Customers").' '.round($third['customer']).' '.$langs->trans("Suppliers").' '.round($third['supplier']).' '.$langs->trans("UniqueThirdParties").' '; print $total; print ' '; print '

'; /* * Last third parties modified */ $max=15; $sql = "SELECT s.rowid, s.nom, s.client, s.fournisseur,"; $sql.= " s.tms as datem"; $sql.= " FROM ".MAIN_DB_PREFIX."societe as s"; if (! $user->rights->societe->client->voir) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE s.entity = ".$conf->entity; if (! $user->rights->societe->client->voir) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; $sql.= " AND ("; if (! empty($conf->societe->enabled)) $sql.=" s.client IN (1,2,3)"; if (! empty($conf->fournisseur->enabled)) $sql.=" OR s.fournisseur IN (1)"; $sql.= ")"; $sql.= $db->order("s.tms","DESC"); $sql.= $db->plimit($max,0); //print $sql; $result = $db->query($sql) ; if ($result) { $num = $db->num_rows($result); $i = 0; if ($num > 0) { $transRecordedType = $langs->trans("LastModifiedThirdParties",$max); print ''; print ''; $var=True; while ($i < $num) { $objp = $db->fetch_object($result); $var=!$var; print ""; // Name print '\n"; // Type print ''; // Last modified date print '"; // print '"; print "\n"; $i++; } $db->free(); print " '.$transRecordedType.' '; $thirdparty_static->id=$objp->rowid; $thirdparty_static->nom=$objp->nom; $thirdparty_static->client=$objp->client; $thirdparty_static->fournisseur=$objp->fournisseur; $thirdparty_static->datem=$db->jdate($objp->datem); print $thirdparty_static->getNomUrl(1,'',16); print " '; if ($thirdparty_static->client==1 || $thirdparty_static->client==3) { print "id."\">".$langs->trans("Customer")."\n"; } if ($thirdparty_static->client == 3 && empty($conf->global->SOCIETE_DISABLE_PROSPECTS)) print " / "; if (($thirdparty_static->client==2 || $thirdparty_static->client==3) && empty($conf->global->SOCIETE_DISABLE_PROSPECTS)) { print "id."\">".$langs->trans("Prospect")."\n"; } if ($conf->fournisseur->enabled && $thirdparty_static->fournisseur) { if ($thirdparty_static->client) print " / "; print ''.$langs->trans("Supplier").''; } print ' '; print dol_print_date($thirdparty_static->datem,'day'); print " '; // print $product_static->LibStatut($objp->tobuy,5,1); // print " "; } } else { dol_print_error($db); } print '

'; $db->close(); llxFooter('$Date$ - $Revision$'); ?>