* Copyright (C) 2003 Jean-Louis Bergamo * Copyright (C) 2004-2010 Laurent Destailleur * Copytight (C) 2004 Christophe Combelles * Copytight (C) 2005-2010 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, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /** * \file htdocs/compta/bank/account.php * \ingroup banque * \brief List of detail of bank transaction for an account * \version $Id$ */ require("./pre.inc.php"); // We use pre.inc.php to have a dynamic menu require_once(DOL_DOCUMENT_ROOT."/lib/bank.lib.php"); require_once(DOL_DOCUMENT_ROOT."/societe/class/societe.class.php"); require_once(DOL_DOCUMENT_ROOT."/adherents/class/adherent.class.php"); require_once(DOL_DOCUMENT_ROOT."/compta/sociales/class/chargesociales.class.php"); require_once(DOL_DOCUMENT_ROOT."/compta/paiement/class/paiement.class.php"); require_once(DOL_DOCUMENT_ROOT."/compta/tva/class/tva.class.php"); require_once(DOL_DOCUMENT_ROOT."/fourn/class/paiementfourn.class.php"); $langs->load("bills"); // Security check if (isset($_GET["account"]) || isset($_GET["ref"])) { $id = isset($_GET["account"])?$_GET["account"]:(isset($_GET["ref"])?$_GET["ref"]:''); } $fieldid = isset($_GET["ref"])?'ref':'rowid'; if ($user->societe_id) $socid=$user->societe_id; $result=restrictedArea($user,'banque',$id,'bank_account','','',$fieldid); $account=isset($_GET["account"])?$_GET["account"]:$_POST["account"]; $vline=isset($_GET["vline"])?$_GET["vline"]:$_POST["vline"]; $action=isset($_GET["action"])?$_GET["action"]:$_POST["action"]; $page=isset($_GET["page"])?$_GET["page"]:0; $negpage=isset($_GET["negpage"])?$_GET["negpage"]:0; if ($negpage) { $page=$_GET["nbpage"] - $negpage; if ($page > $_GET["nbpage"]) $page = $_GET["nbpage"]; } $mesg=''; /* * Action */ $dateop=-1; if ($_POST["action"] == 'add' && $account && ! isset($_POST["cancel"]) && $user->rights->banque->modifier) { if (price2num($_POST["credit"]) > 0) { $amount = price2num($_POST["credit"]); } else { $amount = - price2num($_POST["debit"]); } $dateop = dol_mktime(12,0,0,$_POST["opmonth"],$_POST["opday"],$_POST["opyear"]); $operation=$_POST["operation"]; $num_chq=$_POST["num_chq"]; $label=$_POST["label"]; $cat1=$_POST["cat1"]; if (! $dateop) $mesg=$langs->trans("ErrorFieldRequired",$langs->trans("Date")); if (! $operation) $mesg=$langs->trans("ErrorFieldRequired",$langs->trans("Type")); if (! $amount) $mesg=$langs->trans("ErrorFieldRequired",$langs->trans("Amount")); if (! $mesg) { $acct=new Account($db,$account); $insertid = $acct->addline($dateop, $operation, $label, $amount, $num_chq, $cat1, $user); if ($insertid > 0) { Header("Location: account.php?account=" . $account); exit; } else { dol_print_error($db,$acct->error); } } else { $_GET["action"]='addline'; } } if ($_POST["action"] == 'confirm_delete' && $_POST["confirm"]=='yes' && $user->rights->banque->modifier) { $accline=new AccountLine($db); $accline->fetch($_GET["rowid"]); $result=$accline->delete(); } /* * View */ llxHeader(); $societestatic=new Societe($db); $chargestatic=new ChargeSociales($db); $memberstatic=new Adherent($db); $paymentstatic=new Paiement($db); $paymentsupplierstatic=new PaiementFourn($db); $paymentvatstatic=new TVA($db); $html = new Form($db); if ($account || $_GET["ref"]) { if ($vline) { $viewline = $vline; } else { $viewline = 20; } $acct = new Account($db); if ($account) { $result=$acct->fetch($account); } if ($_GET["ref"]) { $result=$acct->fetch(0,$_GET["ref"]); $account=$acct->id; } // Chargement des categories bancaires dans $options $nbcategories=0; $sql = "SELECT rowid, label"; $sql.= " FROM ".MAIN_DB_PREFIX."bank_categ"; $sql.= " WHERE entity = ".$conf->entity; $sql.= " ORDER BY label"; $result = $db->query($sql); if ($result) { $var=True; $num = $db->num_rows($result); $i = 0; $options = ""; while ($i < $num) { $obj = $db->fetch_object($result); $options .= "\n"; $nbcategories++; $i++; } $db->free($result); } // Definition de sql_rech et param $param=''; $sql_rech=''; $mode_search = 0; if ($_REQUEST["req_nb"]) { $sql_rech.= " AND b.num_chq like '%".addslashes($_REQUEST["req_nb"])."%'"; $param.='&req_nb='.urlencode($_REQUEST["req_nb"]); $mode_search = 1; } if ($_REQUEST["req_desc"]) { $sql_rech.= " AND b.label like '%".addslashes($_REQUEST["req_desc"])."%'"; $param.='&req_desc='.urlencode($_REQUEST["req_desc"]); $mode_search = 1; } if ($_REQUEST["req_debit"]) { $sql_rech.=" AND b.amount = -".price2num($_REQUEST["req_debit"]); $param.='&req_debit='.urlencode($_REQUEST["req_debit"]); $mode_search = 1; } if ($_REQUEST["req_credit"]) { $sql_rech.=" AND b.amount = ".price2num($_REQUEST["req_credit"]); $param.='&req_credit='.urlencode($_REQUEST["req_credit"]); $mode_search = 1; } if ($_REQUEST["thirdparty"]) { $sql_rech.=" AND (COALESCE(s.nom,'') LIKE '%".addslashes($_REQUEST["thirdparty"])."%')"; $param.='&thirdparty='.urlencode($_REQUEST["thirdparty"]); $mode_search = 1; } $sql = "SELECT count(*) as nb"; $sql.= " FROM ".MAIN_DB_PREFIX."bank_account as ba"; $sql.= ", ".MAIN_DB_PREFIX."bank as b"; if ($mode_search) { $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."bank_url as bu ON bu.fk_bank = b.rowid AND bu.type='company'"; $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON bu.url_id = s.rowid"; } $sql.= " WHERE b.fk_account = ".$acct->id; $sql.= " AND b.fk_account = ba.rowid"; $sql.= " AND ba.entity = ".$conf->entity; $sql.= $sql_rech; dol_syslog("account.php count transactions - sql=".$sql); $result=$db->query($sql); if ($result) { $obj = $db->fetch_object($result); $nbline = $obj->nb; $total_lines = $nbline; if ($nbline > $viewline ) { $limit = $nbline - $viewline ; } else { $limit = $viewline; } $db->free($result); } else { dol_print_error($db); } if ($page > 0) { $limitsql = $nbline - ($page * $viewline); if ($limitsql < $viewline) { $limitsql = $viewline; } $nbline = $limitsql; } else { $page = 0; $limitsql = $nbline; } // Onglets $head=bank_prepare_head($acct); dol_fiche_head($head,'journal',$langs->trans("FinancialAccount"),0,'account'); print ''; // Ref print ''; print ''; // Label print ''; print ''; print '
'.$langs->trans("Ref").''; print $html->showrefnav($acct,'ref','',1,'ref'); print '
'.$langs->trans("Label").''.$acct->label.'
'; print '
'; if ($mesg) print '
'.$mesg.'
'; /** * Search form */ $param.='&account='.$acct->id; // Define transaction list navigation string $navig=''; $navig.='
'; $nbpage=floor($total_lines/$viewline)+($total_lines % $viewline > 0?1:0); // Nombre de page total if ($limitsql > $viewline) { $navig.=''.img_previous().''; } $navig.= ' Page '; $navig.=''; $navig.=''; $navig.=''; $navig.=''; $navig.=''; $navig.=''; $navig.=''; $navig.=''; $navig.='/'.$nbpage.' '; if ($total_lines > $limitsql ) { $navig.= ''.img_next().''; } $navig.='
'; // Confirmation delete if ($_GET["action"]=='delete') { $text=$langs->trans('ConfirmDeleteTransaction'); $ret=$html->form_confirm($_SERVER['PHP_SELF'].'?account='.$acct->id.'&rowid='.$_GET["rowid"],$langs->trans('DeleteTransaction'),$text,'confirm_delete'); if ($ret == 'html') print '
'; } print ''; // Show title if (! $_GET["action"]=='addline' && ! $_GET["action"]=='delete') { print ''; } // Form to add a transaction with no invoice if ($user->rights->banque->modifier && $_GET["action"]=='addline') { print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ""; print "\n"; } /* * Affiche tableau des transactions bancaires * */ // Ligne de titre tableau des ecritures print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; print "\n"; /* Another solution * create temporary table solde type=heap select amount from llx_bank limit 100 ; * select sum(amount) from solde ; */ $sql = "SELECT b.rowid, b.dateo as do, b.datev as dv,"; $sql.= " b.amount, b.label, b.rappro, b.num_releve, b.num_chq, b.fk_type"; if ($mode_search) { $sql.= ", s.rowid as socid, s.nom as thirdparty"; } if ($mode_search && $conf->adherent->enabled) { } if ($mode_search && $conf->tax->enabled) { } $sql.= " FROM ".MAIN_DB_PREFIX."bank_account as ba"; $sql.= ", ".MAIN_DB_PREFIX."bank as b"; if ($mode_search) { $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."bank_url as bu1 ON bu1.fk_bank = b.rowid AND bu1.type='company'"; $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON bu1.url_id = s.rowid"; } if ($mode_search && $conf->tax->enabled) { $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."bank_url as bu2 ON bu2.fk_bank = b.rowid AND bu2.type='payment_vat'"; $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."tva as t ON bu2.url_id = t.rowid"; } if ($mode_search && $conf->adherent->enabled) { // \TODO Mettre jointure sur adherent pour recherche sur un adherent //$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."bank_url as bu3 ON bu3.fk_bank = b.rowid AND bu3.type='company'"; //$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON bu3.url_id = s.rowid"; } $sql.= " WHERE b.fk_account=".$acct->id; $sql.= " AND b.fk_account = ba.rowid"; $sql.= " AND ba.entity = ".$conf->entity; $sql.= $sql_rech; $sql.= $db->order("b.datev, b.datec", "ASC"); // We add date of creation to have correct order when everything is done the same day $sql.= $db->plimit($limitsql, 0); dol_syslog("account.php get transactions - sql=".$sql); $result = $db->query($sql); if ($result) { $now=dol_now('tzserver'); $nows=dol_date('Ymd',$now); //$html->load_cache_types_paiements(); //$html->cache_types_paiements $var=true; $num = $db->num_rows($result); $i = 0; $total = 0; $sep = 0; while ($i < $num) { $objp = $db->fetch_object($result); $total = price2num($total + $objp->amount,'MT'); if ($i >= ($nbline - $viewline)) { $var=!$var; // Is it a transaction in future ? $dos=dol_date('Ymd',$db->jdate($objp->do)); //print "dos=".$dos." nows=".$nows; if ($dos > $nows && !$sep) // Yes, we show a subtotal { $sep = 1 ; print ''; print ""; print ""; print ''; } print ""; print "\n"; print "\n"; // Payment type print "\n"; print '\n"; // Description print ''; // Add third party column print ''; // Amount if ($objp->amount < 0) { print "\n"; } else { print "\n"; } // Balance if ($action != 'search') { if ($total >= 0) { print ''; } else { print ''; } } else { print ''; } // Receipt conciliate or edit link if ($objp->rappro && $acct->type != 2) // Si non compte cash { print ""; } else { print ''; } print ""; } $i++; } // Show total if ($page == 0 && ! $mode_search) { print ''; print ''; print ''; print ''; } $db->free($result); } else { dol_print_error($db); } print "
'.$navig.'
'.$langs->trans("AddBankRecordLong").'
'.$langs->trans("Date").' '.$langs->trans("Type").''.$langs->trans("Numero").''.$langs->trans("Description").''.$langs->trans("Debit").''.$langs->trans("Credit").' 
'; $html->select_date($dateop,'op',0,0,0,'transaction'); print ''; $html->select_types_paiements((isset($_POST["operation"])?$_POST["operation"]:''),'operation','1,2',2,1); print ''; print ''; print ''; if ($nbcategories) { print '
'.$langs->trans("Category").': '; } print '
'; print '
'; print ''; print '
 
'.$langs->trans("Date").''.$langs->trans("Value").''.$langs->trans("Type").''.$langs->trans("Numero").''.$langs->trans("Description").''.$langs->trans("ThirdParty").''.$langs->trans("Debit").''.$langs->trans("Credit").''.$langs->trans("BankBalance").''; if ($acct->type != 2 && $acct->rappro) print $langs->trans("AccountStatementShort"); else print ' '; print '
  
'; print $langs->trans("CurrentBalance"); print '".price($total - $objp->amount)." 
".dol_print_date($db->jdate($objp->do),"day")."".dol_print_date($db->jdate($objp->dv),"day").""; $label=($langs->trans("PaymentTypeShort".$objp->fk_type)!="PaymentTypeShort".$objp->fk_type)?$langs->trans("PaymentTypeShort".$objp->fk_type):$objp->fk_type; if ($objp->fk_type == 'SOLD') $label=' '; print $label; print "'.($objp->num_chq?$objp->num_chq:"")."'; // Show generic description if (preg_match('/^\((.*)\)$/i',$objp->label,$reg)) { // Generic description because between (). We show it after translating. print $langs->trans($reg[1]); } else { print dol_trunc($objp->label,60); } // Add links after description $links = $acct->get_url($objp->rowid); foreach($links as $key=>$val) { if ($links[$key]['type']=='payment') { $paymentstatic->id=$links[$key]['url_id']; print ' '.$paymentstatic->getNomUrl(2); } else if ($links[$key]['type']=='payment_supplier') { $paymentsupplierstatic->id=$links[$key]['url_id']; $paymentsupplierstatic->ref=$links[$key]['url_id']; print ' '.$paymentsupplierstatic->getNomUrl(2); } else if ($links[$key]['type']=='company') { } else if ($links[$key]['type']=='payment_sc') { //print ' - '; print ''; print ' '.img_object($langs->trans('ShowPayment'),'payment').' '; //print $langs->trans("SocialContributionPayment"); print ''; } else if ($links[$key]['type']=='payment_vat') { $paymentvatstatic->id=$links[$key]['url_id']; $paymentvatstatic->ref=$links[$key]['url_id']; print ' '.$paymentvatstatic->getNomUrl(2); } else if ($links[$key]['type']=='banktransfert') { // Do not show this link (avoid confusion). Can already be accessed from transaction detail } else if ($links[$key]['type']=='member') { } else if ($links[$key]['type']=='sc') { } else { //print ' - '; print ''; if (preg_match('/^\((.*)\)$/i',$links[$key]['label'],$reg)) { // Label generique car entre parentheses. On l'affiche en le traduisant if ($reg[1]=='paiement') $reg[1]='Payment'; print ' '.$langs->trans($reg[1]); } else { print ' '.$links[$key]['label']; } print ''; } } print ''; foreach($links as $key=>$val) { if ($links[$key]['type']=='company') { $societestatic->id=$links[$key]['url_id']; $societestatic->nom=$links[$key]['label']; print $societestatic->getNomUrl(1,'',16); } else if ($links[$key]['type']=='sc') { // sc=old value $chargestatic->id=$links[$key]['url_id']; if (preg_match('/^\((.*)\)$/i',$links[$key]['label'],$reg)) { if ($reg[1]=='socialcontribution') $reg[1]='SocialContribution'; $chargestatic->lib=$langs->trans($reg[1]); } else { $chargestatic->lib=$links[$key]['label']; } $chargestatic->ref=$chargestatic->lib; print $chargestatic->getNomUrl(1,16); } else if ($links[$key]['type']=='member') { $memberstatic->id=$links[$key]['url_id']; $memberstatic->ref=$links[$key]['label']; print $memberstatic->getNomUrl(1,16,'card'); } } print '".price($objp->amount * -1)."   ".price($objp->amount)." '.price($total).' '.price($total).'-"; print ''; print img_view(); print ''; print "  "; print "num_releve&account=$acct->id\">$objp->num_releve"; print "'; if ($user->rights->banque->modifier || $user->rights->banque->consolidate) { print ''; print img_edit(); print ''; } else { print ''; print img_view(); print ''; } print ' '; if ($user->rights->banque->modifier) { print ''; print img_delete(); print ''; } print '
'; if ($sep) print ' '; else print $langs->trans("CurrentBalance"); print ''.price($total).' 
"; print "\n\n"; /* * Boutons actions */ if ($_GET["action"] != 'addline' && $_GET["action"] != 'delete') { print '
'; if ($acct->type != 2 && $acct->rappro) // Si non compte cash et rapprochable { if ($user->rights->banque->consolidate) { print ''.$langs->trans("Conciliate").''; } else { print "trans("NotEnoughPermissions")."\" href=\"#\">".$langs->trans("Conciliate").""; } } if ($user->rights->banque->modifier) { print ''.$langs->trans("AddBankRecord").''; } else { print "trans("NotEnoughPermissions")."\" href=\"#\">".$langs->trans("AddBankRecord").""; } print '
'; } print '
'; } else { print $langs->trans("ErrorBankAccountNotFound"); } $db->close(); llxFooter('$Date$ - $Revision$'); ?>