forked from Wavyzz/dolibarr
703 lines
26 KiB
PHP
703 lines
26 KiB
PHP
<?php
|
|
/* Copyright (C) 2001-2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2003 Xavier DUTOIT <doli@sydesy.com>
|
|
* Copyright (C) 2004-2017 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2004 Christophe Combelles <ccomb@free.fr>
|
|
* Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
|
|
* Copyright (C) 2015-2017 Alexandre Spangaro <aspangaro@open-dsi.fr>
|
|
* Copyright (C) 2015 Jean-François Ferry <jfefe@aternatik.fr>
|
|
* Copyright (C) 2016 Marcos García <marcosgdf@gmail.com>
|
|
* Copyright (C) 2018 Frédéric France <frederic.france@netlogic.fr>
|
|
*
|
|
* 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 <https://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/compta/bank/line.php
|
|
* \ingroup bank
|
|
* \brief Page to edit a bank transaction record
|
|
*/
|
|
|
|
require '../../main.inc.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
|
|
|
|
// Load translation files required by the page
|
|
$langs->loadLangs(array('banks', 'categories', 'compta', 'bills', 'other'));
|
|
if (! empty($conf->adherent->enabled)) $langs->load("members");
|
|
if (! empty($conf->don->enabled)) $langs->load("donations");
|
|
if (! empty($conf->loan->enabled)) $langs->load("loan");
|
|
if (! empty($conf->salaries->enabled)) $langs->load("salaries");
|
|
|
|
|
|
$id = (GETPOST('id', 'int') ? GETPOST('id', 'int') : GETPOST('account', 'int'));
|
|
$ref = GETPOST('ref', 'alpha');
|
|
$action=GETPOST('action', 'alpha');
|
|
$confirm=GETPOST('confirm', 'alpha');
|
|
$rowid=GETPOST("rowid", 'int');
|
|
$orig_account=GETPOST("orig_account");
|
|
$backtopage=GETPOST('backtopage', 'alpha');
|
|
$cancel=GETPOST('cancel', 'alpha');
|
|
|
|
// Security check
|
|
$fieldvalue = (! empty($id) ? $id : (! empty($ref) ? $ref :''));
|
|
$fieldtype = (! empty($ref) ? 'ref' :'rowid');
|
|
if ($user->socid) $socid=$user->socid;
|
|
$result=restrictedArea($user, 'banque', $fieldvalue, 'bank_account', '', '', $fieldtype);
|
|
if (! $user->rights->banque->lire && ! $user->rights->banque->consolidate) accessforbidden();
|
|
|
|
|
|
/*
|
|
* Actions
|
|
*/
|
|
|
|
if ($cancel)
|
|
{
|
|
if ($backtopage)
|
|
{
|
|
header("Location: ".$backtopage);
|
|
exit;
|
|
}
|
|
}
|
|
|
|
|
|
if ($user->rights->banque->consolidate && $action == 'donext')
|
|
{
|
|
$al = new AccountLine($db);
|
|
$al->dateo_next($_GET["rowid"]);
|
|
}elseif ($user->rights->banque->consolidate && $action == 'doprev')
|
|
{
|
|
$al = new AccountLine($db);
|
|
$al->dateo_previous($_GET["rowid"]);
|
|
}elseif ($user->rights->banque->consolidate && $action == 'dvnext')
|
|
{
|
|
$al = new AccountLine($db);
|
|
$al->datev_next($_GET["rowid"]);
|
|
}elseif ($user->rights->banque->consolidate && $action == 'dvprev')
|
|
{
|
|
$al = new AccountLine($db);
|
|
$al->datev_previous($_GET["rowid"]);
|
|
}
|
|
|
|
if ($action == 'confirm_delete_categ' && $confirm == "yes" && $user->rights->banque->modifier)
|
|
{
|
|
$cat1=GETPOST("cat1", 'int');
|
|
if (!empty($rowid) && !empty($cat1)) {
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."bank_class WHERE lineid = ".$rowid." AND fk_categ = ".$cat1;
|
|
if (! $db->query($sql))
|
|
{
|
|
dol_print_error($db);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
setEventMessages($langs->trans("MissingIds"), null, 'errors');
|
|
}
|
|
}
|
|
|
|
if ($user->rights->banque->modifier && $action == "update")
|
|
{
|
|
$error=0;
|
|
|
|
$acline = new AccountLine($db);
|
|
$acline->fetch($rowid);
|
|
|
|
$acsource = new Account($db);
|
|
$acsource->fetch($id);
|
|
|
|
$actarget = new Account($db);
|
|
if (GETPOST('accountid', 'int') > 0 && ! $acline->rappro && ! $acline->getVentilExportCompta()) // We ask to change bank account
|
|
{
|
|
$actarget->fetch(GETPOST('accountid', 'int'));
|
|
}
|
|
else
|
|
{
|
|
$actarget->fetch($id);
|
|
}
|
|
|
|
if ($actarget->courant == Account::TYPE_CASH && GETPOST('value', 'alpha') != 'LIQ')
|
|
{
|
|
setEventMessages($langs->trans("ErrorCashAccountAcceptsOnlyCashMoney"), null, 'errors');
|
|
$error++;
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
$db->begin();
|
|
|
|
$amount = price2num($_POST['amount']);
|
|
$dateop = dol_mktime(12, 0, 0, $_POST["dateomonth"], $_POST["dateoday"], $_POST["dateoyear"]);
|
|
$dateval= dol_mktime(12, 0, 0, $_POST["datevmonth"], $_POST["datevday"], $_POST["datevyear"]);
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."bank";
|
|
$sql.= " SET ";
|
|
// Always opened
|
|
if (isset($_POST['value'])) $sql.=" fk_type='".$db->escape($_POST['value'])."',";
|
|
if (isset($_POST['num_chq'])) $sql.=" num_chq='".$db->escape($_POST["num_chq"])."',";
|
|
if (isset($_POST['banque'])) $sql.=" banque='".$db->escape($_POST["banque"])."',";
|
|
if (isset($_POST['emetteur'])) $sql.=" emetteur='".$db->escape($_POST["emetteur"])."',";
|
|
// Blocked when conciliated
|
|
if (! $acline->rappro)
|
|
{
|
|
if (isset($_POST['label'])) $sql.=" label='".$db->escape($_POST["label"])."',";
|
|
if (isset($_POST['amount'])) $sql.=" amount='".$amount."',";
|
|
if (isset($_POST['dateomonth'])) $sql.=" dateo = '".$db->idate($dateop)."',";
|
|
if (isset($_POST['datevmonth'])) $sql.=" datev = '".$db->idate($dateval)."',";
|
|
}
|
|
$sql.= " fk_account = ".$actarget->id;
|
|
$sql.= " WHERE rowid = ".$acline->id;
|
|
|
|
$result = $db->query($sql);
|
|
if (! $result)
|
|
{
|
|
$error++;
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
$arrayofcategs=GETPOST('custcats', 'array');
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."bank_class WHERE lineid = ".$rowid;
|
|
if (! $db->query($sql))
|
|
{
|
|
$error++;
|
|
dol_print_error($db);
|
|
}
|
|
if (count($arrayofcategs))
|
|
{
|
|
foreach($arrayofcategs as $val)
|
|
{
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."bank_class (lineid, fk_categ) VALUES (".$rowid.", ".$val.")";
|
|
if (! $db->query($sql))
|
|
{
|
|
$error++;
|
|
dol_print_error($db);
|
|
}
|
|
}
|
|
// $arrayselected will be loaded after in page output
|
|
}
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
setEventMessages($langs->trans("RecordSaved"), null, 'mesgs');
|
|
$db->commit();
|
|
}
|
|
else
|
|
{
|
|
$db->rollback();
|
|
dol_print_error($db);
|
|
}
|
|
}
|
|
}
|
|
|
|
// Reconcile
|
|
if ($user->rights->banque->consolidate && ($action == 'num_releve' || $action == 'setreconcile'))
|
|
{
|
|
$num_rel=trim($_POST["num_rel"]);
|
|
$rappro=$_POST['reconciled']?1:0;
|
|
|
|
// Check parameters
|
|
if ($rappro && empty($num_rel))
|
|
{
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("AccountStatement")), null, 'errors');
|
|
$error++;
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
$db->begin();
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."bank";
|
|
$sql.= " SET num_releve=".($num_rel?"'".$num_rel."'":"null");
|
|
if (empty($num_rel)) $sql.= ", rappro = 0";
|
|
else $sql.=", rappro = ".$rappro;
|
|
$sql.= " WHERE rowid = ".$rowid;
|
|
|
|
dol_syslog("line.php", LOG_DEBUG);
|
|
$result = $db->query($sql);
|
|
if ($result)
|
|
{
|
|
setEventMessages($langs->trans("RecordSaved"), null, 'mesgs');
|
|
$db->commit();
|
|
}
|
|
else
|
|
{
|
|
$db->rollback();
|
|
dol_print_error($db);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
$form = new Form($db);
|
|
|
|
llxHeader('', $langs->trans("BankTransaction"));
|
|
|
|
$c = new Categorie($db);
|
|
$cats = $c->containing($rowid, Categorie::TYPE_BANK_LINE);
|
|
foreach ($cats as $cat) {
|
|
$arrayselected[] = $cat->id;
|
|
}
|
|
|
|
$tabs = array(
|
|
array(
|
|
DOL_URL_ROOT.'/compta/bank/line.php?rowid='.$rowid,
|
|
$langs->trans('Card')
|
|
),
|
|
array(
|
|
DOL_URL_ROOT.'/compta/bank/info.php?rowid='.$rowid,
|
|
$langs->trans('Info')
|
|
)
|
|
);
|
|
|
|
|
|
$sql = "SELECT b.rowid,b.dateo as do,b.datev as dv, b.amount, b.label, b.rappro,";
|
|
$sql.= " b.num_releve, b.fk_user_author, b.num_chq, b.fk_type, b.fk_account, b.fk_bordereau as receiptid,";
|
|
$sql.= " b.emetteur,b.banque";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."bank as b";
|
|
$sql.= " WHERE rowid=".$rowid;
|
|
$sql.= " ORDER BY dateo ASC";
|
|
$result = $db->query($sql);
|
|
if ($result)
|
|
{
|
|
$i = 0; $total = 0;
|
|
if ($db->num_rows($result))
|
|
{
|
|
$objp = $db->fetch_object($result);
|
|
|
|
$total = $total + $objp->amount;
|
|
|
|
$acct=new Account($db);
|
|
$acct->fetch($objp->fk_account);
|
|
$account = $acct->id;
|
|
|
|
$bankline = new AccountLine($db);
|
|
$bankline->fetch($rowid, $ref);
|
|
|
|
$links=$acct->get_url($rowid);
|
|
$bankline->load_previous_next_ref('', 'rowid');
|
|
|
|
// Confirmations
|
|
if ($action == 'delete_categ')
|
|
{
|
|
print $form->formconfirm($_SERVER['PHP_SELF']."?rowid=".$rowid."&cat1=".GETPOST("fk_categ")."&orig_account=".$orig_account, $langs->trans("RemoveFromRubrique"), $langs->trans("RemoveFromRubriqueConfirm"), "confirm_delete_categ", '', 'yes', 1);
|
|
}
|
|
|
|
print '<form name="update" method="POST" action="'.$_SERVER['PHP_SELF'].'?rowid='.$rowid.'">';
|
|
print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
|
|
print '<input type="hidden" name="action" value="update">';
|
|
print '<input type="hidden" name="orig_account" value="'.$orig_account.'">';
|
|
print '<input type="hidden" name="id" value="'.$acct->id.'">';
|
|
|
|
dol_fiche_head($tabs, 0, $langs->trans('LineRecord'), -1, 'account', 0);
|
|
|
|
$linkback = '<a href="'.DOL_URL_ROOT.'/compta/bank/bankentries_list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
|
|
|
|
|
|
dol_banner_tab($bankline, 'rowid', $linkback);
|
|
|
|
print '<div class="fichecenter">';
|
|
|
|
print '<div class="underbanner clearboth"></div>';
|
|
print '<table class="border centpercent">';
|
|
|
|
$i++;
|
|
|
|
// Bank account
|
|
print '<tr><td class="titlefield">'.$langs->trans("Account").'</td>';
|
|
print '<td>';
|
|
if (! $objp->rappro && ! $bankline->getVentilExportCompta())
|
|
{
|
|
$form->select_comptes($acct->id, 'accountid', 0, '', 0);
|
|
}
|
|
else
|
|
{
|
|
print $acct->getNomUrl(1, 'transactions', 'reflabel');
|
|
}
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Show links of bank transactions
|
|
if (count($links))
|
|
{
|
|
print '<tr><td class="tdtop">'.$langs->trans("Links").'</td>';
|
|
print '<td>';
|
|
foreach($links as $key=>$val)
|
|
{
|
|
if ($key) print '<br>';
|
|
if ($links[$key]['type']=='payment') {
|
|
require_once DOL_DOCUMENT_ROOT.'/compta/paiement/class/paiement.class.php';
|
|
$paymenttmp=new Paiement($db);
|
|
$paymenttmp->fetch($links[$key]['url_id']);
|
|
$paymenttmp->ref = $langs->trans("Payment").' '.$paymenttmp->ref;
|
|
/*print '<a href="'.DOL_URL_ROOT.'/compta/paiement/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowPayment'),'payment').' ';
|
|
print $langs->trans("Payment");
|
|
print '</a>';*/
|
|
print $paymenttmp->getNomUrl(1);
|
|
}
|
|
elseif ($links[$key]['type']=='payment_supplier') {
|
|
require_once DOL_DOCUMENT_ROOT.'/fourn/class/paiementfourn.class.php';
|
|
$paymenttmp=new PaiementFourn($db);
|
|
$paymenttmp->fetch($links[$key]['url_id']);
|
|
$paymenttmp->ref = $langs->trans("Payment").' '.$paymenttmp->ref;
|
|
/*print '<a href="'.DOL_URL_ROOT.'/fourn/paiement/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowPayment'),'payment').' ';
|
|
print $langs->trans("Payment");
|
|
print '</a>';*/
|
|
print $paymenttmp->getNomUrl(1);
|
|
}
|
|
elseif ($links[$key]['type']=='company') {
|
|
$societe=new Societe($db);
|
|
$societe->fetch($links[$key]['url_id']);
|
|
print $societe->getNomUrl(1);
|
|
}
|
|
elseif ($links[$key]['type']=='sc') {
|
|
print '<a href="'.DOL_URL_ROOT.'/compta/sociales/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowSocialContribution'), 'bill').' ';
|
|
print $langs->trans("SocialContribution").($links[$key]['label']?' - '.$links[$key]['label']:'');
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='payment_sc') {
|
|
print '<a href="'.DOL_URL_ROOT.'/compta/payment_sc/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowPayment'), 'payment').' ';
|
|
print $langs->trans("SocialContributionPayment");
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='payment_vat') {
|
|
print '<a href="'.DOL_URL_ROOT.'/compta/tva/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowVAT'), 'payment').' ';
|
|
print $langs->trans("VATPayment");
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='payment_salary') {
|
|
print '<a href="'.DOL_URL_ROOT.'/compta/salaries/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowPaymentSalary'), 'payment').' ';
|
|
print $langs->trans("SalaryPayment");
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='payment_loan') {
|
|
print '<a href="'.DOL_URL_ROOT.'/loan/payment/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowLoanPayment'), 'payment').' ';
|
|
print $langs->trans("PaymentLoan");
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='loan') {
|
|
print '<a href="'.DOL_URL_ROOT.'/loan/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowLoan'), 'bill').' ';
|
|
print $langs->trans("Loan");
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='member') {
|
|
print '<a href="'.DOL_URL_ROOT.'/adherents/card.php?rowid='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowMember'), 'user').' ';
|
|
print $links[$key]['label'];
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='payment_donation') {
|
|
print '<a href="'.DOL_URL_ROOT.'/don/payment/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowDonation'), 'payment').' ';
|
|
print $langs->trans("DonationPayment");
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='banktransfert') {
|
|
print '<a href="'.DOL_URL_ROOT.'/compta/bank/line.php?rowid='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowTransaction'), 'payment').' ';
|
|
print $langs->trans("TransactionOnTheOtherAccount");
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='user') {
|
|
print '<a href="'.DOL_URL_ROOT.'/user/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowUser'), 'user').' ';
|
|
print $langs->trans("User");
|
|
print '</a>';
|
|
}
|
|
elseif ($links[$key]['type']=='payment_various') {
|
|
print '<a href="'.DOL_URL_ROOT.'/compta/bank/various_payment/card.php?id='.$links[$key]['url_id'].'">';
|
|
print img_object($langs->trans('ShowVariousPayment'), 'payment').' ';
|
|
print $langs->trans("VariousPayment");
|
|
print '</a>';
|
|
}
|
|
else {
|
|
print '<a href="'.$links[$key]['url'].$links[$key]['url_id'].'">';
|
|
print img_object('', 'generic').' ';
|
|
print $links[$key]['label'];
|
|
print '</a>';
|
|
}
|
|
}
|
|
print '</td></tr>';
|
|
}
|
|
|
|
//$user->rights->banque->modifier=false;
|
|
//$user->rights->banque->consolidate=true;
|
|
|
|
// Type of payment / Number
|
|
print "<tr><td>".$langs->trans("Type")." / ".$langs->trans("Numero");
|
|
print ' <em>('.$langs->trans("ChequeOrTransferNumber").')</em>';
|
|
print "</td>";
|
|
if ($user->rights->banque->modifier || $user->rights->banque->consolidate)
|
|
{
|
|
print '<td>';
|
|
$form->select_types_paiements($objp->fk_type, "value", '', 2);
|
|
print '<input type="text" class="flat" name="num_chq" value="'.(empty($objp->num_chq) ? '' : $objp->num_chq).'">';
|
|
if ($objp->receiptid)
|
|
{
|
|
include_once DOL_DOCUMENT_ROOT.'/compta/paiement/cheque/class/remisecheque.class.php';
|
|
$receipt=new RemiseCheque($db);
|
|
$receipt->fetch($objp->receiptid);
|
|
print ' '.$langs->trans("CheckReceipt").': '.$receipt->getNomUrl(2);
|
|
}
|
|
print '</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td>'.$objp->fk_type.' '.$objp->num_chq.'</td>';
|
|
}
|
|
print "</tr>";
|
|
|
|
// Transmitter
|
|
print "<tr><td>".$langs->trans("CheckTransmitter");
|
|
print ' <em>('.$langs->trans("ChequeMaker").')</em>';
|
|
print "</td>";
|
|
if ($user->rights->banque->modifier || $user->rights->banque->consolidate)
|
|
{
|
|
print '<td>';
|
|
print '<input type="text" class="flat minwidth200" name="emetteur" value="'.(empty($objp->emetteur) ? '' : stripslashes($objp->emetteur)).'">';
|
|
print '</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td>'.$objp->emetteur.'</td>';
|
|
}
|
|
print "</tr>";
|
|
|
|
// Bank of cheque
|
|
print "<tr><td>".$langs->trans("Bank");
|
|
print ' <em>('.$langs->trans("ChequeBank").')</em>';
|
|
print "</td>";
|
|
if ($user->rights->banque->modifier || $user->rights->banque->consolidate)
|
|
{
|
|
print '<td>';
|
|
print '<input type="text" class="flat minwidth200" name="banque" value="'.(empty($objp->banque) ? '' : $objp->banque).'">';
|
|
print '</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td>'.$objp->banque.'</td>';
|
|
}
|
|
print "</tr>";
|
|
|
|
// Date ope
|
|
print '<tr><td>'.$langs->trans("DateOperation").'</td>';
|
|
if ($user->rights->banque->modifier || $user->rights->banque->consolidate)
|
|
{
|
|
print '<td>';
|
|
print $form->selectDate($db->jdate($objp->do), 'dateo', '', '', '', 'update', 1, 0, $objp->rappro);
|
|
if (! $objp->rappro)
|
|
{
|
|
print ' ';
|
|
print '<a href="'.$_SERVER['PHP_SELF'].'?action=doprev&id='.$id.'&rowid='.$objp->rowid.'">';
|
|
print img_edit_remove() . "</a> ";
|
|
print '<a href="'.$_SERVER['PHP_SELF'].'?action=donext&id='.$id.'&rowid='.$objp->rowid.'">';
|
|
print img_edit_add() ."</a>";
|
|
}
|
|
print '</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td>';
|
|
print dol_print_date($db->jdate($objp->do), "day");
|
|
print '</td>';
|
|
}
|
|
print '</tr>';
|
|
|
|
// Value date
|
|
print "<tr><td>".$langs->trans("DateValue")."</td>";
|
|
if ($user->rights->banque->modifier || $user->rights->banque->consolidate)
|
|
{
|
|
print '<td>';
|
|
print $form->selectDate($db->jdate($objp->dv), 'datev', '', '', '', 'update', 1, 0, $objp->rappro);
|
|
if (! $objp->rappro)
|
|
{
|
|
print ' ';
|
|
print '<a href="'.$_SERVER['PHP_SELF'].'?action=dvprev&id='.$id.'&rowid='.$objp->rowid.'">';
|
|
print img_edit_remove() . "</a> ";
|
|
print '<a href="'.$_SERVER['PHP_SELF'].'?action=dvnext&id='.$id.'&rowid='.$objp->rowid.'">';
|
|
print img_edit_add() ."</a>";
|
|
}
|
|
print '</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td>';
|
|
print dol_print_date($db->jdate($objp->dv), "day");
|
|
print '</td>';
|
|
}
|
|
print "</tr>";
|
|
|
|
// Description
|
|
print "<tr><td>".$langs->trans("Label")."</td>";
|
|
if ($user->rights->banque->modifier || $user->rights->banque->consolidate)
|
|
{
|
|
print '<td>';
|
|
print '<input name="label" class="flat minwidth300" '.($objp->rappro?' disabled':'').' value="';
|
|
if (preg_match('/^\((.*)\)$/i', $objp->label, $reg))
|
|
{
|
|
// Label generique car entre parentheses. On l'affiche en le traduisant
|
|
print $langs->trans($reg[1]);
|
|
}
|
|
else
|
|
{
|
|
print $objp->label;
|
|
}
|
|
print '">';
|
|
print '</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td>';
|
|
if (preg_match('/^\((.*)\)$/i', $objp->label, $reg))
|
|
{
|
|
// Label generique car entre parentheses. On l'affiche en le traduisant
|
|
print $langs->trans($reg[1]);
|
|
}
|
|
else
|
|
{
|
|
print $objp->label;
|
|
}
|
|
print '</td>';
|
|
}
|
|
print '</tr>';
|
|
|
|
// Amount
|
|
print "<tr><td>".$langs->trans("Amount")."</td>";
|
|
if ($user->rights->banque->modifier)
|
|
{
|
|
print '<td>';
|
|
print '<input name="amount" class="flat maxwidth100" '.($objp->rappro?' disabled':'').' value="'.price($objp->amount).'"> '.$langs->trans("Currency".$acct->currency_code);
|
|
print '</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td>';
|
|
print price($objp->amount);
|
|
print '</td>';
|
|
}
|
|
print "</tr>";
|
|
|
|
// Categories
|
|
if (! empty($conf->categorie->enabled) && ! empty($user->rights->categorie->lire))
|
|
{
|
|
$langs->load('categories');
|
|
|
|
// Bank line
|
|
print '<tr><td class="toptd">' . $form->editfieldkey('RubriquesTransactions', 'custcats', '', $object, 0) . '</td><td>';
|
|
$cate_arbo = $form->select_all_categories(Categorie::TYPE_BANK_LINE, null, 'parent', null, null, 1);
|
|
print $form->multiselectarray('custcats', $cate_arbo, $arrayselected, null, null, null, null, "90%");
|
|
print "</td></tr>";
|
|
}
|
|
|
|
print "</table>";
|
|
|
|
print '</div>';
|
|
|
|
dol_fiche_end();
|
|
|
|
|
|
print '<div class="center"><input type="submit" class="button" value="'.$langs->trans("Update").'"></div><br>';
|
|
|
|
print "</form>";
|
|
|
|
|
|
|
|
// Releve rappro
|
|
if ($acct->canBeConciliated() > 0) // Si compte rapprochable
|
|
{
|
|
print load_fiche_titre($langs->trans("Reconciliation"), '', 'title_bank.png');
|
|
print '<hr>'."\n";
|
|
|
|
print '<form method="POST" action="'.$_SERVER['PHP_SELF'].'?rowid='.$objp->rowid.'">';
|
|
print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
|
|
print '<input type="hidden" name="action" value="setreconcile">';
|
|
print '<input type="hidden" name="orig_account" value="'.$orig_account.'">';
|
|
print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
|
|
|
|
print '<div class="fichecenter">';
|
|
|
|
print '<table class="border centpercent">';
|
|
|
|
print '<tr><td class="titlefield">'.$langs->trans("Conciliation")."</td>";
|
|
if ($user->rights->banque->consolidate)
|
|
{
|
|
print '<td>';
|
|
if ($objp->rappro)
|
|
{
|
|
print $langs->trans("AccountStatement").' <input name="num_rel_bis" class="flat" value="'.$objp->num_releve.'"'.($objp->rappro?' disabled':'').'>';
|
|
print '<input name="num_rel" type="hidden" value="'.$objp->num_releve.'">';
|
|
}
|
|
else
|
|
{
|
|
print $langs->trans("AccountStatement").' <input name="num_rel" class="flat" value="'.$objp->num_releve.'"'.($objp->rappro?' disabled':'').'>';
|
|
}
|
|
if ($objp->num_releve) print ' (<a href="'.DOL_URL_ROOT.'/compta/bank/releve.php?num='.$objp->num_releve.'&account='.$acct->id.'">'.$langs->trans("AccountStatement").' '.$objp->num_releve.')</a>';
|
|
print '</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td>'.$objp->num_releve.' </td>';
|
|
}
|
|
print '</tr>';
|
|
|
|
print "<tr><td>".$langs->trans("BankLineConciliated")."</td>";
|
|
if ($user->rights->banque->consolidate)
|
|
{
|
|
print '<td>';
|
|
print '<input type="checkbox" name="reconciled" class="flat" '.(isset($_POST["reconciled"])?($_POST["reconciled"]?' checked="checked"':''):($objp->rappro?' checked="checked"':'')).'">';
|
|
print '</td>';
|
|
}
|
|
else
|
|
{
|
|
print '<td>'.yn($objp->rappro).'</td>';
|
|
}
|
|
print '</tr>';
|
|
print '</table>';
|
|
|
|
print '</div>';
|
|
|
|
print '<div class="center">';
|
|
|
|
print '<input type="submit" class="button" value="'.$langs->trans("Update").'">';
|
|
if ($backtopage)
|
|
{
|
|
print ' ';
|
|
print '<input type="submit" name="cancel" class="button" value="'.$langs->trans("Cancel").'">';
|
|
}
|
|
print '</div>';
|
|
|
|
print '</form>';
|
|
}
|
|
}
|
|
|
|
$db->free($result);
|
|
}
|
|
else dol_print_error($db);
|
|
|
|
// End of page
|
|
llxFooter();
|
|
$db->close();
|