* Copyright (C) 2004-2011 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, see . */ /** * \file htdocs/societe/index.php * \ingroup societe * \brief Home page for third parties area * \version $Id: index.php,v 1.17 2011/07/31 23:22:57 eldy Exp $ */ 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_Third_Parties|FR:Module_Tiers|ES:Módulo_Tierceros'; llxHeader("",$langs->trans("ThirdParties"),$helpurl); print_fiche_titre($transAreaType); print ''; print '
'; /* * Search area */ $rowspan=2; print '
'; print ''; print ''; print ""; print ''; print "'; print ''; print "'; //print ''; print ''; print "
'.$langs->trans("Search").'
"; print $langs->trans("Name").':
"; print $langs->trans("Other").':

"; /* * Statistics area */ $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)) { $found=0; if ($conf->societe->enabled && empty($conf->global->SOCIETE_DISABLE_CUSTOMERS_STATS) && ($objp->client == 1 || $objp->client == 3)) { $found=1; $third['customer']++; } if ($conf->societe->enabled && empty($conf->global->SOCIETE_DISABLE_PROSPECTS_STATS) && ($objp->client == 2 || $objp->client == 3)) { $found=1; $third['prospect']++; } if ($conf->fournisseur->enabled && empty($conf->global->SOCIETE_DISABLE_SUPPLIERS_STATS) && $objp->fournisseur) { $found=1; $third['supplier']++; } if ($found) $total++; } } else dol_print_error($db); print ''; print ''; if ($conf->use_javascript_ajax && ((round($third['prospect'])?1:0)+(round($third['customer'])?1:0)+(round($third['supplier'])?1:0) >= 2)) { print ''; } else { if ($conf->societe->enabled && empty($conf->global->SOCIETE_DISABLE_PROSPECTS_STATS)) { $statstring = ""; $statstring.= ''; $statstring.= ""; } if ($conf->societe->enabled && empty($conf->global->SOCIETE_DISABLE_CUSTOMERS_STATS)) { $statstring.= ""; $statstring.= ''; $statstring.= ""; } if ($conf->fournisseur->enabled && empty($conf->global->SOCIETE_DISABLE_SUPPLIERS_STATS)) { $statstring2 = ""; $statstring2.= ''; $statstring2.= ""; } print $statstring; print $statstring2; } print ''; print '
'.$langs->trans("Statistics").'
'; $dataseries=array(); if ($conf->societe->enabled && empty($conf->global->SOCIETE_DISABLE_PROSPECTS_STATS)) $dataseries[]=array('label'=>$langs->trans("Prospects"),'values'=>array(round($third['prospect']))); if ($conf->societe->enabled && empty($conf->global->SOCIETE_DISABLE_CUSTOMERS_STATS)) $dataseries[]=array('label'=>$langs->trans("Customers"),'values'=>array(round($third['customer']))); if ($conf->fournisseur->enabled && empty($conf->global->SOCIETE_DISABLE_SUPPLIERS_STATS)) $dataseries[]=array('label'=>$langs->trans("Suppliers"),'values'=>array(round($third['supplier']))); $data=array('series'=>$dataseries); dol_print_graph('stats',300,180,$data,1,'pie',0); print '
'.$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 as name, s.client, s.fournisseur, s.canvas, s.tms as datem, s.status as status"; $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 ''; print ''; 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.' '.$langs->trans('Status').'
'; $thirdparty_static->id=$objp->rowid; $thirdparty_static->name=$objp->name; $thirdparty_static->client=$objp->client; $thirdparty_static->fournisseur=$objp->fournisseur; $thirdparty_static->datem=$db->jdate($objp->datem); $thirdparty_static->status=$objp->status; $thirdparty_static->canvas=$objp->canvas; print $thirdparty_static->getNomUrl(1,'',16); print "'; if ($thirdparty_static->client==1 || $thirdparty_static->client==3) { $thirdparty_static->name=$langs->trans("Customer"); print $thirdparty_static->getNomUrl(0,'customer'); } 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)) { $thirdparty_static->name=$langs->trans("Prospect"); print $thirdparty_static->getNomUrl(0,'prospect'); } if ($conf->fournisseur->enabled && $thirdparty_static->fournisseur) { if ($thirdparty_static->client) print " / "; $thirdparty_static->name=$langs->trans("Supplier"); print $thirdparty_static->getNomUrl(0,'supplier'); } print ''; print dol_print_date($thirdparty_static->datem,'day'); print "'; print $thirdparty_static->getLibStatut(3); print "
"; } } else { dol_print_error($db); } print '
'; $db->close(); llxFooter('$Date: 2011/07/31 23:22:57 $ - $Revision: 1.17 $'); ?>