diff --git a/htdocs/compta/bank/account.php3 b/htdocs/compta/bank/account.php3 index cee0a8e031e..f28ad153adf 100644 --- a/htdocs/compta/bank/account.php3 +++ b/htdocs/compta/bank/account.php3 @@ -20,50 +20,268 @@ * */ +/* + * + * $viewall + * + */ require("./pre.inc.php3"); -require("./bank.lib.php3"); +require("./bank.lib.php3"); llxHeader(); $db = new Db(); -print_titre ("Comptes bancaires"); -print ""; -print ""; -print ""; -print ""; -print "\n"; +if ($account) { -$sql = "SELECT rowid, label,number,bank FROM llx_bank_account"; + if ($action == 'add') { + $author = $GLOBALS["REMOTE_USER"]; + if ($credit > 0) { + $amount = $credit ; + } else { + $amount = - $debit ; + } + + if ($num_chq) { + $sql = "INSERT INTO llx_bank (datec, dateo, label, amount, author, num_chq,fk_account)"; + $sql .= " VALUES (now(), $dateo, '$label', $amount,'$author',$num_chq,$account)"; + } else { + $sql = "INSERT INTO llx_bank (datec, dateo, label, amount, author,fk_account)"; + $sql .= " VALUES (now(), $dateo, '$label', $amount,'$author',$account)"; + } -$result = $db->query($sql); -if ($result) { - $var=True; - $num = $db->num_rows(); - $i = 0; $total = 0; - - $sep = 0; - - while ($i < $num) { - $objp = $db->fetch_object( $i); - - - print ""; - - - $i++; + $result = $db->query($sql); + if ($result) { + $rowid = $db->last_insert_id(); + if ($cat1) { + $sql = "INSERT INTO llx_bank_class (lineid, fk_categ) VALUES ($rowid, $cat1)"; + $result = $db->query($sql); + } + } else { + print $db->error(); + print "

$sql"; + } + } - $db->free(); + if ($action == 'del') { + bank_delete_line($db, $rowid); + } + + if ($vline) { + $viewline = $vline; + } else { + $viewline = 20; + } + + print "Bank - Reload -"; + print "Voir tout"; + + print "
"; + print ""; + print "

LabelBanqueNuméro
$objp->label$objp->bank$objp->number
"; + print ""; + print ""; + print ""; + print ""; + print ""; + print ""; + print "\n"; + + $sql = "SELECT count(*) FROM llx_bank"; + if ($account) { $sql .= " WHERE fk_account=$account"; } + if ( $db->query($sql) ) { + $nbline = $db->result (0, 0); + $db->free(); + + if ($nbline > $viewline ) { + $limit = $nbline - $viewline ; + } else { + $limit = $viewline; + } + } + + $sql = "SELECT rowid, label FROM llx_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 ($viewall) { $nbline=0; } + + /* 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"; + $sql .= " FROM llx_bank as b "; if ($account) { $sql .= " WHERE fk_account=$account"; } + if ($vue) { + if ($vue == 'credit') { + $sql .= " AND b.amount >= 0 "; + } else { + $sql .= " AND b.amount < 0 "; + } + } + $sql .= " ORDER BY b.dateo ASC"; + + $result = $db->query($sql); + if ($result) { + $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)) { + + if (!$psol) { + print "\n"; + $psol = 1; + + } else { + $var=!$var; + + if ($objp->do > $time && !$sep) { + $sep = 1 ; + print ""; + print "\n"; + print ""; + print ""; + print ""; + print ""; + print ""; + print ""; + print ""; + + } + + print ""; + print "\n"; + + if ($objp->num_chq) { + print ""; + } else { + print ""; + } + + if ($objp->amount < 0) { + print "\n"; + } else { + print "\n"; + } + + if ($total > 0) { + print "\n"; + } else { + print "\n"; + } + + if ($objp->rappro) { + print ""; + } else { + print ""; + } + + print "\n"; + + print ""; + + } + } + + + $i++; + } + $db->free(); + } + + if ($sep) { + print ""; + print "\n"; + } else { + + print ""; + print "\n"; + print ""; + print ""; + print ""; + print ""; + print ""; + print ""; + + print ""; + + + + } + + print "
DateDescriptionDebitCreditSoldeFrancs
 ".price($total)."".francs($total)."
Total :".price($total - $objp->amount)."".francs($total - $objp->amount)."
CHQ -"; + print ""; + print "
Format : YYYYMMDD - 200108260000.00
".strftime("%d %b %y",$objp->do)."CHQ $objp->num_chq - $objp->label$objp->label".price($objp->amount * -1)."  ".price($objp->amount)."".price($total)."".price($total)."num_releve\">$objp->num_releverowid&account=$account\">[Del]".francs($objp->amount)."
Total :".price($total)."".francs($total)."
Total :".price($total)."".francs($total)."
CHQ -"; + print ""; + print "
Format : YYYYMMDD - 200108260000.00
"; + + print "Edit Categories"; + print " Budgets"; + + +} else { + + print_titre ("Comptes bancaires"); + + print ""; + print ""; + print ""; + print ""; + print "\n"; + + $sql = "SELECT rowid, label,number,bank FROM llx_bank_account"; + + $result = $db->query($sql); + if ($result) { + $var=True; + $num = $db->num_rows(); + $i = 0; $total = 0; + + $sep = 0; + + while ($i < $num) { + $objp = $db->fetch_object( $i); + + + print ""; + + + $i++; + } + $db->free(); + } + + + $acc = new Account($db); + + print "
LabelBanqueNuméro
$objp->label$objp->bank$objp->number
"; } -$acc = new Account($db); - -print ""; - - - $db->close(); llxFooter("Dernière modification $Date$ révision $Revision$");