* Copyright (C) 2005 Brice Davoleau * Copyright (C) 2005-2012 Regis Houssin * Copyright (C) 2006-2015 Laurent Destailleur * Copyright (C) 2007 Patrick Raguin * Copyright (C) 2010 Juanjo Menent * Copyright (C) 2015 Marcos García * * 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 3 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/agenda.php * \ingroup societe * \brief Page of third party events */ require '../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php'; require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php'; $langs->load("companies"); // Security check $socid = GETPOST('socid','int'); if ($user->societe_id) $socid=$user->societe_id; $result = restrictedArea($user, 'societe', $socid, '&societe'); // Initialize technical object to manage hooks of thirdparties. Note that conf->hooks_modules contains array array $hookmanager->initHooks(array('agendathirdparty')); /* * Actions */ $parameters=array('id'=>$socid); $reshook=$hookmanager->executeHooks('doActions',$parameters,$object,$action); // Note that $action and $object may have been modified by some hooks if ($reshook < 0) setEventMessages($hookmanager->error, $hookmanager->errors, 'errors'); /* * View */ $contactstatic = new Contact($db); $form = new Form($db); if ($socid) { require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php'; require_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php'; $langs->load("companies"); $object = new Societe($db); $result = $object->fetch($socid); $title=$langs->trans("Agenda"); if (! empty($conf->global->MAIN_HTML_TITLE) && preg_match('/thirdpartynameonly/',$conf->global->MAIN_HTML_TITLE) && $object->name) $title=$object->name." - ".$title; llxHeader('',$title); if (! empty($conf->notification->enabled)) $langs->load("mails"); $head = societe_prepare_head($object); dol_fiche_head($head, 'agenda', $langs->trans("ThirdParty"),0,'company'); print ''; print ''; // Alias names (commercial, trademark or alias names) print '"; if (! empty($conf->global->SOCIETE_USEPREFIX)) // Old not used prefix field { print ''; } if ($object->client) { print ''; } if ($object->fournisseur) { print ''; } if (! empty($conf->barcode->enabled)) { print ''; } print ""; // Zip / Town print '"; print '"; // Country if ($object->country) { print ''; } // EMail print ''; // Web print ''; // Phone / Fax print ''; print ''; print '

'.$langs->trans("ThirdPartyName").'	'; print $form->showrefnav($object,'socid','',($user->societe_id?0:1),'rowid','nom'); print '
'.$langs->trans('AliasNames').'	'; print $object->name_alias; print "
'.$langs->trans('Prefix').'	'.$object->prefix_comm.'
'; print $langs->trans('CustomerCode').'	'; print $object->code_client; if ($object->check_codeclient() <> 0) print ' ('.$langs->trans("WrongCustomerCode").')'; print '
'; print $langs->trans('SupplierCode').'	'; print $object->code_fournisseur; if ($object->check_codefournisseur() <> 0) print ' ('.$langs->trans("WrongSupplierCode").')'; print '
'.$langs->trans('Gencod').'	'.$object->barcode.'
".$langs->trans('Address')."	"; dol_print_address($object->address, 'gmap', 'thirdparty', $object->id); print "
'.$langs->trans('Zip').'	'.$object->zip."	'.$langs->trans('Town').'	'.$object->town."
'.$langs->trans('Country').'	'; //$img=picto_from_langcode($object->country_code); $img=''; print ($img?$img.' ':''); print $object->country; print '
'.$langs->trans('EMail').'	'; print dol_print_email($object->email,0,$object->id,'AC_EMAIL'); print '
'.$langs->trans('Web').'	'; print dol_print_url($object->url); print '
'.$langs->trans('Phone').'	'.dol_print_phone($object->phone,$object->country_code,0,$object->id,'AC_TEL').'	'.$langs->trans('Fax').'	'.dol_print_phone($object->fax,$object->country_code,0,$object->id,'AC_FAX').'

'; print ''; /* * Barre d'action */ print '

'; if (! empty($conf->agenda->enabled)) { if (! empty($user->rights->agenda->myactions->create) || ! empty($user->rights->agenda->allactions->create)) { print ''.$langs->trans("AddAction").''; } else { print ''.$langs->trans("AddAction").''; } } print '

'; print '
'; $objthirdparty=$object; $objcon=new stdClass(); $out=''; $permok=$user->rights->agenda->myactions->create; if ((! empty($objthirdparty->id) || ! empty($objcon->id)) && $permok) { $out.=''; $out.=$langs->trans("AddAnAction").' '; $out.=img_picto($langs->trans("AddAnAction"),'filenew'); $out.=""; } print load_fiche_titre($langs->trans("ActionsOnCompany"),$out,''); // List of todo actions show_actions_todo($conf,$langs,$db,$object); // List of done actions show_actions_done($conf,$langs,$db,$object); } llxFooter(); $db->close();