account.class.php

Go to the documentation of this file.

<?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@inodbox.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@open-dsi.fr>
 * Copyright (C) 2016   Ferran Marcet       <fmarcet@2byte.es>
 * Copyright (C) 2019   JC Prieto       <jcprieto@virtual20.com><prietojc@gmail.com>
 * Copyright (C) 2022-2024  Frédéric France         <frederic.france@free.fr>
 * Copyright (C) 2024   MDW             <mdeweerd@users.noreply.github.com>
 *
 * 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/>.
 */
 
require_once DOL_DOCUMENT_ROOT.'/core/class/commonobject.class.php';
 
 
class Account extends CommonObject
{
  public $element = 'bank_account';
 
  public $table_element = 'bank_account';
 
  public $picto = 'account';
 
  public $rowid;
 
  public $label;
 
  public $courant;
 
  public $type;
 
  public $bank;
 
  public $clos = self::STATUS_OPEN;
 
  public $rappro = 1;
 
  public $url;
 
  public $code_banque;
 
  public $code_guichet;
 
  public $number;
 
  public $cle_rib;
 
  public $bic;
 
  public $iban;
 
  public $iban_prefix;
 
  public $pti_in_ctti = 0;
 
  public $proprio;
 
  public $owner_name;
 
  public $owner_address;
 
  public $owner_zip;
 
  public $owner_town;
  public $owner_country_id;
  public $owner_country_code;
 
  public $domiciliation;
 
  public $address;
  public $state_id;
  public $state_code;
  public $state;
  public $country_id;
 
  public $type_lib = array();
 
  public $account_number;
 
  public $fk_accountancy_journal;
 
  public $accountancy_journal;
 
  public $currency_code;
 
  public $account_currency_code;
 
  public $min_allowed;
 
  public $min_desired;
 
  public $comment;
 
  public $date_solde;
 
  public $solde;
 
  public $balance;
 
  public $ics;
 
  public $ics_transfer;
 
  public $oldref;
 
 
  // BEGIN MODULEBUILDER PROPERTIES
  public $fields = array(
    'rowid' => array('type' => 'integer', 'label' => 'TechnicalID', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 10),
    'ref' => array('type' => 'varchar(12)', 'label' => 'Ref', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'showoncombobox' => 1, 'position' => 25),
    'label' => array('type' => 'varchar(30)', 'label' => 'Label', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 30),
    'entity' => array('type' => 'integer', 'label' => 'Entity', 'default' => '1', 'enabled' => 1, 'visible' => -2, 'notnull' => 1, 'position' => 35, 'index' => 1),
    'bank' => array('type' => 'varchar(60)', 'label' => 'Bank', 'enabled' => 1, 'visible' => -1, 'position' => 40),
    'code_banque' => array('type' => 'varchar(128)', 'label' => 'Code banque', 'enabled' => 1, 'visible' => -1, 'position' => 45),
    'code_guichet' => array('type' => 'varchar(6)', 'label' => 'Code guichet', 'enabled' => 1, 'visible' => -1, 'position' => 50),
    'number' => array('type' => 'varchar(255)', 'label' => 'Number', 'enabled' => 1, 'visible' => -1, 'position' => 55),
    'cle_rib' => array('type' => 'varchar(5)', 'label' => 'Cle rib', 'enabled' => 1, 'visible' => -1, 'position' => 60),
    'bic' => array('type' => 'varchar(11)', 'label' => 'Bic', 'enabled' => 1, 'visible' => -1, 'position' => 65),
    'iban_prefix' => array('type' => 'varchar(34)', 'label' => 'Iban prefix', 'enabled' => 1, 'visible' => -1, 'position' => 70),
    'country_iban' => array('type' => 'varchar(2)', 'label' => 'Country iban', 'enabled' => 1, 'visible' => -1, 'position' => 75),
    'cle_iban' => array('type' => 'varchar(2)', 'label' => 'Cle iban', 'enabled' => 1, 'visible' => -1, 'position' => 80),
    'domiciliation' => array('type' => 'varchar(255)', 'label' => 'Domiciliation', 'enabled' => 1, 'visible' => -1, 'position' => 85),
    'state_id' => array('type' => 'integer', 'label' => 'StateId', 'enabled' => 1, 'visible' => -1, 'position' => 90),
    'fk_pays' => array('type' => 'integer', 'label' => 'Country', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 95),
    'proprio' => array('type' => 'varchar(60)', 'label' => 'Proprio', 'enabled' => 1, 'visible' => -1, 'position' => 100),
    'owner_address' => array('type' => 'varchar(255)', 'label' => 'Owner address', 'enabled' => 1, 'visible' => -1, 'position' => 105),
    'owner_zip' => array('type' => 'varchar(25)', 'label' => 'Owner zip', 'enabled' => 1, 'visible' => -1, 'position' => 106),
    'owner_town' => array('type' => 'varchar(50)', 'label' => 'Owner town', 'enabled' => 1, 'visible' => -1, 'position' => 107),
    'owner_country_id' => array('type' => 'integer', 'label' => 'Owner country', 'enabled' => 1, 'visible' => -1, 'position' => 108),
    'courant' => array('type' => 'smallint(6)', 'label' => 'Courant', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 110),
    'clos' => array('type' => 'smallint(6)', 'label' => 'Clos', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 115),
    'rappro' => array('type' => 'smallint(6)', 'label' => 'Rappro', 'enabled' => 1, 'visible' => -1, 'position' => 120),
    'url' => array('type' => 'varchar(128)', 'label' => 'Url', 'enabled' => 1, 'visible' => -1, 'position' => 125),
    'account_number' => array('type' => 'varchar(32)', 'label' => 'Account number', 'enabled' => 1, 'visible' => -1, 'position' => 130),
    'fk_accountancy_journal' => array('type' => 'integer', 'label' => 'Accountancy journal ID', 'enabled' => 1, 'visible' => -1, 'position' => 132),
    'accountancy_journal' => array('type' => 'varchar(20)', 'label' => 'Accountancy journal', 'enabled' => 1, 'visible' => -1, 'position' => 135),
    'currency_code' => array('type' => 'varchar(3)', 'label' => 'Currency code', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 140),
    'min_allowed' => array('type' => 'integer', 'label' => 'Min allowed', 'enabled' => 1, 'visible' => -1, 'position' => 145),
    'min_desired' => array('type' => 'integer', 'label' => 'Min desired', 'enabled' => 1, 'visible' => -1, 'position' => 150),
    'comment' => array('type' => 'text', 'label' => 'Comment', 'enabled' => 1, 'visible' => -1, 'position' => 155),
    'datec' => array('type' => 'datetime', 'label' => 'DateCreation', 'enabled' => 1, 'visible' => -1, 'position' => 156),
    'tms' => array('type' => 'timestamp', 'label' => 'DateModification', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 157),
    'fk_user_author' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'Fk user author', 'enabled' => 1, 'visible' => -1, 'position' => 160),
    'fk_user_modif' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserModif', 'enabled' => 1, 'visible' => -2, 'notnull' => -1, 'position' => 165),
    'note_public' => array('type' => 'html', 'label' => 'NotePublic', 'enabled' => 1, 'visible' => 0, 'position' => 170),
    'model_pdf' => array('type' => 'varchar(255)', 'label' => 'Model pdf', 'enabled' => 1, 'visible' => 0, 'position' => 175),
    'import_key' => array('type' => 'varchar(14)', 'label' => 'ImportId', 'enabled' => 1, 'visible' => -2, 'position' => 180),
    'extraparams' => array('type' => 'varchar(255)', 'label' => 'Extraparams', 'enabled' => 1, 'visible' => -1, 'position' => 185),
  );
  // END MODULEBUILDER PROPERTIES
 
  const TYPE_CURRENT = 1;
  const TYPE_CASH = 2;
  const TYPE_SAVINGS = 0;
 
 
  const STATUS_OPEN = 0;
  const STATUS_CLOSED = 1;
 
 
  public function __construct(DoliDB $db)
  {
    global $langs;
 
    $this->db = $db;
 
    $this->ismultientitymanaged = 1;
 
    $this->balance = 0;
 
    $this->type_lib = array(
      self::TYPE_SAVINGS => $langs->transnoentitiesnoconv("BankType0"),
      self::TYPE_CURRENT => $langs->transnoentitiesnoconv("BankType1"),
      self::TYPE_CASH => $langs->transnoentitiesnoconv("BankType2"),
    );
 
    $this->labelStatus = array(
      self::STATUS_OPEN => $langs->transnoentitiesnoconv("StatusAccountOpened"),
      self::STATUS_CLOSED => $langs->transnoentitiesnoconv("StatusAccountClosed")
    );
  }
 
  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);
  }
 
 
  public function canBeConciliated()
  {
    global $conf;
 
    if (empty($this->rappro)) {
      return -1;
    }
    if ($this->type == Account::TYPE_CASH && !getDolGlobalString('BANK_CAN_RECONCILIATE_CASHACCOUNT')) {
      return -2;
    }
    if ($this->status) {
      return -3;
    }
    return 1;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function add_url_line($line_id, $url_id, $url, $label, $type)
  {
    // phpcs:enable
    $sql = "INSERT INTO ".MAIN_DB_PREFIX."bank_url (";
    $sql .= "fk_bank";
    $sql .= ", url_id";
    $sql .= ", url";    // deprecated
    $sql .= ", label";
    $sql .= ", type";
    $sql .= ") VALUES (";
    $sql .= ((int) $line_id);
    $sql .= ", ".((int) $url_id);
    $sql .= ", '".$this->db->escape($url)."'";    // deprecated
    $sql .= ", '".$this->db->escape($label)."'";
    $sql .= ", '".$this->db->escape($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;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_url($fk_bank = 0, $url_id = 0, $type = '')
  {
    // phpcs:enable
    $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 = ".((int) $fk_bank);
    } else {
      $sql .= " WHERE url_id = ".((int) $url_id)." AND type = '".$this->db->escape($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);
        // Old links (for compatibility)
        $lines[$i][0] = $obj->url;
        $lines[$i][1] = $obj->url_id;
        $lines[$i][2] = $obj->label;
        $lines[$i][3] = $obj->type;
        // New links
        $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;
  }
 
  public function addline($date, $oper, $label, $amount, $num_chq, $categorie, User $user, $emetteur = '', $banque = '', $accountancycode = '', $datev = null, $num_releve = '', $amount_main_currency = null)
  {
    global $langs;
 
    // Deprecation warning
    if (is_numeric($oper)) {
      dol_syslog(__METHOD__.": using numeric operations is deprecated", LOG_WARNING);
    }
 
    if (empty($this->id) && !empty($this->rowid)) { // For backward compatibility
      $this->id = $this->rowid;
    }
 
    // Clean parameters
    $emetteur = trim($emetteur);
    $banque = trim($banque);
    $label = trim($label);
 
    $now = dol_now();
 
    if (is_numeric($oper)) {    // Clean operation to have a code instead of a rowid
      $sql = "SELECT code FROM ".MAIN_DB_PREFIX."c_paiement";
      $sql .= " WHERE id = ".((int) $oper);
      $sql .= " AND entity IN (".getEntity('c_paiement').")";
      $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 = $langs->trans("OperNotDefined");
      return -1;
    }
    if (!$this->id) {
      $this->error = $langs->trans("ThisIdNotDefined");
      return -2;
    }
    if ($this->type == Account::TYPE_CASH && $oper != 'LIQ') {
      $this->error = "ErrorCashAccountAcceptsOnlyCashMoney";
      return -3;
    }
 
    $this->db->begin();
 
    if (is_null($datev) || empty($datev)) {
      $datev = $date;
    }
 
    $accline = new AccountLine($this->db);
    $accline->datec = $now;
    $accline->dateo = $date;
    $accline->datev = $datev;
    $accline->label = $label;
    $accline->amount = $amount;
    $accline->amount_main_currency = $amount_main_currency;
    $accline->fk_user_author = $user->id;
    $accline->fk_account = $this->id;
    $accline->fk_type = $oper;
    $accline->numero_compte = $accountancycode;
    $accline->num_releve = $num_releve;
 
    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."category_bankline(";
        $sql .= "lineid, fk_categ";
        $sql .= ") VALUES (";
        $sql .= ((int) $accline->id).", '".$this->db->escape($categorie)."'";
        $sql .= ")";
 
        $result = $this->db->query($sql);
        if (!$result) {
          $this->error = $this->db->lasterror();
          $this->db->rollback();
 
          return -4;
        }
      }
 
      $this->db->commit();
 
      return $accline->id;
    } else {
      $this->setErrorsFromObject($accline);
      $this->db->rollback();
 
      return -5;
    }
  }
 
  public function create($user, $notrigger = 0)
  {
    global $langs, $conf;
 
    $error = 0;
 
    // Clean parameters
    if (!$this->min_allowed) {
      $this->min_allowed = 0;
    }
    if (!$this->min_desired) {
      $this->min_desired = 0;
    }
 
    // 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;
    }
 
    // Load libraries to check BAN
    $balance = $this->balance;
    if (empty($balance) && !empty($this->solde)) {
      $balance = $this->solde;
    }
    if (empty($balance)) {
      $balance = 0;
    }
    if (empty($this->address && !empty($this->domiciliation))) {
      dol_syslog(get_class($this)."::create domiciliation is deprecated use address", LOG_NOTICE);
      $this->address = $this->domiciliation;
    }
    if (empty($this->status && !empty($this->clos))) {
      dol_syslog(get_class($this)."::create clos is deprecated use status", LOG_NOTICE);
      $this->status = $this->clos;
    }
 
    if (empty($this->address && !empty($this->domiciliation))) {
      dol_syslog(get_class($this)."::create domiciliation is deprecated use address", LOG_NOTICE);
      $this->address = $this->domiciliation;
    }
 
    // Load the library to validate/check a BAN account
    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 .= ", pti_in_ctti";
    $sql .= ", proprio";
    $sql .= ", owner_address";
    $sql .= ", owner_zip";
    $sql .= ", owner_town";
    $sql .= ", owner_country_id";
    $sql .= ", currency_code";
    $sql .= ", rappro";
    $sql .= ", min_allowed";
    $sql .= ", min_desired";
    $sql .= ", comment";
    $sql .= ", state_id";
    $sql .= ", fk_pays";
    $sql .= ", ics";
    $sql .= ", ics_transfer";
    $sql .= ") VALUES (";
    $sql .= "'".$this->db->idate($now)."'";
    $sql .= ", '".$this->db->escape($this->ref)."'";
    $sql .= ", '".$this->db->escape($this->label)."'";
    $sql .= ", ".((int) $conf->entity);
    $sql .= ", '".$this->db->escape($this->account_number)."'";
    $sql .= ", ".($this->fk_accountancy_journal > 0 ? ((int) $this->fk_accountancy_journal) : "null");
    $sql .= ", '".$this->db->escape($this->bank)."'";
    $sql .= ", '".$this->db->escape($this->code_banque)."'";
    $sql .= ", '".$this->db->escape($this->code_guichet)."'";
    $sql .= ", '".$this->db->escape($this->number)."'";
    $sql .= ", '".$this->db->escape($this->cle_rib)."'";
    $sql .= ", '".$this->db->escape($this->bic)."'";
    $sql .= ", '".$this->db->escape($this->iban)."'";
    $sql .= ", '".$this->db->escape($this->address)."'";
    $sql .= ", ".((int) $this->pti_in_ctti);
    $sql .= ", '".$this->db->escape($this->owner_name ? $this->owner_name : $this->proprio)."'";
    $sql .= ", '".$this->db->escape($this->owner_address)."'";
    $sql .= ", '".$this->db->escape($this->owner_zip)."'";
    $sql .= ", '".$this->db->escape($this->owner_town)."'";
    $sql .= ", ".($this->owner_country_id > 0 ? ((int) $this->owner_country_id) : "null");
    $sql .= ", '".$this->db->escape($this->currency_code)."'";
    $sql .= ", ".((int) $this->rappro);
    $sql .= ", ".price2num($this->min_allowed, 'MT');
    $sql .= ", ".price2num($this->min_desired, 'MT');
    $sql .= ", '".$this->db->escape($this->comment)."'";
    $sql .= ", ".($this->state_id > 0 ? ((int) $this->state_id) : "null");
    $sql .= ", ".($this->country_id > 0 ? ((int) $this->country_id) : "null");
    $sql .= ", '".$this->db->escape($this->ics)."'";
    $sql .= ", '".$this->db->escape($this->ics_transfer)."'";
    $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 = $now;
        $accline->label = '('.$langs->trans("InitialBankBalance").')';
        $accline->amount = (float) price2num($balance);
        $accline->fk_user_author = $user->id;
        $accline->fk_account = $this->id;
        $accline->datev = $this->date_solde;
        $accline->dateo = $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;
    }
  }
 
  public function update($user, $notrigger = 0)
  {
    global $langs, $conf;
 
    $error = 0;
 
    $this->db->begin();
 
    // 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 = ".((int) $this->type);
    $sql .= ",clos = ".((int) $this->status);
    $sql .= ",rappro = ".((int) $this->rappro);
    $sql .= ",url = ".($this->url ? "'".$this->db->escape($this->url)."'" : "null");
    $sql .= ",account_number = '".$this->db->escape($this->account_number)."'";
    $sql .= ",fk_accountancy_journal = ".($this->fk_accountancy_journal > 0 ? ((int) $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->address)."'";
    $sql .= ",pti_in_ctti=".((int) $this->pti_in_ctti);
    $sql .= ",proprio = '".$this->db->escape($this->owner_name ? $this->owner_name : $this->proprio)."'";
    $sql .= ",owner_address = '".$this->db->escape($this->owner_address)."'";
    $sql .= ",owner_zip = '".$this->db->escape($this->owner_zip)."'";
    $sql .= ",owner_town = '".$this->db->escape($this->owner_town)."'";
    $sql .= ",owner_country_id = ".($this->owner_country_id > 0 ? ((int) $this->owner_country_id) : "null");
 
    $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 ? ((int) $this->state_id) : "null");
    $sql .= ",fk_pays = ".($this->country_id > 0 ? ((int) $this->country_id) : "null");
    $sql .= ",ics = '".$this->db->escape($this->ics)."'";
    $sql .= ",ics_transfer = '".$this->db->escape($this->ics_transfer)."'";
 
    $sql .= " WHERE rowid = ".((int) $this->id);
 
    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 (!$error) {
        $result = $this->insertExtraFields();
        if ($result < 0) {
          $error++;
        }
      }
 
      if (!$error && !empty($this->oldref) && $this->oldref !== $this->ref) {
        $sql = 'UPDATE '.MAIN_DB_PREFIX."ecm_files set filepath = 'bank/".$this->db->escape($this->ref)."'";
        $sql .= " WHERE filepath = 'bank/".$this->db->escape($this->oldref)."' and src_object_type='bank_account' and entity = ".((int) $conf->entity);
        $resql = $this->db->query($sql);
        if (!$resql) {
          $error++;
          $this->error = $this->db->lasterror();
        }
 
        // We rename directory in order not to lose the attachments
        $oldref = dol_sanitizeFileName($this->oldref);
        $newref = dol_sanitizeFileName($this->ref);
        $dirsource = $conf->bank->dir_output.'/'.$oldref;
        $dirdest = $conf->bank->dir_output.'/'.$newref;
        if (file_exists($dirsource)) {
          dol_syslog(get_class($this)."::update rename dir ".$dirsource." into ".$dirdest, LOG_DEBUG);
          if (@rename($dirsource, $dirdest)) {
            dol_syslog("Rename ok", LOG_DEBUG);
          }
        }
      }
 
      if (!$error && !$notrigger) {
        // Call trigger
        $result = $this->call_trigger('BANKACCOUNT_MODIFY', $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;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function update_bban($user = null)
  {
    // phpcs:enable
    global $conf, $langs;
 
    // Load library to get BAN control function
    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->address ? $this->address : $this->domiciliation)."'";
    $sql .= ",proprio = '".$this->db->escape($this->owner_name ? $this->owner_name : $this->proprio)."'";
    $sql .= ",owner_address = '".$this->db->escape($this->owner_address)."'";
    $sql .= ",owner_zip = '".$this->db->escape($this->owner_zip)."'";
    $sql .= ",owner_town = '".$this->db->escape($this->owner_town)."'";
    $sql .= ",owner_country_id = ".($this->owner_country_id > 0 ? ((int) $this->owner_country_id) : "null");
    $sql .= ",state_id = ".($this->state_id > 0 ? $this->state_id : "null");
    $sql .= ",fk_pays = ".($this->country_id > 0 ? $this->country_id : "null");
    $sql .= " WHERE rowid = ".((int) $this->id);
    $sql .= " AND entity = ".((int) $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;
    }
  }
 
 
  public function fetch($id, $ref = '')
  {
    if (empty($id) && empty($ref)) {
      $this->error = "ErrorBadParameters";
      return -1;
    }
 
    $sql = "SELECT ba.rowid, ba.ref, ba.label, ba.bank, ba.number, ba.courant as type, ba.clos as status, ba.rappro, ba.url,";
    $sql .= " ba.code_banque, ba.code_guichet, ba.cle_rib, ba.bic, ba.iban_prefix as iban,";
    $sql .= " ba.domiciliation as address, ba.pti_in_ctti, ba.proprio as owner_name, ba.owner_address, ba.owner_zip, ba.owner_town, ba.owner_country_id, 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_modification, ba.ics, ba.ics_transfer,";
    $sql .= ' c.code as country_code, c.label as country,';
    $sql .= ' d.code_departement as state_code, d.nom as state,';
    $sql .= ' aj.code as accountancy_journal';
    $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 .= ' LEFT JOIN '.MAIN_DB_PREFIX.'accounting_journal as aj ON aj.rowid=ba.fk_accountancy_journal';
    $sql .= " WHERE ba.entity IN (".getEntity($this->element).")";
    if ($id) {
      $sql .= " AND ba.rowid = ".((int) $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->type;
        $this->courant       = $obj->type;
        $this->bank          = $obj->bank;
        $this->clos          = $obj->status;
        $this->status = $obj->status;
        $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->address;
        $this->address       = $obj->address;
        $this->pti_in_ctti   = $obj->pti_in_ctti;
        $this->proprio       = $obj->owner_name;
        $this->owner_name    = $obj->owner_name;
        $this->owner_address = $obj->owner_address;
        $this->owner_zip     = $obj->owner_zip;
        $this->owner_town    = $obj->owner_town;
        $this->owner_country_id = $obj->owner_country_id;
 
        $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->accountancy_journal = $obj->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_modification = $this->db->jdate($obj->date_modification);
 
        $this->ics           = $obj->ics;
        $this->ics_transfer  = $obj->ics_transfer;
 
        // Retrieve all extrafield
        // fetch optionals attributes and labels
        $this->fetch_optionals();
 
        return 1;
      } else {
        return 0;
      }
    } else {
      $this->error = $this->db->lasterror();
      $this->errors[] = $this->error;
      return -1;
    }
  }
 
  public function setCategories($categories)
  {
    require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
    return parent::setCategoriesCommon($categories, Categorie::TYPE_ACCOUNT);
  }
 
  public function delete($user = null, $notrigger = 0)
  {
    $error = 0;
 
    $this->db->begin();
 
    // @TODO Check there is no child into llx_payment_various, ... to allow deletion ?
 
    // Delete link between tag and bank account
    if (!$error) {
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."categorie_account";
      $sql .= " WHERE fk_account = ".((int) $this->id);
 
      $resql = $this->db->query($sql);
      if (!$resql) {
        $error++;
        $this->error = "Error ".$this->db->lasterror();
      }
    }
 
    if (!$error) {
      $sql = "DELETE FROM ".MAIN_DB_PREFIX.$this->table_element;
      $sql .= " WHERE rowid = ".((int) $this->id);
 
      dol_syslog(get_class($this)."::delete", LOG_DEBUG);
      $result = $this->db->query($sql);
      if ($result) {
        // Remove extrafields
        if (!$error) {
          $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;
    }
  }
 
 
  public function getLibStatut($mode = 0)
  {
    return $this->LibStatut($this->status, $mode);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibStatut($status, $mode = 0)
  {
    // phpcs:enable
    global $langs;
    $langs->load('banks');
 
    if ($status == self::STATUS_OPEN) {
      $label = $langs->transnoentitiesnoconv("StatusAccountOpened");
      $labelshort = $langs->transnoentitiesnoconv("StatusAccountOpened");
      $statusType = 'status4';
    } else {
      $label = $langs->transnoentitiesnoconv("StatusAccountClosed");
      $labelshort = $langs->transnoentitiesnoconv("StatusAccountClosed");
      $statusType = 'status5';
    }
 
    return dolGetStatus($label, $labelshort, '', $statusType, $mode);
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function can_be_deleted()
  {
    // phpcs:enable
    $can_be_deleted = false;
 
    $sql = "SELECT COUNT(rowid) as nb";
    $sql .= " FROM ".MAIN_DB_PREFIX."bank";
    $sql .= " WHERE fk_account = ".((int) $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;
  }
 
 
  public function error()
  {
    return $this->error;
  }
 
  public function solde($option = 0, $date_end = '', $field = 'dateo')
  {
    $solde = 0;
 
    $sql = "SELECT sum(amount) as amount";
    $sql .= " FROM ".MAIN_DB_PREFIX."bank";
    $sql .= " WHERE fk_account = ".((int) $this->id);
    if ($option == 1) {
      $sql .= " AND ".$this->db->escape($field)." <= '".(!empty($date_end) ? $this->db->idate($date_end) : $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);
    } else {
      $this->errors[] = $this->db->lasterror;
      return -1;
    }
 
    return (float) price2num($solde, 'MU');
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_board(User $user, $filteraccountid = 0)
  {
    // phpcs:enable
    global $conf, $langs;
 
    if ($user->socid) {
      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 != " . Account::TYPE_CASH . ")"; // Compte rapprochable
    $sql .= " AND clos = 0";
    if ($filteraccountid) {
      $sql .= " AND ba.rowid = ".((int) $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->labelShort = $langs->trans("TransactionsToConciliateShort");
      $response->url = DOL_URL_ROOT.'/compta/bank/list.php?leftmenu=bank&amp;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;
    }
  }
 
  public function loadStateBoard($filteraccountid = 0)
  {
    global $user;
 
    if ($user->socid) {
      return -1; // protection pour eviter appel par utilisateur externe
    }
 
    $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 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 = ".((int) $filteraccountid);
    }
 
    $resql = $this->db->query($sql);
    if ($resql) {
      while ($obj = $this->db->fetch_object($resql)) {
        $this->nb["banklines"] = $obj->nb;
      }
      $this->db->free($resql);
      return 1;
    } else {
      dol_print_error($this->db);
      $this->error = $this->db->error();
      return -1;
    }
  }
 
 
  public function countAccountToReconcile()
  {
    global $user;
 
    //Protection against external users
    if ($user->socid) {
      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 (!getDolGlobalString('BANK_CAN_RECONCILIATE_CASHACCOUNT')) {
      $sql .= " AND ba.courant != " . Account::TYPE_CASH;
    }
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      $nb = $obj->nb;
    } else {
      dol_print_error($this->db);
    }
 
    return $nb;
  }
 
  public function getTooltipContentArray($params)
  {
    global $langs;
    $langs->loadLangs(['banks', 'compta']);
    include_once DOL_DOCUMENT_ROOT.'/core/lib/bank.lib.php';
 
    $datas = array();
 
    $nofetch = !empty($params['nofetch']);
    $pictos = img_picto('', $this->picto).' <u class="paddingrightnow">'.$langs->trans("BankAccount").'</u>';
    if (isset($this->status)) {
      $pictos .= ' '.$this->getLibStatut(5);
    }
    $datas['picto'] = $pictos;
    $datas['label'] = '<br><b>'.$langs->trans('Label').':</b> '.$this->label;
    $datas['accountnumber'] = '<br><b>'.$langs->trans('AccountNumber').':</b> '.$this->number;
    $datas['iban'] = '<br><b>'.$langs->trans('IBAN').':</b> '.getIbanHumanReadable($this);
    $datas['bic'] = '<br><b>'.$langs->trans('BIC').':</b> '.$this->bic;
    $datas['accountcurrency'] = '<br><b>'.$langs->trans("AccountCurrency").':</b> '.$this->currency_code;
 
    if (isModEnabled('accounting')) {
      include_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
      $langs->load("accountancy");
      $datas['accountaccounting'] = '<br><b>'.$langs->trans('AccountAccounting').':</b> '.length_accountg($this->account_number);
      $datas['accountancyjournal'] = '<br><b>'.$langs->trans('AccountancyJournal').':</b> '.$this->accountancy_journal;
    }
    // show categories for this record only in ajax to not overload lists
    if (isModEnabled('category') && !$nofetch) {
      require_once DOL_DOCUMENT_ROOT . '/categories/class/categorie.class.php';
      $form = new Form($this->db);
      $datas['categories'] = '<br>' . $form->showCategories($this->id, Categorie::TYPE_ACCOUNT, 1);
    }
 
    return $datas;
  }
 
  public function getNomUrl($withpicto = 0, $mode = '', $option = '', $save_lastsearch_value = -1, $notooltip = 0, $morecss = '')
  {
    global $conf, $langs;
 
    if (!empty($conf->dol_no_mouse_hover)) {
      $notooltip = 1; // Force disable tooltips
    }
 
    include_once DOL_DOCUMENT_ROOT.'/core/lib/bank.lib.php';
 
    $result = '';
    $classfortooltip = 'classfortooltip';
    $dataparams = '';
    $params = [
      'id' => $this->id,
      'objecttype' => $this->element,
      'option' => $option,
      'nofetch' => 1,
    ];
    if (getDolGlobalInt('MAIN_ENABLE_AJAX_TOOLTIP')) {
      $classfortooltip = 'classforajaxtooltip';
      $dataparams = ' data-params="'.dol_escape_htmltag(json_encode($params)).'"';
      $label = '';
    } else {
      $label = implode($this->getTooltipContentArray($params));
    }
 
    $url = DOL_URL_ROOT.'/compta/bank/card.php?id='.$this->id;
    if ($mode == 'transactions') {
      $url = DOL_URL_ROOT.'/compta/bank/bankentries_list.php?id='.$this->id;
    } elseif ($mode == 'receipts') {
      $url = DOL_URL_ROOT.'/compta/bank/releve.php?account='.$this->id;
    }
 
    if ($option != 'nolink') {
      // Add param to save lastsearch_values or not
      $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
      if ($save_lastsearch_value == -1 && isset($_SERVER["PHP_SELF"]) && preg_match('/list\.php/', $_SERVER["PHP_SELF"])) {
        $add_save_lastsearch_values = 1;
      }
      if ($add_save_lastsearch_values) {
        $url .= '&save_lastsearch_values=1';
      }
    }
 
    $linkclose = '';
    if (empty($notooltip)) {
      if (getDolGlobalInt('MAIN_OPTIMIZEFORTEXTBROWSER')) {
        $label = $langs->trans("BankAccount");
        $linkclose .= ' alt="'.dol_escape_htmltag($label, 1).'"';
      }
      $linkclose .= ($label ? ' title="'.dol_escape_htmltag($label, 1).'"' : ' title="tocomplete"');
      $linkclose .= $dataparams.' class="'.$classfortooltip.($morecss ? ' '.$morecss : '').'"';
    } else {
      $linkclose = ($morecss ? ' class="'.$morecss.'"' : '');
    }
 
    if ($option == 'nolink' || empty($url)) {
      $linkstart = '<span';
    } else {
      $linkstart = '<a href="'.$url.'"';
    }
    $linkstart .= $linkclose.'>';
    if ($option == 'nolink' || empty($url)) {
      $linkend = '</span>';
    } else {
      $linkend = '</a>';
    }
 
    $result .= $linkstart;
 
    if ($withpicto) {
      $result .= img_object(($notooltip ? '' : $label), ($this->picto ? $this->picto : 'generic'), ($notooltip ? (($withpicto != 2) ? 'class="paddingright"' : '') : 'class="'.(($withpicto != 2) ? 'paddingright ' : '').'"'), 0, 0, $notooltip ? 0 : 1);
    }
    if ($withpicto != 2) {
      $result .= $this->ref.($option == 'reflabel' && $this->label ? ' - '.$this->label : '');
    }
    $result .= $linkend;
 
    return $result;
  }
 
 
  // Method after here are common to Account and CompanyBankAccount
 
 
  public function verif()
  {
    require_once DOL_DOCUMENT_ROOT.'/core/lib/bank.lib.php';
 
    $error = 0;
 
    // Call functions to check BAN
    if (!checkIbanForAccount($this)) {
      $error++;
      $this->error = 'IBANNotValid';
    }
    // Call function to check Swift/BIC.
    // A non valid BIC/Swift is a problem if: it is not empty or always a problem if WITHDRAWAL_WITHOUT_BIC is not set).
    if (!checkSwiftForAccount($this) && (!empty($this->bic) || !getDolGlobalInt('WITHDRAWAL_WITHOUT_BIC'))) {
      $error++;
      $this->error = 'SwiftNotValid';
    }
 
    if (! $error) {
      return 1;
    } else {
      return 0;
    }
  }
 
  public 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
      $reg = array();
      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 '';
  }
 
  public function getBannerAddress($htmlkey, $object)
  {
    global $conf, $langs;
 
    $out = '';
 
    $outdone = 0;
    $coords = $this->getFullAddress(1, ', ', getDolGlobalInt('MAIN_SHOW_REGION_IN_STATE_SELECT'));
    if ($coords) {
      if (!empty($conf->use_javascript_ajax)) {
        // hideonsmatphone because copyToClipboard call jquery dialog that does not work with jmobile
        $out .= '<a href="#" class="hideonsmartphone" onclick="return copyToClipboard(\''.dol_escape_js($coords).'\',\''.dol_escape_js($langs->trans("HelpCopyToClipboard")).'\');">';
        $out .= img_picto($langs->trans("Address"), 'map-marker-alt');
        $out .= '</a> ';
      }
      $address = dol_print_address($coords, 'address_'.$htmlkey.'_'.$this->id, $this->element, $this->id, 1, ', ');
      if ($address) {
        $out .= $address;
        $outdone++;
      }
      $outdone++;
    }
 
    return $out;
  }
 
 
  public function useDetailedBBAN()
  {
    $country_code = $this->getCountryCode();
 
    if (in_array($country_code, array('FR', 'ES', 'GA', 'IT', 'NC'))) {
      return 1; // France, Spain, Gabon, ... - Not valid for CH
    }
    if (in_array($country_code, array('AD', 'AU', 'BE', 'CA', 'DE', 'DK', 'GR', 'GB', 'ID', 'IE', 'IR', 'KR', 'NL', 'NZ', 'UK', 'US'))) {
      return 2; // Australia, England...
    }
    return 0;
  }
 
  public function needIBAN()
  {
    global $conf;
 
    if (getDolGlobalString('MAIN_IBAN_IS_NEVER_MANDATORY')) {
      return 0;
    }
 
    $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;
  }
 
  public function needBIC()
  {
    if (getDolGlobalString('MAIN_IBAN_IS_NEVER_MANDATORY')) {
      return 0;
    }
 
    $country_code = $this->getCountryCode();
 
    $country_code_in_EEC = array(
      'AD', // Andorra
      'BH', // Bahrein
      'DK', // Denmark
      'FR', // France
      'GH', // Ghana
      'HU', // Hungary
      'JP', // Japan
      'LV', // Latvia
      'SE', // Sweden
    );
 
    if (in_array($country_code, $country_code_in_EEC)) {
      return 1; // Andorra, Bahrein, ...
    }
    return 0;
  }
 
  public function info($id)
  {
  }
 
  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;
  }
 
  public static function getAccountNumberOrder()
  {
    global $conf;
 
    $fieldlists = array(
        'BankCode',
        'DeskCode',
        'BankAccountNumber',
        'BankAccountNumberKey'
    );
 
    if (getDolGlobalString('BANK_SHOW_ORDER_OPTION')) {
      if (is_numeric(getDolGlobalString('BANK_SHOW_ORDER_OPTION'))) {
        if (getDolGlobalString('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;
  }
 
 
  public function initAsSpecimen()
  {
    // Example of IBAN FR7630001007941234567890185
    $this->specimen        = 1;
    $this->ref             = 'MBA';
    $this->label           = 'My Big Company Bank account';
    $this->courant         = Account::TYPE_CURRENT;
    $this->clos            = Account::STATUS_OPEN;
    $this->type            = Account::TYPE_CURRENT;
    $this->status          = Account::STATUS_OPEN;
    $this->code_banque     = '30001';
    $this->code_guichet    = '00794';
    $this->number          = '12345678901';
    $this->cle_rib         = '85';
    $this->bic             = 'AA12';
    $this->iban            = 'FR7630001007941234567890185';
 
    $this->bank            = 'MyBank';
    $this->address         = 'Rue de Paris';
    $this->proprio         = 'Owner';
    $this->owner_name      = 'Owner';
    $this->owner_address   = 'Owner address';
    $this->owner_zip       = 'Owner zip';
    $this->owner_town      = 'Owner town';
    $this->owner_country_id = 'Owner country_id';
    $this->country_id      = 1;
 
    return 1;
  }
 
  public static function replaceThirdparty($dbs, $origin_id, $dest_id)
  {
    $sql = "UPDATE ".MAIN_DB_PREFIX."bank_url SET url_id = ".((int) $dest_id)." WHERE url_id = ".((int) $origin_id)." AND type='company'";
 
    if ($dbs->query($sql)) {
      return true;
    } else {
      //if ($ignoreerrors) return true; // TODO Not enough. If there is A-B on kept thirdparty and B-C on old one, we must get A-B-C after merge. Not A-B.
      //$this->errors = $dbs->lasterror();
      return false;
    }
  }
 
  public function getKanbanView($option = '', $arraydata = null)
  {
    global $langs;
 
    $selected = (empty($arraydata['selected']) ? 0 : $arraydata['selected']);
 
    $return = '<div class="box-flex-item box-flex-grow-zero">';
    $return .= '<div class="info-box info-box-sm">';
    $return .= '<span class="info-box-icon bg-infobox-action">';
    $return .= img_picto('', $this->picto);
    $return .= '</span>';
    $return .= '<div class="info-box-content">';
    $return .= '<span class="info-box-ref inline-block tdoverflowmax150 valignmiddle">'.(method_exists($this, 'getNomUrl') ? $this->getNomUrl() : $this->ref).'</span>';
    if ($selected >= 0) {
      $return .= '<input id="cb'.$this->id.'" class="flat checkforselect fright" type="checkbox" name="toselect[]" value="'.$this->id.'"'.($selected ? ' checked="checked"' : '').'>';
    }
    if (property_exists($this, 'type_lib')) {
      $return .= '<br><span class="info-box-label opacitymedium" title="'.$this->type_lib[$this->type].'">'.substr($this->type_lib[$this->type], 0, 24).'...</span>';
    }
    if (method_exists($this, 'solde')) {
      $return .= '<br><a href="'.DOL_URL_ROOT.'/compta/bank/bankentries_list.php?id='.$this->id.'">';
      $return .= '<span class="opacitymedium">'.$langs->trans("Balance").'</span> : <span class="amount">'.price(price2num($this->solde(1), 'MT'), 0, $langs, 1, -1, -1, $this->currency_code).'</span>';
    }
    if (method_exists($this, 'getLibStatut')) {
      $return .= '<br><div class="info-box-status">'.$this->getLibStatut(3).'</div>';
    }
    $return .= '</div>';
    $return .= '</div>';
    $return .= '</div>';
    return $return;
  }
}
 
 
require_once DOL_DOCUMENT_ROOT.'/core/class/commonobjectline.class.php';
 
class AccountLine extends CommonObjectLine
{
  public $db;
 
  public $element = 'bank';
 
  public $table_element = 'bank';
 
  public $picto = 'accountline';
 
  public $id;
 
  public $ref;
 
  public $datec;
 
  public $dateo;
 
  public $datev;
 
  public $amount;
 
  public $amount_main_currency;
 
  public $fk_user_author;
 
  public $fk_user_rappro;
 
  public $fk_type;
 
  public $fk_bordereau;
 
  public $fk_account;
 
  public $bank_account_ref;
 
  public $bank_account_label;
 
  public $numero_compte;
 
  public $emetteur;
 
  public $rappro;
 
  public $num_releve;
 
  public $num_chq;
 
  public $bank_chq;
 
  public $label;
 
  public $note;
 
  public $user_rappro;
 
 
  public function __construct(DoliDB $db)
  {
    $this->db = $db;
  }
 
  public function fetch($rowid, $ref = '', $num = '')
  {
    // 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 .= " 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)."'";
    } elseif ($ref) {
      $sql .= " AND b.rowid = '".$this->db->escape($ref)."'";
    } else {
      $sql .= " AND b.rowid = ".((int) $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 = $this->db->jdate($obj->datec);
        $this->datev = $this->db->jdate($obj->datev);
        $this->dateo = $this->db->jdate($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 = (int) $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;
 
        // Retrieve all extrafield
        // fetch optionals attributes and labels
        $this->fetch_optionals();
 
        $ret = 1;
      }
      $this->db->free($result);
      return $ret;
    } else {
      return -1;
    }
  }
 
  public function insert()
  {
    $error = 0;
 
    $this->db->begin();
 
    $sql = "INSERT INTO ".MAIN_DB_PREFIX."bank (";
    $sql .= "datec";
    $sql .= ", dateo";
    $sql .= ", datev";
    $sql .= ", label";
    $sql .= ", amount";
    $sql .= ", amount_main_currency";
    $sql .= ", fk_user_author";
    $sql .= ", num_chq";
    $sql .= ", fk_account";
    $sql .= ", fk_type";
    $sql .= ", emetteur,banque";
    $sql .= ", rappro";
    $sql .= ", numero_compte";
    $sql .= ", num_releve";
    $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 .= ", ".(empty($this->amount_main_currency) ? "NULL" : price2num($this->amount_main_currency));
    $sql .= ", ".($this->fk_user_author > 0 ? ((int) $this->fk_user_author) : "null");
    $sql .= ", ".($this->num_chq ? "'".$this->db->escape($this->num_chq)."'" : "null");
    $sql .= ", '".$this->db->escape($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 .= ", ".($this->num_releve ? "'".$this->db->escape($this->num_releve)."'" : "null");
    $sql .= ")";
 
 
    dol_syslog(get_class($this)."::insert", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX.'bank');
      // Actions on extra fields (by external module or standard code)
      $result = $this->insertExtraFields();
      if ($result < 0) {
        $error++;
      }
    } 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;
    }
  }
 
  public function delete($user = null, $notrigger = 0)
  {
    $nbko = 0;
 
    if ($this->rappro) {
      // Protection to avoid any delete of consolidated lines
      $this->error = "ErrorDeleteNotPossibleLineIsConsolidated";
      return -1;
    }
 
    $this->db->begin();
 
    if (!$notrigger) {
      // Call trigger
      $result = $this->call_trigger('BANKACCOUNTLINE_DELETE', $user);
      if ($result < 0) {
        $this->db->rollback();
        return -1;
      }
      // End call triggers
    }
 
    // Protection to avoid any delete of accounted lines. Protection on by default
    if (!getDolGlobalString('BANK_ALLOW_TRANSACTION_DELETION_EVEN_IF_IN_ACCOUNTING')) {
      $sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."accounting_bookkeeping WHERE doc_type = 'bank' AND fk_doc = ".((int) $this->id);
      $resql = $this->db->query($sql);
      if ($resql) {
        $obj = $this->db->fetch_object($resql);
        if ($obj && $obj->nb) {
          $this->error = 'ErrorRecordAlreadyInAccountingDeletionNotPossible';
          $this->db->rollback();
          return -1;
        }
      } else {
        $this->error = $this->db->lasterror();
        $this->db->rollback();
        return -1;
      }
    }
 
    // Delete urls
    $result = $this->delete_urls($user);
    if ($result < 0) {
      $nbko++;
    }
 
    $sql = "DELETE FROM ".MAIN_DB_PREFIX."category_bankline 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_extrafields WHERE fk_object=".(int) $this->rowid;
    $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;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function delete_urls($user = null)
  {
    // phpcs:enable
    $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;
    }
  }
 
 
  public 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 = ".((int) $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;
    }
  }
 
 
  public function updateLabel()
  {
    $this->db->begin();
 
    $sql = "UPDATE ".MAIN_DB_PREFIX."bank SET";
    $sql .= " label = '".$this->db->escape($this->label)."'";
    $sql .= " WHERE rowid = ".((int) $this->rowid);
 
    dol_syslog(get_class($this)."::update_label", 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;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function update_conciliation(User $user, $cat, $conciliated = 1)
  {
    // phpcs:enable
    global $conf, $langs;
 
    $this->db->begin();
 
    // Check statement field
    if (getDolGlobalString('BANK_STATEMENT_REGEX_RULE')) {
      if (!preg_match('/' . getDolGlobalString('BANK_STATEMENT_REGEX_RULE').'/', $this->num_releve)) {
        $this->errors[] = $langs->trans("ErrorBankStatementNameMustFollowRegex", getDolGlobalString('BANK_STATEMENT_REGEX_RULE'));
        return -1;
      }
    }
 
    $sql = "UPDATE ".MAIN_DB_PREFIX."bank SET";
    $sql .= " rappro = ".((int) $conciliated);
    $sql .= ", num_releve = '".$this->db->escape($this->num_releve)."'";
    if ($conciliated) {
      $sql .= ", fk_user_rappro = ".$user->id;
    }
    $sql .= " WHERE rowid = ".((int) $this->id);
 
    dol_syslog(get_class($this)."::update_conciliation", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      if (!empty($cat) && $cat > 0) {
        $sql = "INSERT INTO ".MAIN_DB_PREFIX."category_bankline (";
        $sql .= "lineid";
        $sql .= ", fk_categ";
        $sql .= ") VALUES (";
        $sql .= $this->id;
        $sql .= ", ".((int) $cat);
        $sql .= ")";
 
        dol_syslog(get_class($this)."::update_conciliation", LOG_DEBUG);
        $this->db->query($sql);
 
        // No error check. Can fail if category already affected
        // TODO Do no try the insert if link already exists
      }
 
      $this->rappro = (int) $conciliated;
 
      $this->db->commit();
      return 1;
    } else {
      $this->db->rollback();
      return -1;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function datev_change($rowid, $sign = 1)
  {
    // phpcs:enable
    $sql = "SELECT datev FROM ".MAIN_DB_PREFIX."bank WHERE rowid = ".((int) $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 = ".((int) $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;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function datev_next($id)
  {
    // phpcs:enable
    return $this->datev_change($id, 1);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function datev_previous($id)
  {
    // phpcs:enable
    return $this->datev_change($id, -1);
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function dateo_change($rowid, $sign = 1)
  {
    // phpcs:enable
    $sql = "SELECT dateo FROM ".MAIN_DB_PREFIX."bank WHERE rowid = ".((int) $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 = ".((int) $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;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function dateo_next($id)
  {
    // phpcs:enable
    return $this->dateo_change($id, 1);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function dateo_previous($id)
  {
    // phpcs:enable
    return $this->dateo_change($id, -1);
  }
 
 
  public 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 = '.((int) $id);
 
    $result = $this->db->query($sql);
    if ($result) {
      if ($this->db->num_rows($result)) {
        $obj = $this->db->fetch_object($result);
 
        $this->id = $obj->rowid;
 
        $this->user_creation_id = $obj->fk_user_author;
        $this->user_rappro = $obj->fk_user_rappro;
        $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);
    }
  }
 
 
  public function getNomUrl($withpicto = 0, $maxlen = 0, $option = '', $notooltip = 0)
  {
    global $conf, $langs;
 
    $result = '';
 
    $label = img_picto('', $this->picto).' <u>'.$langs->trans("BankTransactionLine").'</u>:<br>';
    $label .= '<b>'.$langs->trans("Ref").':</b> '.$this->ref;
    if ($this->amount) {
      $label .= '<br><strong>'.$langs->trans("Amount").':</strong> '.price($this->amount, 0, $langs, 1, -1, -1, $conf->currency);
    }
 
    $linkstart = '<a href="'.DOL_URL_ROOT.'/compta/bank/line.php?rowid='.((int) $this->id).'&save_lastsearch_values=1" title="'.dol_escape_htmltag($label, 1).'" class="classfortooltip">';
    $linkend = '</a>';
 
    $result .= $linkstart;
    if ($withpicto) {
      $result .= img_object(($notooltip ? '' : $label), ($this->picto ? $this->picto : 'account'), ($notooltip ? (($withpicto != 2) ? 'class="paddingright"' : '') : 'class="'.(($withpicto != 2) ? 'paddingright ' : '').'classfortooltip"'), 0, 0, $notooltip ? 0 : 1);
    }
    if ($withpicto != 2) {
      $result .= ($this->ref ? $this->ref : $this->id);
    }
 
    $result .= $linkend;
 
    if ($option == 'showall' || $option == 'showconciliated' || $option == 'showconciliatedandaccounted') {
      $result .= ' <span class="opacitymedium">(';
    }
    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' || $option == 'showconciliatedandaccounted') {
      $result .= $langs->trans("BankLineConciliated").': ';
      $result .= yn($this->rappro);
    }
    if (isModEnabled('accounting') && ($option == 'showall' || $option == 'showconciliatedandaccounted')) {
      $sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."accounting_bookkeeping";
      $sql .= " WHERE doc_type = 'bank' AND fk_doc = ".((int) $this->id);
      $resql = $this->db->query($sql);
      if ($resql) {
        $obj = $this->db->fetch_object($resql);
        if ($obj && $obj->nb) {
          $result .= ' - '.$langs->trans("Accounted").': '.yn(1);
        } else {
          $result .= ' - '.$langs->trans("Accounted").': '.yn(0);
        }
      }
    }
    if ($option == 'showall' || $option == 'showconciliated' || $option == 'showconciliatedandaccounted') {
      $result .= ')</span>';
    }
 
    return $result;
  }
 
 
  public function getLibStatut($mode = 0)
  {
    return $this->LibStatut($this->status, $mode);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibStatut($status, $mode = 0)
  {
    // phpcs:enable
    return '';
  }
 
  public function getVentilExportCompta()
  {
    $alreadydispatched = 0;
 
    $type = 'bank';
 
    $sql = " SELECT COUNT(ab.rowid) as nb FROM ".MAIN_DB_PREFIX."accounting_bookkeeping as ab WHERE ab.doc_type='".$this->db->escape($type)."' AND ab.fk_doc = ".((int) $this->id);
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      if ($obj) {
        $alreadydispatched = $obj->nb;
      }
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
 
    if ($alreadydispatched) {
      return 1;
    }
    return 0;
  }
}