* Copyright (C) 2003 Jean-Louis Bergamo * Copyright (C) 2004 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$ * */ require("./pre.inc.php"); if (!$user->rights->banque->lire) accessforbidden(); $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; if ($action == 'add' && $account) { if ($_POST["credit"] > 0) { $amount = $_POST["credit"]; } else { $amount = - $_POST["credit"]; } $dateop = $_POST["dateoy"].$_POST["dateo"]; $operation=$_POST["operation"]; $label=$_POST["label"]; $operation=$_POST["operation"]; $num_chq=$_POST["num_chq"]; $cat1=$_POST["cat1"]; $acct=new Account($db,$account); $insertid = $acct->addline($dateop, $operation, $label, $amount, $num_chq, $cat1); //print "

Account: insertid=$insertid - " . $action . " : ".$_GET["account"] . " - " . $_POST["account"]." - ".$account."

\n"; if ($insertid == '') { print "Erreur: Probleme d'insertion : ".$db->error(); } else { Header("Location: $PHP_SELF?account=" . $account); } } if ($action == 'del' && $account && $user->rights->banque->modifier) { $acct=new Account($db,$account); $acct->deleteline($rowid); } /*********************************************************************************** * * * */ llxHeader(); //print "

Page: $page - Account: " . $_GET["account"] . " - " . $HTTP_POST_VARS["account"]."

\n"; if ($account > 0) { if ($vline) { $viewline = $vline; } else { $viewline = 20; } $acct = new Account($db); $acct->fetch($account); print_titre("Compte : " .$acct->label); // Chargement des categories dans $options $sql = "SELECT rowid, label FROM ".MAIN_DB_PREFIX."bank_categ;"; $result = $db->query($sql); if ($result) { $var=True; $num = $db->num_rows(); $i = 0; $options = ""; while ($i < $num) { $obj = $db->fetch_object($i); $options .= "\n"; $i++; } $db->free(); } /* * * */ if ($HTTP_POST_VARS["req_desc"]) { $sql_rech = " AND lower(b.label) like '%".strtolower($HTTP_POST_VARS["req_desc"])."%'"; $mode_search = 1; } else { $mode_search = 0; } /* * * */ $sql = "SELECT count(*) FROM ".MAIN_DB_PREFIX."bank as b WHERE 1=1"; // $sql .= " AND b.dateo <= now()"; $sql .= " AND b.fk_account=".$acct->id; $sql .= $sql_rech; if ( $db->query($sql) ) { $nbline = $db->result (0, 0); $total_lines = $nbline; $db->free(); if ($nbline > $viewline ) { $limit = $nbline - $viewline ; } else { $limit = $viewline; } } if ($page > 0 && $mode_search == 0) { $limitsql = $nbline - ($page * $viewline); if ($limitsql < $viewline) { $limitsql = $viewline; } $nbline = $limitsql; } else { $page = 0; $limitsql = $nbline; } //print "$page $viewline $nbline $limitsql"; /* * Formulaire de recherche * */ print '
'; print ''; print ''; print ''; print ""; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; print "\n"; /* * * */ if ($user->rights->banque->modifier) { print ''; print ''; print ''; print ''; } print ''; print ''; print ''; print ''; // DEBUG // print ""; /* Another solution * create temporary table solde type=heap select amount from llx_bank limit 100 ; * select sum(amount) from solde ; */ $sql = "SELECT b.rowid,".$db->pdate("b.dateo")." as do, b.amount, b.label, b.rappro, b.num_releve, b.num_chq, b.fk_type"; $sql .= " FROM ".MAIN_DB_PREFIX."bank as b "; $sql .= " WHERE fk_account=".$acct->id; if ($req_debit) { $sql .= " AND b.amount = -".$req_debit; } $sql .= $sql_rech; if ($vue) { if ($vue == 'credit') { $sql .= " AND b.amount >= 0 "; } else { $sql .= " AND b.amount < 0 "; } } // $sql .= " AND b.dateo <= now()"; $sql .= " ORDER BY b.dateo ASC"; $sql .= $db->plimit($limitsql, 0); $result = $db->query($sql); if ($result) { _print_lines($db, $sql, $acct); } /* * Opérations hors factures * */ if ($user->rights->banque->modifier) { print "\n"; print ""; print ""; print ''; print ''; print ''; print ''; print ''; print ''; print ""; print ''; print ''; print ''; print ''; print ''; } print "
'; if ($limitsql > $viewline) { print 'Page précédente'; } if ($total_lines > $limitsql ) { print 'Page suivante'; } print ' '; if ($user->rights->banque->modifier) { print 'Rappro'; } else { print " "; } print '
DateTypeDescriptionDébitCréditSoldeRelevé
$nbline$viewlinetotal_lines $total_lineslimitsql $limitsql
 
Saisie d'une transaction hors facture
'; print ''; print '"; print ""; print "
YYYY MMDD Description0000.000000.00
"; if ($user->rights->banque->modifier) { print ""; } } else { print "Erreur : numéro de compte inexistant"; } $db->close(); llxFooter("Dernière modification $Date$ révision $Revision$"); /* * */ Function _print_lines($db,$sql,$acct) { global $bc, $nbline, $viewline, $user, $page; $var=True; $num = $db->num_rows(); $i = 0; $total = 0; $sep = 0; while ($i < $num) { $objp = $db->fetch_object( $i); $total = $total + $objp->amount; $time = time(); if ($i >= ($nbline - $viewline)) { $var=!$var; if ($objp->do > $time && !$sep) { $sep = 1 ; print " "; print "".price($total - $objp->amount).""; print " "; print ''; } print ""; print "".strftime("%d %b %y",$objp->do)."\n"; print "".$objp->fk_type." ".($objp->num_chq?$objp->num_chq:"")."\n"; // if ($objp->num_chq) // { // print "rowid&account=$acct->id\">$objp->label"; // } // else // { //Xavier DUTOIT : Ajout d'un lien pour modifier la ligne print "rowid&account=$acct->id\">$objp->label"; /* * Ajout les liens */ $urls_line = $acct->get_url($objp->rowid); $numurl = sizeof($urls_line); $k = 0; while ($k < $numurl) { print ' '.$urls_line[$k][2].''; $k++; } print ''; // } if ($objp->amount < 0) { print "".price($objp->amount * -1)." \n"; } else { print " ".price($objp->amount)."\n"; } if ($action !='search') { if ($total > 0) { print ''.price($total)."\n"; } else { print "".price($total)."\n"; } } else { print '-'; } if ($objp->rappro) { print "num_releve&account=$acct->id\">$objp->num_releve"; } else { if ($user->rights->banque->modifier) { print "rowid&account=$acct->id&page=$page\">"; print img_delete(); print ""; } else { print " "; } } print ""; } $i++; } $db->free(); } ?>