* Copyright (C) 2004-2007 Laurent Destailleur * * 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$ */ /** \file htdocs/compta/charges/index.php \ingroup compta \brief Page liste des charges \version $Revision$ */ require("./pre.inc.php"); require_once(DOL_DOCUMENT_ROOT."/compta/tva/tva.class.php"); if (!$user->admin && !$user->rights->tax->charges->lire) accessforbidden(); $year=$_GET["year"]; $filtre=$_GET["filtre"]; if (! $year) { $year=date("Y", time()); } llxHeader(); print_fiche_titre($langs->trans("TaxAndDividendsArea"),($year?"".img_previous()." ".$langs->trans("Year")." $year ".img_next()."":"")); print "
"; /* * Charges sociales */ print_titre($langs->trans("SocialContributions")); print ''; print ""; print ""; print ""; print ""; print ""; print "\n"; $sql = "SELECT c.libelle as lib, s.fk_type as type,"; $sql.=" count(s.rowid) as nb, sum(s.amount) as total, sum(IF(paye=1,s.amount,0)) as totalpaye"; $sql.= " FROM ".MAIN_DB_PREFIX."c_chargesociales as c, ".MAIN_DB_PREFIX."chargesociales as s"; $sql.= " WHERE s.fk_type = c.id"; if ($year > 0) { $sql .= " AND ("; // Si period renseigné on l'utilise comme critere de date, sinon on prend date échéance, // ceci afin d'etre compatible avec les cas ou la période n'etait pas obligatoire $sql .= " (s.periode is not null and date_format(s.periode, '%Y') = $year) "; $sql .= "or (s.periode is null and date_format(s.date_ech, '%Y') = $year)"; $sql .= ")"; } $sql .= " GROUP BY c.libelle ASC"; $resql=$db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; $total = 0; $totalpaye = 0; $var=true; while ($i < $num) { $obj = $db->fetch_object($resql); $var = !$var; print ""; print ''; print ''; print ''; print ''; print ''; $total = $total + $obj->total; $totalpaye = $totalpaye + $obj->totalpaye; $i++; } print ''; print '"; print '"; print ""; } else { dolibarr_print_error($db); } print '

".$langs->trans("Type")."	".$langs->trans("Nb")."	".$langs->trans("Amount")."	".$langs->trans("AlreadyPayed")."
'.$obj->lib.'	'.$obj->nb.'	'.price($obj->total).'	'.price($obj->totalpaye).'
'.$langs->trans("Total").'		'.price($total)."	'.price($totalpaye)."

'; print "
"; $tva = new Tva($db); print_titre($langs->trans("VATPayments")); $sql = "SELECT rowid, amount, label, ".$db->pdate("f.datev")." as dm"; $sql .= " FROM ".MAIN_DB_PREFIX."tva as f "; if ($year > 0) { // Si period renseigné on l'utilise comme critere de date, sinon on prend date échéance, // ceci afin d'etre compatible avec les cas ou la période n'etait pas obligatoire $sql .= " WHERE date_format(f.datev, '%Y') = ".$year; } $sql .= " ORDER BY dm DESC"; $result = $db->query($sql); if ($result) { $num = $db->num_rows($result); $i = 0; $total = 0 ; print ''; print ''; print ''; print ""; print '"; print "\n"; $var=1; while ($i < $num) { $obj = $db->fetch_object($result); $var=!$var; print ""; print '\n"; print "\n"; $total = $total + $obj->amount; print ""; print "\n"; $i++; } print ''; print '"; print "

'.$langs->trans("Date").'	".$langs->trans("Label")."	'.$langs->trans("Amount")."
'.dolibarr_print_date($obj->dm,'day')."	".$obj->label."	".price($obj->amount)."
'.$langs->trans("Total").'		'.price($total)."

"; $db->free($result); } else { dolibarr_print_error($db); } $db->close(); llxFooter('$Date$ - $Revision$'); ?>