* Copyright (C) 2005 Brice Davoleau * Copyright (C) 2005-2009 Regis Houssin * Copyright (C) 2006-2010 Laurent Destailleur * Copyright (C) 2007 Patrick Raguin * * 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/agenda.php * \ingroup societe * \brief Page of third party events * \version $Id$ */ require("../main.inc.php"); require_once(DOL_DOCUMENT_ROOT."/contact/contact.class.php"); require_once(DOL_DOCUMENT_ROOT."/compta/facture/facture.class.php"); $langs->load("companies"); $mesg=isset($_GET["mesg"])?'

'.$_GET["mesg"].'

':''; // Security check $socid = isset($_GET["socid"])?$_GET["socid"]:''; if ($user->societe_id) $socid=$user->societe_id; $result = restrictedArea($user, 'societe', $socid); /* * Actions */ /* * View */ $contactstatic = new Contact($db); $html = new Form($db); /* * Fiche categorie de client et/ou fournisseur */ if ($_GET["socid"]) { require_once(DOL_DOCUMENT_ROOT."/lib/company.lib.php"); require_once(DOL_DOCUMENT_ROOT."/societe/societe.class.php"); $langs->load("companies"); $soc = new Societe($db); $result = $soc->fetch($_GET["socid"]); llxHeader("","",$langs->trans("Category")); $head = societe_prepare_head($soc); dol_fiche_head($head, 'agenda', $langs->trans("ThirdParty"),0,'company'); print ''; print ''; print ''; if ($soc->client) { print ''; } if ($soc->fournisseur) { print ''; } if ($conf->global->MAIN_MODULE_BARCODE) { print ''; } print ""; print '"; print '"; if ($soc->pays) { print ''; } print ''; print ''; // EMail print ''; // Web print ''; // Assujeti a TVA ou pas print ''; print ''; print ''; print '

'.$langs->trans("Name").'	'; print $html->showrefnav($soc,'socid','',1,'rowid','nom'); print '
'.$langs->trans('Prefix').'	'.$soc->prefix_comm.'
'; print $langs->trans('CustomerCode').'	'; print $soc->code_client; if ($soc->check_codeclient() <> 0) print ' ('.$langs->trans("WrongCustomerCode").')'; print '
'; print $langs->trans('SupplierCode').'	'; print $soc->code_fournisseur; if ($soc->check_codefournisseur() <> 0) print ' ('.$langs->trans("WrongSupplierCode").')'; print '
'.$langs->trans('Gencod').'	'.$soc->gencod.'
".$langs->trans('Address')."	".nl2br($soc->address)."
'.$langs->trans('Zip').'	'.$soc->cp."	'.$langs->trans('Town').'	'.$soc->ville."
'.$langs->trans('Country').'	'.$soc->pays.'
'.$langs->trans('Phone').'	'.dol_print_phone($soc->tel,$soc->pays_code,0,$soc->id,'AC_TEL').'	'.$langs->trans('Fax').'	'.dol_print_phone($soc->fax,$soc->pays_code,0,$soc->id,'AC_FAX').'
'.$langs->trans('EMail').'	'; print dol_print_email($soc->email,0,$soc->id,'AC_EMAIL'); print '	'.$langs->trans('Web').'	'; print dol_print_url($soc->url); print '
'.$langs->trans('VATIsUsed').'	'; print yn($soc->tva_assuj); print '

'; print ''; if ($mesg) print($mesg); /* * Listes des actions a faire */ show_actions_todo($conf,$langs,$db,$soc); /* * Listes des actions effectuees */ show_actions_done($conf,$langs,$db,$soc); } $db->close(); llxFooter('$Date$ - $Revision$'); ?>