* Copyright (C) 2004-2008 Laurent Destailleur * Copyright (C) 2005-2008 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/comm/prospect/fiche.php \ingroup prospect \brief Page de la fiche prospect \version $Id$ */ require_once("./pre.inc.php"); require_once(DOL_DOCUMENT_ROOT."/lib/company.lib.php"); require_once(DOL_DOCUMENT_ROOT."/prospect.class.php"); require_once(DOL_DOCUMENT_ROOT."/html.formcompany.class.php"); require_once(DOL_DOCUMENT_ROOT."/contact.class.php"); require_once(DOL_DOCUMENT_ROOT."/actioncomm.class.php"); if ($conf->propal->enabled) require_once(DOL_DOCUMENT_ROOT."/propal.class.php"); $langs->load('companies'); $langs->load('projects'); $langs->load('propal'); // Security check $socid = isset($_GET["socid"])?$_GET["socid"]:''; if ($user->societe_id) $socid=$user->societe_id; $result = restrictedArea($user, 'societe',$socid,''); /* * Actions */ if ($_GET["action"] == 'cstc') { $sql = "UPDATE ".MAIN_DB_PREFIX."societe SET fk_stcomm = ".$_GET["stcomm"]; $sql .= " WHERE rowid = ".$_GET["socid"]; $db->query($sql); } // set prospect level if ($_POST["action"] == 'setprospectlevel' && $user->rights->societe->creer) { $societe = new Societe($db, $_GET["socid"]); $societe->fk_prospectlevel=$_POST['prospect_level_id']; $sql = "UPDATE ".MAIN_DB_PREFIX."societe SET fk_prospectlevel='".$_POST['prospect_level_id']; $sql.= "' WHERE rowid='".$_GET["socid"]."'"; $result = $db->query($sql); if (! $result) dolibarr_print_error($result); } /********************************************************************************* * * Mode fiche * *********************************************************************************/ llxHeader(); $form=new Form($db); $formcompany=new FormCompany($db); if ($socid > 0) { $actionstatic=new ActionComm($db); $societe = new Prospect($db, $socid); $result = $societe->fetch($socid); if ($result < 0) { dolibarr_print_error($db); exit; } /* * Affichage onglets */ $head = societe_prepare_head($societe); dolibarr_fiche_head($head, 'prospect', $langs->trans("ThirdParty")); print "\n"; print '\n"; print '"; print "
'; print ''; print ''; print '"; print ''; // Country print ''; print ''; print '"; if ($societe->rubrique) { print ""; } print ''; // Level print '"; print ''; // Status print ''; print ''; print '
'.$langs->trans("Name").''.$societe->nom.'
'.$langs->trans("Address").''.nl2br($societe->adresse)."
'.$langs->trans('Zip').' / '.$langs->trans('Town').''.$societe->cp." ".$societe->ville.'
'.$langs->trans("Country").''; if ($societe->isInEEC()) print $form->textwithhelp($societe->pays,$langs->trans("CountryIsInEEC"),1,0); else print $societe->pays; print '
'.$langs->trans("Phone").''.dol_print_phone($societe->tel,$societe->pays_code,0,$societe->id,'AC_TEL').'Fax'.dol_print_phone($societe->fax,$societe->pays_code).'
'.$langs->trans("Web")."url\">$societe->url
Rubrique".$societe->rubrique."
'.$langs->trans('JuridicalStatus').''.$societe->forme_juridique.'
'; print ''; print '
'; print $langs->trans('ProspectLevelShort'); print ''; if (($_GET['action'] != 'editlevel') && $user->rights->societe->creer) print 'id.'">'.img_edit($langs->trans('SetLevel'),1).'
'; print '
'; if ($_GET['action'] == 'editlevel') { $formcompany->form_prospect_level($_SERVER['PHP_SELF'].'?socid='.$societe->id,$societe->fk_prospectlevel,'prospect_level_id',1); } else { print $societe->getLibLevel(); //$formcompany->form_prospect_level($_SERVER['PHP_SELF'].'?socid='.$objsoc->id,$objsoc->mode_reglement,'none'); } print "
'.$langs->trans("Status").''.$societe->getLibStatut(4).''; if ($societe->stcomm_id != -1) print ''.img_action(0,-1).''; if ($societe->stcomm_id != 0) print ''.img_action(0,0).''; if ($societe->stcomm_id != 1) print ''.img_action(0,1).''; if ($societe->stcomm_id != 2) print ''.img_action(0,2).''; if ($societe->stcomm_id != 3) print ''.img_action(0,3).''; print '
'; print "
'; // Nbre max d'éléments des petites listes $MAXLIST=5; $tableaushown=0; /* * Dernieres propales * */ if ($conf->propal->enabled) { $propal_static=new Propal($db); print ''; $sql = "SELECT s.nom, s.rowid as socid, p.rowid as propalid, p.fk_statut, p.total_ht, p.ref, p.remise, "; $sql.= " ".$db->pdate("p.datep")." as dp, ".$db->pdate("p.fin_validite")." as datelimite,"; $sql.= " c.label as statut, c.id as statutid"; $sql.= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."propal as p, ".MAIN_DB_PREFIX."c_propalst as c"; $sql.= " WHERE p.fk_soc = s.rowid AND p.fk_statut = c.id"; $sql.= " AND s.rowid = ".$societe->id; $sql.= " ORDER BY p.datep DESC"; $resql=$db->query($sql); if ($resql) { $var=true; $i = 0; $num = $db->num_rows($resql); if ($num > 0) { $tableaushown=1; print ''; print ''; print ''; } $now = gmmktime(); while ($i < $num && $i < $MAXLIST) { $objp = $db->fetch_object($resql); $var=!$var; print ""; print "\n"; print "\n"; print "\n"; $i++; } $db->free(); } else { dolibarr_print_error($db); } print "
'.$langs->trans("LastPropals",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllPropals").' ('.$num.')
propalid\">"; print img_object($langs->trans("ShowPropal"),"propal"); print " ".$objp->ref."\n"; if ( $objp->dp < ($now - $conf->propal->cloture->warning_delay) && $objp->fk_statut == 1 ) { print " ".img_warning(); } print "".dolibarr_print_date($objp->dp,"day")."".price($objp->total_ht)."".$propal_static->LibStatut($objp->fk_statut,5)."
"; } print "
\n\n"; /* * Barre d'action * */ print '
'; print ''.$langs->trans("AddContact").''; if ($conf->agenda->enabled) { // Updated by Matelli (See http://matelli.fr/showcases/patchs-dolibarr/add-action-button-behaviour.html) // Don't force the user to add a "todo action"; he could report an action that he did print ''.$langs->trans("AddAction").''; } if ($conf->propal->enabled && defined("MAIN_MODULE_PROPALE") && MAIN_MODULE_PROPALE && $user->rights->propale->creer) { print ''.$langs->trans("AddProp").''; } if ($conf->projet->enabled && $user->rights->projet->creer) { print ''.$langs->trans("AddProject").''; } print '
'; print '
'; /* * Liste des contacts */ show_contacts($conf,$langs,$db,$societe); /* * Listes des actions a faire */ show_actions_todo($conf,$langs,$db,$societe); /* * Listes des actions effectuees */ show_actions_done($conf,$langs,$db,$societe); } $db->close(); llxFooter('$Date$ - $Revision$'); ?>