Fichies plus utiliss
This commit is contained in:
Rodolphe Quiedeville
parent
a6dda7a71a
commit
6abbafaf5d
@ -1,203 +0,0 @@
|
|||||||
<?PHP
|
|
||||||
/* Copyright (C) 2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
||||||
*
|
|
||||||
* 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.
|
|
||||||
*
|
|
||||||
* $Id$
|
|
||||||
* $Source$
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
require("./pre.inc.php");
|
|
||||||
|
|
||||||
|
|
||||||
$page = $_GET["page"];
|
|
||||||
$sortorder = $_GET["sortorder"];
|
|
||||||
$sortfield = $_GET["sortfield"];
|
|
||||||
|
|
||||||
llxHeader();
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Sécurité accés client
|
|
||||||
*/
|
|
||||||
if ($user->societe_id > 0)
|
|
||||||
{
|
|
||||||
$action = '';
|
|
||||||
$socidp = $user->societe_id;
|
|
||||||
}
|
|
||||||
|
|
||||||
if ($sortorder == "") {
|
|
||||||
$sortorder="DESC";
|
|
||||||
}
|
|
||||||
if ($sortfield == "") {
|
|
||||||
$sortfield="f.date";
|
|
||||||
}
|
|
||||||
|
|
||||||
if ($page == -1) { $page = 0 ; }
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Mode Liste
|
|
||||||
*
|
|
||||||
*
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
$sql = "SELECT distinct(ligne), sum(montant) ";
|
|
||||||
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_import_cdr";
|
|
||||||
|
|
||||||
if ($_GET["search_ligne"])
|
|
||||||
{
|
|
||||||
$sql .= " WHERE f.ligne LIKE '%".$_GET["search_ligne"]."%'";
|
|
||||||
}
|
|
||||||
$sql .= " GROUP BY ligne";
|
|
||||||
$result = $db->query($sql);
|
|
||||||
if ($result)
|
|
||||||
{
|
|
||||||
$num = $db->num_rows();
|
|
||||||
$i = 0;
|
|
||||||
|
|
||||||
print_barre_liste("Vérification avant facturation", $page, "check.php", "", $sortfield, $sortorder, '', $num);
|
|
||||||
|
|
||||||
print '<table class="noborder" width="100%" cellspacing="0" cellpadding="4">';
|
|
||||||
print '<tr class="liste_titre"><td valign="center">Ligne';
|
|
||||||
print '</td><td align="center">Client</td><td align="center">Client facturé</td><td align="right">Montant</td><td align="center">Remise LMN</td>';
|
|
||||||
print '<td align="center">RIB';
|
|
||||||
print '</td><td align="center">Email</td>';
|
|
||||||
print "</tr>\n";
|
|
||||||
|
|
||||||
$var=True;
|
|
||||||
$total = 0;
|
|
||||||
while ($i < $num)
|
|
||||||
{
|
|
||||||
$row = $db->fetch_row($i);
|
|
||||||
$var=!$var;
|
|
||||||
$total = $total + $row[1];
|
|
||||||
print "<tr $bc[$var]><td>";
|
|
||||||
|
|
||||||
$ligne = new LigneTel($db);
|
|
||||||
if ($ligne->fetch($row[0]) == 1)
|
|
||||||
{
|
|
||||||
|
|
||||||
print '<img src="../ligne/graph'.$ligne->statut.'.png"> ';
|
|
||||||
|
|
||||||
print '<a href="'.DOL_URL_ROOT.'/telephonie/ligne/fiche.php?numero='.$row[0].'">';
|
|
||||||
print img_file();
|
|
||||||
|
|
||||||
print '</a> <a href="'.DOL_URL_ROOT.'/telephonie/ligne/fiche.php?numero='.$row[0].'">';
|
|
||||||
|
|
||||||
print dolibarr_print_phone($row[0])."</a></td>\n";
|
|
||||||
|
|
||||||
print '<td align="center">';
|
|
||||||
|
|
||||||
$client = new Societe($db);
|
|
||||||
|
|
||||||
if ($client->fetch($ligne->client_id))
|
|
||||||
{
|
|
||||||
print $client->nom."</td>\n";
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print "Erreur";
|
|
||||||
}
|
|
||||||
|
|
||||||
print '<td align="center">';
|
|
||||||
|
|
||||||
if ($ligne->facturable)
|
|
||||||
{
|
|
||||||
|
|
||||||
$clientf = new Societe($db);
|
|
||||||
if ($clientf->fetch($ligne->client_facture_id))
|
|
||||||
{
|
|
||||||
print '<a href="'.DOL_URL_ROOT.'/comm/fiche.php?socid='.$ligne->client_facture_id.'">';
|
|
||||||
print $clientf->nom."</a></td>\n";
|
|
||||||
|
|
||||||
print '<td align="right">'.price($row[1])."</td>";;
|
|
||||||
|
|
||||||
/* Remise LMN */
|
|
||||||
print '<td align="center">'.$ligne->remise.' %</td>';
|
|
||||||
|
|
||||||
print '<td align="center">';
|
|
||||||
|
|
||||||
if ($ligne->mode_paiement == 'pre')
|
|
||||||
{
|
|
||||||
if ($clientf->verif_rib())
|
|
||||||
{
|
|
||||||
print 'ok';
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print "Alerte RIB";
|
|
||||||
}
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print 'Virement';
|
|
||||||
}
|
|
||||||
print "</td>\n";
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print "Erreur</td><td>-</td>";
|
|
||||||
}
|
|
||||||
|
|
||||||
print '<td align="center">';
|
|
||||||
|
|
||||||
$cfs = $ligne->get_contact_facture();
|
|
||||||
|
|
||||||
if (sizeof($cfs))
|
|
||||||
{
|
|
||||||
print $cfs[0];
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print "Alerte Emails";
|
|
||||||
}
|
|
||||||
print "</td>\n";
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print 'Client non facturé</td><td colspan="4"> </td>';
|
|
||||||
}
|
|
||||||
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print dolibarr_print_phone($row[0]);
|
|
||||||
print '<td align="center">Ligne inconnue</td>';
|
|
||||||
print '<td colspan="5"> </td>';
|
|
||||||
}
|
|
||||||
|
|
||||||
print "</tr>\n";
|
|
||||||
$i++;
|
|
||||||
}
|
|
||||||
|
|
||||||
print '<tr class="liste_titre"><td colspan="2"> </td><td align="center">Total HT</td><td align="right">'.price($total).'</td><td colspan="4"> </td>';
|
|
||||||
print "</tr>\n";
|
|
||||||
|
|
||||||
print '<tr class="liste_titre"><td colspan="2"> </td><td align="center">Total TTC</td><td align="right">'.price($total*1.196).'</td><td colspan="4"> </td>';
|
|
||||||
|
|
||||||
print "</table>";
|
|
||||||
$db->free();
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print $db->error() . ' ' . $sql;
|
|
||||||
}
|
|
||||||
|
|
||||||
$db->close();
|
|
||||||
|
|
||||||
llxFooter("<em>Dernière modification $Date$ révision $Revision$</em>");
|
|
||||||
?>
|
|
||||||
@ -1,125 +0,0 @@
|
|||||||
<?PHP
|
|
||||||
/* Copyright (C) 2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
||||||
*
|
|
||||||
* 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.
|
|
||||||
*
|
|
||||||
* $Id$
|
|
||||||
* $Source$
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
require("./pre.inc.php");
|
|
||||||
|
|
||||||
$page = $_GET["page"];
|
|
||||||
$sortorder = $_GET["sortorder"];
|
|
||||||
|
|
||||||
if (!$user->rights->telephonie->lire)
|
|
||||||
accessforbidden();
|
|
||||||
|
|
||||||
llxHeader('','Telephonie');
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Sécurité accés client
|
|
||||||
*/
|
|
||||||
if ($user->societe_id > 0)
|
|
||||||
{
|
|
||||||
$action = '';
|
|
||||||
$socidp = $user->societe_id;
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Mode Liste
|
|
||||||
*
|
|
||||||
*
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
print '<table class="noborder" width="100%" cellspacing="0" cellpadding="4">';
|
|
||||||
|
|
||||||
print '<tr><td width="30%" valign="top">';
|
|
||||||
|
|
||||||
|
|
||||||
$sql = "SELECT date_format(f.datef,'%Y%m'), sum(f.total_ttc)";
|
|
||||||
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_facture as tf";
|
|
||||||
$sql .= " , ".MAIN_DB_PREFIX."facture as f";
|
|
||||||
|
|
||||||
$sql .= " WHERE tf.fk_facture = f.rowid";
|
|
||||||
$sql .= " GROUP BY date_format(f.datef,'%Y%m')";
|
|
||||||
|
|
||||||
if ($db->query($sql))
|
|
||||||
{
|
|
||||||
$num = $db->num_rows();
|
|
||||||
$i = 0;
|
|
||||||
$ligne = new LigneTel($db);
|
|
||||||
|
|
||||||
print '<table class="noborder" width="100%" cellspacing="0" cellpadding="4">';
|
|
||||||
print '<tr class="liste_titre"><td>Factures</td><td valign="center">Nb</td>';
|
|
||||||
print "</tr>\n";
|
|
||||||
$var=True;
|
|
||||||
|
|
||||||
while ($i < $num)
|
|
||||||
{
|
|
||||||
$row = $db->fetch_row($i);
|
|
||||||
$var=!$var;
|
|
||||||
|
|
||||||
print "<tr $bc[$var]>";
|
|
||||||
print "<td>".$row[0]."</td>\n";
|
|
||||||
print "<td>".$row[1]."</td>\n";
|
|
||||||
print "</tr>\n";
|
|
||||||
$i++;
|
|
||||||
}
|
|
||||||
print "</table>";
|
|
||||||
$db->free();
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print $db->error() . ' ' . $sql;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
print '</td><td valign="top" width="70%" rowspan="3">';
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
print '</td></tr>';
|
|
||||||
|
|
||||||
|
|
||||||
print '<tr><td width="30%" valign="top">';
|
|
||||||
/*
|
|
||||||
*
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
/*
|
|
||||||
*
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
|
|
||||||
print '</td></tr>';
|
|
||||||
|
|
||||||
print '</table>';
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
$db->close();
|
|
||||||
|
|
||||||
llxFooter("<em>Dernière modification $Date$ révision $Revision$</em>");
|
|
||||||
?>
|
|
||||||
Loading…
Reference in New Issue
Block a user