* Copyright (C) 2007-2011 Laurent Destailleur * Copyright (C) 2009 Regis Houssin * Copyright (C) 2016 Juanjo Menent * * 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 3 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/paiement/cheque/index.php * \ingroup compta * \brief Home page for cheque receipts */ // Load Dolibarr environment require '../../../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/compta/paiement/cheque/class/remisecheque.class.php'; require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php'; // Load translation files required by the page $langs->loadLangs(array('banks', 'categories', 'compta', 'bills')); $checkdepositstatic = new RemiseCheque($db); $accountstatic = new Account($db); // Security check if ($user->socid) { $socid = $user->socid; } $result = restrictedArea($user, 'banque', '', ''); $usercancreate = $user->hasRight('banque', 'cheque'); /* * Actions */ // None /* * View */ llxHeader('', $langs->trans("ChequesArea")); $newcardbutton = ''; if ($usercancreate) { $newcardbutton .= dolGetButtonTitle($langs->trans('NewDeposit'), '', 'fa fa-plus-circle', DOL_URL_ROOT.'/compta/paiement/cheque/card.php?action=new'); } print load_fiche_titre($langs->trans("ChequesArea"), $newcardbutton, $checkdepositstatic->picto); print '
'; $sql = "SELECT count(b.rowid) as nb"; $sql .= " FROM ".MAIN_DB_PREFIX."bank as b"; $sql .= ", ".MAIN_DB_PREFIX."bank_account as ba"; $sql .= " WHERE ba.rowid = b.fk_account"; $sql .= " AND ba.entity IN (".getEntity('bank_account').")"; $sql .= " AND b.fk_type = 'CHQ'"; $sql .= " AND b.fk_bordereau = 0"; $sql .= " AND b.amount > 0"; $resql = $db->query($sql); print '
'; print ''; print ''; print '\n"; print "\n"; if ($resql) { $num = ''; if ($obj = $db->fetch_object($resql)) { $num = $obj->nb; } print ''; print ''; print ''; } else { dol_print_error($db); } print "
'.$langs->trans("BankChecks")."
'.$langs->trans("BankChecksToReceipt").''; print ''.$num.''; print '
\n"; print '
'; $max = 10; $sql = "SELECT bc.rowid, bc.date_bordereau as db, bc.amount, bc.ref as ref,"; $sql .= " bc.statut, bc.nbcheque,"; $sql .= " ba.ref as bref, ba.label, ba.rowid as bid, ba.number, ba.currency_code, ba.account_number, ba.fk_accountancy_journal,"; $sql .= " aj.code"; $sql .= " FROM ".MAIN_DB_PREFIX."bordereau_cheque as bc, ".MAIN_DB_PREFIX."bank_account as ba"; $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."accounting_journal as aj ON aj.rowid = ba.fk_accountancy_journal"; $sql .= " WHERE ba.rowid = bc.fk_bank_account"; $sql .= " AND bc.entity = ".$conf->entity; $sql .= " ORDER BY bc.date_bordereau DESC, rowid DESC"; $sql .= $db->plimit($max); $resql = $db->query($sql); if ($resql) { print '
'; // You can use div-table-responsive-no-min if you dont need reserved height for your table print ''; print ''; print ''; print '"; print ''; print ''; print ''; print ''; print "\n"; while ($objp = $db->fetch_object($resql)) { $checkdepositstatic->id = $objp->rowid; $checkdepositstatic->ref = ($objp->ref ? $objp->ref : $objp->rowid); $checkdepositstatic->statut = $objp->statut; $accountstatic->id = $objp->bid; $accountstatic->ref = $objp->bref; $accountstatic->label = $objp->label; $accountstatic->number = $objp->number; $accountstatic->currency_code = $objp->currency_code; $accountstatic->account_number = $objp->account_number; $accountstatic->accountancy_journal = $objp->code; $accountstatic->fk_accountancy_journal = $objp->fk_accountancy_journal; print ''."\n"; print ''; print ''; print ''; print ''; print ''; print ''; print ''; } print "
'.$langs->trans("LastCheckReceiptShort", $max).''.$langs->trans("Date")."'.$langs->trans("Account").''.$langs->trans("NbOfCheques").''.$langs->trans("Amount").''.$langs->trans("Status").'
'.$checkdepositstatic->getNomUrl(1).''.dol_print_date($db->jdate($objp->db), 'day').''.$accountstatic->getNomUrl(1).''.$objp->nbcheque.''.price($objp->amount).''.$checkdepositstatic->LibStatut($objp->statut, 3).'
"; print '
'; $db->free($resql); } else { dol_print_error($db); } print '
'; // End of page llxFooter(); $db->close();