* Copyright (C) 2007-2008 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. */ /** \file htdocs/compta/paiement/cheque/index.php \ingroup compta \brief Page liste des bordereau de remise de cheque \version $Id$ */ require("./pre.inc.php"); require_once(DOL_DOCUMENT_ROOT.'/compta/paiement/cheque/remisecheque.class.php'); require_once(DOL_DOCUMENT_ROOT.'/compta/bank/account.class.php'); $langs->load("banks"); // Security check if ($user->societe_id) $socid=$user->societe_id; $result = restrictedArea($user, 'banque', '',''); $checkdepositstatic=new RemiseCheque($db); $accountstatic=new Account($db); /* * Affichage */ llxHeader('',$langs->trans("ChequesArea")); print_fiche_titre($langs->trans("ChequesArea") ); print ''; print '\n"; print "

'; $sql = "SELECT count(b.rowid)"; $sql.= " FROM ".MAIN_DB_PREFIX."bank as b"; $sql.= " WHERE b.fk_type = 'CHQ' AND b.fk_bordereau = 0"; $sql.= " AND b.amount > 0"; $resql = $db->query($sql); print ''; print ''; print '\n"; print "\n"; if ($resql) { $var=false; if ($row = $db->fetch_row($resql) ) { $num = $row[0]; } print ""; print ''; print ''; print " '.$langs->trans("BankChecks")." '.$langs->trans("BankChecksToReceipt").' '; print ''.$num.''; print ' \n"; } else { dolibarr_print_error($db); } print '

'; $sql = "SELECT bc.rowid,".$db->pdate("bc.date_bordereau")." as db, bc.amount, bc.number,"; $sql.= " bc.statut, bc.nbcheque,"; $sql.= " ba.label, ba.rowid as bid"; $sql.= " FROM ".MAIN_DB_PREFIX."bordereau_cheque as bc,"; $sql.= " ".MAIN_DB_PREFIX."bank_account as ba"; $sql.= " WHERE ba.rowid=bc.fk_bank_account"; $sql.= " ORDER BY bc.rowid"; $sql.= " DESC LIMIT 10"; $resql = $db->query($sql); if ($resql) { print ''; print ''; print ''; print '"; print ''; print ''; print ''; print ''; print "\n"; $var=true; while ( $objp = $db->fetch_object($resql) ) { $checkdepositstatic->statut=$objp->statut; $checkdepositstatic->rowid=$objp->rowid; $checkdepositstatic->number=$objp->number; $accountstatic->id=$objp->bid; $accountstatic->label=$objp->label; $var=!$var; print "\n"; print ''; print ''; print ''; print ''; print ''; print ''; print ''; } print " '.$langs->trans("CheckReceiptShort").' '.$langs->trans("Date")." '.$langs->trans("Account").' '.$langs->trans("NbOfCheques").' '.$langs->trans("Amount").' '.$langs->trans("Status").' '.$checkdepositstatic->getNomUrl(1).' '.dolibarr_print_date($objp->db,'day').' '.$accountstatic->getNomUrl(1).' '.$objp->nbcheque.' '.price($objp->amount).' '.$checkdepositstatic->LibStatut($objp->statut,3).' "; $db->free($resql); } else { dolibarr_print_error($db); } print "

\n"; $db->close(); llxFooter('$Date$ - $Revision$'); ?>