dolibarr  x.y.z
bookkeeping.class.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2014-2017 Olivier Geffroy <jeff@jeffinfo.com>
3  * Copyright (C) 2015-2022 Alexandre Spangaro <aspangaro@open-dsi.fr>
4  * Copyright (C) 2015-2020 Florian Henry <florian.henry@open-concept.pro>
5  * Copyright (C) 2018-2020 Frédéric France <frederic.france@netlogic.fr>
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program. If not, see <https://www.gnu.org/licenses/>.
19  */
20 
27 // Class
28 require_once DOL_DOCUMENT_ROOT.'/core/class/commonobject.class.php';
29 
33 class BookKeeping extends CommonObject
34 {
38  public $element = 'accountingbookkeeping';
39 
43  public $table_element = 'accounting_bookkeeping';
44 
48  public $entity;
49 
53  public $lines = array();
54 
58  public $id;
59 
63  public $doc_date;
64 
68  public $date_lim_reglement;
69 
73  public $doc_type;
74 
78  public $doc_ref;
79 
83  public $fk_doc;
84 
88  public $fk_docdet;
89 
93  public $thirdparty_code;
94 
98  public $subledger_account;
99 
103  public $subledger_label;
104 
108  public $numero_compte;
109 
113  public $label_compte;
114 
118  public $label_operation;
119 
123  public $debit;
124 
128  public $credit;
129 
134  public $montant;
135 
140  public $amount;
141 
145  public $sens;
146 
150  public $fk_user_author;
151 
155  public $import_key;
156 
160  public $code_journal;
161 
165  public $journal_label;
166 
170  public $piece_num;
171 
175  public $date_validation;
176 
180  public $date_export;
181 
185  public $picto = 'generic';
186 
187 
193  public function __construct(DoliDB $db)
194  {
195  $this->db = $db;
196  }
197 
205  public function create(User $user, $notrigger = false)
206  {
207  global $conf, $langs;
208 
209  dol_syslog(__METHOD__, LOG_DEBUG);
210 
211  $error = 0;
212 
213  // Clean parameters</center>
214  if (isset($this->doc_type)) {
215  $this->doc_type = trim($this->doc_type);
216  }
217  if (isset($this->doc_ref)) {
218  $this->doc_ref = trim($this->doc_ref);
219  }
220  if (isset($this->fk_doc)) {
221  $this->fk_doc = (int) $this->fk_doc;
222  }
223  if (isset($this->fk_docdet)) {
224  $this->fk_docdet = (int) $this->fk_docdet;
225  }
226  if (isset($this->thirdparty_code)) {
227  $this->thirdparty_code = trim($this->thirdparty_code);
228  }
229  if (isset($this->subledger_account)) {
230  $this->subledger_account = trim($this->subledger_account);
231  }
232  if (isset($this->subledger_label)) {
233  $this->subledger_label = trim($this->subledger_label);
234  }
235  if (isset($this->numero_compte)) {
236  $this->numero_compte = trim($this->numero_compte);
237  }
238  if (isset($this->label_compte)) {
239  $this->label_compte = trim($this->label_compte);
240  }
241  if (isset($this->label_operation)) {
242  $this->label_operation = trim($this->label_operation);
243  }
244  if (isset($this->debit)) {
245  $this->debit = (float) $this->debit;
246  }
247  if (isset($this->credit)) {
248  $this->credit = (float) $this->credit;
249  }
250  if (isset($this->montant)) {
251  $this->montant = (float) $this->montant;
252  }
253  if (isset($this->amount)) {
254  $this->amount = (float) $this->amount;
255  }
256  if (isset($this->sens)) {
257  $this->sens = trim($this->sens);
258  }
259  if (isset($this->import_key)) {
260  $this->import_key = trim($this->import_key);
261  }
262  if (isset($this->code_journal)) {
263  $this->code_journal = trim($this->code_journal);
264  }
265  if (isset($this->journal_label)) {
266  $this->journal_label = trim($this->journal_label);
267  }
268  if (isset($this->piece_num)) {
269  $this->piece_num = trim($this->piece_num);
270  }
271  if (empty($this->debit)) {
272  $this->debit = 0.0;
273  }
274  if (empty($this->credit)) {
275  $this->credit = 0.0;
276  }
277 
278  // Check parameters
279  if (($this->numero_compte == "") || $this->numero_compte == '-1' || $this->numero_compte == 'NotDefined') {
280  $langs->loadLangs(array("errors"));
281  if (in_array($this->doc_type, array('bank', 'expense_report'))) {
282  $this->errors[] = $langs->trans('ErrorFieldAccountNotDefinedForBankLine', $this->fk_docdet, $this->doc_type);
283  } else {
284  //$this->errors[]=$langs->trans('ErrorFieldAccountNotDefinedForInvoiceLine', $this->doc_ref, $this->label_compte);
285  $mesg = $this->doc_ref.', '.$langs->trans("AccountAccounting").': '.$this->numero_compte;
286  if ($this->subledger_account && $this->subledger_account != $this->numero_compte) {
287  $mesg .= ', '.$langs->trans("SubledgerAccount").': '.$this->subledger_account;
288  }
289  $this->errors[] = $langs->trans('ErrorFieldAccountNotDefinedForLine', $mesg);
290  }
291 
292  return -1;
293  }
294 
295  $this->db->begin();
296 
297  $this->piece_num = 0;
298 
299  // First check if line not yet already in bookkeeping.
300  // Note that we must include 'doc_type - fk_doc - numero_compte - label' to be sure to have unicity of line (because we may have several lines
301  // with same doc_type, fk_doc, numero_compte for 1 invoice line when using localtaxes with same account)
302  // WARNING: This is not reliable, label may have been modified. This is just a small protection.
303  // The page that make transfer make the test on couple (doc_type - fk_doc) only.
304  $sql = "SELECT count(*) as nb";
305  $sql .= " FROM ".MAIN_DB_PREFIX.$this->table_element;
306  $sql .= " WHERE doc_type = '".$this->db->escape($this->doc_type)."'";
307  $sql .= " AND fk_doc = ".((int) $this->fk_doc);
308  if (!empty($conf->global->ACCOUNTANCY_ENABLE_FKDOCDET)) {
309  // DO NOT USE THIS IN PRODUCTION. This will generate a lot of trouble into reports and will corrupt database (by generating duplicate entries.
310  $sql .= " AND fk_docdet = ".((int) $this->fk_docdet); // This field can be 0 if record is for several lines
311  }
312  $sql .= " AND numero_compte = '".$this->db->escape($this->numero_compte)."'";
313  $sql .= " AND label_operation = '".$this->db->escape($this->label_operation)."'";
314  $sql .= " AND entity = ".$conf->entity; // Do not use getEntity for accounting features
315 
316  $resql = $this->db->query($sql);
317 
318  if ($resql) {
319  $row = $this->db->fetch_object($resql);
320  if ($row->nb == 0) { // Not already into bookkeeping
321  // Check to know if piece_num already exists for data we try to insert to reuse the same value
322  $sqlnum = "SELECT piece_num";
323  $sqlnum .= " FROM ".MAIN_DB_PREFIX.$this->table_element;
324  $sqlnum .= " WHERE doc_type = '".$this->db->escape($this->doc_type)."'"; // For example doc_type = 'bank'
325  $sqlnum .= " AND fk_doc = ".((int) $this->fk_doc);
326  if (!empty($conf->global->ACCOUNTANCY_ENABLE_FKDOCDET)) {
327  // fk_docdet is rowid into llx_bank or llx_facturedet or llx_facturefourndet, or ...
328  $sqlnum .= " AND fk_docdet = ".((int) $this->fk_docdet);
329  }
330  $sqlnum .= " AND doc_ref = '".$this->db->escape($this->doc_ref)."'"; // ref of source object
331  $sqlnum .= " AND entity = ".$conf->entity; // Do not use getEntity for accounting features
332 
333  dol_syslog(get_class($this).":: create sqlnum=".$sqlnum, LOG_DEBUG);
334  $resqlnum = $this->db->query($sqlnum);
335  if ($resqlnum) {
336  $objnum = $this->db->fetch_object($resqlnum);
337  $this->piece_num = $objnum->piece_num;
338  }
339 
340  dol_syslog(get_class($this).":: create this->piece_num=".$this->piece_num, LOG_DEBUG);
341  if (empty($this->piece_num)) {
342  $sqlnum = "SELECT MAX(piece_num)+1 as maxpiecenum";
343  $sqlnum .= " FROM ".MAIN_DB_PREFIX.$this->table_element;
344  $sqlnum .= " WHERE entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
345 
346  $resqlnum = $this->db->query($sqlnum);
347  if ($resqlnum) {
348  $objnum = $this->db->fetch_object($resqlnum);
349  $this->piece_num = $objnum->maxpiecenum;
350  }
351  dol_syslog(get_class($this).":: create now this->piece_num=".$this->piece_num, LOG_DEBUG);
352  }
353  if (empty($this->piece_num)) {
354  $this->piece_num = 1;
355  }
356 
357  $now = dol_now();
358 
359  $sql = "INSERT INTO ".MAIN_DB_PREFIX.$this->table_element." (";
360  $sql .= "doc_date";
361  $sql .= ", date_lim_reglement";
362  $sql .= ", doc_type";
363  $sql .= ", doc_ref";
364  $sql .= ", fk_doc";
365  $sql .= ", fk_docdet";
366  $sql .= ", thirdparty_code";
367  $sql .= ", subledger_account";
368  $sql .= ", subledger_label";
369  $sql .= ", numero_compte";
370  $sql .= ", label_compte";
371  $sql .= ", label_operation";
372  $sql .= ", debit";
373  $sql .= ", credit";
374  $sql .= ", montant";
375  $sql .= ", sens";
376  $sql .= ", fk_user_author";
377  $sql .= ", date_creation";
378  $sql .= ", code_journal";
379  $sql .= ", journal_label";
380  $sql .= ", piece_num";
381  $sql .= ', entity';
382  $sql .= ") VALUES (";
383  $sql .= "'".$this->db->idate($this->doc_date)."'";
384  $sql .= ", ".(!isset($this->date_lim_reglement) || dol_strlen($this->date_lim_reglement) == 0 ? 'NULL' : "'".$this->db->idate($this->date_lim_reglement)."'");
385  $sql .= ", '".$this->db->escape($this->doc_type)."'";
386  $sql .= ", '".$this->db->escape($this->doc_ref)."'";
387  $sql .= ", ".((int) $this->fk_doc);
388  $sql .= ", ".((int) $this->fk_docdet);
389  $sql .= ", ".(!empty($this->thirdparty_code) ? ("'".$this->db->escape($this->thirdparty_code)."'") : "NULL");
390  $sql .= ", ".(!empty($this->subledger_account) ? ("'".$this->db->escape($this->subledger_account)."'") : "NULL");
391  $sql .= ", ".(!empty($this->subledger_label) ? ("'".$this->db->escape($this->subledger_label)."'") : "NULL");
392  $sql .= ", '".$this->db->escape($this->numero_compte)."'";
393  $sql .= ", ".(!empty($this->label_compte) ? ("'".$this->db->escape($this->label_compte)."'") : "NULL");
394  $sql .= ", '".$this->db->escape($this->label_operation)."'";
395  $sql .= ", ".((float) $this->debit);
396  $sql .= ", ".((float) $this->credit);
397  $sql .= ", ".((float) $this->montant);
398  $sql .= ", ".(!empty($this->sens) ? ("'".$this->db->escape($this->sens)."'") : "NULL");
399  $sql .= ", '".$this->db->escape($this->fk_user_author)."'";
400  $sql .= ", '".$this->db->idate($now)."'";
401  $sql .= ", '".$this->db->escape($this->code_journal)."'";
402  $sql .= ", ".(!empty($this->journal_label) ? ("'".$this->db->escape($this->journal_label)."'") : "NULL");
403  $sql .= ", ".((int) $this->piece_num);
404  $sql .= ", ".(!isset($this->entity) ? $conf->entity : $this->entity);
405  $sql .= ")";
406 
407  $resql = $this->db->query($sql);
408  if ($resql) {
409  $id = $this->db->last_insert_id(MAIN_DB_PREFIX.$this->table_element);
410 
411  if ($id > 0) {
412  $this->id = $id;
413  $result = 0;
414  } else {
415  $result = -2;
416  $error++;
417  $this->errors[] = 'Error Create Error '.$result.' lecture ID';
418  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
419  }
420  } else {
421  $result = -1;
422  $error++;
423  $this->errors[] = 'Error '.$this->db->lasterror();
424  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
425  }
426  } else { // Already exists
427  $result = -3;
428  $error++;
429  $this->error = 'BookkeepingRecordAlreadyExists';
430  dol_syslog(__METHOD__.' '.$this->error, LOG_WARNING);
431  }
432  } else {
433  $result = -5;
434  $error++;
435  $this->errors[] = 'Error '.$this->db->lasterror();
436  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
437  }
438 
439  // Uncomment this and change MYOBJECT to your own tag if you
440  // want this action to call a trigger.
441  //if (! $error && ! $notrigger) {
442 
443  // // Call triggers
444  // $result=$this->call_trigger('MYOBJECT_CREATE',$user);
445  // if ($result < 0) $error++;
446  // // End call triggers
447  //}
448 
449  // Commit or rollback
450  if ($error) {
451  $this->db->rollback();
452  return -1 * $error;
453  } else {
454  $this->db->commit();
455  return $result;
456  }
457  }
458 
469  public function getNomUrl($withpicto = 0, $option = '', $notooltip = 0, $morecss = '', $save_lastsearch_value = -1)
470  {
471  global $db, $conf, $langs;
472  global $dolibarr_main_authentication, $dolibarr_main_demo;
473  global $menumanager, $hookmanager;
474 
475  if (!empty($conf->dol_no_mouse_hover)) {
476  $notooltip = 1; // Force disable tooltips
477  }
478 
479  $result = '';
480  $companylink = '';
481 
482  $label = '<u>'.$langs->trans("Transaction").'</u>';
483  $label .= '<br>';
484  $label .= '<b>'.$langs->trans('Ref').':</b> '.$this->piece_num;
485 
486  $url = DOL_URL_ROOT.'/accountancy/bookkeeping/card.php?piece_num='.$this->piece_num;
487 
488  if ($option != 'nolink') {
489  // Add param to save lastsearch_values or not
490  $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
491  if ($save_lastsearch_value == -1 && preg_match('/list\.php/', $_SERVER["PHP_SELF"])) {
492  $add_save_lastsearch_values = 1;
493  }
494  if ($add_save_lastsearch_values) {
495  $url .= '&save_lastsearch_values=1';
496  }
497  }
498 
499  $linkclose = '';
500  if (empty($notooltip)) {
501  if (!empty($conf->global->MAIN_OPTIMIZEFORTEXTBROWSER)) {
502  $label = $langs->trans("ShowTransaction");
503  $linkclose .= ' alt="'.dol_escape_htmltag($label, 1).'"';
504  }
505  $linkclose .= ' title="'.dol_escape_htmltag($label, 1).'"';
506  $linkclose .= ' class="classfortooltip'.($morecss ? ' '.$morecss : '').'"';
507  } else {
508  $linkclose = ($morecss ? ' class="'.$morecss.'"' : '');
509  }
510 
511  $linkstart = '<a href="'.$url.'"';
512  $linkstart .= $linkclose.'>';
513  $linkend = '</a>';
514 
515  $result .= $linkstart;
516  if ($withpicto) {
517  $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);
518  }
519  if ($withpicto != 2) {
520  $result .= $this->piece_num;
521  }
522  $result .= $linkend;
523  //if ($withpicto != 2) $result.=(($addlabel && $this->label) ? $sep . dol_trunc($this->label, ($addlabel > 1 ? $addlabel : 0)) : '');
524 
525  global $action;
526  $hookmanager->initHooks(array($this->element . 'dao'));
527  $parameters = array('id'=>$this->id, 'getnomurl' => &$result);
528  $reshook = $hookmanager->executeHooks('getNomUrl', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
529  if ($reshook > 0) {
530  $result = $hookmanager->resPrint;
531  } else {
532  $result .= $hookmanager->resPrint;
533  }
534  return $result;
535  }
536 
545  public function createStd(User $user, $notrigger = false, $mode = '')
546  {
547  global $conf, $langs;
548 
549  $langs->loadLangs(array("accountancy", "bills", "compta"));
550 
551  dol_syslog(__METHOD__, LOG_DEBUG);
552 
553  $error = 0;
554 
555  // Clean parameters
556  if (isset($this->doc_type)) {
557  $this->doc_type = trim($this->doc_type);
558  }
559  if (isset($this->doc_ref)) {
560  $this->doc_ref = trim($this->doc_ref);
561  }
562  if (isset($this->fk_doc)) {
563  $this->fk_doc = (int) $this->fk_doc;
564  }
565  if (isset($this->fk_docdet)) {
566  $this->fk_docdet = (int) $this->fk_docdet;
567  }
568  if (isset($this->thirdparty_code)) {
569  $this->thirdparty_code = trim($this->thirdparty_code);
570  }
571  if (isset($this->subledger_account)) {
572  $this->subledger_account = trim($this->subledger_account);
573  }
574  if (isset($this->subledger_label)) {
575  $this->subledger_label = trim($this->subledger_label);
576  }
577  if (isset($this->numero_compte)) {
578  $this->numero_compte = trim($this->numero_compte);
579  }
580  if (isset($this->label_compte)) {
581  $this->label_compte = trim($this->label_compte);
582  }
583  if (isset($this->label_operation)) {
584  $this->label_operation = trim($this->label_operation);
585  }
586  if (isset($this->debit)) {
587  $this->debit = trim($this->debit);
588  }
589  if (isset($this->credit)) {
590  $this->credit = trim($this->credit);
591  }
592  if (isset($this->montant)) {
593  $this->montant = trim($this->montant);
594  }
595  if (isset($this->amount)) {
596  $this->amount = trim($this->amount);
597  }
598  if (isset($this->sens)) {
599  $this->sens = trim($this->sens);
600  }
601  if (isset($this->import_key)) {
602  $this->import_key = trim($this->import_key);
603  }
604  if (isset($this->code_journal)) {
605  $this->code_journal = trim($this->code_journal);
606  }
607  if (isset($this->journal_label)) {
608  $this->journal_label = trim($this->journal_label);
609  }
610  if (isset($this->piece_num)) {
611  $this->piece_num = trim($this->piece_num);
612  }
613  if (empty($this->debit)) {
614  $this->debit = 0;
615  }
616  if (empty($this->credit)) {
617  $this->credit = 0;
618  }
619  if (empty($this->montant)) {
620  $this->montant = 0;
621  }
622 
623  $this->debit = price2num($this->debit, 'MT');
624  $this->credit = price2num($this->credit, 'MT');
625  $this->montant = price2num($this->montant, 'MT');
626 
627  $now = dol_now();
628 
629  // Check parameters
630  $this->journal_label = $langs->trans($this->journal_label);
631 
632  // Insert request
633  $sql = 'INSERT INTO '.MAIN_DB_PREFIX.$this->table_element.$mode.' (';
634  $sql .= 'doc_date,';
635  $sql .= 'date_lim_reglement,';
636  $sql .= 'doc_type,';
637  $sql .= 'doc_ref,';
638  $sql .= 'fk_doc,';
639  $sql .= 'fk_docdet,';
640  $sql .= 'thirdparty_code,';
641  $sql .= 'subledger_account,';
642  $sql .= 'subledger_label,';
643  $sql .= 'numero_compte,';
644  $sql .= 'label_compte,';
645  $sql .= 'label_operation,';
646  $sql .= 'debit,';
647  $sql .= 'credit,';
648  $sql .= 'montant,';
649  $sql .= 'sens,';
650  $sql .= 'fk_user_author,';
651  $sql .= 'date_creation,';
652  $sql .= 'code_journal,';
653  $sql .= 'journal_label,';
654  $sql .= 'piece_num,';
655  $sql .= 'entity';
656  $sql .= ') VALUES (';
657  $sql .= ' '.(!isset($this->doc_date) || dol_strlen($this->doc_date) == 0 ? 'NULL' : "'".$this->db->idate($this->doc_date)."'").',';
658  $sql .= ' '.(!isset($this->date_lim_reglement) || dol_strlen($this->date_lim_reglement) == 0 ? 'NULL' : "'".$this->db->idate($this->date_lim_reglement)."'").',';
659  $sql .= ' '.(!isset($this->doc_type) ? 'NULL' : "'".$this->db->escape($this->doc_type)."'").',';
660  $sql .= ' '.(!isset($this->doc_ref) ? 'NULL' : "'".$this->db->escape($this->doc_ref)."'").',';
661  $sql .= ' '.(empty($this->fk_doc) ? '0' : (int) $this->fk_doc).',';
662  $sql .= ' '.(empty($this->fk_docdet) ? '0' : (int) $this->fk_docdet).',';
663  $sql .= ' '.(!isset($this->thirdparty_code) ? 'NULL' : "'".$this->db->escape($this->thirdparty_code)."'").',';
664  $sql .= ' '.(!isset($this->subledger_account) ? 'NULL' : "'".$this->db->escape($this->subledger_account)."'").',';
665  $sql .= ' '.(!isset($this->subledger_label) ? 'NULL' : "'".$this->db->escape($this->subledger_label)."'").',';
666  $sql .= ' '.(!isset($this->numero_compte) ? 'NULL' : "'".$this->db->escape($this->numero_compte)."'").',';
667  $sql .= ' '.(!isset($this->label_compte) ? 'NULL' : "'".$this->db->escape($this->label_compte)."'").',';
668  $sql .= ' '.(!isset($this->label_operation) ? 'NULL' : "'".$this->db->escape($this->label_operation)."'").',';
669  $sql .= ' '.(!isset($this->debit) ? 'NULL' : $this->debit).',';
670  $sql .= ' '.(!isset($this->credit) ? 'NULL' : $this->credit).',';
671  $sql .= ' '.(!isset($this->montant) ? 'NULL' : $this->montant).',';
672  $sql .= ' '.(!isset($this->sens) ? 'NULL' : "'".$this->db->escape($this->sens)."'").',';
673  $sql .= ' '.((int) $user->id).',';
674  $sql .= ' '."'".$this->db->idate($now)."',";
675  $sql .= ' '.(empty($this->code_journal) ? 'NULL' : "'".$this->db->escape($this->code_journal)."'").',';
676  $sql .= ' '.(empty($this->journal_label) ? 'NULL' : "'".$this->db->escape($this->journal_label)."'").',';
677  $sql .= ' '.(empty($this->piece_num) ? 'NULL' : $this->db->escape($this->piece_num)).',';
678  $sql .= ' '.(!isset($this->entity) ? $conf->entity : $this->entity);
679  $sql .= ')';
680 
681  $this->db->begin();
682 
683  $resql = $this->db->query($sql);
684  if (!$resql) {
685  $error++;
686  $this->errors[] = 'Error '.$this->db->lasterror();
687  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
688  }
689 
690  if (!$error) {
691  $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX.$this->table_element.$mode);
692 
693  // Uncomment this and change MYOBJECT to your own tag if you
694  // want this action to call a trigger.
695  //if (! $notrigger) {
696 
697  // // Call triggers
698  // $result=$this->call_trigger('MYOBJECT_CREATE',$user);
699  // if ($result < 0) $error++;
700  // // End call triggers
701  //}
702  }
703 
704  // Commit or rollback
705  if ($error) {
706  $this->db->rollback();
707 
708  return -1 * $error;
709  } else {
710  $this->db->commit();
711 
712  return $this->id;
713  }
714  }
715 
725  public function fetch($id, $ref = null, $mode = '')
726  {
727  global $conf;
728 
729  dol_syslog(__METHOD__, LOG_DEBUG);
730 
731  $sql = 'SELECT';
732  $sql .= ' t.rowid,';
733  $sql .= " t.doc_date,";
734  $sql .= " t.date_lim_reglement,";
735  $sql .= " t.doc_type,";
736  $sql .= " t.doc_ref,";
737  $sql .= " t.fk_doc,";
738  $sql .= " t.fk_docdet,";
739  $sql .= " t.thirdparty_code,";
740  $sql .= " t.subledger_account,";
741  $sql .= " t.subledger_label,";
742  $sql .= " t.numero_compte,";
743  $sql .= " t.label_compte,";
744  $sql .= " t.label_operation,";
745  $sql .= " t.debit,";
746  $sql .= " t.credit,";
747  $sql .= " t.montant as amount,";
748  $sql .= " t.sens,";
749  $sql .= " t.fk_user_author,";
750  $sql .= " t.import_key,";
751  $sql .= " t.code_journal,";
752  $sql .= " t.journal_label,";
753  $sql .= " t.piece_num,";
754  $sql .= " t.date_creation,";
755  // In llx_accounting_bookkeeping_tmp, field date_export doesn't exist
756  if ($mode != "_tmp") {
757  $sql .= " t.date_export,";
758  }
759  $sql .= " t.date_validated as date_validation";
760  $sql .= ' FROM '.MAIN_DB_PREFIX.$this->table_element.$mode.' as t';
761  $sql .= ' WHERE 1 = 1';
762  $sql .= " AND entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
763  if (null !== $ref) {
764  $sql .= " AND t.ref = '".$this->db->escape($ref)."'";
765  } else {
766  $sql .= ' AND t.rowid = '.((int) $id);
767  }
768 
769  $resql = $this->db->query($sql);
770  if ($resql) {
771  $numrows = $this->db->num_rows($resql);
772  if ($numrows) {
773  $obj = $this->db->fetch_object($resql);
774 
775  $this->id = $obj->rowid;
776 
777  $this->doc_date = $this->db->jdate($obj->doc_date);
778  $this->date_lim_reglement = $this->db->jdate($obj->date_lim_reglement);
779  $this->doc_type = $obj->doc_type;
780  $this->doc_ref = $obj->doc_ref;
781  $this->fk_doc = $obj->fk_doc;
782  $this->fk_docdet = $obj->fk_docdet;
783  $this->thirdparty_code = $obj->thirdparty_code;
784  $this->subledger_account = $obj->subledger_account;
785  $this->subledger_label = $obj->subledger_label;
786  $this->numero_compte = $obj->numero_compte;
787  $this->label_compte = $obj->label_compte;
788  $this->label_operation = $obj->label_operation;
789  $this->debit = $obj->debit;
790  $this->credit = $obj->credit;
791  $this->montant = $obj->amount;
792  $this->amount = $obj->amount;
793  $this->sens = $obj->sens;
794  $this->fk_user_author = $obj->fk_user_author;
795  $this->import_key = $obj->import_key;
796  $this->code_journal = $obj->code_journal;
797  $this->journal_label = $obj->journal_label;
798  $this->piece_num = $obj->piece_num;
799  $this->date_creation = $this->db->jdate($obj->date_creation);
800  $this->date_export = $this->db->jdate($obj->date_export);
801  $this->date_validation = isset($obj->date_validated) ? $this->db->jdate($obj->date_validated) : '';
802  }
803  $this->db->free($resql);
804 
805  if ($numrows) {
806  return 1;
807  } else {
808  return 0;
809  }
810  } else {
811  $this->errors[] = 'Error '.$this->db->lasterror();
812  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
813 
814  return -1;
815  }
816  }
817 
818 
832  public function fetchAllByAccount($sortorder = '', $sortfield = '', $limit = 0, $offset = 0, array $filter = array(), $filtermode = 'AND', $option = 0, $countonly = 0)
833  {
834  global $conf;
835 
836  dol_syslog(__METHOD__, LOG_DEBUG);
837 
838  $this->lines = array();
839  $num = 0;
840 
841  $sql = 'SELECT';
842  if ($countonly) {
843  $sql .= ' COUNT(t.rowid) as nb';
844  } else {
845  $sql .= ' t.rowid,';
846  $sql .= " t.doc_date,";
847  $sql .= " t.doc_type,";
848  $sql .= " t.doc_ref,";
849  $sql .= " t.fk_doc,";
850  $sql .= " t.fk_docdet,";
851  $sql .= " t.thirdparty_code,";
852  $sql .= " t.subledger_account,";
853  $sql .= " t.subledger_label,";
854  $sql .= " t.numero_compte,";
855  $sql .= " t.label_compte,";
856  $sql .= " t.label_operation,";
857  $sql .= " t.debit,";
858  $sql .= " t.credit,";
859  $sql .= " t.montant as amount,";
860  $sql .= " t.sens,";
861  $sql .= " t.multicurrency_amount,";
862  $sql .= " t.multicurrency_code,";
863  $sql .= " t.lettering_code,";
864  $sql .= " t.date_lettering,";
865  $sql .= " t.fk_user_author,";
866  $sql .= " t.import_key,";
867  $sql .= " t.code_journal,";
868  $sql .= " t.journal_label,";
869  $sql .= " t.piece_num,";
870  $sql .= " t.date_creation,";
871  $sql .= " t.date_export,";
872  $sql .= " t.date_validated as date_validation,";
873  $sql .= " t.import_key";
874  }
875  // Manage filter
876  $sqlwhere = array();
877  if (count($filter) > 0) {
878  foreach ($filter as $key => $value) {
879  if ($key == 't.doc_date') {
880  $sqlwhere[] = $key.'=\''.$this->db->idate($value).'\'';
881  } elseif ($key == 't.doc_date>=' || $key == 't.doc_date<=') {
882  $sqlwhere[] = $key.'\''.$this->db->idate($value).'\'';
883  } elseif ($key == 't.numero_compte>=' || $key == 't.numero_compte<=' || $key == 't.subledger_account>=' || $key == 't.subledger_account<=') {
884  $sqlwhere[] = $key.'\''.$this->db->escape($value).'\'';
885  } elseif ($key == 't.fk_doc' || $key == 't.fk_docdet' || $key == 't.piece_num') {
886  $sqlwhere[] = $key.'='.$value;
887  } elseif ($key == 't.subledger_account' || $key == 't.numero_compte') {
888  $sqlwhere[] = $key.' LIKE \''.$this->db->escapeforlike($this->db->escape($value)).'%\'';
889  } elseif ($key == 't.date_creation>=' || $key == 't.date_creation<=') {
890  $sqlwhere[] = $key.'\''.$this->db->idate($value).'\'';
891  } elseif ($key == 't.date_export>=' || $key == 't.date_export<=') {
892  $sqlwhere[] = $key.'\''.$this->db->idate($value).'\'';
893  } elseif ($key == 't.date_validated>=' || $key == 't.date_validated<=') {
894  $sqlwhere[] = $key.'\''.$this->db->idate($value).'\'';
895  } elseif ($key == 't.credit' || $key == 't.debit') {
896  $sqlwhere[] = natural_search($key, $value, 1, 1);
897  } elseif ($key == 't.reconciled_option') {
898  $sqlwhere[] = 't.lettering_code IS NULL';
899  } elseif ($key == 't.code_journal' && !empty($value)) {
900  if (is_array($value)) {
901  $sqlwhere[] = natural_search("t.code_journal", join(',', $value), 3, 1);
902  } else {
903  $sqlwhere[] = natural_search("t.code_journal", $value, 3, 1);
904  }
905  } elseif ($key == 't.search_accounting_code_in' && !empty($value)) {
906  $sqlwhere[] = 't.numero_compte IN ('.$this->db->sanitize($value, 1).')';
907  } else {
908  $sqlwhere[] = natural_search($key, $value, 0, 1);
909  }
910  }
911  }
912  $sql .= ' FROM '.MAIN_DB_PREFIX.$this->table_element.' as t';
913  $sql .= ' WHERE entity = ' . ((int) $conf->entity); // Do not use getEntity for accounting features
914  if (count($sqlwhere) > 0) {
915  $sql .= " AND ".implode(" ".$filtermode." ", $sqlwhere);
916  }
917  // Filter by ledger account or subledger account
918  if (!empty($option)) {
919  $sql .= " AND t.subledger_account IS NOT NULL";
920  $sql .= " AND t.subledger_account <> ''";
921  $sortfield = 't.subledger_account'.($sortfield ? ','.$sortfield : '');
922  $sortorder = 'ASC'.($sortfield ? ','.$sortfield : '');
923  } else {
924  $sortfield = 't.numero_compte'.($sortfield ? ','.$sortfield : '');
925  $sortorder = 'ASC'.($sortorder ? ','.$sortorder : '');
926  }
927 
928  if (!$countonly) {
929  $sql .= $this->db->order($sortfield, $sortorder);
930  if (!empty($limit)) {
931  $sql .= $this->db->plimit($limit + 1, $offset);
932  }
933  }
934 
935  $resql = $this->db->query($sql);
936  if ($resql) {
937  if ($countonly) {
938  $obj = $this->db->fetch_object($resql);
939  if ($obj) {
940  $num = $obj->nb;
941  }
942  } else {
943  $num = $this->db->num_rows($resql);
944 
945  $i = 0;
946  while (($obj = $this->db->fetch_object($resql)) && (empty($limit) || $i < min($limit, $num))) {
947  $line = new BookKeepingLine();
948 
949  $line->id = $obj->rowid;
950 
951  $line->doc_date = $this->db->jdate($obj->doc_date);
952  $line->doc_type = $obj->doc_type;
953  $line->doc_ref = $obj->doc_ref;
954  $line->fk_doc = $obj->fk_doc;
955  $line->fk_docdet = $obj->fk_docdet;
956  $line->thirdparty_code = $obj->thirdparty_code;
957  $line->subledger_account = $obj->subledger_account;
958  $line->subledger_label = $obj->subledger_label;
959  $line->numero_compte = $obj->numero_compte;
960  $line->label_compte = $obj->label_compte;
961  $line->label_operation = $obj->label_operation;
962  $line->debit = $obj->debit;
963  $line->credit = $obj->credit;
964  $line->montant = $obj->amount; // deprecated
965  $line->amount = $obj->amount;
966  $line->sens = $obj->sens;
967  $line->multicurrency_amount = $obj->multicurrency_amount;
968  $line->multicurrency_code = $obj->multicurrency_code;
969  $line->lettering_code = $obj->lettering_code;
970  $line->date_lettering = $obj->date_lettering;
971  $line->fk_user_author = $obj->fk_user_author;
972  $line->import_key = $obj->import_key;
973  $line->code_journal = $obj->code_journal;
974  $line->journal_label = $obj->journal_label;
975  $line->piece_num = $obj->piece_num;
976  $line->date_creation = $this->db->jdate($obj->date_creation);
977  $line->date_export = $this->db->jdate($obj->date_export);
978  $line->date_validation = $this->db->jdate($obj->date_validation);
979  $line->import_key = $obj->import_key;
980 
981  $this->lines[] = $line;
982 
983  $i++;
984  }
985  }
986  $this->db->free($resql);
987 
988  return $num;
989  } else {
990  $this->errors[] = 'Error '.$this->db->lasterror();
991  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
992 
993  return -1;
994  }
995  }
996 
1009  public function fetchAll($sortorder = '', $sortfield = '', $limit = 0, $offset = 0, array $filter = array(), $filtermode = 'AND', $showAlreadyExportMovements = 1)
1010  {
1011  global $conf;
1012 
1013  dol_syslog(__METHOD__, LOG_DEBUG);
1014 
1015  $sql = 'SELECT';
1016  $sql .= ' t.rowid,';
1017  $sql .= " t.doc_date,";
1018  $sql .= " t.doc_type,";
1019  $sql .= " t.doc_ref,";
1020  $sql .= " t.fk_doc,";
1021  $sql .= " t.fk_docdet,";
1022  $sql .= " t.thirdparty_code,";
1023  $sql .= " t.subledger_account,";
1024  $sql .= " t.subledger_label,";
1025  $sql .= " t.numero_compte,";
1026  $sql .= " t.label_compte,";
1027  $sql .= " t.label_operation,";
1028  $sql .= " t.debit,";
1029  $sql .= " t.credit,";
1030  $sql .= " t.lettering_code,";
1031  $sql .= " t.date_lettering,";
1032  $sql .= " t.montant as amount,";
1033  $sql .= " t.sens,";
1034  $sql .= " t.fk_user_author,";
1035  $sql .= " t.import_key,";
1036  $sql .= " t.code_journal,";
1037  $sql .= " t.journal_label,";
1038  $sql .= " t.piece_num,";
1039  $sql .= " t.date_creation,";
1040  $sql .= " t.date_lim_reglement,";
1041  $sql .= " t.tms as date_modification,";
1042  $sql .= " t.date_export,";
1043  $sql .= " t.date_validated as date_validation";
1044  $sql .= ' FROM '.MAIN_DB_PREFIX.$this->table_element.' as t';
1045  // Manage filter
1046  $sqlwhere = array();
1047  if (count($filter) > 0) {
1048  foreach ($filter as $key => $value) {
1049  if ($key == 't.doc_date') {
1050  $sqlwhere[] = $key.'=\''.$this->db->idate($value).'\'';
1051  } elseif ($key == 't.doc_date>=' || $key == 't.doc_date<=') {
1052  $sqlwhere[] = $key.'\''.$this->db->idate($value).'\'';
1053  } elseif ($key == 't.numero_compte>=' || $key == 't.numero_compte<=' || $key == 't.subledger_account>=' || $key == 't.subledger_account<=') {
1054  $sqlwhere[] = $key.'\''.$this->db->escape($value).'\'';
1055  } elseif ($key == 't.fk_doc' || $key == 't.fk_docdet' || $key == 't.piece_num') {
1056  $sqlwhere[] = $key.'='.((int) $value);
1057  } elseif ($key == 't.subledger_account' || $key == 't.numero_compte') {
1058  $sqlwhere[] = $key.' LIKE \''.$this->db->escape($value).'%\'';
1059  } elseif ($key == 't.date_creation>=' || $key == 't.date_creation<=') {
1060  $sqlwhere[] = $key.'\''.$this->db->idate($value).'\'';
1061  } elseif ($key == 't.tms>=' || $key == 't.tms<=') {
1062  $sqlwhere[] = $key.'\''.$this->db->idate($value).'\'';
1063  } elseif ($key == 't.date_export>=' || $key == 't.date_export<=') {
1064  $sqlwhere[] = $key.'\''.$this->db->idate($value).'\'';
1065  } elseif ($key == 't.date_validated>=' || $key == 't.date_validated<=') {
1066  $sqlwhere[] = $key.'\''.$this->db->idate($value).'\'';
1067  } elseif ($key == 't.credit' || $key == 't.debit') {
1068  $sqlwhere[] = natural_search($key, $value, 1, 1);
1069  } elseif ($key == 't.code_journal' && !empty($value)) {
1070  if (is_array($value)) {
1071  $sqlwhere[] = natural_search("t.code_journal", join(',', $value), 3, 1);
1072  } else {
1073  $sqlwhere[] = natural_search("t.code_journal", $value, 3, 1);
1074  }
1075  } else {
1076  $sqlwhere[] = natural_search($key, $value, 0, 1);
1077  }
1078  }
1079  }
1080  $sql .= ' WHERE t.entity = ' . ((int) $conf->entity); // Do not use getEntity for accounting features
1081  if ($showAlreadyExportMovements == 0) {
1082  $sql .= " AND t.date_export IS NULL";
1083  }
1084  if (count($sqlwhere) > 0) {
1085  $sql .= ' AND '.implode(" ".$filtermode." ", $sqlwhere);
1086  }
1087  if (!empty($sortfield)) {
1088  $sql .= $this->db->order($sortfield, $sortorder);
1089  }
1090  if (!empty($limit)) {
1091  $sql .= $this->db->plimit($limit + 1, $offset);
1092  }
1093  $this->lines = array();
1094 
1095  $resql = $this->db->query($sql);
1096  if ($resql) {
1097  $num = $this->db->num_rows($resql);
1098 
1099  $i = 0;
1100  while (($obj = $this->db->fetch_object($resql)) && (empty($limit) || $i < min($limit, $num))) {
1101  $line = new BookKeepingLine();
1102 
1103  $line->id = $obj->rowid;
1104 
1105  $line->doc_date = $this->db->jdate($obj->doc_date);
1106  $line->doc_type = $obj->doc_type;
1107  $line->doc_ref = $obj->doc_ref;
1108  $line->fk_doc = $obj->fk_doc;
1109  $line->fk_docdet = $obj->fk_docdet;
1110  $line->thirdparty_code = $obj->thirdparty_code;
1111  $line->subledger_account = $obj->subledger_account;
1112  $line->subledger_label = $obj->subledger_label;
1113  $line->numero_compte = $obj->numero_compte;
1114  $line->label_compte = $obj->label_compte;
1115  $line->label_operation = $obj->label_operation;
1116  $line->debit = $obj->debit;
1117  $line->credit = $obj->credit;
1118  $line->montant = $obj->amount; // deprecated
1119  $line->amount = $obj->amount;
1120  $line->sens = $obj->sens;
1121  $line->lettering_code = $obj->lettering_code;
1122  $line->date_lettering = $obj->date_lettering;
1123  $line->fk_user_author = $obj->fk_user_author;
1124  $line->import_key = $obj->import_key;
1125  $line->code_journal = $obj->code_journal;
1126  $line->journal_label = $obj->journal_label;
1127  $line->piece_num = $obj->piece_num;
1128  $line->date_creation = $this->db->jdate($obj->date_creation);
1129  $line->date_lim_reglement = $this->db->jdate($obj->date_lim_reglement);
1130  $line->date_modification = $this->db->jdate($obj->date_modification);
1131  $line->date_export = $this->db->jdate($obj->date_export);
1132  $line->date_validation = $this->db->jdate($obj->date_validation);
1133 
1134  $this->lines[] = $line;
1135 
1136  $i++;
1137  }
1138  $this->db->free($resql);
1139 
1140  return $num;
1141  } else {
1142  $this->errors[] = 'Error '.$this->db->lasterror();
1143  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1144  return -1;
1145  }
1146  }
1147 
1159  public function fetchAllBalance($sortorder = '', $sortfield = '', $limit = 0, $offset = 0, array $filter = array(), $filtermode = 'AND')
1160  {
1161  global $conf;
1162 
1163  $this->lines = array();
1164 
1165  dol_syslog(__METHOD__, LOG_DEBUG);
1166 
1167  $sql = 'SELECT';
1168  $sql .= " t.numero_compte,";
1169  $sql .= " SUM(t.debit) as debit,";
1170  $sql .= " SUM(t.credit) as credit";
1171  $sql .= ' FROM '.MAIN_DB_PREFIX.$this->table_element.' as t';
1172  // Manage filter
1173  $sqlwhere = array();
1174  if (count($filter) > 0) {
1175  foreach ($filter as $key => $value) {
1176  if ($key == 't.doc_date') {
1177  $sqlwhere[] = $key." = '".$this->db->idate($value)."'";
1178  } elseif ($key == 't.doc_date>=' || $key == 't.doc_date<=' || $key == 't.doc_date>' || $key == 't.doc_date<') {
1179  $sqlwhere[] = $key."'".$this->db->idate($value)."'";
1180  } elseif ($key == 't.numero_compte>=' || $key == 't.numero_compte<=' || $key == 't.subledger_account>=' || $key == 't.subledger_account<=') {
1181  $sqlwhere[] = $key."'".$this->db->escape($value)."'";
1182  } elseif ($key == 't.fk_doc' || $key == 't.fk_docdet' || $key == 't.piece_num') {
1183  $sqlwhere[] = $key." = ".((int) $value);
1184  } elseif ($key == 't.subledger_account' || $key == 't.numero_compte') {
1185  $sqlwhere[] = $key." LIKE '".$this->db->escape($value)."%'";
1186  } elseif ($key == 't.subledger_label') {
1187  $sqlwhere[] = $key." LIKE '".$this->db->escape($value)."%'";
1188  } elseif ($key == 't.code_journal' && !empty($value)) {
1189  if (is_array($value)) {
1190  $sqlwhere[] = natural_search("t.code_journal", join(',', $value), 3, 1);
1191  } else {
1192  $sqlwhere[] = natural_search("t.code_journal", $value, 3, 1);
1193  }
1194  } else {
1195  $sqlwhere[] = $key." LIKE '%".$this->db->escape($value)."%'";
1196  }
1197  }
1198  }
1199  $sql .= ' WHERE entity = ' . ((int) $conf->entity); // Do not use getEntity for accounting features
1200  if (count($sqlwhere) > 0) {
1201  $sql .= " AND ".implode(" ".$filtermode." ", $sqlwhere);
1202  }
1203 
1204  $sql .= ' GROUP BY t.numero_compte';
1205 
1206  if (!empty($sortfield)) {
1207  $sql .= $this->db->order($sortfield, $sortorder);
1208  }
1209  if (!empty($limit)) {
1210  $sql .= $this->db->plimit($limit + 1, $offset);
1211  }
1212 
1213  $resql = $this->db->query($sql);
1214  if ($resql) {
1215  $num = $this->db->num_rows($resql);
1216 
1217  $i = 0;
1218  while (($obj = $this->db->fetch_object($resql)) && (empty($limit) || $i < min($limit, $num))) {
1219  $line = new BookKeepingLine();
1220 
1221  $line->numero_compte = $obj->numero_compte;
1222  $line->debit = $obj->debit;
1223  $line->credit = $obj->credit;
1224 
1225  $this->lines[] = $line;
1226 
1227  $i++;
1228  }
1229  $this->db->free($resql);
1230 
1231  return $num;
1232  } else {
1233  $this->errors[] = 'Error '.$this->db->lasterror();
1234  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1235 
1236  return -1;
1237  }
1238  }
1239 
1248  public function update(User $user, $notrigger = false, $mode = '')
1249  {
1250  $error = 0;
1251 
1252  dol_syslog(__METHOD__, LOG_DEBUG);
1253 
1254  // Clean parameters
1255  if (isset($this->doc_type)) {
1256  $this->doc_type = trim($this->doc_type);
1257  }
1258  if (isset($this->doc_ref)) {
1259  $this->doc_ref = trim($this->doc_ref);
1260  }
1261  if (isset($this->fk_doc)) {
1262  $this->fk_doc = (int) $this->fk_doc;
1263  }
1264  if (isset($this->fk_docdet)) {
1265  $this->fk_docdet = (int) $this->fk_docdet;
1266  }
1267  if (isset($this->thirdparty_code)) {
1268  $this->thirdparty_code = trim($this->thirdparty_code);
1269  }
1270  if (isset($this->subledger_account)) {
1271  $this->subledger_account = trim($this->subledger_account);
1272  }
1273  if (isset($this->subledger_label)) {
1274  $this->subledger_label = trim($this->subledger_label);
1275  }
1276  if (isset($this->numero_compte)) {
1277  $this->numero_compte = trim($this->numero_compte);
1278  }
1279  if (isset($this->label_compte)) {
1280  $this->label_compte = trim($this->label_compte);
1281  }
1282  if (isset($this->label_operation)) {
1283  $this->label_operation = trim($this->label_operation);
1284  }
1285  if (isset($this->debit)) {
1286  $this->debit = trim($this->debit);
1287  }
1288  if (isset($this->credit)) {
1289  $this->credit = trim($this->credit);
1290  }
1291  if (isset($this->amount)) {
1292  $this->amount = trim($this->amount);
1293  }
1294  if (isset($this->sens)) {
1295  $this->sens = trim($this->sens);
1296  }
1297  if (isset($this->import_key)) {
1298  $this->import_key = trim($this->import_key);
1299  }
1300  if (isset($this->code_journal)) {
1301  $this->code_journal = trim($this->code_journal);
1302  }
1303  if (isset($this->journal_label)) {
1304  $this->journal_label = trim($this->journal_label);
1305  }
1306  if (isset($this->piece_num)) {
1307  $this->piece_num = trim($this->piece_num);
1308  }
1309 
1310  $this->debit = price2num($this->debit, 'MT');
1311  $this->credit = price2num($this->credit, 'MT');
1312 
1313  // Check parameters
1314  // Put here code to add a control on parameters values
1315 
1316  // Update request
1317  $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element.$mode.' SET';
1318  $sql .= ' doc_date = '.(!isset($this->doc_date) || dol_strlen($this->doc_date) != 0 ? "'".$this->db->idate($this->doc_date)."'" : 'null').',';
1319  $sql .= ' doc_type = '.(isset($this->doc_type) ? "'".$this->db->escape($this->doc_type)."'" : "null").',';
1320  $sql .= ' doc_ref = '.(isset($this->doc_ref) ? "'".$this->db->escape($this->doc_ref)."'" : "null").',';
1321  $sql .= ' fk_doc = '.(isset($this->fk_doc) ? $this->fk_doc : "null").',';
1322  $sql .= ' fk_docdet = '.(isset($this->fk_docdet) ? $this->fk_docdet : "null").',';
1323  $sql .= ' thirdparty_code = '.(isset($this->thirdparty_code) ? "'".$this->db->escape($this->thirdparty_code)."'" : "null").',';
1324  $sql .= ' subledger_account = '.(isset($this->subledger_account) ? "'".$this->db->escape($this->subledger_account)."'" : "null").',';
1325  $sql .= ' subledger_label = '.(isset($this->subledger_label) ? "'".$this->db->escape($this->subledger_label)."'" : "null").',';
1326  $sql .= ' numero_compte = '.(isset($this->numero_compte) ? "'".$this->db->escape($this->numero_compte)."'" : "null").',';
1327  $sql .= ' label_compte = '.(isset($this->label_compte) ? "'".$this->db->escape($this->label_compte)."'" : "null").',';
1328  $sql .= ' label_operation = '.(isset($this->label_operation) ? "'".$this->db->escape($this->label_operation)."'" : "null").',';
1329  $sql .= ' debit = '.(isset($this->debit) ? $this->debit : "null").',';
1330  $sql .= ' credit = '.(isset($this->credit) ? $this->credit : "null").',';
1331  $sql .= ' montant = '.(isset($this->montant) ? $this->montant : "null").',';
1332  $sql .= ' sens = '.(isset($this->sens) ? "'".$this->db->escape($this->sens)."'" : "null").',';
1333  $sql .= ' fk_user_author = '.(isset($this->fk_user_author) ? $this->fk_user_author : "null").',';
1334  $sql .= ' import_key = '.(isset($this->import_key) ? "'".$this->db->escape($this->import_key)."'" : "null").',';
1335  $sql .= ' code_journal = '.(isset($this->code_journal) ? "'".$this->db->escape($this->code_journal)."'" : "null").',';
1336  $sql .= ' journal_label = '.(isset($this->journal_label) ? "'".$this->db->escape($this->journal_label)."'" : "null").',';
1337  $sql .= ' piece_num = '.(isset($this->piece_num) ? $this->piece_num : "null");
1338  $sql .= ' WHERE rowid='.((int) $this->id);
1339 
1340  $this->db->begin();
1341 
1342  $resql = $this->db->query($sql);
1343  if (!$resql) {
1344  $error++;
1345  $this->errors[] = 'Error '.$this->db->lasterror();
1346  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1347  }
1348 
1349  // Uncomment this and change MYOBJECT to your own tag if you
1350  // want this action calls a trigger.
1351  //if (! $error && ! $notrigger) {
1352 
1353  // // Call triggers
1354  // $result=$this->call_trigger('MYOBJECT_MODIFY',$user);
1355  // if ($result < 0) { $error++; //Do also what you must do to rollback action if trigger fail}
1356  // // End call triggers
1357  //}
1358 
1359  // Commit or rollback
1360  if ($error) {
1361  $this->db->rollback();
1362 
1363  return -1 * $error;
1364  } else {
1365  $this->db->commit();
1366 
1367  return 1;
1368  }
1369  }
1370 
1380  public function updateByMvt($piece_num = '', $field = '', $value = '', $mode = '')
1381  {
1382  $error = 0;
1383 
1384  $this->db->begin();
1385 
1386  $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element.$mode;
1387  $sql .= " SET ".$field." = ".(is_numeric($value) ? ((float) $value) : "'".$this->db->escape($value)."'");
1388  $sql .= " WHERE piece_num = ".((int) $piece_num);
1389 
1390  $resql = $this->db->query($sql);
1391 
1392  if (!$resql) {
1393  $error++;
1394  $this->errors[] = 'Error '.$this->db->lasterror();
1395  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1396  }
1397  if ($error) {
1398  $this->db->rollback();
1399 
1400  return -1 * $error;
1401  } else {
1402  $this->db->commit();
1403 
1404  return 1;
1405  }
1406  }
1407 
1416  public function delete(User $user, $notrigger = false, $mode = '')
1417  {
1418  dol_syslog(__METHOD__, LOG_DEBUG);
1419 
1420  $error = 0;
1421 
1422  $this->db->begin();
1423 
1424  // Uncomment this and change MYOBJECT to your own tag if you
1425  // want this action calls a trigger.
1426  //if (! $error && ! $notrigger) {
1427 
1428  // // Call triggers
1429  // $result=$this->call_trigger('MYOBJECT_DELETE',$user);
1430  // if ($result < 0) { $error++; //Do also what you must do to rollback action if trigger fail}
1431  // // End call triggers
1432  //}
1433 
1434  if (!$error) {
1435  $sql = 'DELETE FROM '.MAIN_DB_PREFIX.$this->table_element.$mode;
1436  $sql .= ' WHERE rowid='.((int) $this->id);
1437 
1438  $resql = $this->db->query($sql);
1439  if (!$resql) {
1440  $error++;
1441  $this->errors[] = 'Error '.$this->db->lasterror();
1442  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1443  }
1444  }
1445 
1446  // Commit or rollback
1447  if ($error) {
1448  $this->db->rollback();
1449 
1450  return -1 * $error;
1451  } else {
1452  $this->db->commit();
1453 
1454  return 1;
1455  }
1456  }
1457 
1464  public function deleteByImportkey($importkey)
1465  {
1466  $this->db->begin();
1467 
1468  // first check if line not yet in bookkeeping
1469  $sql = "DELETE";
1470  $sql .= " FROM ".MAIN_DB_PREFIX.$this->table_element;
1471  $sql .= " WHERE import_key = '".$this->db->escape($importkey)."'";
1472 
1473  $resql = $this->db->query($sql);
1474 
1475  if (!$resql) {
1476  $this->errors[] = "Error ".$this->db->lasterror();
1477  dol_syslog(get_class($this)."::delete Error ".$this->db->lasterror(), LOG_ERR);
1478  $this->db->rollback();
1479  return -1;
1480  }
1481 
1482  $this->db->commit();
1483  return 1;
1484  }
1485 
1495  public function deleteByYearAndJournal($delyear = 0, $journal = '', $mode = '', $delmonth = 0)
1496  {
1497  global $conf, $langs;
1498 
1499  if (empty($delyear) && empty($journal)) {
1500  $this->error = 'ErrorOneFieldRequired';
1501  return -1;
1502  }
1503  if (!empty($delmonth) && empty($delyear)) {
1504  $this->error = 'YearRequiredIfMonthDefined';
1505  return -2;
1506  }
1507 
1508  $this->db->begin();
1509 
1510  // Delete record in bookkeeping
1511  $sql = "DELETE";
1512  $sql .= " FROM ".MAIN_DB_PREFIX.$this->table_element.$mode;
1513  $sql .= " WHERE 1 = 1";
1514  $sql .= dolSqlDateFilter('doc_date', 0, $delmonth, $delyear);
1515  if (!empty($journal)) {
1516  $sql .= " AND code_journal = '".$this->db->escape($journal)."'";
1517  }
1518  $sql .= " AND entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
1519  // Exclusion of validated entries at the time of deletion
1520  $sql .= " AND date_validated IS NULL";
1521 
1522  // TODO: In a future we must forbid deletion if record is inside a closed fiscal period.
1523 
1524  $resql = $this->db->query($sql);
1525 
1526  if (!$resql) {
1527  $this->errors[] = "Error ".$this->db->lasterror();
1528  foreach ($this->errors as $errmsg) {
1529  dol_syslog(get_class($this)."::delete ".$errmsg, LOG_ERR);
1530  $this->error .= ($this->error ? ', '.$errmsg : $errmsg);
1531  }
1532  $this->db->rollback();
1533  return -1;
1534  }
1535 
1536  $this->db->commit();
1537  return 1;
1538  }
1539 
1546  public function deleteMvtNum($piecenum)
1547  {
1548  global $conf;
1549 
1550  $this->db->begin();
1551 
1552  // first check if line not yet in bookkeeping
1553  $sql = "DELETE";
1554  $sql .= " FROM ".MAIN_DB_PREFIX.$this->table_element;
1555  $sql .= " WHERE piece_num = ".(int) $piecenum;
1556  $sql .= " AND date_validated IS NULL"; // For security, exclusion of validated entries at the time of deletion
1557  $sql .= " AND entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
1558 
1559  $resql = $this->db->query($sql);
1560 
1561  if (!$resql) {
1562  $this->errors[] = "Error ".$this->db->lasterror();
1563  foreach ($this->errors as $errmsg) {
1564  dol_syslog(get_class($this)."::delete ".$errmsg, LOG_ERR);
1565  $this->error .= ($this->error ? ', '.$errmsg : $errmsg);
1566  }
1567  $this->db->rollback();
1568  return -1;
1569  }
1570 
1571  $this->db->commit();
1572  return 1;
1573  }
1574 
1582  public function createFromClone(User $user, $fromid)
1583  {
1584  dol_syslog(__METHOD__, LOG_DEBUG);
1585 
1586  $error = 0;
1587  $object = new BookKeeping($this->db);
1588 
1589  $this->db->begin();
1590 
1591  // Load source object
1592  $object->fetch($fromid);
1593  // Reset object
1594  $object->id = 0;
1595 
1596  // Clear fields
1597  // ...
1598 
1599  // Create clone
1600  $object->context['createfromclone'] = 'createfromclone';
1601  $result = $object->create($user);
1602 
1603  // Other options
1604  if ($result < 0) {
1605  $error++;
1606  $this->errors = $object->errors;
1607  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1608  }
1609 
1610  unset($object->context['createfromclone']);
1611 
1612  // End
1613  if (!$error) {
1614  $this->db->commit();
1615 
1616  return $object->id;
1617  } else {
1618  $this->db->rollback();
1619 
1620  return -1;
1621  }
1622  }
1623 
1630  public function initAsSpecimen()
1631  {
1632  global $user;
1633 
1634  $now = dol_now();
1635 
1636  $this->id = 0;
1637  $this->doc_date = $now;
1638  $this->doc_type = '';
1639  $this->doc_ref = '';
1640  $this->fk_doc = 0;
1641  $this->fk_docdet = 0;
1642  $this->thirdparty_code = 'CU001';
1643  $this->subledger_account = '41100001';
1644  $this->subledger_label = 'My customer company';
1645  $this->numero_compte = '411';
1646  $this->label_compte = 'Customer';
1647  $this->label_operation = 'Sales of pea';
1648  $this->debit = 99.9;
1649  $this->credit = 0.0;
1650  $this->amount = 0.0;
1651  $this->sens = 'D';
1652  $this->fk_user_author = $user->id;
1653  $this->import_key = '20201027';
1654  $this->code_journal = 'VT';
1655  $this->journal_label = 'Journal de vente';
1656  $this->piece_num = 1234;
1657  $this->date_creation = $now;
1658  }
1659 
1667  public function fetchPerMvt($piecenum, $mode = '')
1668  {
1669  global $conf;
1670 
1671  $sql = "SELECT piece_num, doc_date,code_journal, journal_label, doc_ref, doc_type,";
1672  $sql .= " date_creation, tms as date_modification, date_validated as date_validation";
1673  // In llx_accounting_bookkeeping_tmp, field date_export doesn't exist
1674  if ($mode != "_tmp") {
1675  $sql .= ", date_export";
1676  }
1677  $sql .= " FROM ".MAIN_DB_PREFIX.$this->table_element.$mode;
1678  $sql .= " WHERE piece_num = ".((int) $piecenum);
1679  $sql .= " AND entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
1680 
1681  dol_syslog(__METHOD__, LOG_DEBUG);
1682  $result = $this->db->query($sql);
1683  if ($result) {
1684  $obj = $this->db->fetch_object($result);
1685 
1686  $this->piece_num = $obj->piece_num;
1687  $this->code_journal = $obj->code_journal;
1688  $this->journal_label = $obj->journal_label;
1689  $this->doc_date = $this->db->jdate($obj->doc_date);
1690  $this->doc_ref = $obj->doc_ref;
1691  $this->doc_type = $obj->doc_type;
1692  $this->date_creation = $this->db->jdate($obj->date_creation);
1693  $this->date_modification = $this->db->jdate($obj->date_modification);
1694  if ($mode != "_tmp") {
1695  $this->date_export = $this->db->jdate($obj->date_export);
1696  }
1697  $this->date_validation = $this->db->jdate($obj->date_validation);
1698  } else {
1699  $this->error = "Error ".$this->db->lasterror();
1700  dol_syslog(__METHOD__.$this->error, LOG_ERR);
1701  return -1;
1702  }
1703 
1704  return 1;
1705  }
1706 
1713  public function getNextNumMvt($mode = '')
1714  {
1715  global $conf;
1716 
1717  $sql = "SELECT MAX(piece_num)+1 as max FROM ".MAIN_DB_PREFIX.$this->table_element.$mode;
1718  $sql .= " WHERE entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
1719 
1720  dol_syslog(get_class($this)."::getNextNumMvt", LOG_DEBUG);
1721 
1722  $result = $this->db->query($sql);
1723 
1724  if ($result) {
1725  $obj = $this->db->fetch_object($result);
1726  if ($obj) {
1727  $result = $obj->max;
1728  }
1729  if (empty($result)) {
1730  $result = 1;
1731  }
1732  return $result;
1733  } else {
1734  $this->error = "Error ".$this->db->lasterror();
1735  dol_syslog(get_class($this)."::getNextNumMvt ".$this->error, LOG_ERR);
1736  return -1;
1737  }
1738  }
1739 
1747  public function fetchAllPerMvt($piecenum, $mode = '')
1748  {
1749  global $conf;
1750 
1751  $sql = "SELECT rowid, doc_date, doc_type,";
1752  $sql .= " doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,";
1753  $sql .= " numero_compte, label_compte, label_operation, debit, credit,";
1754  $sql .= " montant as amount, sens, fk_user_author, import_key, code_journal, journal_label, piece_num,";
1755  $sql .= " date_creation, tms as date_modification, date_validated as date_validation";
1756  // In llx_accounting_bookkeeping_tmp, field date_export doesn't exist
1757  if ($mode != "_tmp") {
1758  $sql .= ", date_export";
1759  }
1760  $sql .= " FROM ".MAIN_DB_PREFIX.$this->table_element.$mode;
1761  $sql .= " WHERE piece_num = ".((int) $piecenum);
1762  $sql .= " AND entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
1763 
1764  dol_syslog(__METHOD__, LOG_DEBUG);
1765  $result = $this->db->query($sql);
1766  if ($result) {
1767  while ($obj = $this->db->fetch_object($result)) {
1768  $line = new BookKeepingLine();
1769 
1770  $line->id = $obj->rowid;
1771 
1772  $line->doc_date = $this->db->jdate($obj->doc_date);
1773  $line->doc_type = $obj->doc_type;
1774  $line->doc_ref = $obj->doc_ref;
1775  $line->fk_doc = $obj->fk_doc;
1776  $line->fk_docdet = $obj->fk_docdet;
1777  $line->thirdparty_code = $obj->thirdparty_code;
1778  $line->subledger_account = $obj->subledger_account;
1779  $line->subledger_label = $obj->subledger_label;
1780  $line->numero_compte = $obj->numero_compte;
1781  $line->label_compte = $obj->label_compte;
1782  $line->label_operation = $obj->label_operation;
1783  $line->debit = $obj->debit;
1784  $line->credit = $obj->credit;
1785  $line->montant = $obj->amount;
1786  $line->amount = $obj->amount;
1787  $line->sens = $obj->sens;
1788  $line->code_journal = $obj->code_journal;
1789  $line->journal_label = $obj->journal_label;
1790  $line->piece_num = $obj->piece_num;
1791  $line->date_creation = $obj->date_creation;
1792  $line->date_modification = $obj->date_modification;
1793  if ($mode != "_tmp") {
1794  $line->date_export = $obj->date_export;
1795  }
1796  $line->date_validation = $obj->date_validation;
1797 
1798  $this->linesmvt[] = $line;
1799  }
1800  } else {
1801  $this->error = "Error ".$this->db->lasterror();
1802  dol_syslog(__METHOD__.$this->error, LOG_ERR);
1803  return -1;
1804  }
1805 
1806  return 1;
1807  }
1808 
1809  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
1816  public function export_bookkeeping($model = 'ebp')
1817  {
1818  // phpcs:enable
1819  global $conf;
1820 
1821  $sql = "SELECT rowid, doc_date, doc_type,";
1822  $sql .= " doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,";
1823  $sql .= " numero_compte, label_compte, label_operation, debit, credit,";
1824  $sql .= " montant as amount, sens, fk_user_author, import_key, code_journal, piece_num,";
1825  $sql .= " date_validated as date_validation";
1826  $sql .= " FROM ".MAIN_DB_PREFIX.$this->table_element;
1827  $sql .= " WHERE entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
1828 
1829  dol_syslog(get_class($this)."::export_bookkeeping", LOG_DEBUG);
1830 
1831  $resql = $this->db->query($sql);
1832 
1833  if ($resql) {
1834  $this->linesexport = array();
1835 
1836  $num = $this->db->num_rows($resql);
1837  while ($obj = $this->db->fetch_object($resql)) {
1838  $line = new BookKeepingLine();
1839 
1840  $line->id = $obj->rowid;
1841 
1842  $line->doc_date = $this->db->jdate($obj->doc_date);
1843  $line->doc_type = $obj->doc_type;
1844  $line->doc_ref = $obj->doc_ref;
1845  $line->fk_doc = $obj->fk_doc;
1846  $line->fk_docdet = $obj->fk_docdet;
1847  $line->thirdparty_code = $obj->thirdparty_code;
1848  $line->subledger_account = $obj->subledger_account;
1849  $line->subledger_label = $obj->subledger_label;
1850  $line->numero_compte = $obj->numero_compte;
1851  $line->label_compte = $obj->label_compte;
1852  $line->label_operation = $obj->label_operation;
1853  $line->debit = $obj->debit;
1854  $line->credit = $obj->credit;
1855  $line->montant = $obj->amount;
1856  $line->amount = $obj->amount;
1857  $line->sens = $obj->sens;
1858  $line->code_journal = $obj->code_journal;
1859  $line->piece_num = $obj->piece_num;
1860  $line->date_validation = $obj->date_validation;
1861 
1862  $this->linesexport[] = $line;
1863  }
1864  $this->db->free($resql);
1865 
1866  return $num;
1867  } else {
1868  $this->error = "Error ".$this->db->lasterror();
1869  dol_syslog(get_class($this)."::export_bookkeeping ".$this->error, LOG_ERR);
1870  return -1;
1871  }
1872  }
1873 
1881  public function transformTransaction($direction = 0, $piece_num = '')
1882  {
1883  global $conf;
1884 
1885  $error = 0;
1886 
1887  $this->db->begin();
1888 
1889  if ($direction == 0) {
1890  $next_piecenum = $this->getNextNumMvt();
1891  $now = dol_now();
1892 
1893  if ($next_piecenum < 0) {
1894  $error++;
1895  }
1896 
1897  if (!$error) {
1898  // Delete if there is an empty line
1899  $sql = 'DELETE FROM '.MAIN_DB_PREFIX.$this->table_element.'_tmp WHERE piece_num = '.((int) $piece_num).' AND entity = ' .((int) $conf->entity)." AND numero_compte IS NULL AND debit = 0 AND credit = 0";
1900  $resql = $this->db->query($sql);
1901  if (!$resql) {
1902  $error++;
1903  $this->errors[] = 'Error '.$this->db->lasterror();
1904  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1905  }
1906  }
1907 
1908  if (!$error) {
1909  $sql = 'INSERT INTO '.MAIN_DB_PREFIX.$this->table_element.' (doc_date, doc_type,';
1910  $sql .= ' doc_ref, fk_doc, fk_docdet, entity, thirdparty_code, subledger_account, subledger_label,';
1911  $sql .= ' numero_compte, label_compte, label_operation, debit, credit,';
1912  $sql .= ' montant, sens, fk_user_author, import_key, code_journal, journal_label, piece_num, date_creation)';
1913  $sql .= ' SELECT doc_date, doc_type,';
1914  $sql .= ' doc_ref, fk_doc, fk_docdet, entity, thirdparty_code, subledger_account, subledger_label,';
1915  $sql .= ' numero_compte, label_compte, label_operation, debit, credit,';
1916  $sql .= ' montant, sens, fk_user_author, import_key, code_journal, journal_label, '.((int) $next_piecenum).", '".$this->db->idate($now)."'";
1917  $sql .= ' FROM '.MAIN_DB_PREFIX.$this->table_element.'_tmp WHERE piece_num = '.((int) $piece_num).' AND numero_compte IS NOT NULL AND entity = ' .((int) $conf->entity);
1918  $resql = $this->db->query($sql);
1919  if (!$resql) {
1920  $error++;
1921  $this->errors[] = 'Error '.$this->db->lasterror();
1922  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1923  }
1924  }
1925 
1926  if (!$error) {
1927  $sql = 'DELETE FROM '.MAIN_DB_PREFIX.$this->table_element.'_tmp WHERE piece_num = '.((int) $piece_num).' AND entity = ' .((int) $conf->entity);
1928  $resql = $this->db->query($sql);
1929  if (!$resql) {
1930  $error++;
1931  $this->errors[] = 'Error '.$this->db->lasterror();
1932  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1933  }
1934  }
1935  } elseif ($direction == 1) {
1936  if (!$error) {
1937  $sql = 'DELETE FROM '.MAIN_DB_PREFIX.$this->table_element.'_tmp WHERE piece_num = '.((int) $piece_num).' AND entity = ' .((int) $conf->entity);
1938  $resql = $this->db->query($sql);
1939  if (!$resql) {
1940  $error++;
1941  $this->errors[] = 'Error '.$this->db->lasterror();
1942  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1943  }
1944  }
1945 
1946  if (!$error) {
1947  $sql = 'INSERT INTO '.MAIN_DB_PREFIX.$this->table_element.'_tmp (doc_date, doc_type,';
1948  $sql .= ' doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,';
1949  $sql .= ' numero_compte, label_compte, label_operation, debit, credit,';
1950  $sql .= ' montant, sens, fk_user_author, import_key, code_journal, journal_label, piece_num)';
1951  $sql .= ' SELECT doc_date, doc_type,';
1952  $sql .= ' doc_ref, fk_doc, fk_docdet, thirdparty_code, subledger_account, subledger_label,';
1953  $sql .= ' numero_compte, label_compte, label_operation, debit, credit,';
1954  $sql .= ' montant, sens, fk_user_author, import_key, code_journal, journal_label, piece_num';
1955  $sql .= ' FROM '.MAIN_DB_PREFIX.$this->table_element.' WHERE piece_num = '.((int) $piece_num).' AND entity = ' .((int) $conf->entity);
1956  $resql = $this->db->query($sql);
1957  if (!$resql) {
1958  $error++;
1959  $this->errors[] = 'Error '.$this->db->lasterror();
1960  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1961  }
1962  }
1963 
1964  if (!$error) {
1965  $sql = 'DELETE FROM '.MAIN_DB_PREFIX.$this->table_element.'_tmp WHERE piece_num = '.((int) $piece_num).' AND entity = ' .((int) $conf->entity);
1966  $resql = $this->db->query($sql);
1967  if (!$resql) {
1968  $error++;
1969  $this->errors[] = 'Error '.$this->db->lasterror();
1970  dol_syslog(__METHOD__.' '.join(',', $this->errors), LOG_ERR);
1971  }
1972  }
1973  }
1974  if (!$error) {
1975  $this->db->commit();
1976  return 1;
1977  } else {
1978  $this->db->rollback();
1979  return -1;
1980  }
1981  /*
1982  $sql = "DELETE FROM ";
1983  $sql .= " FROM " . MAIN_DB_PREFIX . "accounting_bookkeeping as ab";
1984  $sql .= " LEFT JOIN " . MAIN_DB_PREFIX . "accounting_account as aa ON aa.account_number = ab.numero_compte";
1985  $sql .= " AND aa.active = 1";
1986  $sql .= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
1987  $sql .= " AND asy.rowid = " . ((int) $pcgver);
1988  $sql .= " AND ab.entity IN (" . getEntity('accountancy') . ")";
1989  $sql .= " ORDER BY account_number ASC";
1990  */
1991  }
1992 
1993  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2006  public function select_account($selectid, $htmlname = 'account', $showempty = 0, $event = array(), $select_in = 0, $select_out = 0, $aabase = '')
2007  {
2008  // phpcs:enable
2009  global $conf;
2010 
2011  require_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
2012 
2013  $pcgver = $conf->global->CHARTOFACCOUNTS;
2014 
2015  $sql = "SELECT DISTINCT ab.numero_compte as account_number, aa.label as label, aa.rowid as rowid, aa.fk_pcg_version";
2016  $sql .= " FROM ".MAIN_DB_PREFIX."accounting_bookkeeping as ab";
2017  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."accounting_account as aa ON aa.account_number = ab.numero_compte";
2018  $sql .= " AND aa.active = 1";
2019  $sql .= " INNER JOIN ".MAIN_DB_PREFIX."accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
2020  $sql .= " AND asy.rowid = ".((int) $pcgver);
2021  $sql .= " AND ab.entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
2022  $sql .= " ORDER BY account_number ASC";
2023 
2024  dol_syslog(get_class($this)."::select_account", LOG_DEBUG);
2025  $resql = $this->db->query($sql);
2026 
2027  if (!$resql) {
2028  $this->error = "Error ".$this->db->lasterror();
2029  dol_syslog(get_class($this)."::select_account ".$this->error, LOG_ERR);
2030  return -1;
2031  }
2032 
2033  $out = ajax_combobox($htmlname, $event);
2034 
2035  $options = array();
2036  $selected = null;
2037 
2038  while ($obj = $this->db->fetch_object($resql)) {
2039  $label = length_accountg($obj->account_number).' - '.$obj->label;
2040 
2041  $select_value_in = $obj->rowid;
2042  $select_value_out = $obj->rowid;
2043 
2044  if ($select_in == 1) {
2045  $select_value_in = $obj->account_number;
2046  }
2047  if ($select_out == 1) {
2048  $select_value_out = $obj->account_number;
2049  }
2050 
2051  // Remember guy's we store in database llx_facturedet the rowid of accounting_account and not the account_number
2052  // Because same account_number can be share between different accounting_system and do have the same meaning
2053  if (($selectid != '') && $selectid == $select_value_in) {
2054  $selected = $select_value_out;
2055  }
2056 
2057  $options[$select_value_out] = $label;
2058  }
2059 
2060  $out .= Form::selectarray($htmlname, $options, $selected, $showempty, 0, 0, '', 0, 0, 0, '', 'maxwidth300');
2061  $this->db->free($resql);
2062  return $out;
2063  }
2064 
2072  public function getRootAccount($account = null)
2073  {
2074  global $conf;
2075  $pcgver = $conf->global->CHARTOFACCOUNTS;
2076 
2077  $sql = "SELECT root.rowid, root.account_number, root.label as label,";
2078  $sql .= " parent.rowid as parent_rowid, parent.account_number as parent_account_number, parent.label as parent_label";
2079  $sql .= " FROM ".MAIN_DB_PREFIX."accounting_account as aa";
2080  $sql .= " INNER JOIN ".MAIN_DB_PREFIX."accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
2081  $sql .= " AND asy.rowid = ".((int) $pcgver);
2082  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."accounting_account as parent ON aa.account_parent = parent.rowid AND parent.active = 1";
2083  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."accounting_account as root ON parent.account_parent = root.rowid AND root.active = 1";
2084  $sql .= " WHERE aa.account_number = '".$this->db->escape($account)."'";
2085  $sql .= " AND aa.entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
2086 
2087  dol_syslog(get_class($this)."::select_account", LOG_DEBUG);
2088  $resql = $this->db->query($sql);
2089  if ($resql) {
2090  $obj = '';
2091  if ($this->db->num_rows($resql)) {
2092  $obj = $this->db->fetch_object($resql);
2093  }
2094 
2095  $result = array('id'=>$obj->rowid, 'account_number'=>$obj->account_number, 'label'=>$obj->label);
2096  return $result;
2097  } else {
2098  $this->error = "Error ".$this->db->lasterror();
2099  dol_syslog(__METHOD__." ".$this->error, LOG_ERR);
2100 
2101  return -1;
2102  }
2103  }
2104 
2105  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2112  public function get_compte_desc($account = null)
2113  {
2114  // phpcs:enable
2115  global $conf;
2116 
2117  $pcgver = $conf->global->CHARTOFACCOUNTS;
2118  $sql = "SELECT aa.account_number, aa.label, aa.rowid, aa.fk_pcg_version, cat.label as category";
2119  $sql .= " FROM ".MAIN_DB_PREFIX."accounting_account as aa ";
2120  $sql .= " INNER JOIN ".MAIN_DB_PREFIX."accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version";
2121  $sql .= " AND aa.account_number = '".$this->db->escape($account)."'";
2122  $sql .= " AND asy.rowid = ".((int) $pcgver);
2123  $sql .= " AND aa.active = 1";
2124  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_accounting_category as cat ON aa.fk_accounting_category = cat.rowid";
2125  $sql .= " WHERE aa.entity = " . ((int) $conf->entity); // Do not use getEntity for accounting features
2126 
2127  dol_syslog(get_class($this)."::select_account", LOG_DEBUG);
2128  $resql = $this->db->query($sql);
2129  if ($resql) {
2130  $obj = '';
2131  if ($this->db->num_rows($resql)) {
2132  $obj = $this->db->fetch_object($resql);
2133  }
2134  if (empty($obj->category)) {
2135  return $obj->label;
2136  } else {
2137  return $obj->label.' ('.$obj->category.')';
2138  }
2139  } else {
2140  $this->error = "Error ".$this->db->lasterror();
2141  dol_syslog(__METHOD__." ".$this->error, LOG_ERR);
2142  return -1;
2143  }
2144  }
2145 }
2146 
2150 class BookKeepingLine
2151 {
2155  public $id;
2156 
2157  public $doc_date = '';
2158  public $doc_type;
2159  public $doc_ref;
2160 
2164  public $fk_doc;
2165 
2169  public $fk_docdet;
2170 
2171  public $thirdparty_code;
2172  public $subledger_account;
2173  public $subledger_label;
2174  public $numero_compte;
2175  public $label_compte;
2176  public $label_operation;
2177  public $debit;
2178  public $credit;
2179 
2184  public $montant;
2185 
2189  public $amount;
2190 
2194  public $multicurrency_amount;
2195 
2199  public $multicurrency_code;
2200 
2204  public $sens;
2205  public $lettering_code;
2206  public $date_lettering;
2207 
2211  public $fk_user_author;
2212 
2213  public $import_key;
2214  public $code_journal;
2215  public $journal_label;
2216  public $piece_num;
2217 
2221  public $date_creation;
2222 
2226  public $date_modification;
2227 
2231  public $date_export;
2232 
2236  public $date_validation;
2237 
2241  public $date_lim_reglement;
2242 }
length_accountg
length_accountg($account)
Return General accounting account with defined length (used for product and miscellaneous)
Definition: accounting.lib.php:94
ajax_combobox
ajax_combobox($htmlname, $events=array(), $minLengthToAutocomplete=0, $forcefocus=0, $widthTypeOfAutocomplete='resolve', $idforemptyvalue='-1', $morecss='')
Convert a html select field into an ajax combobox.
Definition: ajax.lib.php:449
BookKeeping
Class to manage Ledger (General Ledger and Subledger)
Definition: bookkeeping.class.php:34
BookKeeping\create
create(User $user, $notrigger=false)
Create object into database.
Definition: bookkeeping.class.php:205
BookKeeping\createStd
createStd(User $user, $notrigger=false, $mode='')
Create object into database.
Definition: bookkeeping.class.php:545
BookKeeping\deleteByImportkey
deleteByImportkey($importkey)
Delete bookkeeping by importkey.
Definition: bookkeeping.class.php:1464
BookKeeping\getNomUrl
getNomUrl($withpicto=0, $option='', $notooltip=0, $morecss='', $save_lastsearch_value=-1)
Return a link to the object card (with optionally the picto)
Definition: bookkeeping.class.php:469
BookKeeping\select_account
select_account($selectid, $htmlname='account', $showempty=0, $event=array(), $select_in=0, $select_out=0, $aabase='')
Return list of accounts with label by chart of accounts.
Definition: bookkeeping.class.php:2006
BookKeeping\update
update(User $user, $notrigger=false, $mode='')
Update object into database.
Definition: bookkeeping.class.php:1248
BookKeeping\getNextNumMvt
getNextNumMvt($mode='')
Return next number movement.
Definition: bookkeeping.class.php:1713
BookKeeping\get_compte_desc
get_compte_desc($account=null)
Description of accounting account.
Definition: bookkeeping.class.php:2112
BookKeeping\__construct
__construct(DoliDB $db)
Constructor.
Definition: bookkeeping.class.php:193
BookKeeping\createFromClone
createFromClone(User $user, $fromid)
Load an object from its id and create a new one in database.
Definition: bookkeeping.class.php:1582
BookKeeping\getRootAccount
getRootAccount($account=null)
Return id and description of a root accounting account.
Definition: bookkeeping.class.php:2072
BookKeeping\transformTransaction
transformTransaction($direction=0, $piece_num='')
Transform transaction.
Definition: bookkeeping.class.php:1881
BookKeeping\fetchPerMvt
fetchPerMvt($piecenum, $mode='')
Load an accounting document into memory from database.
Definition: bookkeeping.class.php:1667
BookKeeping\updateByMvt
updateByMvt($piece_num='', $field='', $value='', $mode='')
Update accounting movement.
Definition: bookkeeping.class.php:1380
BookKeeping\fetchAllBalance
fetchAllBalance($sortorder='', $sortfield='', $limit=0, $offset=0, array $filter=array(), $filtermode='AND')
Load object in memory from the database.
Definition: bookkeeping.class.php:1159
BookKeeping\deleteMvtNum
deleteMvtNum($piecenum)
Delete bookkeeping by piece number.
Definition: bookkeeping.class.php:1546
BookKeeping\deleteByYearAndJournal
deleteByYearAndJournal($delyear=0, $journal='', $mode='', $delmonth=0)
Delete bookkeeping by year.
Definition: bookkeeping.class.php:1495
BookKeeping\fetchAllByAccount
fetchAllByAccount($sortorder='', $sortfield='', $limit=0, $offset=0, array $filter=array(), $filtermode='AND', $option=0, $countonly=0)
Load object in memory from the database in ->lines.
Definition: bookkeeping.class.php:832
BookKeeping\initAsSpecimen
initAsSpecimen()
Initialise object with example values Id must be 0 if object instance is a specimen.
Definition: bookkeeping.class.php:1630
BookKeeping\fetch
fetch($id, $ref=null, $mode='')
Load object in memory from the database.
Definition: bookkeeping.class.php:725
BookKeeping\fetchAll
fetchAll($sortorder='', $sortfield='', $limit=0, $offset=0, array $filter=array(), $filtermode='AND', $showAlreadyExportMovements=1)
Load object in memory from the database.
Definition: bookkeeping.class.php:1009
BookKeeping\fetchAllPerMvt
fetchAllPerMvt($piecenum, $mode='')
Load all informations of accountancy document.
Definition: bookkeeping.class.php:1747
BookKeeping\export_bookkeeping
export_bookkeeping($model='ebp')
Export bookkeeping.
Definition: bookkeeping.class.php:1816
BookKeepingLine
Class BookKeepingLine.
Definition: bookkeeping.class.php:2151
CommonObject
Parent class of all other business classes (invoices, contracts, proposals, orders,...
Definition: commonobject.class.php:45
DoliDB
Class to manage Dolibarr database access.
Definition: DoliDB.class.php:31
Form\selectarray
static selectarray($htmlname, $array, $id='', $show_empty=0, $key_in_label=0, $value_as_key=0, $moreparam='', $translate=0, $maxlen=0, $disabled=0, $sort='', $morecss='minwidth75', $addjscombo=1, $moreparamonempty='', $disablebademail=0, $nohtmlescape=0)
Return a HTML select string, built from an array of key+value.
Definition: html.form.class.php:8045
User
Class to manage Dolibarr users.
Definition: user.class.php:45
$resql
if(isModEnabled('facture') &&!empty($user->rights->facture->lire)) if((isModEnabled('fournisseur') &&empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD) && $user->hasRight("fournisseur", "facture", "lire"))||(isModEnabled('supplier_invoice') && $user->hasRight("supplier_invoice", "lire"))) if(isModEnabled('don') &&!empty($user->rights->don->lire)) if(isModEnabled('tax') &&!empty($user->rights->tax->charges->lire)) if(isModEnabled('facture') &&isModEnabled('commande') && $user->hasRight("commande", "lire") &&empty($conf->global->WORKFLOW_DISABLE_CREATE_INVOICE_FROM_ORDER)) $resql
Social contributions to pay.
Definition: index.php:745
dolSqlDateFilter
dolSqlDateFilter($datefield, $day_date, $month_date, $year_date, $excludefirstand=0, $gm=false)
Generate a SQL string to make a filter into a range (for second of date until last second of date).
Definition: date.lib.php:358
price2num
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
Definition: functions.lib.php:5786
img_object
img_object($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0)
Show a picto called object_picto (generic function)
Definition: functions.lib.php:4323
natural_search
natural_search($fields, $value, $mode=0, $nofirstand=0)
Generate natural SQL search string for a criteria (this criteria can be tested on one or several fiel...
Definition: functions.lib.php:9724
dol_strlen
dol_strlen($string, $stringencoding='UTF-8')
Make a strlen call.
Definition: functions.lib.php:3852
dol_now
dol_now($mode='auto')
Return date for now.
Definition: functions.lib.php:2916
dol_syslog
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
Definition: functions.lib.php:1611
float
div float
Buy price without taxes.
Definition: style.css.php:913
db
$conf db
API class for accounts.
Definition: inc.php:41
Generated on Wed Jan 4 2023 18:05:10 for dolibarr by Doxygen 1.9.1