mirror of
https://github.com/Dolibarr/dolibarr.git
synced 2025-12-12 12:31:26 +01:00
492 lines
14 KiB
PHP
492 lines
14 KiB
PHP
<?php
|
|
/* Copyright (C) 2006-2008 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2007 Patrick Raguin <patrick.raguin@gmail.com>
|
|
*
|
|
* 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.
|
|
* or see http://www.gnu.org/
|
|
*/
|
|
|
|
/**
|
|
\file htdocs/lib/company.lib.php
|
|
\brief Ensemble de fonctions de base pour le module societe
|
|
\ingroup societe
|
|
\version $Id$
|
|
*/
|
|
|
|
function societe_prepare_head($objsoc)
|
|
{
|
|
global $langs, $conf, $user;
|
|
$h = 0;
|
|
$head = array();
|
|
|
|
$head[$h][0] = DOL_URL_ROOT.'/soc.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Card");
|
|
$head[$h][2] = 'company';
|
|
$h++;
|
|
|
|
if ($objsoc->client==1)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT.'/comm/fiche.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Customer");;
|
|
$head[$h][2] = 'customer';
|
|
$h++;
|
|
}
|
|
if ($objsoc->client==2)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT.'/comm/prospect/fiche.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Prospect");
|
|
$head[$h][2] = 'prospect';
|
|
$h++;
|
|
}
|
|
if ($objsoc->fournisseur)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT.'/fourn/fiche.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Supplier");
|
|
$head[$h][2] = 'supplier';
|
|
$h++;
|
|
}
|
|
if ($conf->facture->enabled || $conf->compta->enabled || $conf->comptaexpert->enabled)
|
|
{
|
|
$langs->load("compta");
|
|
$head[$h][0] = DOL_URL_ROOT.'/compta/fiche.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Accountancy");
|
|
$head[$h][2] = 'compta';
|
|
$h++;
|
|
}
|
|
|
|
//show categorie tab
|
|
if ($conf->categorie->enabled)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT.'/categories/categorie.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans('Categories');
|
|
$head[$h][2] = 'category';
|
|
$h++;
|
|
}
|
|
if ($user->societe_id == 0)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT.'/societe/socnote.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Note");
|
|
$head[$h][2] = 'note';
|
|
$h++;
|
|
}
|
|
if ($user->societe_id == 0)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT.'/societe/document.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Documents");
|
|
$head[$h][2] = 'document';
|
|
$h++;
|
|
}
|
|
|
|
if ($conf->notification->enabled && $user->societe_id == 0)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT.'/societe/notify/fiche.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Notifications");
|
|
$head[$h][2] = 'notify';
|
|
$h++;
|
|
}
|
|
|
|
if ($objsoc->fournisseur)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT.'/fourn/fiche-stats.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Statistics");
|
|
$head[$h][2] = 'supplierstat';
|
|
$h++;
|
|
}
|
|
|
|
if ($user->societe_id == 0)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT.'/societe/info.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Info");
|
|
$head[$h][2] = 'info';
|
|
$h++;
|
|
}
|
|
|
|
if ($conf->bookmark->enabled && $user->rights->bookmark->creer)
|
|
{
|
|
$head[$h][0] = DOL_URL_ROOT."/bookmarks/fiche.php?action=add&socid=".$objsoc->id."&urlsource=".$_SERVER["PHP_SELF"]."?socid=".$objsoc->id;
|
|
$head[$h][1] = img_object($langs->trans("BookmarkThisPage"),'bookmark');
|
|
$head[$h][2] = 'image';
|
|
$h++;
|
|
}
|
|
|
|
return $head;
|
|
}
|
|
|
|
|
|
|
|
function societe_prepare_head2($objsoc)
|
|
{
|
|
global $langs, $conf, $user;
|
|
$h = 0;
|
|
$head = array();
|
|
|
|
$head[$h][0] = DOL_URL_ROOT.'/soc.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Card");
|
|
$head[$h][2] = 'company';
|
|
$h++;
|
|
|
|
$head[$h][0] = DOL_URL_ROOT .'/societe/rib.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("BankAccount")." $account->number";
|
|
$head[$h][2] = 'rib';
|
|
$h++;
|
|
|
|
$head[$h][0] = 'lien.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("Links");
|
|
$head[$h][2] = 'links';
|
|
$h++;
|
|
|
|
$head[$h][0] = 'commerciaux.php?socid='.$objsoc->id;
|
|
$head[$h][1] = $langs->trans("SalesRepresentative");
|
|
$head[$h][2] = 'salesrepresentative';
|
|
$h++;
|
|
|
|
return $head;
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Retourne le nom traduit ou code+nom d'un pays
|
|
* \param id id du pays
|
|
* \param withcode 1=affiche code + nom
|
|
* \return string Nom traduit du pays
|
|
*/
|
|
function getCountryLabel($id,$withcode=0)
|
|
{
|
|
global $db,$langs;
|
|
|
|
$sql = "SELECT rowid, code, libelle FROM ".MAIN_DB_PREFIX."c_pays";
|
|
$sql.= " WHERE rowid=".$id;
|
|
|
|
dolibarr_syslog("Company.lib::getCountryLabel sql=".$sql);
|
|
$resql=$db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$obj = $db->fetch_object($resql);
|
|
if ($obj)
|
|
{
|
|
$label=$obj->code && $langs->trans("Country".$obj->code)!="Country".$obj->code?$langs->trans("Country".$obj->code):($obj->libelle!='-'?$obj->libelle:'');
|
|
if ($withcode) return $label==$obj->code?"$obj->code":"$obj->code - $label";
|
|
else return $label;
|
|
}
|
|
else
|
|
{
|
|
return $langs->trans("NotDefined");
|
|
}
|
|
$db->free($resql);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Retourne le nom traduit de la forme juridique
|
|
* \param code Code de la forme juridique
|
|
* \return string Nom traduit du pays
|
|
*/
|
|
function getFormeJuridiqueLabel($code)
|
|
{
|
|
global $db,$langs;
|
|
|
|
if (! $code) return '';
|
|
|
|
$sql = "SELECT libelle FROM ".MAIN_DB_PREFIX."c_forme_juridique";
|
|
$sql.= " WHERE code='$code'";
|
|
|
|
dolibarr_syslog("Company.lib::getFormeJuridiqueLabel sql=".$sql);
|
|
$resql=$db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$num = $db->num_rows($resql);
|
|
|
|
if ($num)
|
|
{
|
|
$obj = $db->fetch_object($resql);
|
|
$label=($obj->libelle!='-' ? $obj->libelle : '');
|
|
return $label;
|
|
}
|
|
else
|
|
{
|
|
return $langs->trans("NotDefined");
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Show html area with actions to do
|
|
*/
|
|
function show_actions_todo($conf,$langs,$db,$objsoc)
|
|
{
|
|
global $bc;
|
|
|
|
if ($conf->agenda->enabled)
|
|
{
|
|
require_once(DOL_DOCUMENT_ROOT."/actioncomm.class.php");
|
|
$actionstatic=new ActionComm($db);
|
|
$userstatic=new User($db);
|
|
$contactstatic = new Contact($db);
|
|
|
|
print_titre($langs->trans("ActionsOnCompany"));
|
|
|
|
print '<table width="100%" class="noborder">';
|
|
print '<tr class="liste_titre">';
|
|
print '<td colspan="11"><a href="'.DOL_URL_ROOT.'/comm/action/listactions.php?socid='.$objsoc->id.'&status=todo">'.$langs->trans("ActionsToDoShort").'</a></td><td align="right"> </td>';
|
|
print '</tr>';
|
|
|
|
$sql = "SELECT a.id, a.label,";
|
|
$sql.= " ".$db->pdate("a.datep")." as dp,";
|
|
$sql.= " ".$db->pdate("a.datea")." as da,";
|
|
$sql.= " a.percent,";
|
|
$sql.= " c.code as acode, c.libelle, a.propalrowid, a.fk_user_author, a.fk_contact,";
|
|
$sql.= " u.login, u.rowid,";
|
|
$sql.= " sp.name, sp.firstname";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."c_actioncomm as c, ".MAIN_DB_PREFIX."user as u, ".MAIN_DB_PREFIX."actioncomm as a";
|
|
$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."socpeople as sp ON a.fk_contact = sp.rowid";
|
|
$sql.= " WHERE a.fk_soc = ".$objsoc->id;
|
|
$sql.= " AND u.rowid = a.fk_user_author";
|
|
$sql.= " AND c.id=a.fk_action AND a.percent < 100";
|
|
$sql.= " ORDER BY a.datep DESC, a.id DESC";
|
|
|
|
dolibarr_syslog("company.lib::show_actions_todo sql=".$sql);
|
|
$result=$db->query($sql);
|
|
if ($result)
|
|
{
|
|
$i = 0 ;
|
|
$num = $db->num_rows($result);
|
|
$var=true;
|
|
|
|
if ($num)
|
|
{
|
|
while ($i < $num)
|
|
{
|
|
$var = !$var;
|
|
|
|
$obj = $db->fetch_object($result);
|
|
print "<tr $bc[$var]>";
|
|
|
|
print '<td width="30" align="center">'.strftime("%Y",$obj->dp)."</td>\n";
|
|
$oldyear = strftime("%Y",$obj->dp);
|
|
|
|
print '<td width="30" align="center">' .strftime("%b",$obj->dp)."</td>\n";
|
|
$oldmonth = strftime("%Y%b",$obj->dp);
|
|
|
|
print '<td width="20">'.strftime("%d",$obj->dp)."</td>\n";
|
|
print '<td width="30" nowrap="nowrap">'.strftime("%H:%M",$obj->dp).'</td>';
|
|
|
|
// Picto warning
|
|
print '<td width="16">';
|
|
if (date("U",$obj->dp) < time()) print ' '.img_warning("Late");
|
|
else print ' ';
|
|
print '</td>';
|
|
|
|
// Status/Percent
|
|
print '<td width="30"> </td>';
|
|
|
|
if ($obj->propalrowid)
|
|
{
|
|
print '<td><a href="propal.php?propalid='.$obj->propalrowid.'">'.img_object($langs->trans("ShowAction"),"task");
|
|
$transcode=$langs->trans("Action".$obj->acode);
|
|
$libelle=($transcode!="Action".$obj->acode?$transcode:$obj->libelle);
|
|
print $libelle;
|
|
print '</a></td>';
|
|
}
|
|
else
|
|
{
|
|
$actionstatic->code=$obj->acode;
|
|
$actionstatic->libelle=$obj->libelle;
|
|
$actionstatic->id=$obj->id;
|
|
print '<td>'.$actionstatic->getNomUrl(1,16).'</td>';
|
|
}
|
|
print '<td colspan="2">'.$obj->label.'</td>';
|
|
|
|
// Contact pour cette action
|
|
if ($obj->fk_contact > 0)
|
|
{
|
|
$contactstatic->name=$obj->name;
|
|
$contactstatic->firstname=$obj->firstname;
|
|
$contactstatic->id=$obj->fk_contact;
|
|
print '<td>'.$contactstatic->getNomUrl(1).'</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td> </td>';
|
|
}
|
|
|
|
print '<td width="80" nowrap="nowrap">';
|
|
$userstatic->id=$obj->fk_user_author;
|
|
$userstatic->login=$obj->login;
|
|
print $userstatic->getLoginUrl(1);
|
|
print '</td>';
|
|
|
|
// Statut
|
|
print '<td nowrap="nowrap" width="20">'.$actionstatic->LibStatut($obj->percent,3).'</td>';
|
|
|
|
print "</tr>\n";
|
|
$i++;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// Aucun action a faire
|
|
|
|
}
|
|
$db->free($result);
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($db);
|
|
}
|
|
print "</table>";
|
|
|
|
print "<br>";
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Show html area with actions done
|
|
*/
|
|
function show_actions_done($conf,$langs,$db,$objsoc)
|
|
{
|
|
global $bc;
|
|
|
|
if ($conf->agenda->enabled)
|
|
{
|
|
require_once(DOL_DOCUMENT_ROOT."/actioncomm.class.php");
|
|
require_once(DOL_DOCUMENT_ROOT."/facture.class.php");
|
|
$actionstatic=new ActionComm($db);
|
|
$userstatic=new User($db);
|
|
$contactstatic = new Contact($db);
|
|
$facturestatic=new Facture($db);
|
|
|
|
print '<table class="noborder" width="100%">';
|
|
print '<tr class="liste_titre">';
|
|
print '<td colspan="12"><a href="'.DOL_URL_ROOT.'/comm/action/listactions.php?socid='.$objsoc->id.'&status=done">'.$langs->trans("ActionsDoneShort").'</a></td>';
|
|
print '</tr>';
|
|
|
|
$sql = "SELECT a.id, a.label,";
|
|
$sql.= " ".$db->pdate("a.datep")." as dp,";
|
|
$sql.= " ".$db->pdate("a.datea")." as da,";
|
|
$sql.= " a.percent,";
|
|
$sql.= " a.propalrowid, a.fk_facture, a.fk_user_author, a.fk_contact,";
|
|
$sql.= " c.code as acode, c.libelle,";
|
|
$sql.= " u.login, u.rowid,";
|
|
$sql.= " sp.name, sp.firstname";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."c_actioncomm as c, ".MAIN_DB_PREFIX."user as u, ".MAIN_DB_PREFIX."actioncomm as a";
|
|
$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."socpeople as sp ON a.fk_contact = sp.rowid";
|
|
$sql.= " WHERE a.fk_soc = ".$objsoc->id;
|
|
$sql.= " AND u.rowid = a.fk_user_author";
|
|
$sql.= " AND c.id=a.fk_action AND a.percent = 100";
|
|
$sql.= " ORDER BY a.datea DESC, a.id DESC";
|
|
|
|
dolibarr_syslog("comm/fiche.php sql=".$sql);
|
|
$result=$db->query($sql);
|
|
if ($result)
|
|
{
|
|
$i = 0 ;
|
|
$num = $db->num_rows($result);
|
|
$oldyear='';
|
|
$oldmonth='';
|
|
$var=true;
|
|
|
|
while ($i < $num)
|
|
{
|
|
$var = !$var;
|
|
|
|
$obj = $db->fetch_object($result);
|
|
print "<tr $bc[$var]>";
|
|
|
|
// Champ date
|
|
print '<td width="30" align="center">'.strftime("%Y",$obj->dp)."</td>\n";
|
|
$oldyear = strftime("%Y",$obj->dp);
|
|
print '<td width="30" align="center">'.strftime("%b",$obj->dp)."</td>\n";
|
|
$oldmonth = strftime("%Y%b",$obj->dp);
|
|
print '<td width="20">'.strftime("%d",$obj->dp)."</td>\n";
|
|
print '<td width="30">'.strftime("%H:%M",$obj->dp)."</td>\n";
|
|
|
|
// Picto
|
|
print '<td width="16"> </td>';
|
|
|
|
// Espace
|
|
print '<td width="30"> </td>';
|
|
|
|
// Action
|
|
print '<td>';
|
|
$actionstatic->code=$obj->acode;
|
|
$actionstatic->libelle=$obj->libelle;
|
|
$actionstatic->id=$obj->id;
|
|
print $actionstatic->getNomUrl(1,16);
|
|
print '</td>';
|
|
|
|
// Objet lie
|
|
print '<td>';
|
|
if ($obj->propalrowid)
|
|
{
|
|
print '<a href="'.DOL_URL_ROOT.'/comm/propal.php?propalid='.$obj->propalrowid.'">'.img_object($langs->trans("ShowPropal"),"propal");
|
|
print $langs->trans("Propal");
|
|
print '</a>';
|
|
}
|
|
if ($obj->fk_facture)
|
|
{
|
|
$facturestatic->ref=$langs->trans("Invoice");
|
|
$facturestatic->id=$obj->fk_facture;
|
|
$facturestatic->type=$obj->type;
|
|
print $facturestatic->getNomUrl(1,'compta');
|
|
}
|
|
else print ' ';
|
|
print '</td>';
|
|
|
|
// Libelle
|
|
print '<td>'.$obj->label.'</td>';
|
|
|
|
// Contact pour cette action
|
|
if ($obj->fk_contact > 0)
|
|
{
|
|
$contactstatic->name=$obj->name;
|
|
$contactstatic->firstname=$obj->firstname;
|
|
$contactstatic->id=$obj->fk_contact;
|
|
print '<td>'.$contactstatic->getNomUrl(1).'</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td> </td>';
|
|
}
|
|
|
|
// Auteur
|
|
print '<td nowrap="nowrap" width="80">';
|
|
$userstatic->id=$obj->rowid;
|
|
$userstatic->login=$obj->login;
|
|
print $userstatic->getLoginUrl(1);
|
|
print '</td>';
|
|
|
|
// Statut
|
|
print '<td nowrap="nowrap" width="20">'.$actionstatic->LibStatut($obj->percent,3).'</td>';
|
|
|
|
print "</tr>\n";
|
|
$i++;
|
|
}
|
|
|
|
$db->free($result);
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($db);
|
|
}
|
|
|
|
print "</table><br>";
|
|
}
|
|
}
|
|
?>
|