* Copyright (C) 2004-2010 Laurent Destailleur * Copyright (C) 2005-2009 Regis Houssin * * 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/compta/tva/reglement.php * \ingroup tax * \brief List of VAT payments * \version $Id: reglement.php,v 1.33 2011/08/03 00:46:25 eldy Exp $ */ require('../../main.inc.php'); require_once(DOL_DOCUMENT_ROOT."/compta/tva/class/tva.class.php"); $langs->load("compta"); $langs->load("compta"); // Security check $socid = isset($_GET["socid"])?$_GET["socid"]:''; if ($user->societe_id) $socid=$user->societe_id; $result = restrictedArea($user, 'tax', '', '', 'charges'); /* * View */ llxHeader(); $tva_static = new Tva($db); print_fiche_titre($langs->trans("VATPayments")); $sql = "SELECT rowid, amount, label, f.datev as dm"; $sql.= " FROM ".MAIN_DB_PREFIX."tva as f "; $sql.= " WHERE f.entity = ".$conf->entity; $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 ""; print "\n"; $var=1; while ($i < $num) { $obj = $db->fetch_object($result); $var=!$var; print ""; $tva_static->id=$obj->rowid; $tva_static->ref=$obj->rowid; print "\n"; print "\n"; print '\n"; $total = $total + $obj->amount; print ""; print "\n"; $i++; } print ''; print ""; print "

'.$langs->trans("Ref").'	".$langs->trans("Label")."	'.$langs->trans("DatePayment").'	".$langs->trans("PayedByThisPayment")."
".$tva_static->getNomUrl(1)."	".dol_trunc($obj->label,40)."	'.dol_print_date($db->jdate($obj->dm),'day')."	".price($obj->amount)."
'.$langs->trans("Total").'			".price($total)."

"; $db->free($result); } else { dol_print_error($db); } $db->close(); llxFooter('$Date: 2011/08/03 00:46:25 $ - $Revision: 1.33 $'); ?>