lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

New: Affiche les derniers clients sur espace commercial

Browse Source
This commit is contained in:
Laurent Destailleur 2005-06-21 19:49:42 +00:00
parent e45fdcaa22
commit ff21b62805
1 changed files with 47 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

49
htdocs/comm/index.php
View File

@ -41,12 +41,13 @@ $user->getrights('fichinter');
$user->getrights('commande');
$user->getrights('projet');
if ($user->societe_id > 0)
{
$socidp = $user->societe_id;
}
$max=4;
llxHeader();
@ -153,6 +154,7 @@ if ($conf->propal->enabled && $user->rights->propale->lire)
}
}
/*
* Commandes à valider
*/
@ -235,9 +237,52 @@ if ( $db->query($sql) )
print '</td><td valign="top" width="70%">';
/*
* Derniers clients enregsitrés
*/
$sql = "SELECT s.idp,s.nom,".$db->pdate("datec")." as datec";
$sql.= " FROM ".MAIN_DB_PREFIX."societe as s";
$sql.= " WHERE s.client = 1";
if ($user->societe_id > 0)
{
$sql .= " AND s.idp = $user->societe_id";
}
$sql .= " ORDER BY s.datec DESC ";
$sql .= $db->plimit($max, 0);
$resql = $db->query($sql);
if ($resql)
{
$num = $db->num_rows($resql);
if ($num)
{
$langs->load("boxes");
print '<table class="noborder" width="100%">';
print '<tr class="liste_titre">';
print '<td colspan="2">'.$langs->trans("BoxTitleLastCustomers",$max).'</td></tr>';
$i = 0;
$var=false;
while ($i < $num)
{
$objp = $db->fetch_object($resql);
print "<tr $bc[$var]>";
print "<td nowrap><a href=\"fiche.php?id=".$objp->idp."\">".img_object($langs->trans("ShowCustomer"),"company")." ".$objp->nom."</a></td>";
print '<td align="right" nowrap>'.dolibarr_print_date($objp->datec)."</td>";
print '</tr>';
$i++;
$var=!$var;
}
print "</table><br>";
$db->free($resql);
}
}
/*
* Dernières actions commerciales effectuées
*
*/
$sql = "SELECT a.id, ".$db->pdate("a.datea")." as da, c.libelle, a.fk_user_author, s.nom as sname, s.idp";