From 33a8a3f4685ee39f425421c599b33545acc0820b Mon Sep 17 00:00:00 2001 From: defrance69 Date: Sat, 26 May 2012 12:13:07 +0300 Subject: [PATCH] Update htdocs/comm/fiche.php --- htdocs/comm/fiche.php | 1638 ++++++++++++++++++++--------------------- 1 file changed, 819 insertions(+), 819 deletions(-) diff --git a/htdocs/comm/fiche.php b/htdocs/comm/fiche.php index 0787a99c1ad..3e69bc63e62 100644 --- a/htdocs/comm/fiche.php +++ b/htdocs/comm/fiche.php @@ -1,825 +1,825 @@ - - * Copyright (C) 2004-2011 Laurent Destailleur - * Copyright (C) 2004 Eric Seigne - * Copyright (C) 2006 Andre Cianfarani - * Copyright (C) 2005-2012 Regis Houssin - * Copyright (C) 2008 Raphael Bertrand (Resultic) - * Copyright (C) 2010-2011 Juanjo Menent - * - * 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/fiche.php - * \ingroup commercial compta - * \brief Page to show customer card of a third party - */ - -require("../main.inc.php"); -require_once(DOL_DOCUMENT_ROOT."/core/lib/company.lib.php"); -require_once(DOL_DOCUMENT_ROOT."/core/lib/date.lib.php"); -require_once(DOL_DOCUMENT_ROOT."/contact/class/contact.class.php"); -if ($conf->facture->enabled) require_once(DOL_DOCUMENT_ROOT."/compta/facture/class/facture.class.php"); -if ($conf->propal->enabled) require_once(DOL_DOCUMENT_ROOT."/comm/propal/class/propal.class.php"); -if ($conf->commande->enabled) require_once(DOL_DOCUMENT_ROOT."/commande/class/commande.class.php"); -if ($conf->contrat->enabled) require_once(DOL_DOCUMENT_ROOT."/contrat/class/contrat.class.php"); -if ($conf->adherent->enabled) require_once(DOL_DOCUMENT_ROOT."/adherents/class/adherent.class.php"); -if ($conf->ficheinter->enabled) require_once(DOL_DOCUMENT_ROOT."/fichinter/class/fichinter.class.php"); - -$langs->load("companies"); -if ($conf->contrat->enabled) $langs->load("contracts"); -if ($conf->commande->enabled) $langs->load("orders"); -if ($conf->facture->enabled) $langs->load("bills"); -if ($conf->projet->enabled) $langs->load("projects"); -if ($conf->ficheinter->enabled) $langs->load("interventions"); -if ($conf->notification->enabled) $langs->load("mails"); - -// Security check -$id = (GETPOST('socid','int') ? GETPOST('socid','int') : GETPOST('id','int')); -if ($user->societe_id > 0) $id=$user->societe_id; -$result = restrictedArea($user,'societe',$id,'&societe'); - -$action = GETPOST('action'); -$mode = GETPOST("mode"); -$modesearch = GETPOST("mode_search"); - -$sortfield = GETPOST("sortfield",'alpha'); -$sortorder = GETPOST("sortorder",'alpha'); -$page = GETPOST("page",'int'); -if ($page == -1) { $page = 0; } -$offset = $conf->liste_limit * $page; -$pageprev = $page - 1; -$pagenext = $page + 1; -if (! $sortorder) $sortorder="ASC"; -if (! $sortfield) $sortfield="nom"; - -$object = new Societe($db); - -/* - * Actions - */ - -if ($action == 'setcustomeraccountancycode') -{ - $result=$object->fetch($id); - $object->code_compta=$_POST["customeraccountancycode"]; - $result=$object->update($object->id,$user,1,1,0); - if ($result < 0) - { - $mesg=join(',',$object->errors); - } - $action=""; -} - -// conditions de reglement -if ($action == 'setconditions' && $user->rights->societe->creer) -{ - $object->fetch($id); + + * Copyright (C) 2004-2011 Laurent Destailleur + * Copyright (C) 2004 Eric Seigne + * Copyright (C) 2006 Andre Cianfarani + * Copyright (C) 2005-2012 Regis Houssin + * Copyright (C) 2008 Raphael Bertrand (Resultic) + * Copyright (C) 2010-2011 Juanjo Menent + * + * 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/fiche.php + * \ingroup commercial compta + * \brief Page to show customer card of a third party + */ + +require("../main.inc.php"); +require_once(DOL_DOCUMENT_ROOT."/core/lib/company.lib.php"); +require_once(DOL_DOCUMENT_ROOT."/core/lib/date.lib.php"); +require_once(DOL_DOCUMENT_ROOT."/contact/class/contact.class.php"); +if ($conf->facture->enabled) require_once(DOL_DOCUMENT_ROOT."/compta/facture/class/facture.class.php"); +if ($conf->propal->enabled) require_once(DOL_DOCUMENT_ROOT."/comm/propal/class/propal.class.php"); +if ($conf->commande->enabled) require_once(DOL_DOCUMENT_ROOT."/commande/class/commande.class.php"); +if ($conf->contrat->enabled) require_once(DOL_DOCUMENT_ROOT."/contrat/class/contrat.class.php"); +if ($conf->adherent->enabled) require_once(DOL_DOCUMENT_ROOT."/adherents/class/adherent.class.php"); +if ($conf->ficheinter->enabled) require_once(DOL_DOCUMENT_ROOT."/fichinter/class/fichinter.class.php"); + +$langs->load("companies"); +if ($conf->contrat->enabled) $langs->load("contracts"); +if ($conf->commande->enabled) $langs->load("orders"); +if ($conf->facture->enabled) $langs->load("bills"); +if ($conf->projet->enabled) $langs->load("projects"); +if ($conf->ficheinter->enabled) $langs->load("interventions"); +if ($conf->notification->enabled) $langs->load("mails"); + +// Security check +$id = (GETPOST('socid','int') ? GETPOST('socid','int') : GETPOST('id','int')); +if ($user->societe_id > 0) $id=$user->societe_id; +$result = restrictedArea($user,'societe',$id,'&societe'); + +$action = GETPOST('action'); +$mode = GETPOST("mode"); +$modesearch = GETPOST("mode_search"); + +$sortfield = GETPOST("sortfield",'alpha'); +$sortorder = GETPOST("sortorder",'alpha'); +$page = GETPOST("page",'int'); +if ($page == -1) { $page = 0; } +$offset = $conf->liste_limit * $page; +$pageprev = $page - 1; +$pagenext = $page + 1; +if (! $sortorder) $sortorder="ASC"; +if (! $sortfield) $sortfield="nom"; + +$object = new Societe($db); + +/* + * Actions + */ + +if ($action == 'setcustomeraccountancycode') +{ + $result=$object->fetch($id); + $object->code_compta=$_POST["customeraccountancycode"]; + $result=$object->update($object->id,$user,1,1,0); + if ($result < 0) + { + $mesg=join(',',$object->errors); + } + $action=""; +} + +// conditions de reglement +if ($action == 'setconditions' && $user->rights->societe->creer) +{ + $object->fetch($id); $result=$object->setPaymentTerms(GETPOST('cond_reglement_id','int')); - if ($result < 0) dol_print_error($db,$object->error); -} -// mode de reglement -if ($action == 'setmode' && $user->rights->societe->creer) -{ - $object->fetch($id); + if ($result < 0) dol_print_error($db,$object->error); +} +// mode de reglement +if ($action == 'setmode' && $user->rights->societe->creer) +{ + $object->fetch($id); $result=$object->setPaymentMethods(GETPOST('mode_reglement_id','int')); - if ($result < 0) dol_print_error($db,$object->error); -} -// assujetissement a la TVA -if ($action == 'setassujtva' && $user->rights->societe->creer) -{ - $object->fetch($id); - $object->tva_assuj=$_POST['assujtva_value']; - - // TODO move to DAO class - $sql = "UPDATE ".MAIN_DB_PREFIX."societe SET tva_assuj='".$_POST['assujtva_value']."' WHERE rowid='".$id."'"; - $result = $db->query($sql); - if (! $result) dol_print_error($result); -} - - - -/* - * View - */ - -llxHeader('',$langs->trans('CustomerCard')); - - -$contactstatic = new Contact($db); -$userstatic=new User($db); -$form = new Form($db); - - -if ($mode == 'search') -{ - if ($modesearch == 'soc') - { - // TODO move to DAO class - $sql = "SELECT s.rowid"; - if (!$user->rights->societe->client->voir && !$id) $sql .= ", sc.fk_soc, sc.fk_user "; - $sql .= " FROM ".MAIN_DB_PREFIX."societe as s"; - if (!$user->rights->societe->client->voir && !$id) $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; - $sql .= " WHERE lower(s.nom) like '%".strtolower($socname)."%'"; - if (!$user->rights->societe->client->voir && !$id) $sql .= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; - } - - $resql=$db->query($sql); - if ($resql) - { - if ( $db->num_rows($resql) == 1) - { - $obj = $db->fetch_object($resql); - $id = $obj->rowid; - } - $db->free($resql); - } -} - - -if ($id > 0) -{ - // Load data of third party - $object->fetch($id); - if ($object->id <= 0) - { - dol_print_error($db,$object->error); - } - - if ($errmesg) - { - print "".$errmesg."
"; - } - - /* - * Affichage onglets - */ - - $head = societe_prepare_head($object); - - dol_fiche_head($head, 'customer', $langs->trans("ThirdParty"),0,'company'); - - - print ''; - print '\n"; - - - print '"; - print "
'; - - print ''; - - print ''; - - // Prefix - if (! empty($conf->global->SOCIETE_USEPREFIX)) // Old not used prefix field - { - print ''; - } - - if ($object->client) - { - $langs->load("compta"); - - print ''; - - print ''; - print ''; - print ''; - } - - // Address - print '"; - - // Zip / Town - print ''; - print '"; - print ''; - - // Country - print ''; - - // Phone - print ''; - - // Fax - print ''; - - // EMail - print ''; - - // Web - print ''; - - // Assujeti a TVA ou pas - print ''; - print ''; - print ''; - - // Local Taxes - if($mysoc->country_code=='ES') - { - if($mysoc->localtax1_assuj=="1" && $mysoc->localtax2_assuj=="1") - { - print ''; - print ''; - } - elseif($mysoc->localtax1_assuj=="1") - { - print ''; - } - elseif($mysoc->localtax2_assuj=="1") - { - print ''; - } - } - - // TVA Intra - print ''; - - // Conditions de reglement par defaut - $langs->load('bills'); - $form = new Form($db); - print '"; - print ''; - - // Mode de reglement par defaut - print '"; - print ''; - - // Relative discounts (Discounts-Drawbacks-Rebates) - print ''; - print ''; - - // Absolute discounts (Discounts-Drawbacks-Rebates) - print ''; - print ''; - print ''; - - // Multiprice level - if ($conf->global->PRODUIT_MULTIPRICES) - { - print '"; - print ''; - } - - // Module Adherent - if ($conf->adherent->enabled) - { - $langs->load("members"); - $langs->load("users"); - print ''; - print ''; - print "\n"; - } - - print "
'.$langs->trans("ThirdPartyName").''; - $object->next_prev_filter="te.client in (1,3)"; - print $form->showrefnav($object,'socid','',($user->societe_id?0:1),'rowid','nom','',''); - print '
'.$langs->trans("Prefix").''; - print ($object->prefix_comm?$object->prefix_comm:' '); - print '
'; - print $langs->trans('CustomerCode').''; - print $object->code_client; - if ($object->check_codeclient() <> 0) print ' ('.$langs->trans("WrongCustomerCode").')'; - print '
'; - print $form->editfieldkey("CustomerAccountancyCode",'customeraccountancycode',$object->code_compta,$object,$user->rights->societe->creer); - print ''; - print $form->editfieldval("CustomerAccountancyCode",'customeraccountancycode',$object->code_compta,$object,$user->rights->societe->creer); - print '
'.$langs->trans('Address').''; - dol_print_address($object->address,'gmap','thirdparty',$object->id); - print "
'.$langs->trans('Zip').' / '.$langs->trans('Town').''.$object->zip.(($object->zip && $object->town)?' / ':'').$object->town."
'.$langs->trans("Country").''; - $img=picto_from_langcode($object->country_code); - if ($object->isInEEC()) print $form->textwithpicto(($img?$img.' ':'').$object->country,$langs->trans("CountryIsInEEC"),1,0); - else print ($img?$img.' ':'').$object->country; - print '
'.$langs->trans('Phone').''.dol_print_phone($object->tel,$object->country_code,0,$object->id,'AC_TEL').''.$langs->trans('Fax').''.dol_print_phone($object->fax,$object->country_code,0,$object->id,'AC_FAX').'
'.$langs->trans('EMail').''.dol_print_email($object->email,0,$object->id,'AC_EMAIL').'
'.$langs->trans("Web").''.dol_print_url($object->url,'_blank').'
'.$langs->trans('VATIsUsed').''; - print yn($object->tva_assuj); - print '
'.$langs->trans('LocalTax1IsUsedES').''; - print yn($object->localtax1_assuj); - print '
'.$langs->trans('LocalTax2IsUsedES').''; - print yn($object->localtax2_assuj); - print '
'.$langs->trans("LocalTax1IsUsedES").''; - print yn($object->localtax1_assuj); - print '
'.$langs->trans("LocalTax2IsUsedES").''; - print yn($object->localtax2_assuj); - print '
'.$langs->trans('VATIntraVeryShort').''; - print $object->tva_intra; - print '
'; - print ''; - print '
'; - print $langs->trans('PaymentConditions'); - print ''; - if (($action != 'editconditions') && $user->rights->societe->creer) print 'id.'">'.img_edit($langs->trans('SetConditions'),1).'
'; - print '		'; - if ($action == 'editconditions') - { - $form->form_conditions_reglement($_SERVER['PHP_SELF'].'?socid='.$object->id,$object->cond_reglement,'cond_reglement_id',-1,1); - } - else - { - $form->form_conditions_reglement($_SERVER['PHP_SELF'].'?socid='.$object->id,$object->cond_reglement,'none'); - } - print "
'; - print ''; - print '
'; - print $langs->trans('PaymentMode'); - print ''; - if (($action != 'editmode') && $user->rights->societe->creer) print 'id.'">'.img_edit($langs->trans('SetMode'),1).'
'; - print '		'; - if ($action == 'editmode') - { - $form->form_modes_reglement($_SERVER['PHP_SELF'].'?socid='.$object->id,$object->mode_reglement,'mode_reglement_id'); - } - else - { - $form->form_modes_reglement($_SERVER['PHP_SELF'].'?socid='.$object->id,$object->mode_reglement,'none'); - } - print "
'; - print '
'; - print $langs->trans("CustomerRelativeDiscountShort"); - print ''; - if ($user->rights->societe->creer && !$user->societe_id > 0) - { - print ''.img_edit($langs->trans("Modify")).''; - } - print '
'; - print '		'.($object->remise_client?''.$object->remise_client.'%':$langs->trans("DiscountNone")).'
'; - print ''; - print '
'; - print $langs->trans("CustomerAbsoluteDiscountShort"); - print ''; - if ($user->rights->societe->creer && !$user->societe_id > 0) - { - print ''.img_edit($langs->trans("Modify")).''; - } - print '
'; - print '		'; - $amount_discount=$object->getAvailableDiscounts(); - if ($amount_discount < 0) dol_print_error($db,$object->error); - if ($amount_discount > 0) print ''.price($amount_discount).' '.$langs->trans("Currency".$conf->currency); - else print $langs->trans("DiscountNone"); - print '
'; - print '
'; - print $langs->trans("PriceLevel"); - print ''; - if ($user->rights->societe->creer) - { - print ''.img_edit($langs->trans("Modify")).''; - } - print '
'; - print '		'.$object->price_level."
'.$langs->trans("LinkedToDolibarrMember").''; - $adh=new Adherent($db); - $result=$adh->fetch('','',$object->id); - if ($result > 0) - { - $adh->ref=$adh->getFullName($langs); - print $adh->getNomUrl(1); - } - else - { - print $langs->trans("UserNotLinkedToMember"); - } - print '
"; - - print "		'; - - // Nbre max d'elements des petites listes - $MAXLIST=4; - $tableaushown=1; - - // Lien recap - print ''; - print ''; - print ''; - print ''; - print '
'; - print '
'.$langs->trans("Summary").''.$langs->trans("ShowCustomerPreview").'
'; - print '
'; - - $now=dol_now(); - - /* - * Last proposals - */ - if ($conf->propal->enabled && $user->rights->propale->lire) - { - $propal_static = new Propal($db); - - $proposals = $propal_static->liste_array(0, 0, 0, $object->id, $MAXLIST); - - //var_dump($proposals); - - $sql = "SELECT s.nom, s.rowid, p.rowid as propalid, p.fk_statut, p.total_ht, p.ref, p.remise, "; - $sql.= " p.datep as dp, p.fin_validite as datelimite"; - $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 = ".$object->id; - $sql.= " AND p.entity = ".$conf->entity; - $sql.= " ORDER BY p.datep DESC"; - - $resql=$db->query($sql); - if ($resql) - { - $var=true; - $num = $db->num_rows($resql); - - if ($num > 0) - { - print ''; - - print ''; - print ''; - print ''; - } - - $i = 0; - while ($i < $num && $i < $MAXLIST) - { - $objp = $db->fetch_object($resql); - print ""; - print '\n"; - print ''; - print ''; - $var=!$var; - $i++; - } - $db->free($resql); - - if ($num > 0) print "
'; - print ''; - print '
'.$langs->trans("LastPropals",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllPropals").' ('.$num.')'.img_picto($langs->trans("Statistics"),'stats').'
'.img_object($langs->trans("ShowPropal"),"propal").' '.$objp->ref.''."\n"; - if ( ($db->jdate($objp->dp) < ($now - $conf->propal->cloture->warning_delay)) && $objp->fk_statut == 1 ) - { - print " ".img_warning(); - } - print ''.dol_print_date($db->jdate($objp->dp),'day')."'.price($objp->total_ht).''.$propal_static->LibStatut($objp->fk_statut,5).'
"; - } - else - { - dol_print_error($db); - } - } - - /* - * Last orders - */ - if ($conf->commande->enabled && $user->rights->commande->lire) - { - $commande_static=new Commande($db); - - $sql = "SELECT s.nom, s.rowid,"; - $sql.= " c.rowid as cid, c.total_ht, c.ref, c.fk_statut, c.facture,"; - $sql.= " c.date_commande as dc"; - $sql.= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."commande as c"; - $sql.= " WHERE c.fk_soc = s.rowid "; - $sql.= " AND s.rowid = ".$object->id; - $sql.= " AND c.entity = ".$conf->entity; - $sql.= " ORDER BY c.date_commande DESC"; - - $resql=$db->query($sql); - if ($resql) - { - $var=true; - $num = $db->num_rows($resql); - - if ($num > 0) - { - print ''; - - print ''; - print ''; - print ''; - } - - $i = 0; - while ($i < $num && $i < $MAXLIST) - { - $objp = $db->fetch_object($resql); - $var=!$var; - print ""; - print '\n"; - print ''; - print ''; - $i++; - } - $db->free($resql); - - if ($num >0) print "
'; - print ''; - print '
'.$langs->trans("LastOrders",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllOrders").' ('.$num.')'.img_picto($langs->trans("Statistics"),'stats').'
'.img_object($langs->trans("ShowOrder"),"order").' '.$objp->ref."\n"; - print ''.dol_print_date($db->jdate($objp->dc),'day')."'.price($objp->total_ht).''.$commande_static->LibStatut($objp->fk_statut,$objp->facture,5).'
"; - } - else - { - dol_print_error($db); - } - } - - /* - * Last linked contracts - */ - if ($conf->contrat->enabled && $user->rights->contrat->lire) - { - $contratstatic=new Contrat($db); - - $sql = "SELECT s.nom, s.rowid, c.rowid as id, c.ref as ref, c.statut, c.datec as dc"; - $sql.= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."contrat as c"; - $sql.= " WHERE c.fk_soc = s.rowid "; - $sql.= " AND s.rowid = ".$object->id; - $sql.= " AND c.entity = ".$conf->entity; - $sql.= " ORDER BY c.datec DESC"; - - $resql=$db->query($sql); - if ($resql) - { - $var=true; - $num = $db->num_rows($resql); - if ($num >0 ) - { - print ''; - - print ''; - print ''; - print ''; - } - $i = 0; - while ($i < $num && $i < $MAXLIST) - { - $contrat=new Contrat($db); - - $objp = $db->fetch_object($resql); - $var=!$var; - print ""; - print '\n"; - print '\n"; - print ''; - print '\n"; - print ''; - $i++; - } - $db->free($resql); - - if ($num > 0) print "
'; - print '
'.$langs->trans("LastContracts",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllContracts").' ('.$num.')
'; - $contrat->id=$objp->id; - $contrat->ref=$objp->ref?$objp->ref:$objp->id; - print $contrat->getNomUrl(1,12); - print "'.dol_print_date($db->jdate($objp->dc),'day')." '; - $contrat->fetch_lines(); - print $contrat->getLibStatut(4); - print "
"; - } - else - { - dol_print_error($db); - } - } - - /* - * Last interventions - */ - if ($conf->ficheinter->enabled && $user->rights->ficheinter->lire) - { - $sql = "SELECT s.nom, s.rowid, f.rowid as id, f.ref, f.fk_statut, f.duree as duration, f.datei as startdate"; - $sql.= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."fichinter as f"; - $sql.= " WHERE f.fk_soc = s.rowid"; - $sql.= " AND s.rowid = ".$object->id; - $sql.= " AND f.entity = ".$conf->entity; - $sql.= " ORDER BY f.tms DESC"; - - $fichinter_static=new Fichinter($db); - - $resql=$db->query($sql); - if ($resql) - { - $var=true; - $num = $db->num_rows($resql); - if ($num > 0) - { - print ''; - - print ''; - print ''; - print ''; - $var=!$var; - } - $i = 0; - while ($i < $num && $i < $MAXLIST) - { - $objp = $db->fetch_object($resql); - - $fichinter_static->id=$objp->id; - $fichinter_static->statut=$objp->fk_statut; - - print ""; - print ''."\n"; - //print ''."\n"; - print ''."\n"; - print ''."\n"; - print ''; - $var=!$var; - $i++; - } - $db->free($resql); - - if ($num > 0) print "
'.$langs->trans("LastInterventions",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllInterventions").' ('.$num.')
'.img_object($langs->trans("ShowPropal"),"propal").' '.$objp->ref.''.dol_print_date($db->jdate($objp->startdate)).''.convertSecondToTime($objp->duration).''.$fichinter_static->getLibStatut(3).'
"; - } - else - { - dol_print_error($db); - } - } - - /* - * Last invoices - */ - if ($conf->facture->enabled && $user->rights->facture->lire) - { - $facturestatic = new Facture($db); - - $sql = 'SELECT f.rowid as facid, f.facnumber, f.type, f.amount, f.total, f.total_ttc,'; - $sql.= ' f.datef as df, f.datec as dc, f.paye as paye, f.fk_statut as statut,'; - $sql.= ' s.nom, s.rowid as socid,'; - $sql.= ' SUM(pf.amount) as am'; - $sql.= " FROM ".MAIN_DB_PREFIX."societe as s,".MAIN_DB_PREFIX."facture as f"; - $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'paiement_facture as pf ON f.rowid=pf.fk_facture'; - $sql.= " WHERE f.fk_soc = s.rowid AND s.rowid = ".$object->id; - $sql.= " AND f.entity = ".$conf->entity; - $sql.= ' GROUP BY f.rowid, f.facnumber, f.type, f.amount, f.total, f.total_ttc,'; - $sql.= ' f.datef, f.datec, f.paye, f.fk_statut,'; - $sql.= ' s.nom, s.rowid'; - $sql.= " ORDER BY f.datef DESC, f.datec DESC"; - - $resql=$db->query($sql); - if ($resql) - { - $var=true; - $num = $db->num_rows($resql); - $i = 0; - if ($num > 0) - { - print ''; - - $tableaushown=1; - print ''; - print ''; - print ''; - } - - while ($i < $num && $i < $MAXLIST) - { - $objp = $db->fetch_object($resql); - $var=!$var; - print ""; - print ''; - if ($objp->df > 0) - { - print "\n"; - } - else - { - print "\n"; - } - print "\n"; - - print '\n"; - print "\n"; - $i++; - } - $db->free($resql); - - if ($num > 0) print "
'; - print ''; - print '
'.$langs->trans("LastCustomersBills",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllBills").' ('.$num.')'.img_picto($langs->trans("Statistics"),'stats').'
'; - $facturestatic->id=$objp->facid; - $facturestatic->ref=$objp->facnumber; - $facturestatic->type=$objp->type; - print $facturestatic->getNomUrl(1); - print '".dol_print_date($db->jdate($objp->df),'day')."!!!".price($objp->total_ttc)."'.($facturestatic->LibStatut($objp->paye,$objp->statut,5,$objp->am))."
"; - } - else - { - dol_print_error($db); - } - } - - print "
"; - - print "\n\n"; - - - /* - * Barre d'actions - */ - print '
'; - - if ($conf->propal->enabled && $user->rights->propale->creer) - { - $langs->load("propal"); - print ''.$langs->trans("AddProp").''; - } - - if ($conf->commande->enabled && $user->rights->commande->creer) - { - $langs->load("orders"); - print ''.$langs->trans("AddOrder").''; - } - - if ($user->rights->contrat->creer) - { - $langs->load("contracts"); - print ''.$langs->trans("AddContract").''; - } - - if ($conf->ficheinter->enabled && $user->rights->ficheinter->creer) - { - $langs->load("fichinter"); - print ''.$langs->trans("AddIntervention").''; - } - - // Add invoice - if ($user->societe_id == 0) - { - if ($conf->deplacement->enabled) - { - $langs->load("trips"); - print ''.$langs->trans("AddTrip").''; - } - - if ($conf->facture->enabled) - { - if ($user->rights->facture->creer) - { - $langs->load("bills"); - if ($object->client != 0) print ''.$langs->trans("AddBill").''; - else print ''.$langs->trans("AddBill").''; - } - else - { - print ''.$langs->trans("AddBill").''; - } - } - } - - // Add action - if ($conf->agenda->enabled && ! empty($conf->global->MAIN_REPEATTASKONEACHTAB)) - { - if ($user->rights->agenda->myactions->create) - { - print ''.$langs->trans("AddAction").''; - } - else - { - print ''.$langs->trans("AddAction").''; - } - } - - print '
'; - print "
\n"; - - if (! empty($conf->global->MAIN_REPEATCONTACTONEACHTAB)) - { - print '
'; - // List of contacts - show_contacts($conf,$langs,$db,$object,$_SERVER["PHP_SELF"].'?socid='.$object->id); - } - + if ($result < 0) dol_print_error($db,$object->error); +} +// assujetissement a la TVA +if ($action == 'setassujtva' && $user->rights->societe->creer) +{ + $object->fetch($id); + $object->tva_assuj=$_POST['assujtva_value']; + + // TODO move to DAO class + $sql = "UPDATE ".MAIN_DB_PREFIX."societe SET tva_assuj='".$_POST['assujtva_value']."' WHERE rowid='".$id."'"; + $result = $db->query($sql); + if (! $result) dol_print_error($result); +} + + + +/* + * View + */ + +llxHeader('',$langs->trans('CustomerCard')); + + +$contactstatic = new Contact($db); +$userstatic=new User($db); +$form = new Form($db); + + +if ($mode == 'search') +{ + if ($modesearch == 'soc') + { + // TODO move to DAO class + $sql = "SELECT s.rowid"; + if (!$user->rights->societe->client->voir && !$id) $sql .= ", sc.fk_soc, sc.fk_user "; + $sql .= " FROM ".MAIN_DB_PREFIX."societe as s"; + if (!$user->rights->societe->client->voir && !$id) $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; + $sql .= " WHERE lower(s.nom) like '%".strtolower($socname)."%'"; + if (!$user->rights->societe->client->voir && !$id) $sql .= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; + } + + $resql=$db->query($sql); + if ($resql) + { + if ( $db->num_rows($resql) == 1) + { + $obj = $db->fetch_object($resql); + $id = $obj->rowid; + } + $db->free($resql); + } +} + + +if ($id > 0) +{ + // Load data of third party + $object->fetch($id); + if ($object->id <= 0) + { + dol_print_error($db,$object->error); + } + + if ($errmesg) + { + print "".$errmesg."
"; + } + + /* + * Affichage onglets + */ + + $head = societe_prepare_head($object); + + dol_fiche_head($head, 'customer', $langs->trans("ThirdParty"),0,'company'); + + + print ''; + print '\n"; + + + print '"; + print "
'; + + print ''; + + print ''; + + // Prefix + if (! empty($conf->global->SOCIETE_USEPREFIX)) // Old not used prefix field + { + print ''; + } + + if ($object->client) + { + $langs->load("compta"); + + print ''; + + print ''; + print ''; + print ''; + } + + // Address + print '"; + + // Zip / Town + print ''; + print '"; + print ''; + + // Country + print ''; + + // Phone + print ''; + + // Fax + print ''; + + // EMail + print ''; + + // Web + print ''; + + // Assujeti a TVA ou pas + print ''; + print ''; + print ''; + + // Local Taxes + if($mysoc->country_code=='ES') + { + if($mysoc->localtax1_assuj=="1" && $mysoc->localtax2_assuj=="1") + { + print ''; + print ''; + } + elseif($mysoc->localtax1_assuj=="1") + { + print ''; + } + elseif($mysoc->localtax2_assuj=="1") + { + print ''; + } + } + + // TVA Intra + print ''; + + // Conditions de reglement par defaut + $langs->load('bills'); + $form = new Form($db); + print '"; + print ''; + + // Mode de reglement par defaut + print '"; + print ''; + + // Relative discounts (Discounts-Drawbacks-Rebates) + print ''; + print ''; + + // Absolute discounts (Discounts-Drawbacks-Rebates) + print ''; + print ''; + print ''; + + // Multiprice level + if ($conf->global->PRODUIT_MULTIPRICES) + { + print '"; + print ''; + } + + // Module Adherent + if ($conf->adherent->enabled) + { + $langs->load("members"); + $langs->load("users"); + print ''; + print ''; + print "\n"; + } + + print "
'.$langs->trans("ThirdPartyName").''; + $object->next_prev_filter="te.client in (1,3)"; + print $form->showrefnav($object,'socid','',($user->societe_id?0:1),'rowid','nom','',''); + print '
'.$langs->trans("Prefix").''; + print ($object->prefix_comm?$object->prefix_comm:' '); + print '
'; + print $langs->trans('CustomerCode').''; + print $object->code_client; + if ($object->check_codeclient() <> 0) print ' ('.$langs->trans("WrongCustomerCode").')'; + print '
'; + print $form->editfieldkey("CustomerAccountancyCode",'customeraccountancycode',$object->code_compta,$object,$user->rights->societe->creer); + print ''; + print $form->editfieldval("CustomerAccountancyCode",'customeraccountancycode',$object->code_compta,$object,$user->rights->societe->creer); + print '
'.$langs->trans('Address').''; + dol_print_address($object->address,'gmap','thirdparty',$object->id); + print "
'.$langs->trans('Zip').' / '.$langs->trans('Town').''.$object->zip.(($object->zip && $object->town)?' / ':'').$object->town."
'.$langs->trans("Country").''; + $img=picto_from_langcode($object->country_code); + if ($object->isInEEC()) print $form->textwithpicto(($img?$img.' ':'').$object->country,$langs->trans("CountryIsInEEC"),1,0); + else print ($img?$img.' ':'').$object->country; + print '
'.$langs->trans('Phone').''.dol_print_phone($object->tel,$object->country_code,0,$object->id,'AC_TEL').''.$langs->trans('Fax').''.dol_print_phone($object->fax,$object->country_code,0,$object->id,'AC_FAX').'
'.$langs->trans('EMail').''.dol_print_email($object->email,0,$object->id,'AC_EMAIL').'
'.$langs->trans("Web").''.dol_print_url($object->url,'_blank').'
'.$langs->trans('VATIsUsed').''; + print yn($object->tva_assuj); + print '
'.$langs->trans('LocalTax1IsUsedES').''; + print yn($object->localtax1_assuj); + print '
'.$langs->trans('LocalTax2IsUsedES').''; + print yn($object->localtax2_assuj); + print '
'.$langs->trans("LocalTax1IsUsedES").''; + print yn($object->localtax1_assuj); + print '
'.$langs->trans("LocalTax2IsUsedES").''; + print yn($object->localtax2_assuj); + print '
'.$langs->trans('VATIntraVeryShort').''; + print $object->tva_intra; + print '
'; + print ''; + print '
'; + print $langs->trans('PaymentConditions'); + print ''; + if (($action != 'editconditions') && $user->rights->societe->creer) print 'id.'">'.img_edit($langs->trans('SetConditions'),1).'
'; + print '		'; + if ($action == 'editconditions') + { + $form->form_conditions_reglement($_SERVER['PHP_SELF'].'?socid='.$object->id,$object->cond_reglement,'cond_reglement_id',-1,1); + } + else + { + $form->form_conditions_reglement($_SERVER['PHP_SELF'].'?socid='.$object->id,$object->cond_reglement,'none'); + } + print "
'; + print ''; + print '
'; + print $langs->trans('PaymentMode'); + print ''; + if (($action != 'editmode') && $user->rights->societe->creer) print 'id.'">'.img_edit($langs->trans('SetMode'),1).'
'; + print '		'; + if ($action == 'editmode') + { + $form->form_modes_reglement($_SERVER['PHP_SELF'].'?socid='.$object->id,$object->mode_reglement,'mode_reglement_id'); + } + else + { + $form->form_modes_reglement($_SERVER['PHP_SELF'].'?socid='.$object->id,$object->mode_reglement,'none'); + } + print "
'; + print '
'; + print $langs->trans("CustomerRelativeDiscountShort"); + print ''; + if ($user->rights->societe->creer && !$user->societe_id > 0) + { + print ''.img_edit($langs->trans("Modify")).''; + } + print '
'; + print '		'.($object->remise_client?''.$object->remise_client.'%':$langs->trans("DiscountNone")).'
'; + print ''; + print '
'; + print $langs->trans("CustomerAbsoluteDiscountShort"); + print ''; + if ($user->rights->societe->creer && !$user->societe_id > 0) + { + print ''.img_edit($langs->trans("Modify")).''; + } + print '
'; + print '		'; + $amount_discount=$object->getAvailableDiscounts(); + if ($amount_discount < 0) dol_print_error($db,$object->error); + if ($amount_discount > 0) print ''.price($amount_discount).' '.$langs->trans("Currency".$conf->currency); + else print $langs->trans("DiscountNone"); + print '
'; + print '
'; + print $langs->trans("PriceLevel"); + print ''; + if ($user->rights->societe->creer) + { + print ''.img_edit($langs->trans("Modify")).''; + } + print '
'; + print '		'.$object->price_level."
'.$langs->trans("LinkedToDolibarrMember").''; + $adh=new Adherent($db); + $result=$adh->fetch('','',$object->id); + if ($result > 0) + { + $adh->ref=$adh->getFullName($langs); + print $adh->getNomUrl(1); + } + else + { + print $langs->trans("UserNotLinkedToMember"); + } + print '
"; + + print "		'; + + // Nbre max d'elements des petites listes + $MAXLIST=4; + $tableaushown=1; + + // Lien recap + print ''; + print ''; + print ''; + print ''; + print '
'; + print '
'.$langs->trans("Summary").''.$langs->trans("ShowCustomerPreview").'
'; + print '
'; + + $now=dol_now(); + + /* + * Last proposals + */ + if ($conf->propal->enabled && $user->rights->propale->lire) + { + $propal_static = new Propal($db); + + $proposals = $propal_static->liste_array(0, 0, 0, $object->id, $MAXLIST); + + //var_dump($proposals); + + $sql = "SELECT s.nom, s.rowid, p.rowid as propalid, p.fk_statut, p.total_ht, p.ref, p.remise, "; + $sql.= " p.datep as dp, p.fin_validite as datelimite"; + $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 = ".$object->id; + $sql.= " AND p.entity = ".$conf->entity; + $sql.= " ORDER BY p.datep DESC"; + + $resql=$db->query($sql); + if ($resql) + { + $var=true; + $num = $db->num_rows($resql); + + if ($num > 0) + { + print ''; + + print ''; + print ''; + print ''; + } + + $i = 0; + while ($i < $num && $i < $MAXLIST) + { + $objp = $db->fetch_object($resql); + print ""; + print '\n"; + print ''; + print ''; + $var=!$var; + $i++; + } + $db->free($resql); + + if ($num > 0) print "
'; + print ''; + print '
'.$langs->trans("LastPropals",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllPropals").' ('.$num.')'.img_picto($langs->trans("Statistics"),'stats').'
'.img_object($langs->trans("ShowPropal"),"propal").' '.$objp->ref.''."\n"; + if ( ($db->jdate($objp->dp) < ($now - $conf->propal->cloture->warning_delay)) && $objp->fk_statut == 1 ) + { + print " ".img_warning(); + } + print ''.dol_print_date($db->jdate($objp->dp),'day')."'.price($objp->total_ht).''.$propal_static->LibStatut($objp->fk_statut,5).'
"; + } + else + { + dol_print_error($db); + } + } + + /* + * Last orders + */ + if ($conf->commande->enabled && $user->rights->commande->lire) + { + $commande_static=new Commande($db); + + $sql = "SELECT s.nom, s.rowid,"; + $sql.= " c.rowid as cid, c.total_ht, c.ref, c.fk_statut, c.facture,"; + $sql.= " c.date_commande as dc"; + $sql.= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."commande as c"; + $sql.= " WHERE c.fk_soc = s.rowid "; + $sql.= " AND s.rowid = ".$object->id; + $sql.= " AND c.entity = ".$conf->entity; + $sql.= " ORDER BY c.date_commande DESC"; + + $resql=$db->query($sql); + if ($resql) + { + $var=true; + $num = $db->num_rows($resql); + + if ($num > 0) + { + print ''; + + print ''; + print ''; + print ''; + } + + $i = 0; + while ($i < $num && $i < $MAXLIST) + { + $objp = $db->fetch_object($resql); + $var=!$var; + print ""; + print '\n"; + print ''; + print ''; + $i++; + } + $db->free($resql); + + if ($num >0) print "
'; + print ''; + print '
'.$langs->trans("LastOrders",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllOrders").' ('.$num.')'.img_picto($langs->trans("Statistics"),'stats').'
'.img_object($langs->trans("ShowOrder"),"order").' '.$objp->ref."\n"; + print ''.dol_print_date($db->jdate($objp->dc),'day')."'.price($objp->total_ht).''.$commande_static->LibStatut($objp->fk_statut,$objp->facture,5).'
"; + } + else + { + dol_print_error($db); + } + } + + /* + * Last linked contracts + */ + if ($conf->contrat->enabled && $user->rights->contrat->lire) + { + $contratstatic=new Contrat($db); + + $sql = "SELECT s.nom, s.rowid, c.rowid as id, c.ref as ref, c.statut, c.datec as dc"; + $sql.= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."contrat as c"; + $sql.= " WHERE c.fk_soc = s.rowid "; + $sql.= " AND s.rowid = ".$object->id; + $sql.= " AND c.entity = ".$conf->entity; + $sql.= " ORDER BY c.datec DESC"; + + $resql=$db->query($sql); + if ($resql) + { + $var=true; + $num = $db->num_rows($resql); + if ($num >0 ) + { + print ''; + + print ''; + print ''; + print ''; + } + $i = 0; + while ($i < $num && $i < $MAXLIST) + { + $contrat=new Contrat($db); + + $objp = $db->fetch_object($resql); + $var=!$var; + print ""; + print '\n"; + print '\n"; + print ''; + print '\n"; + print ''; + $i++; + } + $db->free($resql); + + if ($num > 0) print "
'; + print '
'.$langs->trans("LastContracts",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllContracts").' ('.$num.')
'; + $contrat->id=$objp->id; + $contrat->ref=$objp->ref?$objp->ref:$objp->id; + print $contrat->getNomUrl(1,12); + print "'.dol_print_date($db->jdate($objp->dc),'day')." '; + $contrat->fetch_lines(); + print $contrat->getLibStatut(4); + print "
"; + } + else + { + dol_print_error($db); + } + } + + /* + * Last interventions + */ + if ($conf->ficheinter->enabled && $user->rights->ficheinter->lire) + { + $sql = "SELECT s.nom, s.rowid, f.rowid as id, f.ref, f.fk_statut, f.duree as duration, f.datei as startdate"; + $sql.= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."fichinter as f"; + $sql.= " WHERE f.fk_soc = s.rowid"; + $sql.= " AND s.rowid = ".$object->id; + $sql.= " AND f.entity = ".$conf->entity; + $sql.= " ORDER BY f.tms DESC"; + + $fichinter_static=new Fichinter($db); + + $resql=$db->query($sql); + if ($resql) + { + $var=true; + $num = $db->num_rows($resql); + if ($num > 0) + { + print ''; + + print ''; + print ''; + print ''; + $var=!$var; + } + $i = 0; + while ($i < $num && $i < $MAXLIST) + { + $objp = $db->fetch_object($resql); + + $fichinter_static->id=$objp->id; + $fichinter_static->statut=$objp->fk_statut; + + print ""; + print ''."\n"; + //print ''."\n"; + print ''."\n"; + print ''."\n"; + print ''; + $var=!$var; + $i++; + } + $db->free($resql); + + if ($num > 0) print "
'.$langs->trans("LastInterventions",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllInterventions").' ('.$num.')
'.img_object($langs->trans("ShowPropal"),"propal").' '.$objp->ref.''.dol_print_date($db->jdate($objp->startdate)).''.convertSecondToTime($objp->duration).''.$fichinter_static->getLibStatut(5).'
"; + } + else + { + dol_print_error($db); + } + } + + /* + * Last invoices + */ + if ($conf->facture->enabled && $user->rights->facture->lire) + { + $facturestatic = new Facture($db); + + $sql = 'SELECT f.rowid as facid, f.facnumber, f.type, f.amount, f.total, f.total_ttc,'; + $sql.= ' f.datef as df, f.datec as dc, f.paye as paye, f.fk_statut as statut,'; + $sql.= ' s.nom, s.rowid as socid,'; + $sql.= ' SUM(pf.amount) as am'; + $sql.= " FROM ".MAIN_DB_PREFIX."societe as s,".MAIN_DB_PREFIX."facture as f"; + $sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'paiement_facture as pf ON f.rowid=pf.fk_facture'; + $sql.= " WHERE f.fk_soc = s.rowid AND s.rowid = ".$object->id; + $sql.= " AND f.entity = ".$conf->entity; + $sql.= ' GROUP BY f.rowid, f.facnumber, f.type, f.amount, f.total, f.total_ttc,'; + $sql.= ' f.datef, f.datec, f.paye, f.fk_statut,'; + $sql.= ' s.nom, s.rowid'; + $sql.= " ORDER BY f.datef DESC, f.datec DESC"; + + $resql=$db->query($sql); + if ($resql) + { + $var=true; + $num = $db->num_rows($resql); + $i = 0; + if ($num > 0) + { + print ''; + + $tableaushown=1; + print ''; + print ''; + print ''; + } + + while ($i < $num && $i < $MAXLIST) + { + $objp = $db->fetch_object($resql); + $var=!$var; + print ""; + print ''; + if ($objp->df > 0) + { + print ''; + } + else + { + print ''; + } + print ''; + + print ''; + print "\n"; + $i++; + } + $db->free($resql); + + if ($num > 0) print "
'; + print ''; + print '
'.$langs->trans("LastCustomersBills",($num<=$MAXLIST?"":$MAXLIST)).''.$langs->trans("AllBills").' ('.$num.')'.img_picto($langs->trans("Statistics"),'stats').'
'; + $facturestatic->id=$objp->facid; + $facturestatic->ref=$objp->facnumber; + $facturestatic->type=$objp->type; + print $facturestatic->getNomUrl(1); + print ''.dol_print_date($db->jdate($objp->df),'day').'!!!'.price($objp->total_ttc).''.($facturestatic->LibStatut($objp->paye,$objp->statut,5,$objp->am)).'
"; + } + else + { + dol_print_error($db); + } + } + + print "
"; + + print "\n\n"; + + + /* + * Barre d'actions + */ + print '
'; + + if ($conf->propal->enabled && $user->rights->propale->creer) + { + $langs->load("propal"); + print ''.$langs->trans("AddProp").''; + } + + if ($conf->commande->enabled && $user->rights->commande->creer) + { + $langs->load("orders"); + print ''.$langs->trans("AddOrder").''; + } + + if ($user->rights->contrat->creer) + { + $langs->load("contracts"); + print ''.$langs->trans("AddContract").''; + } + + if ($conf->ficheinter->enabled && $user->rights->ficheinter->creer) + { + $langs->load("fichinter"); + print ''.$langs->trans("AddIntervention").''; + } + + // Add invoice + if ($user->societe_id == 0) + { + if ($conf->deplacement->enabled) + { + $langs->load("trips"); + print ''.$langs->trans("AddTrip").''; + } + + if ($conf->facture->enabled) + { + if ($user->rights->facture->creer) + { + $langs->load("bills"); + if ($object->client != 0) print ''.$langs->trans("AddBill").''; + else print ''.$langs->trans("AddBill").''; + } + else + { + print ''.$langs->trans("AddBill").''; + } + } + } + + // Add action + if ($conf->agenda->enabled && ! empty($conf->global->MAIN_REPEATTASKONEACHTAB)) + { + if ($user->rights->agenda->myactions->create) + { + print ''.$langs->trans("AddAction").''; + } + else + { + print ''.$langs->trans("AddAction").''; + } + } + + print '
'; + print "
\n"; + + if (! empty($conf->global->MAIN_REPEATCONTACTONEACHTAB)) + { + print '
'; + // List of contacts + show_contacts($conf,$langs,$db,$object,$_SERVER["PHP_SELF"].'?socid='.$object->id); + } + // Addresses list if (! empty($conf->global->SOCIETE_ADDRESSES_MANAGEMENT) && ! empty($conf->global->MAIN_REPEATADDRESSONEACHTAB)) { $result=show_addresses($conf,$langs,$db,$object,$_SERVER["PHP_SELF"].'?socid='.$object->id); - } - - if (! empty($conf->global->MAIN_REPEATTASKONEACHTAB)) - { - print load_fiche_titre($langs->trans("ActionsOnCompany"),'',''); - - // List of todo actions - show_actions_todo($conf,$langs,$db,$object); - - // List of done actions - show_actions_done($conf,$langs,$db,$object); - } -} -else -{ - dol_print_error($db,'Bad value for socid parameter'); -} - - -// End of page -llxFooter(); -$db->close(); -?> + } + + if (! empty($conf->global->MAIN_REPEATTASKONEACHTAB)) + { + print load_fiche_titre($langs->trans("ActionsOnCompany"),'',''); + + // List of todo actions + show_actions_todo($conf,$langs,$db,$object); + + // List of done actions + show_actions_done($conf,$langs,$db,$object); + } +} +else +{ + dol_print_error($db,'Bad value for socid parameter'); +} + + +// End of page +llxFooter(); +$db->close(); +?>