bookkeeping.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2014-2017  Olivier Geffroy     <jeff@jeffinfo.com>
 * Copyright (C) 2015-2017  Alexandre Spangaro  <aspangaro@zendsi.com>
 * Copyright (C) 2015-2017  Florian Henry       <florian.henry@open-concept.pro>
 * Copyright (C) 2018       Frédéric France     <frederic.france@netlogic.fr>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <http://www.gnu.org/licenses/>.
 */

// Class
require_once DOL_DOCUMENT_ROOT . '/core/class/commonobject.class.php';

class BookKeeping extends CommonObject
{
  public $error;

  public $errors = array();

  public $element = 'accountingbookkeeping';

  public $table_element = 'accounting_bookkeeping';

  public $entity;

  public $lines = array ();

  public $id;

  public $doc_date;
  public $date_lim_reglement;

    public $doc_type;

  public $doc_ref;

  public $fk_doc;

  public $fk_docdet;

    public $thirdparty_code;

  public $subledger_account;

  public $subledger_label;

  public $numero_compte;

    public $label_compte;

    public $label_operation;
  public $debit;
  public $credit;
  public $montant;
  public $sens;

  public $fk_user_author;

  public $import_key;
  public $code_journal;
  public $journal_label;
  public $piece_num;

    public function __construct(DoliDB $db)
    {
    $this->db = $db;
  }

    public function create(User $user, $notrigger = false)
    {
    global $conf, $langs;

    dol_syslog(__METHOD__, LOG_DEBUG);

    $error = 0;

    // Clean parameters
    if (isset($this->doc_type)) {
      $this->doc_type = trim($this->doc_type);
    }
    if (isset($this->doc_ref)) {
      $this->doc_ref = trim($this->doc_ref);
    }
    if (isset($this->fk_doc)) {
      $this->fk_doc = trim($this->fk_doc);
    }
    if (isset($this->fk_docdet)) {
      $this->fk_docdet = trim($this->fk_docdet);
    }
    if (isset($this->thirdparty_code)) {
      $this->thirdparty_code = trim($this->thirdparty_code);
    }
    if (isset($this->subledger_account)) {
      $this->subledger_account = trim($this->subledger_account);
    }
    if (isset($this->subledger_label)) {
      $this->subledger_label = trim($this->subledger_label);
    }
    if (isset($this->numero_compte)) {
      $this->numero_compte = trim($this->numero_compte);
    }
    if (isset($this->label_compte)) {
      $this->label_compte = trim($this->label_compte);
    }
    if (isset($this->label_operation)) {
      $this->label_operation = trim($this->label_operation);
    }
    if (isset($this->debit)) {
      $this->debit = trim($this->debit);
    }
    if (isset($this->credit)) {
      $this->credit = trim($this->credit);
    }
    if (isset($this->montant)) {
      $this->montant = trim($this->montant);
    }
    if (isset($this->sens)) {
      $this->sens = trim($this->sens);
    }
    if (isset($this->fk_user_author)) {
      $this->fk_user_author = trim($this->fk_user_author);
    }
    if (isset($this->import_key)) {
      $this->import_key = trim($this->import_key);
    }
    if (isset($this->code_journal)) {
      $this->code_journal = trim($this->code_journal);
    }
    if (isset($this->journal_label)) {
      $this->journal_label = trim($this->journal_label);
    }
    if (isset($this->piece_num)) {
      $this->piece_num = trim($this->piece_num);
    }
    if (empty($this->debit)) $this->debit = 0;
    if (empty($this->credit)) $this->credit = 0;

    // Check parameters
    if (empty($this->numero_compte) || $this->numero_compte == '-1' || $this->numero_compte == 'NotDefined')
    {
      $langs->loadLangs(array("errors"));
      if (in_array($this->doc_type, array('bank', 'expense_report')))
      {
        $this->errors[]=$langs->trans('ErrorFieldAccountNotDefinedForBankLine', $this->fk_docdet,  $this->doc_type);
      }
      else
      {
        //$this->errors[]=$langs->trans('ErrorFieldAccountNotDefinedForInvoiceLine', $this->doc_ref,  $this->label_compte);
        $mesg=$this->doc_ref.', '.$langs->trans("AccountAccounting").': '.$this->numero_compte;
        if ($this->subledger_account && $this->subledger_account != $this->numero_compte)
        {
          $mesg.=', '.$langs->trans("SubledgerAccount").': '.$this->subledger_account;
        }
        $this->errors[]=$langs->trans('ErrorFieldAccountNotDefinedForLine', $mesg);
      }

      return -1;
    }

    $this->db->begin();

    $this->piece_num = 0;

    // First check if line not yet already in bookkeeping.
    // Note that we must include doc_type - fk_doc - numero_compte - label to be sure to have unicity of line (we may have several lines
    // with same doc_type, fk_odc, numero_compte for 1 invoice line when using localtaxes with same account)
    // WARNING: This is not reliable, label may have been modified. This is just a small protection.
    // The page to make journalization make the test on couple doc_type - fk_doc only.
    $sql = "SELECT count(*) as nb";
    $sql .= " FROM " . MAIN_DB_PREFIX . $this->table_element;
    $sql .= " WHERE doc_type = '" . $this->db->escape($this->doc_type) . "'";
    $sql .= " AND fk_doc = " . $this->fk_doc;
    //$sql .= " AND fk_docdet = " . $this->fk_docdet;         // This field can be 0 if record is for several lines
    $sql .= " AND numero_compte = '" . $this->db->escape($this->numero_compte) . "'";
    $sql .= " AND label_operation = '" . $this->db->escape($this->label_operation) . "'";
    $sql .= " AND entity IN (" . getEntity('accountancy') . ")";

    $resql = $this->db->query($sql);

    if ($resql) {
      $row = $this->db->fetch_object($resql);
      if ($row->nb == 0)
      {
        // Determine piece_num
        $sqlnum = "SELECT piece_num";
        $sqlnum .= " FROM " . MAIN_DB_PREFIX . $this->table_element;
        $sqlnum .= " WHERE doc_type = '" . $this->db->escape($this->doc_type) . "'";    // For example doc_type = 'bank'
        $sqlnum .= " AND fk_docdet = " . $this->db->escape($this->fk_docdet);       // fk_docdet is rowid into llx_bank or llx_facturedet or llx_facturefourndet, or ...
        $sqlnum .= " AND doc_ref = '" . $this->db->escape($this->doc_ref) . "'";      // ref of source object
        $sqlnum .= " AND entity IN (" . getEntity('accountancy') . ")";

        dol_syslog(get_class($this) . ":: create sqlnum=" . $sqlnum, LOG_DEBUG);
        $resqlnum = $this->db->query($sqlnum);
        if ($resqlnum) {
          $objnum = $this->db->fetch_object($resqlnum);
          $this->piece_num = $objnum->piece_num;
        }
        dol_syslog(get_class($this) . ":: create this->piece_num=" . $this->piece_num, LOG_DEBUG);
        if (empty($this->piece_num)) {
          $sqlnum = "SELECT MAX(piece_num)+1 as maxpiecenum";
          $sqlnum .= " FROM " . MAIN_DB_PREFIX . $this->table_element;
          $sqlnum .= " WHERE entity IN (" . getEntity('accountancy') . ")";

          dol_syslog(get_class($this) . ":: create sqlnum=" . $sqlnum, LOG_DEBUG);
          $resqlnum = $this->db->query($sqlnum);
          if ($resqlnum) {
            $objnum = $this->db->fetch_object($resqlnum);
            $this->piece_num = $objnum->maxpiecenum;
          }
        }
        dol_syslog(get_class($this) . ":: create this->piece_num=" . $this->piece_num, LOG_DEBUG);
        if (empty($this->piece_num)) {
          $this->piece_num = 1;
        }

        $now = dol_now();

        $sql = "INSERT INTO " . MAIN_DB_PREFIX . $this->table_element . " (";
        $sql .= "doc_date";
        $sql .= ", date_lim_reglement";
        $sql .= ", doc_type";
        $sql .= ", doc_ref";
        $sql .= ", fk_doc";
        $sql .= ", fk_docdet";
        $sql .= ", thirdparty_code";
        $sql .= ", subledger_account";
        $sql .= ", subledger_label";
        $sql .= ", numero_compte";
        $sql .= ", label_compte";
        $sql .= ", label_operation";
        $sql .= ", debit";
        $sql .= ", credit";
        $sql .= ", montant";
        $sql .= ", sens";
        $sql .= ", fk_user_author";
        $sql .= ", date_creation";
        $sql .= ", code_journal";
        $sql .= ", journal_label";
        $sql .= ", piece_num";
        $sql .= ', entity';
        $sql .= ") VALUES (";
        $sql .= "'" . $this->db->idate($this->doc_date) . "'";
        $sql .= ", ".(! isset($this->date_lim_reglement) || dol_strlen($this->date_lim_reglement) == 0 ? 'NULL' : "'" . $this->db->idate($this->date_lim_reglement) . "'");
        $sql .= ",'" . $this->db->escape($this->doc_type) . "'";
        $sql .= ",'" . $this->db->escape($this->doc_ref) . "'";
        $sql .= "," . $this->fk_doc;
        $sql .= "," . $this->fk_docdet;
        $sql .= ",'" . $this->db->escape($this->thirdparty_code) . "'";
        $sql .= ",'" . $this->db->escape($this->subledger_account) . "'";
        $sql .= ",'" . $this->db->escape($this->subledger_label) . "'";
        $sql .= ",'" . $this->db->escape($this->numero_compte) . "'";
        $sql .= ",'" . $this->db->escape($this->label_compte) . "'";
        $sql .= ",'" . $this->db->escape($this->label_operation) . "'";
        $sql .= "," . $this->debit;
        $sql .= "," . $this->credit;
        $sql .= "," . $this->montant;
        $sql .= ",'" . $this->db->escape($this->sens) . "'";
        $sql .= ",'" . $this->db->escape($this->fk_user_author) . "'";
        $sql .= ",'" . $this->db->idate($now). "'";
        $sql .= ",'" . $this->db->escape($this->code_journal) . "'";
        $sql .= ",'" . $this->db->escape($this->journal_label) . "'";
        $sql .= "," . $this->db->escape($this->piece_num);
        $sql .= ", " . (! isset($this->entity) ? $conf->entity : $this->entity);
        $sql .= ")";

        dol_syslog(get_class($this) . ":: create sql=" . $sql, LOG_DEBUG);
        $resql = $this->db->query($sql);
        if ($resql) {
          $id = $this->db->last_insert_id(MAIN_DB_PREFIX . $this->table_element);

          if ($id > 0) {
            $this->id = $id;
            $result = 0;
          } else {
            $result = -2;
            $error ++;
            $this->errors[] = 'Error Create Error ' . $result . ' lecture ID';
            dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
          }
        } else {
          $result = -1;
          $error ++;
          $this->errors[] = 'Error ' . $this->db->lasterror();
          dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
        }
      } else {  // Already exists
        $result = -3;
        $error++;
        $this->error='BookkeepingRecordAlreadyExists';
        dol_syslog(__METHOD__ . ' ' . $this->error, LOG_WARNING);
      }
    } else {
      $result = -5;
      $error ++;
      $this->errors[] = 'Error ' . $this->db->lasterror();
      dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
    }

    // Uncomment this and change MYOBJECT to your own tag if you
    // want this action to call a trigger.
    //if (! $error && ! $notrigger) {

    // // Call triggers
    // $result=$this->call_trigger('MYOBJECT_CREATE',$user);
    // if ($result < 0) $error++;
    // // End call triggers
    //}

    // Commit or rollback
    if ($error) {
      $this->db->rollback();
      return -1 * $error;
    } else {
      $this->db->commit();
      return $result;
    }
  }

  function getNomUrl($withpicto=0, $option='', $notooltip=0, $morecss='', $save_lastsearch_value=-1)
  {
    global $db, $conf, $langs;
    global $dolibarr_main_authentication, $dolibarr_main_demo;
    global $menumanager;

    if (! empty($conf->dol_no_mouse_hover)) $notooltip=1;   // Force disable tooltips

    $result = '';
    $companylink = '';

    $label = '<u>' . $langs->trans("Transaction") . '</u>';
    $label.= '<br>';
    $label.= '<b>' . $langs->trans('Ref') . ':</b> ' . $this->piece_num;

    $url = DOL_URL_ROOT.'/accountancy/bookkeeping/card.php?piece_num='.$this->piece_num;

    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 && 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 (! empty($conf->global->MAIN_OPTIMIZEFORTEXTBROWSER))
      {
        $label=$langs->trans("ShowTransaction");
        $linkclose.=' alt="'.dol_escape_htmltag($label, 1).'"';
      }
      $linkclose.=' title="'.dol_escape_htmltag($label, 1).'"';
      $linkclose.=' class="classfortooltip'.($morecss?' '.$morecss:'').'"';
    }
    else $linkclose = ($morecss?' class="'.$morecss.'"':'');

    $linkstart = '<a href="'.$url.'"';
    $linkstart.=$linkclose.'>';
    $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 ' : '').'classfortooltip"'), 0, 0, $notooltip?0:1);
    if ($withpicto != 2) $result.= $this->piece_num;
    $result .= $linkend;
    //if ($withpicto != 2) $result.=(($addlabel && $this->label) ? $sep . dol_trunc($this->label, ($addlabel > 1 ? $addlabel : 0)) : '');

    return $result;
  }

    public function createStd(User $user, $notrigger = false, $mode='')
    {
    global $conf;

    dol_syslog(__METHOD__, LOG_DEBUG);

    $error = 0;

    // Clean parameters

    if (isset($this->doc_type)) {
      $this->doc_type = trim($this->doc_type);
    }
    if (isset($this->doc_ref)) {
      $this->doc_ref = trim($this->doc_ref);
    }
    if (isset($this->fk_doc)) {
      $this->fk_doc = trim($this->fk_doc);
    }
    if (isset($this->fk_docdet)) {
      $this->fk_docdet = trim($this->fk_docdet);
    }
    if (isset($this->thirdparty_code)) {
      $this->thirdparty_code = trim($this->thirdparty_code);
    }
    if (isset($this->subledger_account)) {
      $this->subledger_account = trim($this->subledger_account);
    }
    if (isset($this->subledger_label)) {
      $this->subledger_label = trim($this->subledger_label);
    }
    if (isset($this->numero_compte)) {
      $this->numero_compte = trim($this->numero_compte);
    }
    if (isset($this->label_compte)) {
      $this->label_compte = trim($this->label_compte);
    }
    if (isset($this->label_operation)) {
      $this->label_operation = trim($this->label_operation);
    }
    if (isset($this->debit)) {
      $this->debit = trim($this->debit);
    }
    if (isset($this->credit)) {
      $this->credit = trim($this->credit);
    }
    if (isset($this->montant)) {
      $this->montant = trim($this->montant);
    }
    if (isset($this->sens)) {
      $this->sens = trim($this->sens);
    }
    if (isset($this->fk_user_author)) {
      $this->fk_user_author = trim($this->fk_user_author);
    }
    if (isset($this->import_key)) {
      $this->import_key = trim($this->import_key);
    }
    if (isset($this->code_journal)) {
      $this->code_journal = trim($this->code_journal);
    }
    if (isset($this->journal_label)) {
      $this->journal_label = trim($this->journal_label);
    }
    if (isset($this->piece_num)) {
      $this->piece_num = trim($this->piece_num);
    }
    if (empty($this->debit)) $this->debit = 0;
    if (empty($this->credit)) $this->credit = 0;

    $this->debit = price2num($this->debit, 'MT');
    $this->credit = price2num($this->credit, 'MT');

    $now = dol_now();

    // Check parameters
    // Put here code to add control on parameters values

    // Insert request
    $sql = 'INSERT INTO ' . MAIN_DB_PREFIX . $this->table_element . $mode.'(';
    $sql .= 'doc_date,';
    $sql .= 'date_lim_reglement,';
    $sql .= 'doc_type,';
    $sql .= 'doc_ref,';
    $sql .= 'fk_doc,';
    $sql .= 'fk_docdet,';
    $sql .= 'thirdparty_code,';
    $sql .= 'subledger_account,';
    $sql .= 'subledger_label,';
    $sql .= 'numero_compte,';
    $sql .= 'label_compte,';
    $sql .= 'label_operation,';
    $sql .= 'debit,';
    $sql .= 'credit,';
    $sql .= 'montant,';
    $sql .= 'sens,';
    $sql .= 'fk_user_author,';
    $sql .= 'date_creation,';
    $sql .= 'code_journal,';
    $sql .= 'journal_label,';
    $sql .= 'piece_num,';
    $sql .= 'entity';
    $sql .= ') VALUES (';
    $sql .= ' ' . (! isset($this->doc_date) || dol_strlen($this->doc_date) == 0 ? 'NULL' : "'" . $this->db->idate($this->doc_date) . "'") . ',';
    $sql .= ' ' . (! isset($this->date_lim_reglement) || dol_strlen($this->date_lim_reglement) == 0 ? 'NULL' : "'" . $this->db->idate($this->date_lim_reglement) . "'") . ',';
    $sql .= ' ' . (! isset($this->doc_type) ? 'NULL' : "'" . $this->db->escape($this->doc_type) . "'") . ',';
    $sql .= ' ' . (! isset($this->doc_ref) ? 'NULL' : "'" . $this->db->escape($this->doc_ref) . "'") . ',';
    $sql .= ' ' . (empty($this->fk_doc) ? '0' : $this->fk_doc) . ',';
    $sql .= ' ' . (empty($this->fk_docdet) ? '0' : $this->fk_docdet) . ',';
    $sql .= ' ' . (! isset($this->thirdparty_code) ? 'NULL' : "'" . $this->db->escape($this->thirdparty_code) . "'") . ',';
    $sql .= ' ' . (! isset($this->subledger_account) ? 'NULL' : "'" . $this->db->escape($this->subledger_account) . "'") . ',';
    $sql .= ' ' . (! isset($this->subledger_label) ? 'NULL' : "'" . $this->db->escape($this->subledger_label) . "'") . ',';
    $sql .= ' ' . (! isset($this->numero_compte) ? 'NULL' : "'" . $this->db->escape($this->numero_compte) . "'") . ',';
    $sql .= ' ' . (! isset($this->label_compte) ? 'NULL' : "'" . $this->db->escape($this->label_compte) . "'") . ',';
    $sql .= ' ' . (! isset($this->label_operation) ? 'NULL' : "'" . $this->db->escape($this->label_operation) . "'") . ',';
    $sql .= ' ' . (! isset($this->debit) ? 'NULL' : $this->debit ). ',';
    $sql .= ' ' . (! isset($this->credit) ? 'NULL' : $this->credit ). ',';
    $sql .= ' ' . (! isset($this->montant) ? 'NULL' : $this->montant ). ',';
    $sql .= ' ' . (! isset($this->sens) ? 'NULL' : "'" . $this->db->escape($this->sens) . "'") . ',';
    $sql .= ' ' . $user->id . ',';
    $sql .= ' ' . "'" . $this->db->idate($now) . "',";
    $sql .= ' ' . (empty($this->code_journal) ? 'NULL' : "'" . $this->db->escape($this->code_journal) . "'") . ',';
    $sql .= ' ' . (empty($this->journal_label) ? 'NULL' : "'" . $this->db->escape($this->journal_label) . "'") . ',';
    $sql .= ' ' . (empty($this->piece_num) ? 'NULL' : $this->db->escape($this->piece_num)).',';
    $sql .= ' ' . (! isset($this->entity) ? $conf->entity : $this->entity);
    $sql .= ')';

    $this->db->begin();

    $resql = $this->db->query($sql);
    if (! $resql) {
      $error ++;
      $this->errors[] = 'Error ' . $this->db->lasterror();
      dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
    }

    if (! $error) {
      $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX . $this->table_element . $mode);

      // Uncomment this and change MYOBJECT to your own tag if you
      // want this action to call a trigger.
      //if (! $notrigger) {

      // // Call triggers
      // $result=$this->call_trigger('MYOBJECT_CREATE',$user);
      // if ($result < 0) $error++;
      // // End call triggers
      //}
    }

    // Commit or rollback
    if ($error) {
      $this->db->rollback();

      return - 1 * $error;
    } else {
      $this->db->commit();

      return $this->id;
    }
  }

    public function fetch($id, $ref = null, $mode='')
    {
    global $conf;

    dol_syslog(__METHOD__, LOG_DEBUG);

    $sql = 'SELECT';
    $sql .= ' t.rowid,';
    $sql .= " t.doc_date,";
    $sql .= " t.date_lim_reglement,";
    $sql .= " t.doc_type,";
    $sql .= " t.doc_ref,";
    $sql .= " t.fk_doc,";
    $sql .= " t.fk_docdet,";
    $sql .= " t.thirdparty_code,";
    $sql .= " t.subledger_account,";
    $sql .= " t.subledger_label,";
    $sql .= " t.numero_compte,";
    $sql .= " t.label_compte,";
    $sql .= " t.label_operation,";
    $sql .= " t.debit,";
    $sql .= " t.credit,";
    $sql .= " t.montant,";
    $sql .= " t.sens,";
    $sql .= " t.fk_user_author,";
    $sql .= " t.import_key,";
    $sql .= " t.code_journal,";
    $sql .= " t.journal_label,";
    $sql .= " t.piece_num,";
    $sql .= " t.date_creation";
    $sql .= ' FROM ' . MAIN_DB_PREFIX . $this->table_element.$mode. ' as t';
    $sql .= ' WHERE 1 = 1';
    $sql .= " AND entity IN (" . getEntity('accountancy') . ")";
    if (null !== $ref) {
      $sql .= ' AND t.ref = ' . '\'' . $ref . '\'';
    } else {
      $sql .= ' AND t.rowid = ' . $id;
    }

    $resql = $this->db->query($sql);
    if ($resql) {
      $numrows = $this->db->num_rows($resql);
      if ($numrows) {
        $obj = $this->db->fetch_object($resql);

        $this->id = $obj->rowid;

        $this->doc_date = $this->db->jdate($obj->doc_date);
        $this->date_lim_reglement = $this->db->jdate($obj->date_lim_reglement);
        $this->doc_type = $obj->doc_type;
        $this->doc_ref = $obj->doc_ref;
        $this->fk_doc = $obj->fk_doc;
        $this->fk_docdet = $obj->fk_docdet;
        $this->thirdparty_code = $obj->thirdparty_code;
        $this->subledger_account = $obj->subledger_account;
        $this->subledger_label = $obj->subledger_label;
        $this->numero_compte = $obj->numero_compte;
        $this->label_compte = $obj->label_compte;
        $this->label_operation = $obj->label_operation;
        $this->debit = $obj->debit;
        $this->credit = $obj->credit;
        $this->montant = $obj->montant;
        $this->sens = $obj->sens;
        $this->fk_user_author = $obj->fk_user_author;
        $this->import_key = $obj->import_key;
        $this->code_journal = $obj->code_journal;
        $this->journal_label = $obj->journal_label;
        $this->piece_num = $obj->piece_num;
        $this->date_creation = $this->db->jdate($obj->date_creation);
      }
      $this->db->free($resql);

      if ($numrows) {
        return 1;
      } else {
        return 0;
      }
    } else {
      $this->errors[] = 'Error ' . $this->db->lasterror();
      dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);

      return - 1;
    }
  }


    public function fetchAllByAccount($sortorder = '', $sortfield = '', $limit = 0, $offset = 0, array $filter = array(), $filtermode = 'AND')
    {
    global $conf;

    dol_syslog(__METHOD__, LOG_DEBUG);

    $this->lines = array();

    $sql = 'SELECT';
    $sql .= ' t.rowid,';
    $sql .= " t.doc_date,";
    $sql .= " t.doc_type,";
    $sql .= " t.doc_ref,";
    $sql .= " t.fk_doc,";
    $sql .= " t.fk_docdet,";
    $sql .= " t.thirdparty_code,";
    $sql .= " t.subledger_account,";
    $sql .= " t.subledger_label,";
    $sql .= " t.numero_compte,";
    $sql .= " t.label_compte,";
    $sql .= " t.label_operation,";
    $sql .= " t.debit,";
    $sql .= " t.credit,";
    $sql .= " t.montant,";
    $sql .= " t.sens,";
    $sql .= " t.multicurrency_amount,";
    $sql .= " t.multicurrency_code,";
    $sql .= " t.lettering_code,";
    $sql .= " t.date_lettering,";
    $sql .= " t.fk_user_author,";
    $sql .= " t.import_key,";
    $sql .= " t.code_journal,";
    $sql .= " t.journal_label,";
    $sql .= " t.piece_num,";
    $sql .= " t.date_creation";
    // Manage filter
    $sqlwhere = array ();
    if (count($filter) > 0) {
      foreach ( $filter as $key => $value ) {
        if ($key == 't.doc_date') {
          $sqlwhere[] = $key . '=\'' . $this->db->idate($value) . '\'';
        } elseif ($key == 't.doc_date>=' || $key == 't.doc_date<=') {
          $sqlwhere[] = $key . '\'' . $this->db->idate($value) . '\'';
        } elseif ($key == 't.numero_compte>=' || $key == 't.numero_compte<=' || $key == 't.subledger_account>=' || $key == 't.subledger_account<=') {
          $sqlwhere[] = $key . '\'' . $this->db->escape($value) . '\'';
        } elseif ($key == 't.fk_doc' || $key == 't.fk_docdet' || $key == 't.piece_num') {
          $sqlwhere[] = $key . '=' . $value;
        } elseif ($key == 't.subledger_account' || $key == 't.numero_compte') {
          $sqlwhere[] = $key . ' LIKE \'' . $this->db->escape($value) . '%\'';
        } elseif ($key == 't.date_creation>=' || $key == 't.date_creation<=') {
          $sqlwhere[] = $key . '\'' . $this->db->idate($value) . '\'';
        } elseif ($key == 't.credit' || $key == 't.debit') {
          $sqlwhere[] = natural_search($key, $value, 1, 1);
        } else {
          $sqlwhere[] = natural_search($key, $value, 0, 1);
        }
      }
    }
    $sql .= ' FROM ' . MAIN_DB_PREFIX . $this->table_element . ' as t';
    $sql .= ' WHERE 1 = 1';
    $sql .= " AND entity IN (" . getEntity('accountancy') . ")";
    if (count($sqlwhere) > 0) {
      $sql .= ' AND ' . implode(' ' . $filtermode . ' ', $sqlwhere);
    }
    // Affichage par compte comptable
    $sql .= ' ORDER BY t.numero_compte ASC';
    if (! empty($sortfield)) {
      $sql .= ', ' . $sortfield . ' ' .$sortorder;
    }
    if (! empty($limit)) {
      $sql .= ' ' . $this->db->plimit($limit + 1, $offset);
    }

    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);

      $i = 0;
      while (($obj = $this->db->fetch_object($resql)) && (empty($limit) || $i < min($limit, $num))) {
        $line = new BookKeepingLine();

        $line->id = $obj->rowid;

        $line->doc_date = $this->db->jdate($obj->doc_date);
        $line->doc_type = $obj->doc_type;
        $line->doc_ref = $obj->doc_ref;
        $line->fk_doc = $obj->fk_doc;
        $line->fk_docdet = $obj->fk_docdet;
        $line->thirdparty_code = $obj->thirdparty_code;
        $line->subledger_account = $obj->subledger_account;
        $line->subledger_label = $obj->subledger_label;
        $line->numero_compte = $obj->numero_compte;
        $line->label_compte = $obj->label_compte;
        $line->label_operation = $obj->label_operation;
        $line->debit = $obj->debit;
        $line->credit = $obj->credit;
        $line->montant = $obj->montant;
        $line->sens = $obj->sens;
        $line->multicurrency_amount = $obj->multicurrency_amount;
        $line->multicurrency_code = $obj->multicurrency_code;
        $line->lettering_code = $obj->lettering_code;
        $line->date_lettering = $obj->date_lettering;
        $line->fk_user_author = $obj->fk_user_author;
        $line->import_key = $obj->import_key;
        $line->code_journal = $obj->code_journal;
        $line->journal_label = $obj->journal_label;
        $line->piece_num = $obj->piece_num;
        $line->date_creation = $obj->date_creation;

        $this->lines[] = $line;

        $i++;
      }
      $this->db->free($resql);

      return $num;
    } else {
      $this->errors[] = 'Error ' . $this->db->lasterror();
      dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);

      return -1;
    }
  }

    public function fetchAll($sortorder = '', $sortfield = '', $limit = 0, $offset = 0, array $filter = array(), $filtermode = 'AND')
    {
    global $conf;

    dol_syslog(__METHOD__, LOG_DEBUG);

    $sql = 'SELECT';
    $sql .= ' t.rowid,';
    $sql .= " t.doc_date,";
    $sql .= " t.doc_type,";
    $sql .= " t.doc_ref,";
    $sql .= " t.fk_doc,";
    $sql .= " t.fk_docdet,";
    $sql .= " t.thirdparty_code,";
    $sql .= " t.subledger_account,";
    $sql .= " t.subledger_label,";
    $sql .= " t.numero_compte,";
    $sql .= " t.label_compte,";
    $sql .= " t.label_operation,";
    $sql .= " t.debit,";
    $sql .= " t.credit,";
    $sql .= " t.lettering_code,";
    $sql .= " t.montant,";
    $sql .= " t.sens,";
    $sql .= " t.fk_user_author,";
    $sql .= " t.import_key,";
    $sql .= " t.code_journal,";
    $sql .= " t.journal_label,";
    $sql .= " t.piece_num,";
    $sql .= " t.date_creation,";
    $sql .= " t.tms as date_modification";
    $sql .= ' FROM ' . MAIN_DB_PREFIX . $this->table_element . ' as t';
    // Manage filter
    $sqlwhere = array ();
    if (count($filter) > 0) {
      foreach ( $filter as $key => $value ) {
        if ($key == 't.doc_date') {
          $sqlwhere[] = $key . '=\'' . $this->db->idate($value) . '\'';
        } elseif ($key == 't.doc_date>=' || $key == 't.doc_date<=') {
          $sqlwhere[] = $key . '\'' . $this->db->idate($value) . '\'';
        } elseif ($key == 't.numero_compte>=' || $key == 't.numero_compte<=' || $key == 't.subledger_account>=' || $key == 't.subledger_account<=') {
          $sqlwhere[] = $key . '\'' . $this->db->escape($value) . '\'';
        } elseif ($key == 't.fk_doc' || $key == 't.fk_docdet' || $key == 't.piece_num') {
          $sqlwhere[] = $key . '=' . $value;
        } elseif ($key == 't.subledger_account' || $key == 't.numero_compte') {
          $sqlwhere[] = $key . ' LIKE \'' . $this->db->escape($value) . '%\'';
        } elseif ($key == 't.date_creation>=' || $key == 't.date_creation<=') {
          $sqlwhere[] = $key . '\'' . $this->db->idate($value) . '\'';
        } elseif ($key == 't.tms>=' || $key == 't.tms<=') {
          $sqlwhere[] = $key . '\'' . $this->db->idate($value) . '\'';
        } elseif ($key == 't.credit' || $key == 't.debit') {
          $sqlwhere[] = natural_search($key, $value, 1, 1);
        } else {
          $sqlwhere[] = natural_search($key, $value, 0, 1);
        }
      }
    }
    $sql.= ' WHERE t.entity IN (' . getEntity('accountancy') . ')';
    if (count($sqlwhere) > 0) {
      $sql .= ' AND ' . implode(' ' . $filtermode . ' ', $sqlwhere);
    }

    if (! empty($sortfield)) {
      $sql .= $this->db->order($sortfield, $sortorder);
    }
    if (! empty($limit)) {
      $sql .= ' ' . $this->db->plimit($limit + 1, $offset);
    }
    $this->lines = array();

    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);

      $i = 0;
      while (($obj = $this->db->fetch_object($resql)) && (empty($limit) || $i < min($limit, $num)))
      {
        $line = new BookKeepingLine();

        $line->id = $obj->rowid;

        $line->doc_date = $this->db->jdate($obj->doc_date);
        $line->doc_type = $obj->doc_type;
        $line->doc_ref = $obj->doc_ref;
        $line->fk_doc = $obj->fk_doc;
        $line->fk_docdet = $obj->fk_docdet;
        $line->thirdparty_code = $obj->thirdparty_code;
        $line->subledger_account = $obj->subledger_account;
        $line->subledger_label = $obj->subledger_label;
        $line->numero_compte = $obj->numero_compte;
        $line->label_compte = $obj->label_compte;
        $line->label_operation = $obj->label_operation;
        $line->debit = $obj->debit;
        $line->credit = $obj->credit;
        $line->montant = $obj->montant;
        $line->sens = $obj->sens;
        $line->lettering_code = $obj->lettering_code;
        $line->fk_user_author = $obj->fk_user_author;
        $line->import_key = $obj->import_key;
        $line->code_journal = $obj->code_journal;
        $line->journal_label = $obj->journal_label;
        $line->piece_num = $obj->piece_num;
        $line->date_creation = $this->db->jdate($obj->date_creation);
        $line->date_modification = $this->db->jdate($obj->date_modification);

        $this->lines[] = $line;

        $i++;
      }
      $this->db->free($resql);

      return $num;
    } else {
      $this->errors[] = 'Error ' . $this->db->lasterror();
      dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
      return -1;
    }
  }

  public function fetchAllBalance($sortorder = '', $sortfield = '', $limit = 0, $offset = 0, array $filter = array(), $filtermode = 'AND')
  {
    global $conf;

    $this->lines = array();

    dol_syslog(__METHOD__, LOG_DEBUG);

    $sql = 'SELECT';
    $sql .= " t.numero_compte,";
    $sql .= " SUM(t.debit) as debit,";
    $sql .= " SUM(t.credit) as credit";
    $sql .= ' FROM ' . MAIN_DB_PREFIX . $this->table_element . ' as t';
    // Manage filter
    $sqlwhere = array ();
    if (count($filter) > 0) {
      foreach ( $filter as $key => $value ) {
        if ($key == 't.doc_date') {
          $sqlwhere[] = $key . '=\'' . $this->db->idate($value) . '\'';
        } elseif ($key == 't.doc_date>=' || $key == 't.doc_date<=') {
          $sqlwhere[] = $key . '\'' . $this->db->idate($value) . '\'';
        } elseif ($key == 't.numero_compte>=' || $key == 't.numero_compte<=' || $key == 't.subledger_account>=' || $key == 't.subledger_account<=') {
          $sqlwhere[] = $key . '\'' . $this->db->escape($value) . '\'';
        } elseif ($key == 't.fk_doc' || $key == 't.fk_docdet' || $key == 't.piece_num') {
          $sqlwhere[] = $key . '=' . $value;
        } elseif ($key == 't.subledger_account' || $key == 't.numero_compte') {
          $sqlwhere[] = $key . ' LIKE \'' . $this->db->escape($value) . '%\'';
        } elseif ($key == 't.subledger_label') {
          $sqlwhere[] = $key . ' LIKE \'' . $this->db->escape($value) . '%\'';
        } else {
          $sqlwhere[] = $key . ' LIKE \'%' . $this->db->escape($value) . '%\'';
        }
      }
    }
    $sql.= ' WHERE entity IN (' . getEntity('accountancy') . ')';
    if (count($sqlwhere) > 0) {
      $sql .= ' AND ' . implode(' ' . $filtermode . ' ', $sqlwhere);
    }

    $sql .= ' GROUP BY t.numero_compte';

    if (! empty($sortfield)) {
      $sql .= $this->db->order($sortfield, $sortorder);
    }
    if (! empty($limit)) {
      $sql .= ' ' . $this->db->plimit($limit + 1, $offset);
    }

    $resql = $this->db->query($sql);
    if ($resql)
    {
      $num = $this->db->num_rows($resql);

      $i = 0;
      while (($obj = $this->db->fetch_object($resql)) && (empty($limit) || $i < min($limit, $num)))
      {
        $line = new BookKeepingLine();

        $line->numero_compte = $obj->numero_compte;
        $line->debit = $obj->debit;
        $line->credit = $obj->credit;

        $this->lines[] = $line;

        $i++;
      }
      $this->db->free($resql);

      return $num;
    } else {
      $this->errors[] = 'Error ' . $this->db->lasterror();
      dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);

      return - 1;
    }
  }

    public function update(User $user, $notrigger = false, $mode='')
    {
    $error = 0;

    dol_syslog(__METHOD__, LOG_DEBUG);

    // Clean parameters
    if (isset($this->doc_type)) {
      $this->doc_type = trim($this->doc_type);
    }
    if (isset($this->doc_ref)) {
      $this->doc_ref = trim($this->doc_ref);
    }
    if (isset($this->fk_doc)) {
      $this->fk_doc = trim($this->fk_doc);
    }
    if (isset($this->fk_docdet)) {
      $this->fk_docdet = trim($this->fk_docdet);
    }
    if (isset($this->thirdparty_code)) {
      $this->thirdparty_code = trim($this->thirdparty_code);
    }
    if (isset($this->subledger_account)) {
      $this->subledger_account = trim($this->subledger_account);
    }
    if (isset($this->subledger_label)) {
      $this->subledger_label = trim($this->subledger_label);
    }
    if (isset($this->numero_compte)) {
      $this->numero_compte = trim($this->numero_compte);
    }
    if (isset($this->label_compte)) {
      $this->label_compte = trim($this->label_compte);
    }
    if (isset($this->label_operation)) {
      $this->label_operation = trim($this->label_operation);
    }
    if (isset($this->debit)) {
      $this->debit = trim($this->debit);
    }
    if (isset($this->credit)) {
      $this->credit = trim($this->credit);
    }
    if (isset($this->montant)) {
      $this->montant = trim($this->montant);
    }
    if (isset($this->sens)) {
      $this->sens = trim($this->sens);
    }
    if (isset($this->fk_user_author)) {
      $this->fk_user_author = trim($this->fk_user_author);
    }
    if (isset($this->import_key)) {
      $this->import_key = trim($this->import_key);
    }
    if (isset($this->code_journal)) {
      $this->code_journal = trim($this->code_journal);
    }
    if (isset($this->journal_label)) {
      $this->journal_label = trim($this->journal_label);
    }
    if (isset($this->piece_num)) {
      $this->piece_num = trim($this->piece_num);
    }

    $this->debit = price2num($this->debit, 'MT');
    $this->credit = price2num($this->credit, 'MT');

    // Check parameters
    // Put here code to add a control on parameters values

    // Update request
    $sql = 'UPDATE ' . MAIN_DB_PREFIX . $this->table_element . $mode.' SET';
    $sql .= ' doc_date = ' . (! isset($this->doc_date) || dol_strlen($this->doc_date) != 0 ? "'" . $this->db->idate($this->doc_date) . "'" : 'null') . ',';
    $sql .= ' doc_type = ' . (isset($this->doc_type) ? "'" . $this->db->escape($this->doc_type) . "'" : "null") . ',';
    $sql .= ' doc_ref = ' . (isset($this->doc_ref) ? "'" . $this->db->escape($this->doc_ref) . "'" : "null") . ',';
    $sql .= ' fk_doc = ' . (isset($this->fk_doc) ? $this->fk_doc : "null") . ',';
    $sql .= ' fk_docdet = ' . (isset($this->fk_docdet) ? $this->fk_docdet : "null") . ',';
    $sql .= ' thirdparty_code = ' . (isset($this->thirdparty_code) ? "'" . $this->db->escape($this->thirdparty_code) . "'" : "null") . ',';
    $sql .= ' subledger_account = ' . (isset($this->subledger_account) ? "'" . $this->db->escape($this->subledger_account) . "'" : "null") . ',';
    $sql .= ' subledger_label = ' . (isset($this->subledger_label) ? "'" . $this->db->escape($this->subledger_label) . "'" : "null") . ',';
    $sql .= ' numero_compte = ' . (isset($this->numero_compte) ? "'" . $this->db->escape($this->numero_compte) . "'" : "null") . ',';
    $sql .= ' label_compte = ' . (isset($this->label_compte) ? "'" . $this->db->escape($this->label_compte) . "'" : "null") . ',';
    $sql .= ' label_operation = ' . (isset($this->label_operation) ? "'" . $this->db->escape($this->label_operation) . "'" : "null") . ',';
    $sql .= ' debit = ' . (isset($this->debit) ? $this->debit : "null") . ',';
    $sql .= ' credit = ' . (isset($this->credit) ? $this->credit : "null") . ',';
    $sql .= ' montant = ' . (isset($this->montant) ? $this->montant : "null") . ',';
    $sql .= ' sens = ' . (isset($this->sens) ? "'" . $this->db->escape($this->sens) . "'" : "null") . ',';
    $sql .= ' fk_user_author = ' . (isset($this->fk_user_author) ? $this->fk_user_author : "null") . ',';
    $sql .= ' import_key = ' . (isset($this->import_key) ? "'" . $this->db->escape($this->import_key) . "'" : "null") . ',';
    $sql .= ' code_journal = ' . (isset($this->code_journal) ? "'" . $this->db->escape($this->code_journal) . "'" : "null") . ',';
    $sql .= ' journal_label = ' . (isset($this->journal_label) ? "'" . $this->db->escape($this->journal_label) . "'" : "null") . ',';
    $sql .= ' piece_num = ' . (isset($this->piece_num) ? $this->piece_num : "null");
    $sql .= ' WHERE rowid=' . $this->id;

    $this->db->begin();

    $resql = $this->db->query($sql);
    if (! $resql) {
      $error ++;
      $this->errors[] = 'Error ' . $this->db->lasterror();
      dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
    }

    // Uncomment this and change MYOBJECT to your own tag if you
    // want this action calls a trigger.
    //if (! $error && ! $notrigger) {

    // // Call triggers
    // $result=$this->call_trigger('MYOBJECT_MODIFY',$user);
    // if ($result < 0) { $error++; //Do also what you must do to rollback action if trigger fail}
    // // End call triggers
    //}

    // Commit or rollback
    if ($error) {
      $this->db->rollback();

      return - 1 * $error;
    } else {
      $this->db->commit();

      return 1;
    }
  }

  public function updateByMvt($piece_num='', $field='', $value='', $mode='')
  {
    $error=0;

    $this->db->begin();

    $sql = "UPDATE " . MAIN_DB_PREFIX .  $this->table_element . $mode . " as ab";
    $sql .= ' SET ab.' . $field . '=' . (is_numeric($value)?$value:"'".$this->db->escape($value)."'");
    $sql .= ' WHERE ab.piece_num=' . $piece_num ;
    $resql = $this->db->query($sql);

    if (! $resql) {
      $error++;
      $this->errors[] = 'Error ' . $this->db->lasterror();
      dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
    }
    if ($error) {
      $this->db->rollback();

      return -1 * $error;
    } else {
      $this->db->commit();

      return 1;
    }
  }

    public function delete(User $user, $notrigger = false, $mode='')
    {
    dol_syslog(__METHOD__, LOG_DEBUG);

    $error = 0;

    $this->db->begin();

    // Uncomment this and change MYOBJECT to your own tag if you
    // want this action calls a trigger.
    //if (! $error && ! $notrigger) {

    // // Call triggers
    // $result=$this->call_trigger('MYOBJECT_DELETE',$user);
    // if ($result < 0) { $error++; //Do also what you must do to rollback action if trigger fail}
    // // End call triggers
    //}

    if (! $error) {
      $sql = 'DELETE FROM ' . MAIN_DB_PREFIX . $this->table_element.$mode;
      $sql .= ' WHERE rowid=' . $this->id;

      $resql = $this->db->query($sql);
      if (! $resql) {
        $error ++;
        $this->errors[] = 'Error ' . $this->db->lasterror();
        dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
      }
    }

    // Commit or rollback
    if ($error) {
      $this->db->rollback();

      return - 1 * $error;
    } else {
      $this->db->commit();

      return 1;
    }
  }

    function deleteByImportkey($importkey)
    {
    $this->db->begin();

    // first check if line not yet in bookkeeping
    $sql = "DELETE";
    $sql .= " FROM " . MAIN_DB_PREFIX . $this->table_element;
    $sql .= " WHERE import_key = '" . $this->db->escape($importkey) . "'";

    $resql = $this->db->query($sql);

    if (! $resql) {
      $this->errors[] = "Error " . $this->db->lasterror();
      dol_syslog(get_class($this)."::delete Error " . $this->db->lasterror(), LOG_ERR);
      $this->db->rollback();
      return - 1;
    }

    $this->db->commit();
    return 1;
  }

    function deleteByYearAndJournal($delyear='', $journal='', $mode='')
    {
    global $conf;

    if (empty($delyear) && empty($journal))
    {
      return -1;
    }

    $this->db->begin();

    // first check if line not yet in bookkeeping
    $sql = "DELETE";
    $sql.= " FROM " . MAIN_DB_PREFIX . $this->table_element.$mode;
    $sql.= " WHERE 1 = 1";
    if (! empty($delyear)) $sql.= " AND YEAR(doc_date) = " . $delyear;     // FIXME Must use between
    if (! empty($journal)) $sql.= " AND code_journal = '".$this->db->escape($journal)."'";
    $sql .= " AND entity IN (" . getEntity('accountancy') . ")";
    $resql = $this->db->query($sql);

    if (! $resql) {
      $this->errors[] = "Error " . $this->db->lasterror();
      foreach ( $this->errors as $errmsg ) {
        dol_syslog(get_class($this) . "::delete " . $errmsg, LOG_ERR);
        $this->error .= ($this->error ? ', ' . $errmsg : $errmsg);
      }
      $this->db->rollback();
      return -1;
    }

    $this->db->commit();
    return 1;
  }

    function deleteMvtNum($piecenum)
    {
    global $conf;

    $this->db->begin();

    // first check if line not yet in bookkeeping
    $sql = "DELETE";
    $sql .= " FROM " . MAIN_DB_PREFIX . $this->table_element;
    $sql .= " WHERE piece_num = " . (int) $piecenum;
    $sql .= " AND entity IN (" . getEntity('accountancy') . ")";

    $resql = $this->db->query($sql);

    if (! $resql) {
      $this->errors[] = "Error " . $this->db->lasterror();
      foreach ( $this->errors as $errmsg ) {
        dol_syslog(get_class($this) . "::delete " . $errmsg, LOG_ERR);
        $this->error .= ($this->error ? ', ' . $errmsg : $errmsg);
      }
      $this->db->rollback();
      return - 1;
    }

    $this->db->commit();
    return 1;
  }

    public function createFromClone($fromid)
    {
    dol_syslog(__METHOD__, LOG_DEBUG);

    global $user;

    $error = 0;
    $object = new BookKeeping($this->db);

    $this->db->begin();

    // Load source object
    $object->fetch($fromid);
    // Reset object
    $object->id = 0;

    // Clear fields
    // ...

    // Create clone
    $object->context['createfromclone'] = 'createfromclone';
    $result = $object->create($user);

    // Other options
    if ($result < 0) {
      $error ++;
      $this->errors = $object->errors;
      dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
    }

    unset($object->context['createfromclone']);

    // End
    if (! $error) {
      $this->db->commit();

      return $object->id;
    } else {
      $this->db->rollback();

      return -1;
    }
  }

    public function initAsSpecimen()
    {
    global $user;

    $now=dol_now();

    $this->id = 0;
    $this->doc_date = $now;
    $this->doc_type = '';
    $this->doc_ref = '';
    $this->fk_doc = '';
    $this->fk_docdet = '';
    $this->thirdparty_code = 'CU001';
    $this->subledger_account = '41100001';
    $this->subledger_label = 'My customer company';
    $this->numero_compte = '411';
    $this->label_compte = 'Customer';
    $this->label_operation = 'Sales of pea';
    $this->debit = 99.9;
    $this->credit = '';
    $this->montant = '';
    $this->sens = 'D';
    $this->fk_user_author = $user->id;
    $this->import_key = '';
    $this->code_journal = 'VT';
    $this->journal_label = 'Journal de vente';
    $this->piece_num = '';
    $this->date_creation = $now;
  }

    public function fetchPerMvt($piecenum, $mode='')
    {
    global $conf;

    $sql = "SELECT piece_num,doc_date,code_journal,journal_label,doc_ref,doc_type,date_creation";
    $sql .= " FROM " . MAIN_DB_PREFIX . $this->table_element.$mode;
    $sql .= " WHERE piece_num = " . $piecenum;
    $sql .= " AND entity IN (" . getEntity('accountancy') . ")";

    dol_syslog(get_class($this) . "::" . __METHOD__, LOG_DEBUG);
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);

      $this->piece_num = $obj->piece_num;
      $this->code_journal = $obj->code_journal;
      $this->journal_label = $obj->journal_label;
      $this->doc_date = $this->db->jdate($obj->doc_date);
      $this->doc_ref = $obj->doc_ref;
      $this->doc_type = $obj->doc_type;
      $this->date_creation = $obj->date_creation;
    } else {
      $this->error = "Error " . $this->db->lasterror();
      dol_syslog(get_class($this) . "::" . __METHOD__ . $this->error, LOG_ERR);
      return - 1;
    }

    return 1;
  }

  public function getNextNumMvt($mode='')
  {
    global $conf;

    $sql = "SELECT MAX(piece_num)+1 as max FROM " . MAIN_DB_PREFIX . $this->table_element.$mode;
    $sql .= " WHERE entity IN (" . getEntity('accountancy') . ")";

    dol_syslog(get_class($this) . "getNextNumMvt sql=" . $sql, LOG_DEBUG);
    $result = $this->db->query($sql);

    if ($result) {
      $obj = $this->db->fetch_object($result);
      if ($obj) $result = $obj->max;
      if (empty($result)) $result = 1;
      return $result;
    } else {
      $this->error = "Error " . $this->db->lasterror();
      dol_syslog(get_class($this) . "::getNextNumMvt " . $this->error, LOG_ERR);
      return - 1;
    }
  }

    function fetchAllPerMvt($piecenum, $mode='')
    {
    global $conf;

    $sql = "SELECT rowid, doc_date, doc_type,";
    $sql .= " doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,";
    $sql .= " numero_compte, label_compte, label_operation, debit, credit,";
    $sql .= " montant, sens, fk_user_author, import_key, code_journal, journal_label, piece_num, date_creation";
    $sql .= " FROM " . MAIN_DB_PREFIX . $this->table_element.$mode;
    $sql .= " WHERE piece_num = " . $piecenum;
    $sql .= " AND entity IN (" . getEntity('accountancy') . ")";

    dol_syslog(get_class($this) . "::" . __METHOD__, LOG_DEBUG);
    $result = $this->db->query($sql);
    if ($result) {

      while ($obj = $this->db->fetch_object($result)) {

        $line = new BookKeepingLine();

        $line->id = $obj->rowid;

        $line->doc_date = $this->db->jdate($obj->doc_date);
        $line->doc_type = $obj->doc_type;
        $line->doc_ref = $obj->doc_ref;
        $line->fk_doc = $obj->fk_doc;
        $line->fk_docdet = $obj->fk_docdet;
        $line->thirdparty_code = $obj->thirdparty_code;
        $line->subledger_account = $obj->subledger_account;
        $line->subledger_label = $obj->subledger_label;
        $line->numero_compte = $obj->numero_compte;
        $line->label_compte = $obj->label_compte;
        $line->label_operation = $obj->label_operation;
        $line->debit = $obj->debit;
        $line->credit = $obj->credit;
        $line->montant = $obj->montant;
        $line->sens = $obj->sens;
        $line->code_journal = $obj->code_journal;
        $line->journal_label = $obj->journal_label;
        $line->piece_num = $obj->piece_num;
        $line->date_creation = $obj->date_creation;

        $this->linesmvt[] = $line;
      }
    } else {
      $this->error = "Error " . $this->db->lasterror();
      dol_syslog(get_class($this) . "::" . __METHOD__ . $this->error, LOG_ERR);
      return - 1;
    }

    return 1;
  }

    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps
    function export_bookkeping($model = 'ebp')
    {
        // phpcs:enable
    global $conf;

    $sql = "SELECT rowid, doc_date, doc_type,";
    $sql .= " doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,";
    $sql .= " numero_compte, label_compte, label_operation, debit, credit,";
    $sql .= " montant, sens, fk_user_author, import_key, code_journal, piece_num";
    $sql .= " FROM " . MAIN_DB_PREFIX . $this->table_element;
    $sql .= " WHERE entity IN (" . getEntity('accountancy') . ")";

    dol_syslog(get_class($this) . "::export_bookkeping", LOG_DEBUG);

    $resql = $this->db->query($sql);

    if ($resql) {
      $this->linesexport = array ();

      $num = $this->db->num_rows($resql);
      while ($obj = $this->db->fetch_object($resql)) {
        $line = new BookKeepingLine();

        $line->id = $obj->rowid;

        $line->doc_date = $this->db->jdate($obj->doc_date);
        $line->doc_type = $obj->doc_type;
        $line->doc_ref = $obj->doc_ref;
        $line->fk_doc = $obj->fk_doc;
        $line->fk_docdet = $obj->fk_docdet;
        $line->thirdparty_code = $obj->thirdparty_code;
        $line->subledger_account = $obj->subledger_account;
        $line->subledger_label = $obj->subledger_label;
        $line->numero_compte = $obj->numero_compte;
        $line->label_compte = $obj->label_compte;
        $line->label_operation = $obj->label_operation;
        $line->debit = $obj->debit;
        $line->credit = $obj->credit;
        $line->montant = $obj->montant;
        $line->sens = $obj->sens;
        $line->code_journal = $obj->code_journal;
        $line->piece_num = $obj->piece_num;

        $this->linesexport[] = $line;
      }
      $this->db->free($resql);

      return $num;
    } else {
      $this->error = "Error " . $this->db->lasterror();
      dol_syslog(get_class($this) . "::export_bookkeping " . $this->error, LOG_ERR);
      return - 1;
    }
  }

  public function transformTransaction($direction=0,$piece_num='')
  {
    $error = 0;

    $this->db->begin();

    if ($direction==0)
    {
      $next_piecenum=$this->getNextNumMvt();
      if ($next_piecenum < 0) {
        $error++;
      }
      $sql = 'INSERT INTO ' . MAIN_DB_PREFIX . $this->table_element.'(doc_date, doc_type,';
      $sql .= ' doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,';
      $sql .= ' numero_compte, label_compte, label_operation, debit, credit,';
      $sql .= ' montant, sens, fk_user_author, import_key, code_journal, journal_label, piece_num)';
      $sql .= 'SELECT doc_date, doc_type,';
      $sql .= ' doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,';
      $sql .= ' numero_compte, label_compte, label_operation, debit, credit,';
      $sql .= ' montant, sens, fk_user_author, import_key, code_journal, journal_label, '.$next_piecenum.'';
      $sql .= ' FROM '.MAIN_DB_PREFIX . $this->table_element.'_tmp WHERE piece_num = '.$piece_num;
      $resql = $this->db->query($sql);
      if (! $resql) {
        $error ++;
        $this->errors[] = 'Error ' . $this->db->lasterror();
        dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
      }
      $sql = 'DELETE FROM '.MAIN_DB_PREFIX . $this->table_element.'_tmp WHERE piece_num = '.$piece_num;
      $resql = $this->db->query($sql);
      if (! $resql) {
        $error ++;
        $this->errors[] = 'Error ' . $this->db->lasterror();
        dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
      }
    } elseif ($direction==1) {
      $sql = 'DELETE FROM ' . MAIN_DB_PREFIX . $this->table_element.'_tmp WHERE piece_num = '.$piece_num;
      $resql = $this->db->query($sql);
      if (! $resql) {
        $error ++;
        $this->errors[] = 'Error ' . $this->db->lasterror();
        dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
      }
      $sql = 'INSERT INTO ' . MAIN_DB_PREFIX . $this->table_element.'_tmp(doc_date, doc_type,';
      $sql .= ' doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,';
      $sql .= ' numero_compte, label_compte, label_operation, debit, credit,';
      $sql .= ' montant, sens, fk_user_author, import_key, code_journal, journal_label, piece_num)';
      $sql .= 'SELECT doc_date, doc_type,';
      $sql .= ' doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,';
      $sql .= ' numero_compte, label_compte, label_operation, debit, credit,';
      $sql .= ' montant, sens, fk_user_author, import_key, code_journal, journal_label, piece_num';
      $sql .= ' FROM '.MAIN_DB_PREFIX . $this->table_element.' WHERE piece_num = '.$piece_num;
      $resql = $this->db->query($sql);
      if (! $resql) {
        $error ++;
        $this->errors[] = 'Error ' . $this->db->lasterror();
        dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
      }
      $sql = 'DELETE FROM '.MAIN_DB_PREFIX . $this->table_element.'_tmp WHERE piece_num = '.$piece_num;
      $resql = $this->db->query($sql);
      if (! $resql) {
        $error ++;
        $this->errors[] = 'Error ' . $this->db->lasterror();
        dol_syslog(__METHOD__ . ' ' . join(',', $this->errors), LOG_ERR);
      }
    }
    if (! $error) {
      $this->db->commit();
      return 1;
    } else {
      $this->db->rollback();
      return - 1;
    }
    /*
    $sql = "DELETE FROM ";
    $sql .= " FROM " . MAIN_DB_PREFIX . "accounting_bookkeeping as ab";
    $sql .= " LEFT JOIN " . MAIN_DB_PREFIX . "accounting_account as aa ON aa.account_number = ab.numero_compte";
    $sql .= " AND aa.active = 1";
    $sql .= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
    $sql .= " AND asy.rowid = " . $pcgver;
    $sql .= " AND ab.entity IN (" . getEntity('accountancy') . ")";
    $sql .= " ORDER BY account_number ASC";
    */
  }

    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps
    function select_account($selectid, $htmlname = 'account', $showempty = 0, $event = array(), $select_in = 0, $select_out = 0, $aabase = '')
    {
        // phpcs:enable
    global $conf;

    require_once DOL_DOCUMENT_ROOT . '/core/lib/accounting.lib.php';

    $pcgver = $conf->global->CHARTOFACCOUNTS;

    $sql = "SELECT DISTINCT ab.numero_compte as account_number, aa.label as label, aa.rowid as rowid, aa.fk_pcg_version";
    $sql .= " FROM " . MAIN_DB_PREFIX . "accounting_bookkeeping as ab";
    $sql .= " LEFT JOIN " . MAIN_DB_PREFIX . "accounting_account as aa ON aa.account_number = ab.numero_compte";
    $sql .= " AND aa.active = 1";
    $sql .= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
    $sql .= " AND asy.rowid = " . $pcgver;
    $sql .= " AND ab.entity IN (" . getEntity('accountancy') . ")";
    $sql .= " ORDER BY account_number ASC";

    dol_syslog(get_class($this) . "::select_account", LOG_DEBUG);
    $resql = $this->db->query($sql);

    if (! $resql) {
      $this->error = "Error " . $this->db->lasterror();
      dol_syslog(get_class($this) . "::select_account " . $this->error, LOG_ERR);
      return - 1;
    }

    $out = ajax_combobox($htmlname, $event);

    $options = array();
    $selected = null;

    while ($obj = $this->db->fetch_object($resql)) {
      $label = length_accountg($obj->account_number) . ' - ' . $obj->label;

      $select_value_in = $obj->rowid;
      $select_value_out = $obj->rowid;

      if ($select_in == 1) {
        $select_value_in = $obj->account_number;
      }
      if ($select_out == 1) {
        $select_value_out = $obj->account_number;
      }

      // Remember guy's we store in database llx_facturedet the rowid of accounting_account and not the account_number
      // Because same account_number can be share between different accounting_system and do have the same meaning
      if (($selectid != '') && $selectid == $select_value_in) {
        $selected = $select_value_out;
      }

      $options[$select_value_out] = $label;
    }

    $out .= Form::selectarray($htmlname, $options, $selected, $showempty, 0, 0, '', 0, 0, 0, '', 'maxwidth300');
    $this->db->free($resql);
    return $out;
  }

    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps
  function get_compte_racine($account = null)
  {
        // phpcs:enable
    global $conf;
    $pcgver = $conf->global->CHARTOFACCOUNTS;

    $sql  = "SELECT root.account_number, root.label as label";
    $sql .= " FROM " . MAIN_DB_PREFIX . "accounting_account as aa";
    $sql .= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
    $sql .= " AND asy.rowid = " . $pcgver;
    $sql .= " LEFT JOIN " . MAIN_DB_PREFIX . "accounting_account as parent ON aa.account_parent = parent.rowid";
    $sql .= " LEFT JOIN " . MAIN_DB_PREFIX . "accounting_account as root ON parent.account_parent = root.rowid";
    $sql .= " WHERE aa.account_number = '" . $account . "'";
    $sql .= " AND parent.active = 1";
    $sql .= " AND root.active = 1";
    $sql .= " AND aa.entity IN (" . getEntity('accountancy') . ")";

    dol_syslog(get_class($this) . "::select_account sql=" . $sql, LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = '';
      if ($this->db->num_rows($resql)) {
        $obj = $this->db->fetch_object($resql);
      }

      return $obj->label;
    } else {
      $this->error = "Error " . $this->db->lasterror();
      dol_syslog(__METHOD__ . " " . $this->error, LOG_ERR);

      return -1;
    }
  }

    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps
  function get_compte_desc($account = null)
  {
        // phpcs:enable
    global $conf;

    $pcgver = $conf->global->CHARTOFACCOUNTS;
    $sql  = "SELECT aa.account_number, aa.label, aa.rowid, aa.fk_pcg_version, cat.label as category";
    $sql .= " FROM " . MAIN_DB_PREFIX . "accounting_account as aa ";
    $sql .= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
    $sql .= " AND aa.account_number = '" . $account . "'";
    $sql .= " AND asy.rowid = " . $pcgver;
    $sql .= " AND aa.active = 1";
    $sql .= " LEFT JOIN " . MAIN_DB_PREFIX . "c_accounting_category as cat ON aa.fk_accounting_category = cat.rowid";
    $sql .= " WHERE aa.entity IN (" . getEntity('accountancy') . ")";

    dol_syslog(get_class($this) . "::select_account sql=" . $sql, LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = '';
      if ($this->db->num_rows($resql)) {
        $obj = $this->db->fetch_object($resql);
      }
      if(empty($obj->category)){
        return $obj->label;
      }else{
        return $obj->label.' ('.$obj->category.')';
      }
    } else {
      $this->error = "Error " . $this->db->lasterror();
      dol_syslog(__METHOD__ . " " . $this->error, LOG_ERR);
      return -1;
    }
  }
}

class BookKeepingLine
{
  public $id;

  public $doc_date = '';
  public $doc_type;
  public $doc_ref;

  public $fk_doc;

  public $fk_docdet;

  public $thirdparty_code;
  public $subledger_account;
  public $subledger_label;
  public $numero_compte;
  public $label_compte;
  public $label_operation;
  public $debit;
  public $credit;
  public $montant;
  public $sens;

  public $fk_user_author;

  public $import_key;
  public $code_journal;
  public $journal_label;
  public $piece_num;
  public $date_creation;
}