mirror of
https://github.com/Dolibarr/dolibarr.git
synced 2025-12-15 05:51:28 +01:00
b6b3ab3f1b
Operation date has to be frequently updated because some bank change them in many case. With this feature, this value can be updated simply like the value date.
2168 lines
65 KiB
PHP
2168 lines
65 KiB
PHP
<?php
|
|
/* Copyright (C) 2001-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2003 Jean-Louis Bergamo <jlb@j1b.org>
|
|
* Copyright (C) 2004-2012 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2004 Christophe Combelles <ccomb@free.fr>
|
|
* Copyright (C) 2005-2010 Regis Houssin <regis.houssin@capnetworks.com>
|
|
* Copyright (C) 2013 Florian Henry <florian.henry@open-concept.pro>
|
|
* Copyright (C) 2015-2016 Marcos García <marcosgdf@gmail.com>
|
|
* Copyright (C) 2015-2017 Alexandre Spangaro <aspangaro@zendsi.com>
|
|
* Copyright (C) 2016 Ferran Marcet <fmarcet@2byte.es>
|
|
*
|
|
* 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 <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/compta/bank/class/account.class.php
|
|
* \ingroup bank
|
|
* \brief File of class to manage bank accounts
|
|
*/
|
|
require_once DOL_DOCUMENT_ROOT .'/core/class/commonobject.class.php';
|
|
|
|
|
|
/**
|
|
* Class to manage bank accounts
|
|
*/
|
|
class Account extends CommonObject
|
|
{
|
|
public $element = 'bank_account';
|
|
public $table_element = 'bank_account';
|
|
public $picto = 'account';
|
|
|
|
/**
|
|
* @var int Use id instead of rowid
|
|
* @deprecated
|
|
* @see id
|
|
*/
|
|
public $rowid;
|
|
|
|
/**
|
|
* Label
|
|
* @var string
|
|
*/
|
|
public $label;
|
|
|
|
/**
|
|
* Bank account type. Check TYPE_ constants
|
|
* @var int
|
|
*/
|
|
public $courant;
|
|
|
|
/**
|
|
* Bank account type. Check TYPE_ constants
|
|
* @var int
|
|
*/
|
|
public $type;
|
|
|
|
/**
|
|
* Bank name
|
|
* @var string
|
|
*/
|
|
public $bank;
|
|
|
|
/**
|
|
* Status
|
|
* @var int
|
|
*/
|
|
public $clos = self::STATUS_OPEN;
|
|
|
|
/**
|
|
* Does it need to be conciliated?
|
|
* @var int
|
|
*/
|
|
public $rappro=1;
|
|
|
|
/**
|
|
* Webpage
|
|
* @var string
|
|
*/
|
|
public $url;
|
|
|
|
/**
|
|
* Bank number. If in SEPA area, you should move to IBAN field
|
|
* @var string
|
|
*/
|
|
public $code_banque;
|
|
|
|
/**
|
|
* Branch number. If in SEPA area, you should move to IBAN field
|
|
* @var string
|
|
*/
|
|
public $code_guichet;
|
|
|
|
/**
|
|
* Account number. If in SEPA area, you should move to IBAN field
|
|
* @var string
|
|
*/
|
|
public $number;
|
|
|
|
/**
|
|
* Bank account number control digit. If in SEPA area, you should move to IBAN field
|
|
* @var string
|
|
*/
|
|
public $cle_rib;
|
|
|
|
/**
|
|
* BIC/Swift code
|
|
* @var string
|
|
*/
|
|
public $bic;
|
|
|
|
/**
|
|
* IBAN number (International Bank Account Number). Stored into iban_prefix field into database
|
|
* @var
|
|
*/
|
|
public $iban;
|
|
|
|
/**
|
|
* Name of account holder
|
|
* @var string
|
|
*/
|
|
public $proprio;
|
|
|
|
/**
|
|
* Address of account holder
|
|
* @var string
|
|
*/
|
|
public $owner_address;
|
|
|
|
public $state_id;
|
|
public $state_code;
|
|
public $state;
|
|
|
|
/**
|
|
* Variable containing all account types with their respective translated label.
|
|
* Defined in __construct
|
|
* @var array
|
|
*/
|
|
public $type_lib = array();
|
|
|
|
/**
|
|
* Variable containing all account statuses with their respective translated label.
|
|
* Defined in __construct
|
|
* @var array
|
|
*/
|
|
public $status = array();
|
|
|
|
/**
|
|
* Accountancy code
|
|
* @var string
|
|
*/
|
|
public $account_number;
|
|
public $fk_accountancy_journal;
|
|
|
|
/**
|
|
* Currency code
|
|
* @var string
|
|
*/
|
|
public $currency_code;
|
|
|
|
/**
|
|
* Currency code
|
|
* @var string
|
|
* @deprecated Use currency_code instead
|
|
*/
|
|
public $account_currency_code;
|
|
|
|
/**
|
|
* Authorized minimum balance
|
|
* @var float
|
|
*/
|
|
public $min_allowed;
|
|
|
|
/**
|
|
* Desired minimum balance
|
|
* @var float
|
|
*/
|
|
public $min_desired;
|
|
|
|
/**
|
|
* Notes
|
|
* @var string
|
|
*/
|
|
public $comment;
|
|
|
|
/**
|
|
* Date of the initial balance. Used in Account::create
|
|
* @var int
|
|
*/
|
|
public $date_solde;
|
|
|
|
/**
|
|
* Current account
|
|
*/
|
|
const TYPE_CURRENT = 1;
|
|
/**
|
|
* Cash account
|
|
*/
|
|
const TYPE_CASH = 2;
|
|
/**
|
|
* Savings account
|
|
*/
|
|
const TYPE_SAVINGS = 0;
|
|
|
|
const STATUS_OPEN = 0;
|
|
const STATUS_CLOSED = 1;
|
|
|
|
/**
|
|
* Constructor
|
|
*
|
|
* @param DoliDB $db Database handler
|
|
*/
|
|
function __construct(DoliDB $db)
|
|
{
|
|
global $langs;
|
|
|
|
$this->db = $db;
|
|
|
|
$this->solde = 0;
|
|
|
|
$this->type_lib = array(
|
|
self::TYPE_SAVINGS => $langs->trans("BankType0"),
|
|
self::TYPE_CURRENT => $langs->trans("BankType1"),
|
|
self::TYPE_CASH => $langs->trans("BankType2"),
|
|
);
|
|
|
|
$this->status = array(
|
|
self::STATUS_OPEN => $langs->trans("StatusAccountOpened"),
|
|
self::STATUS_CLOSED => $langs->trans("StatusAccountClosed")
|
|
);
|
|
}
|
|
|
|
/**
|
|
* Shows the account number in the appropiate format
|
|
*
|
|
* @return string
|
|
*/
|
|
public function __toString()
|
|
{
|
|
$string = '';
|
|
|
|
foreach ($this->getFieldsToShow() as $val) {
|
|
|
|
if ($val == 'BankCode') {
|
|
$string .= $this->code_banque.' ';
|
|
} elseif ($val == 'BankAccountNumber') {
|
|
$string .= $this->number.' ';
|
|
} elseif ($val == 'DeskCode') {
|
|
$string .= $this->code_guichet.' ';
|
|
} elseif ($val == 'BankAccountNumberKey') {
|
|
$string .= $this->cle_rib.' ';
|
|
}elseif ($val == 'BIC') {
|
|
$string .= $this->bic.' ';
|
|
}elseif ($val == 'IBAN') {
|
|
$string .= $this->iban.' ';
|
|
}
|
|
}
|
|
|
|
return trim($string);
|
|
}
|
|
|
|
|
|
/**
|
|
* Return if a bank account need to be conciliated
|
|
*
|
|
* @return int 1 if need to be concialiated, < 0 otherwise.
|
|
*/
|
|
function canBeConciliated()
|
|
{
|
|
global $conf;
|
|
|
|
if (empty($this->rappro)) return -1;
|
|
if ($this->courant == Account::TYPE_CASH && empty($conf->global->BANK_CAN_RECONCILIATE_CASHACCOUNT)) return -2;
|
|
if ($this->clos) return -3;
|
|
return 1;
|
|
}
|
|
|
|
|
|
/**
|
|
* Add a link between bank line record and its source
|
|
*
|
|
* @param int $line_id Id ecriture bancaire
|
|
* @param int $url_id Id parametre url
|
|
* @param string $url Url
|
|
* @param string $label Link label
|
|
* @param string $type Type of link ('payment', 'company', 'member', ...)
|
|
* @return int <0 if KO, id line if OK
|
|
*/
|
|
function add_url_line($line_id, $url_id, $url, $label, $type)
|
|
{
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."bank_url (";
|
|
$sql.= "fk_bank";
|
|
$sql.= ", url_id";
|
|
$sql.= ", url";
|
|
$sql.= ", label";
|
|
$sql.= ", type";
|
|
$sql.= ") VALUES (";
|
|
$sql.= "'".$line_id."'";
|
|
$sql.= ", '".$url_id."'";
|
|
$sql.= ", '".$url."'";
|
|
$sql.= ", '".$this->db->escape($label)."'";
|
|
$sql.= ", '".$type."'";
|
|
$sql.= ")";
|
|
|
|
dol_syslog(get_class($this)."::add_url_line", LOG_DEBUG);
|
|
if ($this->db->query($sql))
|
|
{
|
|
$rowid = $this->db->last_insert_id(MAIN_DB_PREFIX."bank_url");
|
|
return $rowid;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->lasterror();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* TODO Move this into AccountLine
|
|
* Return array with links from llx_bank_url
|
|
*
|
|
* @param int $fk_bank To search using bank transaction id
|
|
* @param int $url_id To search using link to
|
|
* @param string $type To search using type
|
|
* @return array|-1 Array of links or -1 on error
|
|
*/
|
|
function get_url($fk_bank='', $url_id='', $type='')
|
|
{
|
|
$lines = array();
|
|
|
|
// Check parameters
|
|
if (! empty($fk_bank) && (! empty($url_id) || ! empty($type)))
|
|
{
|
|
$this->error="ErrorBadParameter";
|
|
return -1;
|
|
}
|
|
|
|
$sql = "SELECT fk_bank, url_id, url, label, type";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."bank_url";
|
|
if ($fk_bank > 0) {
|
|
$sql.= " WHERE fk_bank = ".$fk_bank;
|
|
}
|
|
else { $sql.= " WHERE url_id = ".$url_id." AND type = '".$type."'";
|
|
}
|
|
$sql.= " ORDER BY type, label";
|
|
|
|
dol_syslog(get_class($this)."::get_url", LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
$i = 0;
|
|
$num = $this->db->num_rows($result);
|
|
while ($i < $num)
|
|
{
|
|
$obj = $this->db->fetch_object($result);
|
|
// Anciens liens (pour compatibilite)
|
|
$lines[$i][0] = $obj->url;
|
|
$lines[$i][1] = $obj->url_id;
|
|
$lines[$i][2] = $obj->label;
|
|
$lines[$i][3] = $obj->type;
|
|
// Nouveaux liens
|
|
$lines[$i]['url'] = $obj->url;
|
|
$lines[$i]['url_id'] = $obj->url_id;
|
|
$lines[$i]['label'] = $obj->label;
|
|
$lines[$i]['type'] = $obj->type;
|
|
$lines[$i]['fk_bank'] = $obj->fk_bank;
|
|
$i++;
|
|
}
|
|
}
|
|
else dol_print_error($this->db);
|
|
|
|
return $lines;
|
|
}
|
|
|
|
/**
|
|
* Add an entry into table ".MAIN_DB_PREFIX."bank
|
|
*
|
|
* @param int $date Date operation
|
|
* @param string $oper 1,2,3,4... (deprecated) or TYP,VIR,PRE,LIQ,VAD,CB,CHQ...
|
|
* @param string $label Descripton
|
|
* @param float $amount Amount
|
|
* @param string $num_chq Numero cheque ou virement
|
|
* @param int $categorie Category id (optionnal)
|
|
* @param User $user User that create
|
|
* @param string $emetteur Name of cheque writer
|
|
* @param string $banque Bank of cheque writer
|
|
* @param string $accountancycode When we record a free bank entry, we must provide accounting account if accountancy module is on.
|
|
* @return int Rowid of added entry, <0 if KO
|
|
*/
|
|
function addline($date, $oper, $label, $amount, $num_chq, $categorie, User $user, $emetteur='',$banque='', $accountancycode='')
|
|
{
|
|
// Deprecatîon warning
|
|
if (is_numeric($oper)) {
|
|
dol_syslog(__METHOD__ . ": using numeric operations is deprecated", LOG_WARNING);
|
|
}
|
|
|
|
// Clean parameters
|
|
$emetteur=trim($emetteur);
|
|
$banque=trim($banque);
|
|
|
|
$now=dol_now();
|
|
|
|
if (is_numeric($oper)) // Clean oper to have a code instead of a rowid
|
|
{
|
|
$sql ="SELECT code FROM ".MAIN_DB_PREFIX."c_paiement";
|
|
$sql.=" WHERE id=".$oper;
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$obj=$this->db->fetch_object($resql);
|
|
$oper=$obj->code;
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db,'Failed to get payment type code');
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
// Check parameters
|
|
if (! $oper)
|
|
{
|
|
$this->error="oper not defined";
|
|
return -1;
|
|
}
|
|
if (! $this->rowid)
|
|
{
|
|
$this->error="this->rowid not defined";
|
|
return -2;
|
|
}
|
|
if ($this->courant == Account::TYPE_CASH && $oper != 'LIQ')
|
|
{
|
|
$this->error="ErrorCashAccountAcceptsOnlyCashMoney";
|
|
return -3;
|
|
}
|
|
|
|
$this->db->begin();
|
|
|
|
$datev = $date;
|
|
|
|
$accline = new AccountLine($this->db);
|
|
$accline->datec = $now;
|
|
$accline->dateo = $date;
|
|
$accline->datev = $datev;
|
|
$accline->label = $label;
|
|
$accline->amount = $amount;
|
|
$accline->fk_user_author = $user->id;
|
|
$accline->fk_account = $this->rowid;
|
|
$accline->fk_type = $oper;
|
|
$accline->numero_compte = $accountancycode;
|
|
|
|
if ($num_chq) {
|
|
$accline->num_chq = $num_chq;
|
|
}
|
|
|
|
if ($emetteur) {
|
|
$accline->emetteur = $emetteur;
|
|
}
|
|
|
|
if ($banque) {
|
|
$accline->bank_chq = $banque;
|
|
}
|
|
|
|
if ($accline->insert() > 0) {
|
|
|
|
if ($categorie>0) {
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."bank_class (";
|
|
$sql .= "lineid, fk_categ";
|
|
$sql .= ") VALUES (";
|
|
$sql .= $accline->id.", ".$categorie;
|
|
$sql .= ")";
|
|
|
|
$result = $this->db->query($sql);
|
|
if (!$result) {
|
|
$this->error = $this->db->lasterror();
|
|
$this->db->rollback();
|
|
return -3;
|
|
}
|
|
}
|
|
|
|
$this->db->commit();
|
|
return $accline->id;
|
|
} else {
|
|
$this->error = $this->db->lasterror();
|
|
$this->db->rollback();
|
|
return -2;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Create bank account into database
|
|
*
|
|
* @param User $user Object user making creation
|
|
* @param int $notrigger 1=Disable triggers
|
|
* @return int < 0 if KO, > 0 if OK
|
|
*/
|
|
function create(User $user = null, $notrigger=0)
|
|
{
|
|
global $langs,$conf, $hookmanager;
|
|
|
|
// Clean parameters
|
|
if (! $this->min_allowed) $this->min_allowed=0;
|
|
if (! $this->min_desired) $this->min_desired=0;
|
|
$this->state_id = ($this->state_id?$this->state_id:$this->state_id);
|
|
$this->country_id = ($this->country_id?$this->country_id:$this->country_id);
|
|
|
|
// Check parameters
|
|
if (empty($this->country_id))
|
|
{
|
|
$this->error=$langs->transnoentitiesnoconv("ErrorFieldRequired",$langs->transnoentitiesnoconv("Country"));
|
|
dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
|
|
return -1;
|
|
}
|
|
if (empty($this->ref))
|
|
{
|
|
$this->error=$langs->transnoentitiesnoconv("ErrorFieldRequired",$langs->transnoentitiesnoconv("Ref"));
|
|
dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
|
|
return -1;
|
|
}
|
|
if (empty($this->date_solde))
|
|
{
|
|
$this->error=$langs->transnoentitiesnoconv("ErrorFieldRequired",$langs->transnoentitiesnoconv("DateInitialBalance"));
|
|
dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
|
|
return -1;
|
|
}
|
|
|
|
// Chargement librairie pour acces fonction controle RIB
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/bank.lib.php';
|
|
|
|
$now=dol_now();
|
|
|
|
$this->db->begin();
|
|
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."bank_account (";
|
|
$sql.= "datec";
|
|
$sql.= ", ref";
|
|
$sql.= ", label";
|
|
$sql.= ", entity";
|
|
$sql.= ", account_number";
|
|
$sql.= ", fk_accountancy_journal";
|
|
$sql.= ", bank";
|
|
$sql.= ", code_banque";
|
|
$sql.= ", code_guichet";
|
|
$sql.= ", number";
|
|
$sql.= ", cle_rib";
|
|
$sql.= ", bic";
|
|
$sql.= ", iban_prefix";
|
|
$sql.= ", domiciliation";
|
|
$sql.= ", proprio";
|
|
$sql.= ", owner_address";
|
|
$sql.= ", currency_code";
|
|
$sql.= ", rappro";
|
|
$sql.= ", min_allowed";
|
|
$sql.= ", min_desired";
|
|
$sql.= ", comment";
|
|
$sql.= ", state_id";
|
|
$sql.= ", fk_pays";
|
|
$sql.= ") VALUES (";
|
|
$sql.= "'".$this->db->idate($now)."'";
|
|
$sql.= ", '".$this->db->escape($this->ref)."'";
|
|
$sql.= ", '".$this->db->escape($this->label)."'";
|
|
$sql.= ", ".$conf->entity;
|
|
$sql.= ", '".$this->db->escape($this->account_number)."'";
|
|
$sql.= ", ".($this->fk_accountancy_journal > 0 ? $this->db->escape($this->fk_accountancy_journal) : "null");
|
|
$sql.= ", '".$this->db->escape($this->bank)."'";
|
|
$sql.= ", '".$this->code_banque."'";
|
|
$sql.= ", '".$this->code_guichet."'";
|
|
$sql.= ", '".$this->number."'";
|
|
$sql.= ", '".$this->cle_rib."'";
|
|
$sql.= ", '".$this->bic."'";
|
|
$sql.= ", '".$this->iban."'";
|
|
$sql.= ", '".$this->db->escape($this->domiciliation)."'";
|
|
$sql.= ", '".$this->db->escape($this->proprio)."'";
|
|
$sql.= ", '".$this->db->escape($this->owner_address)."'";
|
|
$sql.= ", '".$this->currency_code."'";
|
|
$sql.= ", ".$this->rappro;
|
|
$sql.= ", ".price2num($this->min_allowed);
|
|
$sql.= ", ".price2num($this->min_desired);
|
|
$sql.= ", '".$this->db->escape($this->comment)."'";
|
|
$sql.= ", ".($this->state_id>0?"'".$this->state_id."'":"null");
|
|
$sql.= ", ".$this->country_id;
|
|
$sql.= ")";
|
|
|
|
dol_syslog(get_class($this)."::create", LOG_DEBUG);
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."bank_account");
|
|
|
|
$result=$this->update($user, 1);
|
|
if ($result > 0)
|
|
{
|
|
$accline = new AccountLine($this->db);
|
|
$accline->datec = $this->db->idate($now);
|
|
$accline->label = '('.$langs->trans("InitialBankBalance").')';
|
|
$accline->amount = price2num($this->solde);
|
|
$accline->fk_user_author = $user->id;
|
|
$accline->fk_account = $this->id;
|
|
$accline->datev = $this->db->idate($this->date_solde);
|
|
$accline->dateo = $this->db->idate($this->date_solde);
|
|
$accline->fk_type = 'SOLD';
|
|
|
|
if ($accline->insert() < 0) {
|
|
$error++;
|
|
$this->error = $accline->error;
|
|
$this->errors = $accline->errors;
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
$result=$this->insertExtraFields();
|
|
if ($result < 0) $error++;
|
|
}
|
|
|
|
if (! $error && ! $notrigger)
|
|
{
|
|
// Call trigger
|
|
$result=$this->call_trigger('BANKACCOUNT_CREATE',$user);
|
|
if ($result < 0) $error++;
|
|
// End call triggers
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$error++;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if ($this->db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS')
|
|
{
|
|
$this->error=$langs->trans("ErrorBankLabelAlreadyExists");
|
|
$error++;
|
|
}
|
|
else {
|
|
$this->error=$this->db->error()." sql=".$sql;
|
|
$error++;
|
|
}
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
$this->db->commit();
|
|
return $this->id;
|
|
}
|
|
else
|
|
{
|
|
$this->db->rollback();
|
|
return -1*$error;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Update bank account card
|
|
*
|
|
* @param User $user Object user making action
|
|
* @param int $notrigger 1=Disable triggers
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
function update(User $user = null, $notrigger = 0)
|
|
{
|
|
global $langs,$conf, $hookmanager;
|
|
|
|
$error=0;
|
|
|
|
$this->db->begin();
|
|
|
|
// Clean parameters
|
|
$this->state_id = ($this->state_id?$this->state_id:$this->state_id);
|
|
$this->country_id = ($this->country_id?$this->country_id:$this->country_id);
|
|
|
|
// Check parameters
|
|
if (empty($this->country_id))
|
|
{
|
|
$this->error=$langs->transnoentitiesnoconv("ErrorFieldRequired",$langs->transnoentitiesnoconv("Country"));
|
|
dol_syslog(get_class($this)."::update ".$this->error, LOG_ERR);
|
|
return -1;
|
|
}
|
|
if (empty($this->ref))
|
|
{
|
|
$this->error=$langs->transnoentitiesnoconv("ErrorFieldRequired",$langs->transnoentitiesnoconv("Ref"));
|
|
dol_syslog(get_class($this)."::update ".$this->error, LOG_ERR);
|
|
return -1;
|
|
}
|
|
if (! $this->label) $this->label = "???";
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."bank_account SET ";
|
|
|
|
$sql.= " ref = '".$this->db->escape($this->ref)."'";
|
|
$sql.= ",label = '".$this->db->escape($this->label)."'";
|
|
|
|
$sql.= ",courant = ".$this->courant;
|
|
$sql.= ",clos = ".$this->clos;
|
|
$sql.= ",rappro = ".$this->rappro;
|
|
$sql.= ",url = ".($this->url?"'".$this->url."'":"null");
|
|
$sql.= ",account_number = '".$this->db->escape($this->account_number)."'";
|
|
$sql.= ",fk_accountancy_journal = ".($this->fk_accountancy_journal > 0 ? $this->db->escape($this->fk_accountancy_journal) : "null");
|
|
$sql.= ",bank = '".$this->db->escape($this->bank)."'";
|
|
$sql.= ",code_banque='".$this->db->escape($this->code_banque)."'";
|
|
$sql.= ",code_guichet='".$this->db->escape($this->code_guichet)."'";
|
|
$sql.= ",number='".$this->db->escape($this->number)."'";
|
|
$sql.= ",cle_rib='".$this->db->escape($this->cle_rib)."'";
|
|
$sql.= ",bic='".$this->db->escape($this->bic)."'";
|
|
$sql.= ",iban_prefix = '".$this->db->escape($this->iban)."'";
|
|
$sql.= ",domiciliation='".$this->db->escape($this->domiciliation)."'";
|
|
$sql.= ",proprio = '".$this->db->escape($this->proprio)."'";
|
|
$sql.= ",owner_address = '".$this->db->escape($this->owner_address)."'";
|
|
|
|
$sql.= ",currency_code = '".$this->db->escape($this->currency_code)."'";
|
|
|
|
$sql.= ",min_allowed = ".($this->min_allowed != '' ? price2num($this->min_allowed) : "null");
|
|
$sql.= ",min_desired = ".($this->min_desired != '' ? price2num($this->min_desired) : "null");
|
|
$sql.= ",comment = '".$this->db->escape($this->comment)."'";
|
|
|
|
$sql.= ",state_id = ".($this->state_id>0?"'".$this->state_id."'":"null");
|
|
$sql.= ",fk_pays = ".$this->country_id;
|
|
|
|
$sql.= " WHERE rowid = ".$this->id;
|
|
$sql.= " AND entity = ".$conf->entity;
|
|
|
|
dol_syslog(get_class($this)."::update", LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
// Actions on extra fields (by external module or standard code)
|
|
if (empty($conf->global->MAIN_EXTRAFIELDS_DISABLED)) // For avoid conflicts if trigger used
|
|
{
|
|
if (! $error)
|
|
{
|
|
$result=$this->insertExtraFields();
|
|
if ($result < 0) $error++;
|
|
}
|
|
}
|
|
|
|
if (! $error && ! $notrigger)
|
|
{
|
|
// Call trigger
|
|
$result=$this->call_trigger('BANKACCOUNT_UPDATE',$user);
|
|
if ($result < 0) $error++;
|
|
// End call triggers
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$error++;
|
|
$this->error=$this->db->lasterror();
|
|
dol_print_error($this->db);
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
$this->db->commit();
|
|
return $this->id;
|
|
}
|
|
else
|
|
{
|
|
$this->db->rollback();
|
|
return -1*$error;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Update BBAN (RIB) account fields
|
|
*
|
|
* @param User $user Object user making update
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
function update_bban(User $user = null)
|
|
{
|
|
global $conf,$langs;
|
|
|
|
// Clean parameters
|
|
$this->state_id = ($this->state_id?$this->state_id:$this->state_id);
|
|
$this->country_id = ($this->country_id?$this->country_id:$this->country_id);
|
|
|
|
// Chargement librairie pour acces fonction controle RIB
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/bank.lib.php';
|
|
|
|
dol_syslog(get_class($this)."::update_bban $this->code_banque,$this->code_guichet,$this->number,$this->cle_rib,$this->iban");
|
|
|
|
// Check parameters
|
|
if (! $this->ref)
|
|
{
|
|
$this->error=$langs->transnoentitiesnoconv("ErrorFieldRequired",$langs->trans("Ref"));
|
|
return -2;
|
|
}
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."bank_account SET ";
|
|
$sql.= " bank = '".$this->db->escape($this->bank)."'";
|
|
$sql.= ",code_banque='".$this->db->escape($this->code_banque)."'";
|
|
$sql.= ",code_guichet='".$this->db->escape($this->code_guichet)."'";
|
|
$sql.= ",number='".$this->db->escape($this->number)."'";
|
|
$sql.= ",cle_rib='".$this->db->escape($this->cle_rib)."'";
|
|
$sql.= ",bic='".$this->db->escape($this->bic)."'";
|
|
$sql.= ",iban_prefix = '".$this->db->escape($this->iban)."'";
|
|
$sql.= ",domiciliation='".$this->db->escape($this->domiciliation)."'";
|
|
$sql.= ",proprio = '".$this->db->escape($this->proprio)."'";
|
|
$sql.= ",owner_address = '".$this->db->escape($this->owner_address)."'";
|
|
$sql.= ",state_id = ".($this->state_id>0?"'".$this->state_id."'":"null");
|
|
$sql.= ",fk_pays = ".$this->country_id;
|
|
$sql.= " WHERE rowid = ".$this->id;
|
|
$sql.= " AND entity = ".$conf->entity;
|
|
|
|
dol_syslog(get_class($this)."::update_bban", LOG_DEBUG);
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->lasterror();
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Load a bank account into memory from database
|
|
*
|
|
* @param int $id Id of bank account to get
|
|
* @param string $ref Ref of bank account to get
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
function fetch($id, $ref='')
|
|
{
|
|
global $conf;
|
|
|
|
if (empty($id) && empty($ref))
|
|
{
|
|
$this->error="ErrorBadParameters";
|
|
return -1;
|
|
}
|
|
|
|
$sql = "SELECT ba.rowid, ba.ref, ba.label, ba.bank, ba.number, ba.courant, ba.clos, ba.rappro, ba.url,";
|
|
$sql.= " ba.code_banque, ba.code_guichet, ba.cle_rib, ba.bic, ba.iban_prefix as iban,";
|
|
$sql.= " ba.domiciliation, ba.proprio, ba.owner_address, ba.state_id, ba.fk_pays as country_id,";
|
|
$sql.= " ba.account_number, ba.fk_accountancy_journal, ba.currency_code,";
|
|
$sql.= " ba.min_allowed, ba.min_desired, ba.comment,";
|
|
$sql.= " ba.datec as date_creation, ba.tms as date_update,";
|
|
$sql.= ' c.code as country_code, c.label as country,';
|
|
$sql.= ' d.code_departement as state_code, d.nom as state';
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."bank_account as ba";
|
|
$sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_country as c ON ba.fk_pays = c.rowid';
|
|
$sql.= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_departements as d ON ba.state_id = d.rowid';
|
|
$sql.= " WHERE entity IN (".getEntity($this->element, 1).")";
|
|
if ($id) $sql.= " AND ba.rowid = ".$id;
|
|
if ($ref) $sql.= " AND ba.ref = '".$this->db->escape($ref)."'";
|
|
|
|
dol_syslog(get_class($this)."::fetch", LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
if ($this->db->num_rows($result))
|
|
{
|
|
$obj = $this->db->fetch_object($result);
|
|
|
|
$this->id = $obj->rowid;
|
|
$this->rowid = $obj->rowid;
|
|
$this->ref = $obj->ref;
|
|
$this->label = $obj->label;
|
|
$this->type = $obj->courant;
|
|
$this->courant = $obj->courant;
|
|
$this->bank = $obj->bank;
|
|
$this->clos = $obj->clos;
|
|
$this->rappro = $obj->rappro;
|
|
$this->url = $obj->url;
|
|
|
|
$this->code_banque = $obj->code_banque;
|
|
$this->code_guichet = $obj->code_guichet;
|
|
$this->number = $obj->number;
|
|
$this->cle_rib = $obj->cle_rib;
|
|
$this->bic = $obj->bic;
|
|
$this->iban = $obj->iban;
|
|
$this->domiciliation = $obj->domiciliation;
|
|
$this->proprio = $obj->proprio;
|
|
$this->owner_address = $obj->owner_address;
|
|
|
|
$this->state_id = $obj->state_id;
|
|
$this->state_code = $obj->state_code;
|
|
$this->state = $obj->state;
|
|
|
|
$this->country_id = $obj->country_id;
|
|
$this->country_code = $obj->country_code;
|
|
$this->country = $obj->country;
|
|
|
|
$this->account_number = $obj->account_number;
|
|
$this->fk_accountancy_journal = $obj->fk_accountancy_journal;
|
|
|
|
$this->currency_code = $obj->currency_code;
|
|
$this->account_currency_code = $obj->currency_code;
|
|
$this->min_allowed = $obj->min_allowed;
|
|
$this->min_desired = $obj->min_desired;
|
|
$this->comment = $obj->comment;
|
|
|
|
$this->date_creation = $this->db->jdate($obj->date_creation);
|
|
$this->date_update = $this->db->jdate($obj->date_update);
|
|
|
|
// Retreive all extrafield for thirdparty
|
|
// fetch optionals attributes and labels
|
|
require_once(DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php');
|
|
$extrafields=new ExtraFields($this->db);
|
|
$extralabels=$extrafields->fetch_name_optionals_label($this->table_element,true);
|
|
$this->fetch_optionals($this->id,$extralabels);
|
|
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
return 0;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Sets object to supplied categories.
|
|
*
|
|
* Deletes object from existing categories not supplied.
|
|
* Adds it to non existing supplied categories.
|
|
* Existing categories are left untouch.
|
|
*
|
|
* @param int[]|int $categories Category or categories IDs
|
|
*/
|
|
public function setCategories($categories) {
|
|
// Handle single category
|
|
if (! is_array($categories)) {
|
|
$categories = array($categories);
|
|
}
|
|
|
|
// Get current categories
|
|
require_once DOL_DOCUMENT_ROOT . '/categories/class/categorie.class.php';
|
|
$c = new Categorie($this->db);
|
|
$existing = $c->containing($this->id, Categorie::TYPE_ACCOUNT, 'id');
|
|
|
|
// Diff
|
|
if (is_array($existing)) {
|
|
$to_del = array_diff($existing, $categories);
|
|
$to_add = array_diff($categories, $existing);
|
|
} else {
|
|
$to_del = array(); // Nothing to delete
|
|
$to_add = $categories;
|
|
}
|
|
|
|
// Process
|
|
foreach($to_del as $del) {
|
|
if ($c->fetch($del) > 0) {
|
|
$c->del_type($this, 'account');
|
|
}
|
|
}
|
|
foreach ($to_add as $add) {
|
|
if ($c->fetch($add) > 0) {
|
|
$c->add_type($this, 'account');
|
|
}
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
/**
|
|
* Delete bank account from database
|
|
*
|
|
* @param User $user User deleting
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
function delete(User $user = null)
|
|
{
|
|
global $conf;
|
|
|
|
$error=0;
|
|
|
|
$this->db->begin();
|
|
|
|
// Delete link between tag and bank account
|
|
if (! $error)
|
|
{
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."categorie_account";
|
|
$sql.= " WHERE fk_account = ".$this->id;
|
|
|
|
$resql = $this->db->query($sql);
|
|
if (!$resql)
|
|
{
|
|
$error++;
|
|
$this->error = "Error ".$this->db->lasterror();
|
|
}
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."bank_account";
|
|
$sql.= " WHERE rowid = ".$this->rowid;
|
|
|
|
dol_syslog(get_class($this)."::delete", LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
// Remove extrafields
|
|
if ((empty($conf->global->MAIN_EXTRAFIELDS_DISABLED))) // For avoid conflicts if trigger used
|
|
{
|
|
$result=$this->deleteExtraFields();
|
|
if ($result < 0)
|
|
{
|
|
$error++;
|
|
dol_syslog(get_class($this)."::delete error -4 ".$this->error, LOG_ERR);
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$error++;
|
|
$this->error = "Error ".$this->db->lasterror();
|
|
}
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
$this->db->commit();
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Return label of object status
|
|
*
|
|
* @param int $mode 0=long label, 1=short label, 2=Picto + short label, 3=Picto, 4=Picto + long label, 5=short label + picto, 6=Long label + picto
|
|
* @return string Label
|
|
*/
|
|
function getLibStatut($mode=0)
|
|
{
|
|
return $this->LibStatut($this->clos,$mode);
|
|
}
|
|
|
|
/**
|
|
* Return label of given object status
|
|
*
|
|
* @param int $statut Id statut
|
|
* @param int $mode 0=long label, 1=short label, 2=Picto + short label, 3=Picto, 4=Picto + long label, 5=short label + picto, 6=Long label + picto
|
|
* @return string Label
|
|
*/
|
|
function LibStatut($statut, $mode = 0)
|
|
{
|
|
global $langs;
|
|
$langs->load('banks');
|
|
|
|
if ($statut == self::STATUS_OPEN) {
|
|
$label = $langs->trans("StatusAccountOpened");
|
|
$picto = img_picto($label, 'statut4');
|
|
} else {
|
|
$label = $langs->trans("StatusAccountClosed");
|
|
$picto = img_picto($label, 'statut5');
|
|
}
|
|
|
|
if ($mode == 2) {
|
|
return $picto.' '.$label;
|
|
} elseif ($mode == 3) {
|
|
return $picto;
|
|
} elseif ($mode == 4) {
|
|
return $picto.' '.$label;
|
|
} elseif ($mode == 5) {
|
|
return $label.' '.$picto;
|
|
} elseif ($mode == 6) {
|
|
return $label.' '.$picto;
|
|
}
|
|
|
|
//There is no short mode for this label
|
|
return $label;
|
|
}
|
|
|
|
|
|
/**
|
|
* Renvoi si un compte peut etre supprimer ou non (sans mouvements)
|
|
*
|
|
* @return boolean vrai si peut etre supprime, faux sinon
|
|
*/
|
|
function can_be_deleted()
|
|
{
|
|
$can_be_deleted=false;
|
|
|
|
$sql = "SELECT COUNT(rowid) as nb";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."bank";
|
|
$sql.= " WHERE fk_account=".$this->id;
|
|
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
$obj=$this->db->fetch_object($resql);
|
|
if ($obj->nb <= 1) $can_be_deleted=true; // Juste le solde
|
|
}
|
|
else {
|
|
dol_print_error($this->db);
|
|
}
|
|
return $can_be_deleted;
|
|
}
|
|
|
|
|
|
/**
|
|
* Return error
|
|
*
|
|
* @return string Error string
|
|
*/
|
|
function error()
|
|
{
|
|
return $this->error;
|
|
}
|
|
|
|
/**
|
|
* Return current sold
|
|
*
|
|
* @param int $option 1=Exclude future operation date (this is to exclude input made in advance and have real account sold)
|
|
* @return int Current sold (value date <= today)
|
|
*/
|
|
function solde($option=0)
|
|
{
|
|
$sql = "SELECT sum(amount) as amount";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."bank";
|
|
$sql.= " WHERE fk_account = ".$this->id;
|
|
if ($option == 1) $sql.= " AND dateo <= '".$this->db->idate(dol_now())."'";
|
|
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
if ($this->db->num_rows($resql))
|
|
{
|
|
$obj=$this->db->fetch_object($resql);
|
|
$solde = $obj->amount;
|
|
}
|
|
$this->db->free($resql);
|
|
return $solde;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Load indicators for dashboard (this->nbtodo and this->nbtodolate)
|
|
*
|
|
* @param User $user Objet user
|
|
* @param int $filteraccountid To get info for a particular account id
|
|
* @return WorkboardResponse|int <0 if KO, WorkboardResponse if OK
|
|
*/
|
|
function load_board(User $user, $filteraccountid = 0)
|
|
{
|
|
global $conf, $langs;
|
|
|
|
if ($user->societe_id) return -1; // protection pour eviter appel par utilisateur externe
|
|
|
|
$sql = "SELECT b.rowid, b.datev as datefin";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."bank as b,";
|
|
$sql.= " ".MAIN_DB_PREFIX."bank_account as ba";
|
|
$sql.= " WHERE b.rappro=0";
|
|
$sql.= " AND b.fk_account = ba.rowid";
|
|
$sql.= " AND ba.entity IN (".getEntity('bank_account').")";
|
|
$sql.= " AND (ba.rappro = 1 AND ba.courant != 2)"; // Compte rapprochable
|
|
$sql.= " AND clos = 0";
|
|
if ($filteraccountid) $sql.=" AND ba.rowid = ".$filteraccountid;
|
|
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$langs->load("banks");
|
|
$now=dol_now();
|
|
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/workboardresponse.class.php';
|
|
|
|
$response = new WorkboardResponse();
|
|
$response->warning_delay=$conf->bank->rappro->warning_delay/60/60/24;
|
|
$response->label=$langs->trans("TransactionsToConciliate");
|
|
$response->url=DOL_URL_ROOT.'/compta/bank/index.php?leftmenu=bank&mainmenu=bank';
|
|
$response->img=img_object('',"payment");
|
|
|
|
while ($obj=$this->db->fetch_object($resql))
|
|
{
|
|
$response->nbtodo++;
|
|
if ($this->db->jdate($obj->datefin) < ($now - $conf->bank->rappro->warning_delay)) {
|
|
$response->nbtodolate++;
|
|
}
|
|
}
|
|
|
|
return $response;
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
$this->error=$this->db->error();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Load indicators for dashboard (this->nbtodo and this->nbtodolate)
|
|
*
|
|
* @return int Nb of account we can reconciliate
|
|
*/
|
|
public static function countAccountToReconcile()
|
|
{
|
|
global $db, $conf, $user;
|
|
|
|
//Protection against external users
|
|
if ($user->societe_id) {
|
|
return 0;
|
|
}
|
|
|
|
$nb=0;
|
|
|
|
$sql = "SELECT COUNT(ba.rowid) as nb";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."bank_account as ba";
|
|
$sql.= " WHERE ba.rappro > 0 and ba.clos = 0";
|
|
$sql.= " AND ba.entity IN (".getEntity('bank_account').")";
|
|
if (empty($conf->global->BANK_CAN_RECONCILIATE_CASHACCOUNT)) $sql.= " AND ba.courant != 2";
|
|
$resql=$db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$obj = $db->fetch_object($resql);
|
|
$nb = $obj->nb;
|
|
}
|
|
else dol_print_error($db);
|
|
|
|
return $nb;
|
|
}
|
|
|
|
/**
|
|
* Return clicable name (with picto eventually)
|
|
*
|
|
* @param int $withpicto Include picto into link
|
|
* @param string $mode ''=Link to card, 'transactions'=Link to transactions card
|
|
* @param string $option ''=Show ref, 'reflabel'=Show ref+label
|
|
* @return string Chaine avec URL
|
|
*/
|
|
function getNomUrl($withpicto=0, $mode='', $option='')
|
|
{
|
|
global $conf, $langs;
|
|
|
|
$result='';
|
|
$label = '<u>' . $langs->trans("ShowAccount") . '</u>';
|
|
$label .= '<br><b>' . $langs->trans('BankAccount') . ':</b> ' . $this->label;
|
|
$label .= '<br><b>' . $langs->trans('AccountNumber') . ':</b> ' . $this->number;
|
|
if (! empty($conf->accounting->enabled))
|
|
{
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
|
|
$langs->load("accountancy");
|
|
$label .= '<br><b>' . $langs->trans('AccountAccounting') . ':</b> ' . length_accountg($this->account_number);
|
|
$label .= '<br><b>' . $langs->trans('AccountancyJournal') . ':</b> ' . $this->accountancy_journal;
|
|
}
|
|
$linkclose = '" title="'.dol_escape_htmltag($label, 1).'" class="classfortooltip">';
|
|
|
|
if (empty($mode))
|
|
{
|
|
$link = '<a href="'.DOL_URL_ROOT.'/compta/bank/card.php?id='.$this->id.$linkclose;
|
|
$linkend='</a>';
|
|
}
|
|
else if ($mode == 'transactions')
|
|
{
|
|
$link = '<a href="'.DOL_URL_ROOT.'/compta/bank/bankentries.php?id='.$this->id.$linkclose;
|
|
$linkend='</a>';
|
|
}
|
|
else if ($mode == 'receipts')
|
|
{
|
|
$link = '<a href="'.DOL_URL_ROOT.'/compta/bank/releve.php?account='.$this->id.$linkclose;
|
|
$linkend='</a>';
|
|
}
|
|
|
|
if ($withpicto) $result.=($link.img_object($label, 'account', 'class="classfortooltip"').$linkend.' ');
|
|
$result.=$link.$this->ref.($option == 'reflabel' && $this->label ? ' - '.$this->label : '').$linkend;
|
|
return $result;
|
|
}
|
|
|
|
|
|
// Method after here are common to Account and CompanyBankAccount
|
|
|
|
|
|
/**
|
|
* Return if an account has valid information
|
|
*
|
|
* @return int 1 if correct, <=0 if wrong
|
|
*/
|
|
function verif()
|
|
{
|
|
require_once DOL_DOCUMENT_ROOT . '/core/lib/bank.lib.php';
|
|
|
|
// Call function to check BAN
|
|
if (! checkBanForAccount($this))
|
|
{
|
|
$this->error_number = 12;
|
|
$this->error_message = 'RIBControlError';
|
|
}
|
|
|
|
if ($this->error_number == 0)
|
|
{
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Return account country code
|
|
*
|
|
* @return string country code
|
|
*/
|
|
function getCountryCode()
|
|
{
|
|
global $mysoc;
|
|
|
|
// We return country code of bank account
|
|
if (! empty($this->country_code)) return $this->country_code;
|
|
|
|
// For backward compatibility, we try to guess country from other information
|
|
if (! empty($this->iban))
|
|
{
|
|
// If IBAN defined, we can know country of account from it
|
|
if (preg_match("/^([a-zA-Z][a-zA-Z])/i",$this->iban,$reg)) return $reg[1];
|
|
}
|
|
|
|
// If this class is linked to a third party
|
|
if (! empty($this->socid))
|
|
{
|
|
require_once DOL_DOCUMENT_ROOT .'/societe/class/societe.class.php';
|
|
$company=new Societe($this->db);
|
|
$result=$company->fetch($this->socid);
|
|
if (! empty($company->country_code)) return $company->country_code;
|
|
}
|
|
|
|
// We return country code of managed company
|
|
if (! empty($mysoc->country_code)) return $mysoc->country_code;
|
|
|
|
return '';
|
|
}
|
|
|
|
/**
|
|
* Return if a bank account is defined with detailed information (bank code, desk code, number and key).
|
|
* More information on codes used by countries on page http://en.wikipedia.org/wiki/Bank_code
|
|
*
|
|
* @return int 0=No bank code need + Account number is enough
|
|
* 1=Need 2 fields for bank code: Bank, Desk (France, Spain, ...) + Account number and key
|
|
* 2=Need 1 field for bank code: Bank only (Sort code for Great Britain, BSB for Australia) + Account number
|
|
*/
|
|
function useDetailedBBAN()
|
|
{
|
|
$country_code=$this->getCountryCode();
|
|
|
|
if (in_array($country_code,array('CH','FR','ES','GA','IT','NC'))) return 1; // France, Spain, Gabon, ...
|
|
if (in_array($country_code,array('AU','BE','CA','DE','DK','GR','GB','ID','IE','IR','KR','NL','NZ','UK','US'))) return 2; // Australia, England...
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Return 1 if IBAN / BIC is mandatory (otherwise option)
|
|
*
|
|
* @return int 1 = mandatory / 0 = Not mandatory
|
|
*/
|
|
function needIBAN()
|
|
{
|
|
$country_code=$this->getCountryCode();
|
|
|
|
$country_code_in_EEC=array(
|
|
'AT', // Austria
|
|
'BE', // Belgium
|
|
'BG', // Bulgaria
|
|
'CY', // Cyprus
|
|
'CZ', // Czech republic
|
|
'DE', // Germany
|
|
'DK', // Danemark
|
|
'EE', // Estonia
|
|
'ES', // Spain
|
|
'FI', // Finland
|
|
'FR', // France
|
|
'GB', // United Kingdom
|
|
'GR', // Greece
|
|
'HR', // Croatia
|
|
'NL', // Holland
|
|
'HU', // Hungary
|
|
'IE', // Ireland
|
|
'IM', // Isle of Man - Included in UK
|
|
'IT', // Italy
|
|
'LT', // Lithuania
|
|
'LU', // Luxembourg
|
|
'LV', // Latvia
|
|
'MC', // Monaco - Included in France
|
|
'MT', // Malta
|
|
//'NO', // Norway
|
|
'PL', // Poland
|
|
'PT', // Portugal
|
|
'RO', // Romania
|
|
'SE', // Sweden
|
|
'SK', // Slovakia
|
|
'SI', // Slovenia
|
|
'UK', // United Kingdom
|
|
//'CH', // Switzerland - No. Swizerland in not in EEC
|
|
);
|
|
|
|
if (in_array($country_code,$country_code_in_EEC)) return 1; // France, Spain, ...
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Load miscellaneous information for tab "Info"
|
|
*
|
|
* @param int $id Id of object to load
|
|
* @return void
|
|
*/
|
|
function info($id)
|
|
{
|
|
|
|
}
|
|
|
|
/**
|
|
* Returns the fields in order that this bank account should show to the user
|
|
* Will return an array with the following values:
|
|
* - BankAccountNumber
|
|
* - BankCode
|
|
* - BankAccountNumberKey
|
|
* - DeskCode
|
|
*
|
|
* Some countries show less or more bank account properties to the user
|
|
*
|
|
* @param int $includeibanbic 1=Return also key for IBAN and BIC
|
|
* @return array
|
|
* @see useDetailedBBAN
|
|
*/
|
|
public function getFieldsToShow($includeibanbic=0)
|
|
{
|
|
//Get the required properties depending on the country
|
|
$detailedBBAN = $this->useDetailedBBAN();
|
|
|
|
if ($detailedBBAN == 0) {
|
|
$fieldarray= array(
|
|
'BankAccountNumber'
|
|
);
|
|
} elseif ($detailedBBAN == 2) {
|
|
$fieldarray= array(
|
|
'BankCode',
|
|
'BankAccountNumber'
|
|
);
|
|
} else {
|
|
$fieldarray=self::getAccountNumberOrder();
|
|
}
|
|
|
|
//if ($this->needIBAN()) { // return always IBAN and BIC (this was old behaviour)
|
|
if ($includeibanbic)
|
|
{
|
|
$fieldarray[]='IBAN';
|
|
$fieldarray[]='BIC';
|
|
}
|
|
//}
|
|
|
|
//Get the order the properties are shown
|
|
return $fieldarray;
|
|
|
|
}
|
|
|
|
/**
|
|
* Returns the components of the bank account in order.
|
|
* Will return an array with the following values:
|
|
* - BankAccountNumber
|
|
* - BankCode
|
|
* - BankAccountNumberKey
|
|
* - DeskCode
|
|
*
|
|
* @return array
|
|
*/
|
|
public static function getAccountNumberOrder()
|
|
{
|
|
global $conf;
|
|
|
|
$fieldlists = array(
|
|
'BankCode',
|
|
'DeskCode',
|
|
'BankAccountNumber',
|
|
'BankAccountNumberKey'
|
|
);
|
|
|
|
if (!empty($conf->global->BANK_SHOW_ORDER_OPTION)) {
|
|
if (is_numeric($conf->global->BANK_SHOW_ORDER_OPTION)) {
|
|
if ($conf->global->BANK_SHOW_ORDER_OPTION == '1') {
|
|
$fieldlists = array(
|
|
'BankCode',
|
|
'DeskCode',
|
|
'BankAccountNumberKey',
|
|
'BankAccountNumber'
|
|
);
|
|
}
|
|
} else {
|
|
//Replace the old AccountNumber key with the new BankAccountNumber key
|
|
$fieldlists = explode(
|
|
' ',
|
|
preg_replace('/ ?[^Bank]AccountNumber ?/', 'BankAccountNumber',
|
|
$conf->global->BANK_SHOW_ORDER_OPTION)
|
|
);
|
|
}
|
|
}
|
|
|
|
return $fieldlists;
|
|
}
|
|
|
|
|
|
/**
|
|
* Initialise an instance with random values.
|
|
* Used to build previews or test instances.
|
|
* id must be 0 if object instance is a specimen.
|
|
*
|
|
* @return void
|
|
*/
|
|
function initAsSpecimen()
|
|
{
|
|
$this->specimen = 1;
|
|
$this->ref = 'MBA';
|
|
$this->label = 'My Big Company Bank account';
|
|
$this->bank = 'MyBank';
|
|
$this->courant = Account::TYPE_CURRENT;
|
|
$this->clos = Account::STATUS_OPEN;
|
|
$this->code_banque = '123';
|
|
$this->code_guichet = '456';
|
|
$this->number = 'ABC12345';
|
|
$this->cle_rib = 50;
|
|
$this->bic = 'AA12';
|
|
$this->iban = 'FR999999999';
|
|
$this->domiciliation = 'My bank address';
|
|
$this->proprio = 'Owner';
|
|
$this->owner_address = 'Owner address';
|
|
$this->country_id = 1;
|
|
}
|
|
|
|
}
|
|
|
|
|
|
/**
|
|
* Class to manage bank transaction lines
|
|
*/
|
|
class AccountLine extends CommonObject
|
|
{
|
|
var $error;
|
|
var $db;
|
|
var $element='bank';
|
|
var $table_element='bank';
|
|
var $picto = 'generic';
|
|
|
|
var $id;
|
|
var $ref;
|
|
var $datec;
|
|
var $dateo;
|
|
|
|
/**
|
|
* Value date
|
|
*/
|
|
var $datev;
|
|
var $amount;
|
|
var $label;
|
|
var $note;
|
|
var $fk_user_author;
|
|
var $fk_user_rappro;
|
|
var $fk_type;
|
|
var $rappro; // Is it conciliated
|
|
var $num_releve; // If conciliated, what is bank statement
|
|
var $num_chq; // Num of cheque
|
|
var $bank_chq; // Bank of cheque
|
|
var $fk_bordereau; // Id of cheque receipt
|
|
|
|
var $fk_account; // Id of bank account
|
|
var $bank_account_label; // Label of bank account
|
|
|
|
public $emetteur;
|
|
|
|
/**
|
|
* Constructor
|
|
*
|
|
* @param DoliDB $db Database handler
|
|
*/
|
|
function __construct(DoliDB $db)
|
|
{
|
|
$this->db = $db;
|
|
}
|
|
|
|
/**
|
|
* Load into memory content of a bank transaction line
|
|
*
|
|
* @param int $rowid Id of bank transaction to load
|
|
* @param string $ref Ref of bank transaction to load
|
|
* @param string $num External num to load (ex: num of transaction for paypal fee)
|
|
* @return int <0 if KO, 0 if OK but not found, >0 if OK and found
|
|
*/
|
|
function fetch($rowid,$ref='',$num='')
|
|
{
|
|
global $conf;
|
|
|
|
// Check parameters
|
|
if (empty($rowid) && empty($ref) && empty($num)) return -1;
|
|
|
|
$sql = "SELECT b.rowid, b.datec, b.datev, b.dateo, b.amount, b.label as label, b.fk_account,";
|
|
$sql.= " b.fk_user_author, b.fk_user_rappro,";
|
|
$sql.= " b.fk_type, b.num_releve, b.num_chq, b.rappro, b.note,";
|
|
$sql.= " b.fk_bordereau, b.banque, b.emetteur,";
|
|
//$sql.= " b.author"; // Is this used ?
|
|
$sql.= " ba.ref as bank_account_ref, ba.label as bank_account_label";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."bank as b,";
|
|
$sql.= " ".MAIN_DB_PREFIX."bank_account as ba";
|
|
$sql.= " WHERE b.fk_account = ba.rowid";
|
|
$sql.= " AND ba.entity IN (".getEntity('bank_account').")";
|
|
if ($num) $sql.= " AND b.num_chq='".$this->db->escape($num)."'";
|
|
else if ($ref) $sql.= " AND b.rowid='".$this->db->escape($ref)."'";
|
|
else $sql.= " AND b.rowid=".$rowid;
|
|
|
|
dol_syslog(get_class($this)."::fetch", LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
$ret=0;
|
|
|
|
$obj = $this->db->fetch_object($result);
|
|
if ($obj)
|
|
{
|
|
$this->id = $obj->rowid;
|
|
$this->rowid = $obj->rowid;
|
|
$this->ref = $obj->rowid;
|
|
|
|
$this->datec = $obj->datec;
|
|
$this->datev = $obj->datev;
|
|
$this->dateo = $obj->dateo;
|
|
$this->amount = $obj->amount;
|
|
$this->label = $obj->label;
|
|
$this->note = $obj->note;
|
|
|
|
$this->fk_user_author = $obj->fk_user_author;
|
|
$this->fk_user_rappro = $obj->fk_user_rappro;
|
|
|
|
$this->fk_type = $obj->fk_type; // Type of transaction
|
|
$this->rappro = $obj->rappro;
|
|
$this->num_releve = $obj->num_releve;
|
|
|
|
$this->num_chq = $obj->num_chq;
|
|
$this->bank_chq = $obj->banque;
|
|
$this->fk_bordereau = $obj->fk_bordereau;
|
|
|
|
$this->fk_account = $obj->fk_account;
|
|
$this->bank_account_ref = $obj->bank_account_ref;
|
|
$this->bank_account_label = $obj->bank_account_label;
|
|
|
|
$ret=1;
|
|
}
|
|
$this->db->free($result);
|
|
return $ret;
|
|
}
|
|
else
|
|
{
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Inserts a transaction to a bank account
|
|
*
|
|
* @return int <0 if KO, rowid of the line if OK
|
|
*/
|
|
public function insert()
|
|
{
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."bank (";
|
|
$sql .= "datec";
|
|
$sql .= ", dateo";
|
|
$sql .= ", datev";
|
|
$sql .= ", label";
|
|
$sql .= ", amount";
|
|
$sql .= ", fk_user_author";
|
|
$sql .= ", num_chq";
|
|
$sql .= ", fk_account";
|
|
$sql .= ", fk_type";
|
|
$sql .= ", emetteur,banque";
|
|
$sql .= ", rappro";
|
|
$sql .= ", numero_compte";
|
|
$sql .= ") VALUES (";
|
|
$sql .= "'".$this->db->idate($this->datec)."'";
|
|
$sql .= ", '".$this->db->idate($this->dateo)."'";
|
|
$sql .= ", '".$this->db->idate($this->datev)."'";
|
|
$sql .= ", '".$this->db->escape($this->label)."'";
|
|
$sql .= ", ".price2num($this->amount);
|
|
$sql .= ", ".($this->fk_user_author > 0 ? "'".$this->fk_user_author."'":"null");
|
|
$sql .= ", ".($this->num_chq ? "'".$this->num_chq."'" : "null");
|
|
$sql .= ", '".$this->fk_account."'";
|
|
$sql .= ", '".$this->db->escape($this->fk_type)."'";
|
|
$sql .= ", ".($this->emetteur ? "'".$this->db->escape($this->emetteur)."'" : "null");
|
|
$sql .= ", ".($this->bank_chq ? "'".$this->db->escape($this->bank_chq)."'" : "null");
|
|
$sql .= ", ".(int) $this->rappro;
|
|
$sql .= ", ".($this->numero_compte ? "'".$this->db->escape($this->numero_compte)."'" : "''");
|
|
$sql .= ")";
|
|
|
|
dol_syslog(get_class($this)."::insert", LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
|
|
if (!$resql) {
|
|
$this->error = $this->db->lasterror();
|
|
return -1;
|
|
}
|
|
|
|
$this->id = $this->db->last_insert_id(MAIN_DB_PREFIX.'bank');
|
|
|
|
return $this->id;
|
|
}
|
|
|
|
/**
|
|
* Delete transaction bank line record
|
|
*
|
|
* @param User $user User object that delete
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
function delete(User $user = null)
|
|
{
|
|
$nbko=0;
|
|
|
|
if ($this->rappro)
|
|
{
|
|
// Protection to avoid any delete of consolidated lines
|
|
$this->error="ErrorDeleteNotPossibleLineIsConsolidated";
|
|
return -1;
|
|
}
|
|
|
|
$this->db->begin();
|
|
|
|
// Delete urls
|
|
$result=$this->delete_urls($user);
|
|
if ($result < 0)
|
|
{
|
|
$nbko++;
|
|
}
|
|
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."bank_class WHERE lineid=".(int) $this->rowid;
|
|
dol_syslog(get_class($this)."::delete", LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if (! $result) $nbko++;
|
|
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."bank WHERE rowid=".(int) $this->rowid;
|
|
dol_syslog(get_class($this)."::delete", LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if (! $result) $nbko++;
|
|
|
|
if (! $nbko)
|
|
{
|
|
$this->db->commit();
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->db->rollback();
|
|
return -$nbko;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Delete bank line records
|
|
*
|
|
* @param User $user User object that delete
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
function delete_urls(User $user = null)
|
|
{
|
|
$nbko=0;
|
|
|
|
if ($this->rappro)
|
|
{
|
|
// Protection to avoid any delete of consolidated lines
|
|
$this->error="ErrorDeleteNotPossibleLineIsConsolidated";
|
|
return -1;
|
|
}
|
|
|
|
$this->db->begin();
|
|
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."bank_url WHERE fk_bank=".(int) $this->rowid;
|
|
dol_syslog(get_class($this)."::delete_urls", LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if (! $result) $nbko++;
|
|
|
|
if (! $nbko)
|
|
{
|
|
$this->db->commit();
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->db->rollback();
|
|
return -$nbko;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Update bank account record in database
|
|
*
|
|
* @param User $user Object user making update
|
|
* @param int $notrigger 0=Disable all triggers
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
function update(User $user, $notrigger = 0)
|
|
{
|
|
$this->db->begin();
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."bank SET";
|
|
$sql.= " amount = ".price2num($this->amount).",";
|
|
$sql.= " datev='".$this->db->idate($this->datev)."',";
|
|
$sql.= " dateo='".$this->db->idate($this->dateo)."'";
|
|
$sql.= " WHERE rowid = ".$this->rowid;
|
|
|
|
dol_syslog(get_class($this)."::update", LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$this->db->commit();
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->db->rollback();
|
|
$this->error=$this->db->error();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Update conciliation field
|
|
*
|
|
* @param User $user Objet user making update
|
|
* @param int $cat Category id
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
function update_conciliation(User $user, $cat)
|
|
{
|
|
global $conf;
|
|
|
|
$this->db->begin();
|
|
|
|
// Check statement field
|
|
if (! empty($conf->global->BANK_STATEMENT_REGEX_RULE))
|
|
{
|
|
if (! preg_match('/'.$conf->global->BANK_STATEMENT_REGEX_RULE.'/', $this->num_releve))
|
|
{
|
|
$this->errors[]=$langs->trans("ErrorBankStatementNameMustFollowRegex", $conf->global->BANK_STATEMENT_REGEX_RULE);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."bank SET";
|
|
$sql.= " rappro = 1";
|
|
$sql.= ", num_releve = '".$this->db->escape($this->num_releve)."'";
|
|
$sql.= ", fk_user_rappro = ".$user->id;
|
|
$sql.= " WHERE rowid = ".$this->id;
|
|
|
|
dol_syslog(get_class($this)."::update_conciliation", LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
if (! empty($cat))
|
|
{
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."bank_class (";
|
|
$sql.= "lineid";
|
|
$sql.= ", fk_categ";
|
|
$sql.= ") VALUES (";
|
|
$sql.= $this->id;
|
|
$sql.= ", ".$cat;
|
|
$sql.= ")";
|
|
|
|
dol_syslog(get_class($this)."::update_conciliation", LOG_DEBUG);
|
|
$this->db->query($sql);
|
|
|
|
// No error check. Can fail if category already affected
|
|
}
|
|
|
|
$this->rappro=1;
|
|
|
|
$this->db->commit();
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Increase/decrease value date of a rowid
|
|
*
|
|
* @param int $rowid Id of line
|
|
* @param int $sign 1 or -1
|
|
* @return int >0 if OK, 0 if KO
|
|
*/
|
|
function datev_change($rowid,$sign=1)
|
|
{
|
|
$sql = "SELECT datev FROM ".MAIN_DB_PREFIX."bank WHERE rowid = ".$rowid;
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$obj=$this->db->fetch_object($resql);
|
|
$newdate=$this->db->jdate($obj->datev)+(3600*24*$sign);
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."bank SET";
|
|
$sql.= " datev = '".$this->db->idate($newdate)."'";
|
|
$sql.= " WHERE rowid = ".$rowid;
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
if ($this->db->affected_rows($result))
|
|
{
|
|
return 1;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
return 0;
|
|
}
|
|
}
|
|
else dol_print_error($this->db);
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Increase value date of a rowid
|
|
*
|
|
* @param int $id Id of line to change
|
|
* @return int >0 if OK, 0 if KO
|
|
*/
|
|
function datev_next($id)
|
|
{
|
|
return $this->datev_change($id,1);
|
|
}
|
|
|
|
/**
|
|
* Decrease value date of a rowid
|
|
*
|
|
* @param int $id Id of line to change
|
|
* @return int >0 if OK, 0 if KO
|
|
*/
|
|
function datev_previous($id)
|
|
{
|
|
return $this->datev_change($id,-1);
|
|
}
|
|
|
|
|
|
/**
|
|
* Increase/decrease operation date of a rowid
|
|
*
|
|
* @param int $rowid Id of line
|
|
* @param int $sign 1 or -1
|
|
* @return int >0 if OK, 0 if KO
|
|
*/
|
|
function dateo_change($rowid,$sign=1)
|
|
{
|
|
$sql = "SELECT dateo FROM ".MAIN_DB_PREFIX."bank WHERE rowid = ".$rowid;
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$obj=$this->db->fetch_object($resql);
|
|
$newdate=$this->db->jdate($obj->dateo)+(3600*24*$sign);
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."bank SET";
|
|
$sql.= " dateo = '".$this->db->idate($newdate)."'";
|
|
$sql.= " WHERE rowid = ".$rowid;
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
if ($this->db->affected_rows($result))
|
|
{
|
|
return 1;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
return 0;
|
|
}
|
|
}
|
|
else dol_print_error($this->db);
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Increase operation date of a rowid
|
|
*
|
|
* @param int $id Id of line to change
|
|
* @return int >0 if OK, 0 if KO
|
|
*/
|
|
function dateo_next($id)
|
|
{
|
|
return $this->dateo_change($id,1);
|
|
}
|
|
|
|
/**
|
|
* Decrease operation date of a rowid
|
|
*
|
|
* @param int $id Id of line to change
|
|
* @return int >0 if OK, 0 if KO
|
|
*/
|
|
function dateo_previous($id)
|
|
{
|
|
return $this->dateo_change($id,-1);
|
|
}
|
|
|
|
|
|
/**
|
|
* Load miscellaneous information for tab "Info"
|
|
*
|
|
* @param int $id Id of object to load
|
|
* @return void
|
|
*/
|
|
function info($id)
|
|
{
|
|
$sql = 'SELECT b.rowid, b.datec, b.tms as datem,';
|
|
$sql.= ' b.fk_user_author, b.fk_user_rappro';
|
|
$sql.= ' FROM '.MAIN_DB_PREFIX.'bank as b';
|
|
$sql.= ' WHERE b.rowid = '.$id;
|
|
|
|
$result=$this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
if ($this->db->num_rows($result))
|
|
{
|
|
$obj = $this->db->fetch_object($result);
|
|
$this->id = $obj->rowid;
|
|
|
|
if ($obj->fk_user_author)
|
|
{
|
|
$cuser = new User($this->db);
|
|
$cuser->fetch($obj->fk_user_author);
|
|
$this->user_creation = $cuser;
|
|
}
|
|
if ($obj->fk_user_rappro)
|
|
{
|
|
$ruser = new User($this->db);
|
|
$ruser->fetch($obj->fk_user_rappro);
|
|
$this->user_rappro = $ruser;
|
|
}
|
|
|
|
$this->date_creation = $this->db->jdate($obj->datec);
|
|
$this->date_modification = $this->db->jdate($obj->datem);
|
|
//$this->date_rappro = $obj->daterappro; // Not yet managed
|
|
}
|
|
$this->db->free($result);
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Return clicable name (with picto eventually)
|
|
*
|
|
* @param int $withpicto 0=No picto, 1=Include picto into link, 2=Only picto
|
|
* @param int $maxlen Longueur max libelle
|
|
* @param string $option Option ('showall')
|
|
* @return string Chaine avec URL
|
|
*/
|
|
function getNomUrl($withpicto=0,$maxlen=0,$option='')
|
|
{
|
|
global $langs;
|
|
|
|
$result='';
|
|
$label=$langs->trans("ShowTransaction").': '.$this->rowid;
|
|
$link = '<a href="'.DOL_URL_ROOT.'/compta/bank/ligne.php?rowid='.$this->rowid.'" title="'.dol_escape_htmltag($label, 1).'" class="classfortooltip">';
|
|
$linkend='</a>';
|
|
|
|
if ($withpicto) $result.=($link.img_object($label, 'account', 'class="classfortooltip"').$linkend.' ');
|
|
$result.=$link.$this->rowid.$linkend;
|
|
|
|
if ($option == 'showall' || $option == 'showconciliated') $result.=' (';
|
|
if ($option == 'showall')
|
|
{
|
|
$result.=$langs->trans("BankAccount").': ';
|
|
$accountstatic=new Account($this->db);
|
|
$accountstatic->id=$this->fk_account;
|
|
$accountstatic->ref=$this->bank_account_ref;
|
|
$accountstatic->label=$this->bank_account_label;
|
|
$result.=$accountstatic->getNomUrl(0).', ';
|
|
}
|
|
if ($option == 'showall' || $option == 'showconciliated')
|
|
{
|
|
$result.=$langs->trans("BankLineConciliated").': ';
|
|
$result.=yn($this->rappro);
|
|
}
|
|
if ($option == 'showall' || $option == 'showconciliated') $result.=')';
|
|
|
|
return $result;
|
|
}
|
|
|
|
|
|
/**
|
|
* Return label of status (activity, closed)
|
|
*
|
|
* @param int $mode 0=libelle long, 1=libelle court, 2=Picto + Libelle court, 3=Picto, 4=Picto + Libelle long
|
|
* @return string Libelle
|
|
*/
|
|
function getLibStatut($mode=0)
|
|
{
|
|
return $this->LibStatut($this->status,$mode);
|
|
}
|
|
|
|
/**
|
|
* Renvoi le libelle d'un statut donne
|
|
*
|
|
* @param int $statut Id statut
|
|
* @param int $mode 0=libelle long, 1=libelle court, 2=Picto + Libelle court, 3=Picto, 4=Picto + Libelle long, 5=Libelle court + Picto
|
|
* @return string Libelle du statut
|
|
*/
|
|
function LibStatut($statut,$mode=0)
|
|
{
|
|
global $langs;
|
|
//$langs->load('companies');
|
|
/*
|
|
if ($mode == 0)
|
|
{
|
|
if ($statut==0) return $langs->trans("ActivityCeased");
|
|
if ($statut==1) return $langs->trans("InActivity");
|
|
}
|
|
if ($mode == 1)
|
|
{
|
|
if ($statut==0) return $langs->trans("ActivityCeased");
|
|
if ($statut==1) return $langs->trans("InActivity");
|
|
}
|
|
if ($mode == 2)
|
|
{
|
|
if ($statut==0) return img_picto($langs->trans("ActivityCeased"),'statut5', 'class="pictostatus"').' '.$langs->trans("ActivityCeased");
|
|
if ($statut==1) return img_picto($langs->trans("InActivity"),'statut4', 'class="pictostatus"').' '.$langs->trans("InActivity");
|
|
}
|
|
if ($mode == 3)
|
|
{
|
|
if ($statut==0) return img_picto($langs->trans("ActivityCeased"),'statut5', 'class="pictostatus"');
|
|
if ($statut==1) return img_picto($langs->trans("InActivity"),'statut4', 'class="pictostatus"');
|
|
}
|
|
if ($mode == 4)
|
|
{
|
|
if ($statut==0) return img_picto($langs->trans("ActivityCeased"),'statut5', 'class="pictostatus"').' '.$langs->trans("ActivityCeased");
|
|
if ($statut==1) return img_picto($langs->trans("InActivity"),'statut4', 'class="pictostatus"').' '.$langs->trans("InActivity");
|
|
}
|
|
if ($mode == 5)
|
|
{
|
|
if ($statut==0) return $langs->trans("ActivityCeased").' '.img_picto($langs->trans("ActivityCeased"),'statut5', 'class="pictostatus"');
|
|
if ($statut==1) return $langs->trans("InActivity").' '.img_picto($langs->trans("InActivity"),'statut4', 'class="pictostatus"');
|
|
}*/
|
|
}
|
|
|
|
}
|
|
|