* Copyright (C) 2004-2011 Laurent Destailleur * Copyright (C) 2005-2009 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/comm/propal/index.php * \ingroup propal * \brief Home page of proposal area * \version $Id: index.php,v 1.7 2011/08/03 00:46:34 eldy Exp $ */ require("../../main.inc.php"); require_once(DOL_DOCUMENT_ROOT."/core/class/html.formfile.class.php"); require_once(DOL_DOCUMENT_ROOT ."/comm/propal/class/propal.class.php"); if (!$user->rights->propale->lire) accessforbidden(); $langs->load("propal"); // Security check $socid=''; if ($_GET["socid"]) { $socid=$_GET["socid"]; } if ($user->societe_id > 0) { $action = ''; $socid = $user->societe_id; } /* * View */ $propal_static=new Propal($db); $html = new Form($db); $formfile = new FormFile($db); $help_url="EN:Module_Commercial_Proposals|FR:Module_Propositions_commerciales|ES:Módulo Presupuestos"; llxHeader("",$langs->trans("ProspectionArea"),$help_url); print_fiche_titre($langs->trans("ProspectionArea")); print ''; print '

'; /* * Search form */ $var=false; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print " '.$langs->trans("SearchPropal").' '; print $langs->trans("Ref").': '.$langs->trans("Other").': \n"; /* * Statistics */ $sql = "SELECT count(cf.rowid), cf.fk_statut"; $sql.= " FROM ".MAIN_DB_PREFIX."societe as s"; $sql.= ", ".MAIN_DB_PREFIX."propal as cf"; if (!$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE cf.fk_soc = s.rowid"; $sql.= " AND s.entity = ".$conf->entity; if ($user->societe_id) $sql.=' AND cf.fk_soc = '.$user->societe_id; if (!$user->rights->societe->client->voir && !$socid) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; $sql.= " AND cf.fk_statut in (0,1,2,3,4)"; $sql.= " GROUP BY cf.fk_statut"; $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; $total=0; $totalinprocess=0; $dataseries=array(); $vals=array(); // -1=Canceled, 0=Draft, 1=Validated, (2=Accepted/On process not managed for customer orders), 3=Closed (Sent/Received, billed or not) while ($i < $num) { $row = $db->fetch_row($resql); if ($row) { //if ($row[1]!=-1 && ($row[1]!=3 || $row[2]!=1)) { $vals[$row[1]]=$row[0]; $totalinprocess+=$row[0]; } $total+=$row[0]; } $i++; } $db->free($resql); print ''; print ''."\n"; $var=true; $listofstatus=array(0,1,2,3,4); foreach ($listofstatus as $status) { $dataseries[]=array('label'=>$propal_static->LibStatut($status,1),'values'=>array(0=>(isset($vals[$status])?$vals[$status]:0))); if (! $conf->use_javascript_ajax) { $var=!$var; print ""; print ''; print ''; print "\n"; } } if ($conf->use_javascript_ajax) { print ''; } //if ($totalinprocess != $total) //print ''; print ''; print " '.$langs->trans("Statistics").' - '.$langs->trans("Proposals").' '.$propal_static->LibStatut($status,0).' '.(isset($vals[$status])?$vals[$status]:0).' '; $data=array('series'=>$dataseries); dol_print_graph('stats',300,180,$data,1,'pie',1); print ' '.$langs->trans("Total").' ('.$langs->trans("CustomersOrdersRunning").') '.$totalinprocess.' '.$langs->trans("Total").' '.$total.' "; } else { dol_print_error($db); } /* * Draft proposals */ if ($conf->propal->enabled) { $sql = "SELECT c.rowid, c.ref, s.nom, s.rowid as socid"; $sql.= " FROM ".MAIN_DB_PREFIX."propal as c"; $sql.= ", ".MAIN_DB_PREFIX."societe as s"; if (!$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE c.fk_soc = s.rowid"; $sql.= " AND c.entity = ".$conf->entity; $sql.= " AND c.fk_statut = 0"; if ($socid) $sql.= " AND c.fk_soc = ".$socid; if (!$user->rights->societe->client->voir && !$socid) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; $resql=$db->query($sql); if ($resql) { print ''; print ''; print ''; $langs->load("propal"); $num = $db->num_rows($resql); if ($num) { $i = 0; $var = True; while ($i < $num) { $var=!$var; $obj = $db->fetch_object($resql); print ""; print '"; print ''; $i++; } } print " '.$langs->trans("DraftPropals").' '; print "rowid."\">".img_object($langs->trans("ShowPropal"),"propal").' '.$obj->ref." '.img_object($langs->trans("ShowCompany"),"company").' '.dol_trunc($obj->nom,24).' "; } } print '

'; $max=5; /* * Last modified proposals */ $sql = "SELECT c.rowid, c.ref, c.fk_statut, s.nom, s.rowid as socid,"; $sql.= " date_cloture as datec"; $sql.= " FROM ".MAIN_DB_PREFIX."propal as c"; $sql.= ", ".MAIN_DB_PREFIX."societe as s"; if (!$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE c.fk_soc = s.rowid"; $sql.= " AND c.entity = ".$conf->entity; //$sql.= " AND c.fk_statut > 2"; if ($socid) $sql .= " AND c.fk_soc = ".$socid; if (!$user->rights->societe->client->voir && !$socid) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; $sql.= " ORDER BY c.tms DESC"; $sql.= $db->plimit($max, 0); $resql=$db->query($sql); if ($resql) { print ''; print ''; print ''; $num = $db->num_rows($resql); if ($num) { $i = 0; $var = True; while ($i < $num) { $var=!$var; $obj = $db->fetch_object($resql); print ""; print ''; print ''; print ''; print ''; print ''; $i++; } } print " '.$langs->trans("LastModifiedProposals",$max).' '; $propal_static->id=$obj->rowid; $propal_static->ref=$obj->ref; print ''; print ''; print ''; print ' '; print $propal_static->getNomUrl(1); print ' '; print ' '; print ' '; $filename=dol_sanitizeFileName($obj->ref); $filedir=$conf->propale->dir_output . '/' . dol_sanitizeFileName($obj->ref); $urlsource=$_SERVER['PHP_SELF'].'?id='.$obj->rowid; $formfile->show_documents('commande',$filename,$filedir,$urlsource,'','','',1,'',1); print ' '; print ' '.img_object($langs->trans("ShowCompany"),"company").' '.$obj->nom.' '.dol_print_date($db->jdate($obj->datec),'day').' '.$propal_static->LibStatut($obj->fk_statut,5).' "; } else dol_print_error($db); /* * Proposals to process */ /* if ($conf->propal->enabled) { $sql = "SELECT c.rowid, c.ref, c.fk_statut, s.nom, s.rowid as socid"; $sql.=" FROM ".MAIN_DB_PREFIX."propal as c"; $sql.= ", ".MAIN_DB_PREFIX."societe as s"; if (!$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE c.fk_soc = s.rowid"; $sql.= " AND c.entity = ".$conf->entity; $sql.= " AND c.fk_statut = 1"; if ($socid) $sql.= " AND c.fk_soc = ".$socid; if (!$user->rights->societe->client->voir && !$socid) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; $sql.= " ORDER BY c.rowid DESC"; $resql=$db->query($sql); if ($resql) { $num = $db->num_rows($resql); print ''; print ''; print ''; if ($num) { $i = 0; $var = True; while ($i < $num) { $var=!$var; $obj = $db->fetch_object($resql); print ""; print ''; print ''; print ''; print ''; $i++; } } print " '.$langs->trans("ProposalsToProcess").' ('.$num.') '; $propal_static->id=$obj->rowid; $propal_static->ref=$obj->ref; print ''; print ''; print ''; print ' '; print $propal_static->getNomUrl(1); print ' '; print ' '; print ' '; $filename=dol_sanitizeFileName($obj->ref); $filedir=$conf->commande->dir_output . '/' . dol_sanitizeFileName($obj->ref); $urlsource=$_SERVER['PHP_SELF'].'?id='.$obj->rowid; $formfile->show_documents('commande',$filename,$filedir,$urlsource,'','','',1,'',1); print ' '; print ' '.img_object($langs->trans("ShowCompany"),"company").' '.dol_trunc($obj->nom,24).' '.$propal_static->LibStatut($obj->fk_statut,$obj->facture,5).' "; } else dol_print_error($db); } */ /* * Proposal that are in a shipping process */ /*if ($conf->propal->enabled) { $sql = "SELECT c.rowid, c.ref, c.fk_statut, c.facture, s.nom, s.rowid as socid"; $sql.= " FROM ".MAIN_DB_PREFIX."commande as c"; $sql.= ", ".MAIN_DB_PREFIX."societe as s"; if (!$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE c.fk_soc = s.rowid"; $sql.= " AND c.entity = ".$conf->entity; $sql.= " AND c.fk_statut = 2 "; if ($socid) $sql.= " AND c.fk_soc = ".$socid; if (!$user->rights->societe->client->voir && !$socid) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; $sql.= " ORDER BY c.rowid DESC"; $resql=$db->query($sql); if ($resql) { $num = $db->num_rows($resql); print ''; print ''; print ''; if ($num) { $i = 0; $var = True; while ($i < $num) { $var=!$var; $obj = $db->fetch_object($resql); print ""; print ''; print ''; print ''; print ''; $i++; } } print " '.$langs->trans("OnProcessOrders").' ('.$num.') '; $propal_static->id=$obj->rowid; $propal_static->ref=$obj->ref; print ''; print ''; print ''; print ' '; print $propal_static->getNomUrl(1); print ' '; print ' '; print ' '; $filename=dol_sanitizeFileName($obj->ref); $filedir=$conf->commande->dir_output . '/' . dol_sanitizeFileName($obj->ref); $urlsource=$_SERVER['PHP_SELF'].'?id='.$obj->rowid; $formfile->show_documents('commande',$filename,$filedir,$urlsource,'','','',1,'',1); print ' '; print ' '.img_object($langs->trans("ShowCompany"),"company").' '.$obj->nom.' '.$propal_static->LibStatut($obj->fk_statut,$obj->facture,5).' "; } else dol_print_error($db); } */ print '

'; $db->close(); llxFooter('$Date: 2011/08/03 00:46:34 $ - $Revision: 1.7 $'); ?>