* Copyright (C) 2004-2011 Laurent Destailleur * Copytight (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/bank/index.php * \ingroup banque * \brief Page accueil banque * \version $Id: index.php,v 1.55 2011/07/31 22:23:16 eldy Exp $ */ require("./pre.inc.php"); require_once(DOL_DOCUMENT_ROOT."/lib/bank.lib.php"); require_once(DOL_DOCUMENT_ROOT."/compta/tva/class/tva.class.php"); require_once(DOL_DOCUMENT_ROOT."/compta/sociales/class/chargesociales.class.php"); $langs->load("banks"); $langs->load("categories"); // Security check if ($user->societe_id) $socid=$user->societe_id; $result=restrictedArea($user,'banque'); $statut=isset($_GET["statut"])?$_GET["statut"]:''; /* * View */ llxHeader(); $link=''; if ($statut == '') $link=''.$langs->trans("IncludeClosedAccount").''; if ($statut == 'all') $link=''.$langs->trans("OnlyOpenedAccount").''; print_fiche_titre($langs->trans("AccountsArea"),$link); print '
'; // On charge tableau des comptes financiers (ouverts par defaut) $accounts = array(); $sql = "SELECT rowid, courant, rappro"; $sql.= " FROM ".MAIN_DB_PREFIX."bank_account"; $sql.= " WHERE entity = ".$conf->entity; if ($statut != 'all') $sql.= " AND clos = 0"; $sql.= $db->order('label', 'ASC'); $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; while ($i < $num) { $objp = $db->fetch_object($resql); $accounts[$objp->rowid] = $objp->courant; $i++; } $db->free($resql); } /* * Comptes courants (courant = 1) */ print ''; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; $total = 0; $var=true; foreach ($accounts as $key=>$type) { if ($type == 1) { $acc = new Account($db); $acc->fetch($key); $var = !$var; $solde = $acc->solde(1); print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; $total += $solde; } } // Total print ''; print ''; /* * Comptes caisse/liquide (courant = 2) */ print ''; print ''; print ''; print ''; print ''; print "\n"; $total = 0; $var=true; foreach ($accounts as $key=>$type) { if ($type == 2) { $acc = new Account($db); $acc->fetch($key); $var = !$var; $solde = $acc->solde(1); print ""; print ''; print ''; print ''; print ''; print ''; print ''; print ''; $total += $solde; } } // Total print ''; print ''; /* * Comptes placements (courant = 0) */ print ''; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; $total = 0; $var=true; foreach ($accounts as $key=>$type) { if ($type == 0) { $acc = new Account($db); $acc->fetch($key); $var = !$var; $solde = $acc->solde(1); print ""; print ''; print ''; print ''; print ''; print ''; print ''; print ''; $total += $solde; } } // Total print ''; print "

'.$langs->trans("CurrentAccounts").'	'.$langs->trans("Bank").'	'.$langs->trans("AccountIdShort").'	'.$langs->trans("TransactionsToConciliate").'	'.$langs->trans("Status").'	'.$langs->trans("BankBalance").'
'.$acc->getNomUrl(1).'	'.$acc->bank.'	'.$acc->number.'	'; if ($acc->rappro) { $result=$acc->load_board($user,$acc->id); print $acc->nbtodo; if ($acc->nbtodolate) print ' ('.$acc->nbtodolate.img_warning($langs->trans("Late")).')'; } else print $langs->trans("FeatureDisabled"); print '	'.$acc->getLibStatut(2).'	'; print ''.price($solde).''; print '
'.$langs->trans("Total").'					'.price($total).'

'.$langs->trans("CashAccounts").'				'.$langs->trans("Status").'	'.$langs->trans("BankBalance").'
'.$acc->getNomUrl(1).'	'.$acc->bank.'			'.$acc->getLibStatut(2).'	'; print ''.price($solde).''; print '
'.$langs->trans("Total").'					'.price($total).'

'.$langs->trans("SavingAccounts").'	'.$langs->trans("Bank").'	'.$langs->trans("Numero").'	'.$langs->trans("TransactionsToConciliate").'	'.$langs->trans("Status").'	'.$langs->trans("BankBalance").'
'.$acc->getNomUrl(1).'	'.$acc->bank.'	'.$acc->number.'	'; if ($acc->rappro) { $result=$acc->load_board($user,$acc->id); print $acc->nbtodo; if ($acc->nbtodolate) print ' ('.$acc->nbtodolate.img_warning($langs->trans("Late")).')'; } else print $langs->trans("FeatureDisabled"); print '	'.$acc->getLibStatut(2).'	'; print ''.price($solde).''; print '
'.$langs->trans("Total").'					'.price($total).'

"; /* * Boutons d'actions */ print "

\n"; if ($user->rights->banque->configurer) { print ''.$langs->trans("NewFinancialAccount").''; print ''.$langs->trans("Rubriques").''; } print "

"; $db->close(); llxFooter('$Date: 2011/07/31 22:23:16 $ - $Revision: 1.55 $'); ?>