dolibarr 20.0.2
fournisseur.facture.class.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2002-2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3 * Copyright (C) 2004-2012 Laurent Destailleur <eldy@users.sourceforge.net>
4 * Copyright (C) 2004 Christophe Combelles <ccomb@free.fr>
5 * Copyright (C) 2005 Marc Barilley <marc@ocebo.com>
6 * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
7 * Copyright (C) 2010-2023 Juanjo Menent <jmenent@simnandez.es>
8 * Copyright (C) 2013-2019 Philippe Grand <philippe.grand@atoo-net.com>
9 * Copyright (C) 2013 Florian Henry <florian.henry@open-concept.pro>
10 * Copyright (C) 2014-2016 Marcos García <marcosgdf@gmail.com>
11 * Copyright (C) 2015 Bahfir Abbes <bafbes@gmail.com>
12 * Copyright (C) 2015-2022 Ferran Marcet <fmarcet@2byte.es>
13 * Copyright (C) 2016-2023 Alexandre Spangaro <aspangaro@open-dsi.fr>
14 * Copyright (C) 2018 Nicolas ZABOURI <info@inovea-conseil.com>
15 * Copyright (C) 2018-2024 Frédéric France <frederic.france@free.fr>
16 * Copyright (C) 2022 Gauthier VERDOL <gauthier.verdol@atm-consulting.fr>
17 * Copyright (C) 2023 Nick Fragoulis
18 * Copyright (C) 2024 MDW <mdeweerd@users.noreply.github.com>
19 *
20 * This program is free software; you can redistribute it and/or modify
21 * it under the terms of the GNU General Public License as published by
22 * the Free Software Foundation; either version 3 of the License, or
23 * (at your option) any later version.
24 *
25 * This program is distributed in the hope that it will be useful,
26 * but WITHOUT ANY WARRANTY; without even the implied warranty of
27 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
28 * GNU General Public License for more details.
29 *
30 * You should have received a copy of the GNU General Public License
31 * along with this program. If not, see <https://www.gnu.org/licenses/>.
32 */
33
40require_once DOL_DOCUMENT_ROOT.'/core/class/commoninvoice.class.php';
41require_once DOL_DOCUMENT_ROOT.'/core/class/commonobjectline.class.php';
42require_once DOL_DOCUMENT_ROOT.'/multicurrency/class/multicurrency.class.php';
43require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.product.class.php';
44
45if (isModEnabled('accounting')) {
46 require_once DOL_DOCUMENT_ROOT.'/core/class/html.formaccounting.class.php';
47 require_once DOL_DOCUMENT_ROOT.'/accountancy/class/accountingaccount.class.php';
48}
49
54{
58 public $element = 'invoice_supplier';
59
63 public $table_element = 'facture_fourn';
64
68 public $table_element_line = 'facture_fourn_det';
69
73 public $fk_element = 'fk_facture_fourn';
74
78 public $picto = 'supplier_invoice';
79
84 public $restrictiononfksoc = 1;
85
89 protected $table_ref_field = 'ref';
90
94 public $rowid;
95
99 public $ref;
100
104 public $ref_supplier;
105
110 public $libelle;
114 public $label;
115
116 //Check constants for types
117 public $type = self::TYPE_STANDARD;
118
125 public $statut;
126
132 public $status;
133
140 public $fk_statut;
141
147 public $paye;
152 public $paid;
153
158 public $author;
159
165 public $datec;
166
172 public $date_echeance;
173
178 public $amount = 0;
183 public $remise = 0;
184
189 public $tva;
190
191 // Warning: Do not set default value into property definition. it must stay null.
192 // For example to avoid to have substitution done when object is generic and not yet defined.
194 public $localtax1;
196 public $localtax2;
198 public $total_ht;
200 public $total_tva;
202 public $total_localtax1;
204 public $total_localtax2;
206 public $total_ttc;
207
213 public $note;
215 public $note_private;
217 public $note_public;
219 public $propalid;
220
224 public $fk_account; // default bank account
225
229 public $transport_mode_id;
230
234 public $vat_reverse_charge;
235
236 public $extraparams = array();
237
242 public $lines = array();
243
248 public $fournisseur;
249
251
254 public $fk_facture_source;
255
257 public $fac_rec;
259 public $fk_fac_rec_source;
260
261 public $fields = array(
262 'rowid' => array('type' => 'integer', 'label' => 'TechnicalID', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 10),
263 'ref' => array('type' => 'varchar(255)', 'label' => 'Ref', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'showoncombobox' => 1, 'position' => 15),
264 'ref_supplier' => array('type' => 'varchar(255)', 'label' => 'RefSupplier', 'enabled' => 1, 'visible' => -1, 'position' => 20),
265 'entity' => array('type' => 'integer', 'label' => 'Entity', 'default' => '1', 'enabled' => 1, 'visible' => -2, 'notnull' => 1, 'position' => 25, 'index' => 1),
266 'ref_ext' => array('type' => 'varchar(255)', 'label' => 'RefExt', 'enabled' => 1, 'visible' => 0, 'position' => 30),
267 'type' => array('type' => 'smallint(6)', 'label' => 'Type', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 35),
268 'subtype' => array('type' => 'smallint(6)', 'label' => 'InvoiceSubtype', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 36),
269 'fk_soc' => array('type' => 'integer:Societe:societe/class/societe.class.php', 'label' => 'ThirdParty', 'enabled' => 'isModEnabled("societe")', 'visible' => -1, 'notnull' => 1, 'position' => 40),
270 'datec' => array('type' => 'datetime', 'label' => 'DateCreation', 'enabled' => 1, 'visible' => -1, 'position' => 45),
271 'datef' => array('type' => 'date', 'label' => 'Date', 'enabled' => 1, 'visible' => -1, 'position' => 50),
272 'tms' => array('type' => 'timestamp', 'label' => 'DateModification', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 55),
273 'libelle' => array('type' => 'varchar(255)', 'label' => 'Label', 'enabled' => 1, 'visible' => -1, 'position' => 60),
274 'paye' => array('type' => 'smallint(6)', 'label' => 'Paye', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 65),
275 'amount' => array('type' => 'double(24,8)', 'label' => 'Amount', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 70),
276 'remise' => array('type' => 'double(24,8)', 'label' => 'Discount', 'enabled' => 1, 'visible' => -1, 'position' => 75),
277 'close_code' => array('type' => 'varchar(16)', 'label' => 'CloseCode', 'enabled' => 1, 'visible' => -1, 'position' => 80),
278 'close_note' => array('type' => 'varchar(128)', 'label' => 'CloseNote', 'enabled' => 1, 'visible' => -1, 'position' => 85),
279 'tva' => array('type' => 'double(24,8)', 'label' => 'Tva', 'enabled' => 1, 'visible' => -1, 'position' => 90),
280 'localtax1' => array('type' => 'double(24,8)', 'label' => 'Localtax1', 'enabled' => 1, 'visible' => -1, 'position' => 95),
281 'localtax2' => array('type' => 'double(24,8)', 'label' => 'Localtax2', 'enabled' => 1, 'visible' => -1, 'position' => 100),
282 'total_ht' => array('type' => 'double(24,8)', 'label' => 'TotalHT', 'enabled' => 1, 'visible' => -1, 'position' => 105),
283 'total_tva' => array('type' => 'double(24,8)', 'label' => 'TotalVAT', 'enabled' => 1, 'visible' => -1, 'position' => 110),
284 'total_ttc' => array('type' => 'double(24,8)', 'label' => 'TotalTTC', 'enabled' => 1, 'visible' => -1, 'position' => 115),
285 'fk_user_author' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserAuthor', 'enabled' => 1, 'visible' => -1, 'position' => 125),
286 'fk_user_modif' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserModif', 'enabled' => 1, 'visible' => -2, 'notnull' => -1, 'position' => 130),
287 'fk_user_valid' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserValidation', 'enabled' => 1, 'visible' => -1, 'position' => 135),
288 'fk_facture_source' => array('type' => 'integer', 'label' => 'Fk facture source', 'enabled' => 1, 'visible' => -1, 'position' => 140),
289 'fk_projet' => array('type' => 'integer:Project:projet/class/project.class.php:1:fk_statut=1', 'label' => 'Project', 'enabled' => "isModEnabled('project')", 'visible' => -1, 'position' => 145),
290 'fk_account' => array('type' => 'integer', 'label' => 'Account', 'enabled' => 'isModEnabled("bank")', 'visible' => -1, 'position' => 150),
291 'fk_cond_reglement' => array('type' => 'integer', 'label' => 'PaymentTerm', 'enabled' => 1, 'visible' => -1, 'position' => 155),
292 'fk_mode_reglement' => array('type' => 'integer', 'label' => 'PaymentMode', 'enabled' => 1, 'visible' => -1, 'position' => 160),
293 'date_lim_reglement' => array('type' => 'date', 'label' => 'DateLimReglement', 'enabled' => 1, 'visible' => -1, 'position' => 165),
294 'note_private' => array('type' => 'html', 'label' => 'NotePrivate', 'enabled' => 1, 'visible' => 0, 'position' => 170),
295 'note_public' => array('type' => 'html', 'label' => 'NotePublic', 'enabled' => 1, 'visible' => 0, 'position' => 175),
296 'model_pdf' => array('type' => 'varchar(255)', 'label' => 'ModelPdf', 'enabled' => 1, 'visible' => 0, 'position' => 180),
297 'extraparams' => array('type' => 'varchar(255)', 'label' => 'Extraparams', 'enabled' => 1, 'visible' => -1, 'position' => 190),
298 'fk_incoterms' => array('type' => 'integer', 'label' => 'IncotermCode', 'enabled' => 1, 'visible' => -1, 'position' => 195),
299 'location_incoterms' => array('type' => 'varchar(255)', 'label' => 'IncotermLocation', 'enabled' => 1, 'visible' => -1, 'position' => 200),
300 'fk_multicurrency' => array('type' => 'integer', 'label' => 'MulticurrencyId', 'enabled' => 1, 'visible' => -1, 'position' => 205),
301 'multicurrency_code' => array('type' => 'varchar(255)', 'label' => 'MulticurrencyCode', 'enabled' => 1, 'visible' => -1, 'position' => 210),
302 'multicurrency_tx' => array('type' => 'double(24,8)', 'label' => 'MulticurrencyRate', 'enabled' => 1, 'visible' => -1, 'position' => 215),
303 'multicurrency_total_ht' => array('type' => 'double(24,8)', 'label' => 'MulticurrencyTotalHT', 'enabled' => 1, 'visible' => -1, 'position' => 220),
304 'multicurrency_total_tva' => array('type' => 'double(24,8)', 'label' => 'MulticurrencyTotalVAT', 'enabled' => 1, 'visible' => -1, 'position' => 225),
305 'multicurrency_total_ttc' => array('type' => 'double(24,8)', 'label' => 'MulticurrencyTotalTTC', 'enabled' => 1, 'visible' => -1, 'position' => 230),
306 'date_pointoftax' => array('type' => 'date', 'label' => 'Date pointoftax', 'enabled' => 1, 'visible' => -1, 'position' => 235),
307 'date_valid' => array('type' => 'date', 'label' => 'DateValidation', 'enabled' => 1, 'visible' => -1, 'position' => 240),
308 'last_main_doc' => array('type' => 'varchar(255)', 'label' => 'Last main doc', 'enabled' => 1, 'visible' => -1, 'position' => 245),
309 'fk_statut' => array('type' => 'smallint(6)', 'label' => 'Status', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 500),
310 'import_key' => array('type' => 'varchar(14)', 'label' => 'ImportId', 'enabled' => 1, 'visible' => -2, 'position' => 900),
311 );
312
313
317 const TYPE_STANDARD = 0;
318
323
328
332 const TYPE_DEPOSIT = 3;
333
337 const STATUS_DRAFT = 0;
338
343
351 const STATUS_CLOSED = 2;
352
361
362 const CLOSECODE_DISCOUNTVAT = 'discount_vat';
363 const CLOSECODE_BADCREDIT = 'badsupplier';
364 const CLOSECODE_ABANDONED = 'abandon';
365 const CLOSECODE_REPLACED = 'replaced';
366
372 public function __construct($db)
373 {
374 $this->db = $db;
375
376 $this->ismultientitymanaged = 1;
377 }
378
385 public function create($user)
386 {
387 global $langs, $conf, $hookmanager;
388
389 $error = 0;
390 $now = dol_now();
391
392 // Clean parameters
393 if (isset($this->ref_supplier)) {
394 $this->ref_supplier = trim($this->ref_supplier);
395 }
396 if (empty($this->type)) {
397 $this->type = self::TYPE_STANDARD;
398 }
399 if (empty($this->date)) {
400 $this->date = $now;
401 }
402
403 // Multicurrency (test on $this->multicurrency_tx because we should take the default rate only if not using origin rate)
404 if (!empty($this->multicurrency_code) && empty($this->multicurrency_tx)) {
405 list($this->fk_multicurrency, $this->multicurrency_tx) = MultiCurrency::getIdAndTxFromCode($this->db, $this->multicurrency_code, $this->date);
406 } else {
407 $this->fk_multicurrency = MultiCurrency::getIdFromCode($this->db, $this->multicurrency_code);
408 }
409 if (empty($this->fk_multicurrency)) {
410 $this->multicurrency_code = $conf->currency;
411 $this->fk_multicurrency = 0;
412 $this->multicurrency_tx = 1;
413 }
414
415 $this->db->begin();
416
417 // Create invoice from a template recurring invoice
418 if ($this->fac_rec > 0) {
419 $this->fk_fac_rec_source = $this->fac_rec;
420
421 require_once DOL_DOCUMENT_ROOT . '/fourn/class/fournisseur.facture-rec.class.php';
422 $_facrec = new FactureFournisseurRec($this->db);
423 $result = $_facrec->fetch($this->fac_rec);
424 $result = $_facrec->fetchObjectLinked(null, '', null, '', 'OR', 1, 'sourcetype', 0); // This load $_facrec->linkedObjectsIds
425
426 // Define some dates
427 if (!empty($_facrec->frequency)) {
428 $originaldatewhen = $_facrec->date_when;
429 $nextdatewhen = dol_time_plus_duree($originaldatewhen, $_facrec->frequency, $_facrec->unit_frequency);
430 $previousdaynextdatewhen = dol_time_plus_duree($nextdatewhen, -1, 'd');
431 $this->socid = $_facrec->socid;
432 } else {
433 $originaldatewhen = 0;
434 $nextdatewhen = 0;
435 $previousdaynextdatewhen = 0;
436 }
437
438 $this->entity = $_facrec->entity; // Invoice created in same entity than template
439
440 // Fields coming from GUI
441 // @TODO Value of template should be used as default value on the form on the GUI, and we should here always use the value from GUI
442 // set by posted page with $object->xxx = ... and this section should be removed.
443 $this->fk_project = GETPOSTINT('projectid') > 0 ? (GETPOSTINT('projectid')) : $_facrec->fk_project;
444 $this->note_public = GETPOST('note_public', 'restricthtml') ? GETPOST('note_public', 'restricthtml') : $_facrec->note_public;
445 $this->note_private = GETPOST('note_private', 'restricthtml') ? GETPOST('note_private', 'restricthtml') : $_facrec->note_private;
446 $this->model_pdf = GETPOST('model', 'alpha') ? GETPOST('model', 'alpha') : $_facrec->model_pdf;
447 $this->cond_reglement_id = GETPOSTINT('cond_reglement_id') > 0 ? (GETPOSTINT('cond_reglement_id')) : $_facrec->cond_reglement_id;
448 $this->mode_reglement_id = GETPOSTINT('mode_reglement_id') > 0 ? (GETPOSTINT('mode_reglement_id')) : $_facrec->mode_reglement_id;
449 $this->fk_account = GETPOST('fk_account') > 0 ? ((int) GETPOST('fk_account')) : $_facrec->fk_account;
450
451 // Set here to have this defined for substitution into notes, should be recalculated after adding lines to get same result
452 $this->total_ht = $_facrec->total_ht;
453 $this->total_ttc = $_facrec->total_ttc;
454
455 // Fields always coming from template
456 $this->fk_incoterms = $_facrec->fk_incoterms;
457 $this->location_incoterms = $_facrec->location_incoterms;
458
459 // Clean parameters
460 if (! $this->type) {
461 $this->type = self::TYPE_STANDARD;
462 }
463 if (!empty(GETPOST('ref_supplier'))) {
464 $this->ref_supplier = trim($this->ref_supplier);
465 } else {
466 $this->ref_supplier = trim($this->ref_supplier . '_' . ($_facrec->nb_gen_done + 1));
467 }
468 $this->note_public = trim($this->note_public);
469 $this->note_private = trim($this->note_private);
470 $this->note_private = dol_concatdesc($this->note_private, $langs->trans("GeneratedFromRecurringInvoice", $_facrec->title));
471
472 $this->array_options = $_facrec->array_options;
473
474 if (! $this->mode_reglement_id) {
475 $this->mode_reglement_id = 0;
476 }
477 $this->status = self::STATUS_DRAFT;
478 $this->statut = self::STATUS_DRAFT; // deprecated
479
480 $this->linked_objects = $_facrec->linkedObjectsIds;
481 // We do not add link to template invoice or next invoice will be linked to all generated invoices
482 //$this->linked_objects['facturerec'][0] = $this->fac_rec;
483
484 $forceduedate = $this->calculate_date_lim_reglement();
485
486 // For recurring invoices, update date and number of last generation of recurring template invoice, before inserting new invoice
487 if ($_facrec->frequency > 0) {
488 dol_syslog("This is a recurring invoice so we set date_last_gen and next date_when");
489 if (empty($_facrec->date_when)) {
490 $_facrec->date_when = $now;
491 }
492 $next_date = $_facrec->getNextDate(); // Calculate next date
493 $result = $_facrec->setValueFrom('date_last_gen', $now, '', 0, 'date', '', $user, '');
494 //$_facrec->setValueFrom('nb_gen_done', $_facrec->nb_gen_done + 1); // Not required, +1 already included into setNextDate when second param is 1.
495 $result = $_facrec->setNextDate($next_date, 1);
496 }
497
498 // Define lang of customer
499 $outputlangs = $langs;
500 $newlang = '';
501
502 if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang) && isset($this->thirdparty->default_lang)) {
503 $newlang = $this->thirdparty->default_lang; // for proposal, order, invoice, ...
504 }
505 if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang) && isset($this->default_lang)) {
506 $newlang = $this->default_lang; // for thirdparty
507 }
508 if (!empty($newlang)) {
509 $outputlangs = new Translate("", $conf);
510 $outputlangs->setDefaultLang($newlang);
511 } // Array of possible substitutions (See also file mailing-send.php that should manage same substitutions)
512 $substitutionarray = getCommonSubstitutionArray($outputlangs, 0, null, $this);
513 $substitutionarray['__INVOICE_PREVIOUS_MONTH__'] = dol_print_date(dol_time_plus_duree($this->date, -1, 'm'), '%m');
514 $substitutionarray['__INVOICE_MONTH__'] = dol_print_date($this->date, '%m');
515 $substitutionarray['__INVOICE_NEXT_MONTH__'] = dol_print_date(dol_time_plus_duree($this->date, 1, 'm'), '%m');
516 $substitutionarray['__INVOICE_PREVIOUS_MONTH_TEXT__'] = dol_print_date(dol_time_plus_duree($this->date, -1, 'm'), '%B');
517 $substitutionarray['__INVOICE_MONTH_TEXT__'] = dol_print_date($this->date, '%B');
518 $substitutionarray['__INVOICE_NEXT_MONTH_TEXT__'] = dol_print_date(dol_time_plus_duree($this->date, 1, 'm'), '%B');
519 $substitutionarray['__INVOICE_PREVIOUS_YEAR__'] = dol_print_date(dol_time_plus_duree($this->date, -1, 'y'), '%Y');
520 $substitutionarray['__INVOICE_YEAR__'] = dol_print_date($this->date, '%Y');
521 $substitutionarray['__INVOICE_NEXT_YEAR__'] = dol_print_date(dol_time_plus_duree($this->date, 1, 'y'), '%Y'); // Only for template invoice
522 $substitutionarray['__INVOICE_DATE_NEXT_INVOICE_BEFORE_GEN__'] = $originaldatewhen ? dol_print_date($originaldatewhen, 'dayhour') : '';
523 $substitutionarray['__INVOICE_DATE_NEXT_INVOICE_AFTER_GEN__'] = $nextdatewhen ? dol_print_date($nextdatewhen, 'dayhour') : '';
524 $substitutionarray['__INVOICE_PREVIOUS_DATE_NEXT_INVOICE_AFTER_GEN__'] = $previousdaynextdatewhen ? dol_print_date($previousdaynextdatewhen, 'dayhour') : '';
525 $substitutionarray['__INVOICE_COUNTER_CURRENT__'] = $_facrec->nb_gen_done;
526 $substitutionarray['__INVOICE_COUNTER_MAX__'] = $_facrec->nb_gen_max;
527
528 complete_substitutions_array($substitutionarray, $outputlangs);
529
530 $this->note_public = make_substitutions($this->note_public, $substitutionarray);
531 $this->note_private = make_substitutions($this->note_private, $substitutionarray);
532 }
533
534 // Define due date if not already defined
535 if (!empty($forceduedate)) {
536 $this->date_echeance = $forceduedate;
537 }
538
539 $sql = "INSERT INTO ".MAIN_DB_PREFIX."facture_fourn (";
540 $sql .= "ref";
541 $sql .= ", ref_supplier";
542 $sql .= ", ref_ext";
543 $sql .= ", entity";
544 $sql .= ", type";
545 $sql .= ", subtype";
546 $sql .= ", libelle";
547 $sql .= ", fk_soc";
548 $sql .= ", datec";
549 $sql .= ", datef";
550 $sql .= ", vat_reverse_charge";
551 $sql .= ", fk_projet";
552 $sql .= ", fk_cond_reglement";
553 $sql .= ", fk_mode_reglement";
554 $sql .= ", fk_account";
555 $sql .= ", note_private";
556 $sql .= ", note_public";
557 $sql .= ", fk_user_author";
558 $sql .= ", date_lim_reglement";
559 $sql .= ", fk_incoterms, location_incoterms";
560 $sql .= ", fk_multicurrency";
561 $sql .= ", multicurrency_code";
562 $sql .= ", multicurrency_tx";
563 $sql .= ", fk_facture_source";
564 $sql .= ", fk_fac_rec_source";
565 $sql .= ")";
566 $sql .= " VALUES (";
567 $sql .= "'(PROV)'";
568 $sql .= ", '".$this->db->escape($this->ref_supplier)."'";
569 $sql .= ", '".$this->db->escape($this->ref_ext)."'";
570 $sql .= ", ".((int) $conf->entity);
571 $sql .= ", '".$this->db->escape($this->type)."'";
572 $sql .= ", ".((int) $this->subtype);
573 $sql .= ", '".$this->db->escape(isset($this->label) ? $this->label : (isset($this->libelle) ? $this->libelle : ''))."'";
574 $sql .= ", ".((int) $this->socid);
575 $sql .= ", '".$this->db->idate($now)."'";
576 $sql .= ", '".$this->db->idate($this->date)."'";
577 $sql .= ", ".($this->vat_reverse_charge != '' ? ((int) $this->db->escape($this->vat_reverse_charge)) : 0);
578 $sql .= ", ".($this->fk_project > 0 ? ((int) $this->fk_project) : "null");
579 $sql .= ", ".($this->cond_reglement_id > 0 ? ((int) $this->cond_reglement_id) : "null");
580 $sql .= ", ".($this->mode_reglement_id > 0 ? ((int) $this->mode_reglement_id) : "null");
581 $sql .= ", ".($this->fk_account > 0 ? ((int) $this->fk_account) : 'NULL');
582 $sql .= ", '".$this->db->escape($this->note_private)."'";
583 $sql .= ", '".$this->db->escape($this->note_public)."'";
584 $sql .= ", ".((int) $user->id).",";
585 $sql .= $this->date_echeance != '' ? "'".$this->db->idate($this->date_echeance)."'" : "null";
586 $sql .= ", ".(int) $this->fk_incoterms;
587 $sql .= ", '".$this->db->escape($this->location_incoterms)."'";
588 $sql .= ", ".(int) $this->fk_multicurrency;
589 $sql .= ", '".$this->db->escape($this->multicurrency_code)."'";
590 $sql .= ", ".(float) $this->multicurrency_tx;
591 $sql .= ", ".($this->fk_facture_source ? ((int) $this->fk_facture_source) : "null");
592 $sql .= ", ".(isset($this->fk_fac_rec_source) ? $this->fk_fac_rec_source : "NULL");
593 $sql .= ")";
594
595 dol_syslog(get_class($this)."::create", LOG_DEBUG);
596 $resql = $this->db->query($sql);
597 if ($resql) {
598 $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX.'facture_fourn');
599
600 // Update ref with new one
601 $this->ref = '(PROV'.$this->id.')';
602 $sql = 'UPDATE '.MAIN_DB_PREFIX."facture_fourn SET ref='".$this->db->escape($this->ref)."' WHERE rowid=".((int) $this->id);
603
604 dol_syslog(get_class($this)."::create", LOG_DEBUG);
605 $resql = $this->db->query($sql);
606 if (!$resql) {
607 $error++;
608 }
609
610 if (!empty($this->linkedObjectsIds) && empty($this->linked_objects)) { // To use new linkedObjectsIds instead of old linked_objects
611 $this->linked_objects = $this->linkedObjectsIds; // TODO Replace linked_objects with linkedObjectsIds
612 }
613
614 // Add object linked
615 if (!$error && $this->id && !empty($this->linked_objects) && is_array($this->linked_objects)) {
616 foreach ($this->linked_objects as $origin => $tmp_origin_id) {
617 if (is_array($tmp_origin_id)) { // New behaviour, if linked_object can have several links per type, so is something like array('contract'=>array(id1, id2, ...))
618 foreach ($tmp_origin_id as $origin_id) {
619 $ret = $this->add_object_linked($origin, $origin_id);
620 if (!$ret) {
621 dol_print_error($this->db);
622 $error++;
623 }
624 }
625 } else { // Old behaviour, if linked_object has only one link per type, so is something like array('contract'=>id1))
626 $origin_id = $tmp_origin_id;
627 $ret = $this->add_object_linked($origin, $origin_id);
628 if (!$ret) {
629 dol_print_error($this->db);
630 $error++;
631 }
632 }
633 }
634 }
635
636 if (!$error && empty($this->fac_rec) && count($this->lines) && is_object($this->lines[0])) { // If this->lines is array of InvoiceLines (preferred mode)
637 dol_syslog("There is ".count($this->lines)." lines that are invoice lines objects");
638 foreach ($this->lines as $i => $val) {
639 $sql = 'INSERT INTO '.MAIN_DB_PREFIX.'facture_fourn_det (fk_facture_fourn, special_code, fk_remise_except)';
640 $sql .= " VALUES (".((int) $this->id).", ".((int) $this->lines[$i]->special_code).", ".($this->lines[$i]->fk_remise_except > 0 ? ((int) $this->lines[$i]->fk_remise_except) : 'NULL').')';
641
642 $resql_insert = $this->db->query($sql);
643 if ($resql_insert) {
644 $idligne = $this->db->last_insert_id(MAIN_DB_PREFIX.'facture_fourn_det');
645
646 $res = $this->updateline(
647 $idligne,
648 $this->lines[$i]->desc ? $this->lines[$i]->desc : $this->lines[$i]->description,
649 $this->lines[$i]->subprice,
650 $this->lines[$i]->tva_tx.($this->lines[$i]->vat_src_code ? ' ('.$this->lines[$i]->vat_src_code.')' : ''),
651 $this->lines[$i]->localtax1_tx,
652 $this->lines[$i]->localtax2_tx,
653 $this->lines[$i]->qty,
654 $this->lines[$i]->fk_product,
655 'HT',
656 (!empty($this->lines[$i]->info_bits) ? $this->lines[$i]->info_bits : ''),
657 $this->lines[$i]->product_type,
658 $this->lines[$i]->remise_percent,
659 false,
660 $this->lines[$i]->date_start,
661 $this->lines[$i]->date_end,
662 $this->lines[$i]->array_options,
663 $this->lines[$i]->fk_unit,
664 $this->lines[$i]->multicurrency_subprice,
665 $this->lines[$i]->ref_supplier
666 );
667 } else {
668 $this->error = $this->db->lasterror();
669 $this->db->rollback();
670 return -5;
671 }
672 }
673 } elseif (!$error && empty($this->fac_rec)) { // If this->lines is an array of invoice line arrays
674 dol_syslog("There is ".count($this->lines)." lines that are array lines");
675 foreach ($this->lines as $i => $val) {
676 $line = $this->lines[$i];
677
678 // Test and convert into object this->lines[$i]. When coming from REST API, we may still have an array
679 //if (! is_object($line)) $line=json_decode(json_encode($line), false); // convert recursively array into object.
680 if (!is_object($line)) {
681 $line = (object) $line;
682 }
683
684 $sql = 'INSERT INTO '.MAIN_DB_PREFIX.'facture_fourn_det (fk_facture_fourn, special_code, fk_remise_except)';
685 $sql .= " VALUES (".((int) $this->id).", ".((int) $this->lines[$i]->special_code).", ".($this->lines[$i]->fk_remise_except > 0 ? ((int) $this->lines[$i]->fk_remise_except) : 'NULL').')';
686
687 $resql_insert = $this->db->query($sql);
688 if ($resql_insert) {
689 $idligne = $this->db->last_insert_id(MAIN_DB_PREFIX.'facture_fourn_det');
690
691 $this->updateline(
692 $idligne,
693 $line->desc ? $line->desc : $line->description,
694 $line->subprice,
695 $line->tva_tx,
696 $line->localtax1_tx,
697 $line->localtax2_tx,
698 $line->qty,
699 $line->fk_product,
700 'HT',
701 (!empty($line->info_bits) ? $line->info_bits : ''),
702 $line->product_type,
703 $line->remise_percent,
704 0,
705 $line->date_start,
706 $line->date_end,
707 $line->array_options,
708 $line->fk_unit,
709 $line->multicurrency_subprice,
710 $line->ref_supplier
711 );
712 } else {
713 $this->error = $this->db->lasterror();
714 $this->db->rollback();
715 return -5;
716 }
717 }
718 }
719
720 /*
721 * Insert lines of template invoices
722 */
723 if (! $error && $this->fac_rec > 0 && $_facrec instanceof FactureFournisseurRec) {
724 foreach ($_facrec->lines as $i => $val) {
725 if ($_facrec->lines[$i]->fk_product) {
726 $prod = new Product($this->db);
727 $res = $prod->fetch($_facrec->lines[$i]->fk_product);
728 }
729
730 // For line from template invoice, we use data from template invoice
731 /*
732 $tva_tx = get_default_tva($mysoc,$soc,$prod->id);
733 $tva_npr = get_default_npr($mysoc,$soc,$prod->id);
734 if (empty($tva_tx)) $tva_npr=0;
735 $localtax1_tx=get_localtax($tva_tx,1,$soc,$mysoc,$tva_npr);
736 $localtax2_tx=get_localtax($tva_tx,2,$soc,$mysoc,$tva_npr);
737 */
738 $tva_tx = $_facrec->lines[$i]->tva_tx . ($_facrec->lines[$i]->vat_src_code ? '(' . $_facrec->lines[$i]->vat_src_code . ')' : '');
739 $tva_npr = $_facrec->lines[$i]->info_bits;
740 if (empty($tva_tx)) {
741 $tva_npr = 0;
742 }
743 $localtax1_tx = $_facrec->lines[$i]->localtax1_tx;
744 $localtax2_tx = $_facrec->lines[$i]->localtax2_tx;
745
746 $fk_product_fournisseur_price = empty($_facrec->lines[$i]->fk_product_fournisseur_price) ? null : $_facrec->lines[$i]->fk_product_fournisseur_price;
747 $buyprice = empty($_facrec->lines[$i]->buyprice) ? 0 : $_facrec->lines[$i]->buyprice;
748
749 // If buyprice not defined from template invoice, we try to guess the best value
750 if (! $buyprice && $_facrec->lines[$i]->fk_product > 0) {
751 require_once DOL_DOCUMENT_ROOT . '/fourn/class/fournisseur.product.class.php';
752 $producttmp = new ProductFournisseur($this->db);
753 $producttmp->fetch($_facrec->lines[$i]->fk_product);
754
755 // If margin module defined on costprice, we try the costprice
756 // If not defined or if module margin defined and pmp and stock module enabled, we try pmp price
757 // else we get the best supplier price
758 if (getDolGlobalString('MARGIN_TYPE') == 'costprice' && !empty($producttmp->cost_price)) {
759 $buyprice = $producttmp->cost_price;
760 } elseif (isModEnabled('stock') && (getDolGlobalString('MARGIN_TYPE') == 'costprice' || getDolGlobalString('MARGIN_TYPE') == 'pmp') && !empty($producttmp->pmp)) {
761 $buyprice = $producttmp->pmp;
762 } else {
763 if ($producttmp->find_min_price_product_fournisseur($_facrec->lines[$i]->fk_product) > 0) {
764 if ($producttmp->product_fourn_price_id > 0) {
765 $buyprice = price2num($producttmp->fourn_unitprice * (1 - $producttmp->fourn_remise_percent / 100) + $producttmp->fourn_remise, 'MU');
766 }
767 }
768 }
769 }
770
771 $result_insert = $this->addline(
772 $_facrec->lines[$i]->desc ? $_facrec->lines[$i]->desc : $_facrec->lines[$i]->description,
773 $_facrec->lines[$i]->pu_ht,
774 $tva_tx,
775 $localtax1_tx,
776 $localtax2_tx,
777 $_facrec->lines[$i]->qty,
778 $_facrec->lines[$i]->fk_product,
779 $_facrec->lines[$i]->remise_percent,
780 ($_facrec->lines[$i]->date_start == 1 && $this->date) ? $this->date : '',
781 ($_facrec->lines[$i]->date_end == 1 && $previousdaynextdatewhen) ? $previousdaynextdatewhen : '',
782 0,
783 $_facrec->lines[$i]->info_bits,
784 'HT',
785 0,
786 $_facrec->lines[$i]->rang,
787 false,
788 $_facrec->lines[$i]->array_options,
789 $_facrec->lines[$i]->fk_unit,
790 0,
791 0,
792 $_facrec->lines[$i]->ref_supplier,
793 $_facrec->lines[$i]->special_code,
794 0,
795 0
796 );
797 if ($result_insert < 0) {
798 $error++;
799 $this->error = $this->db->error();
800 break;
801 }
802 }
803 }
804
805
806 // Update total price
807 $result = $this->update_price(1);
808 if ($result > 0) {
809 // Actions on extra fields
810 if (!$error) {
811 $result = $this->insertExtraFields(); // This also set $this->error or $this->errors if errors are found
812 if ($result < 0) {
813 $error++;
814 }
815 }
816
817 if (!$error) {
818 // Call trigger
819 $result = $this->call_trigger('BILL_SUPPLIER_CREATE', $user);
820 if ($result < 0) {
821 $error++;
822 }
823 // End call triggers
824 }
825
826 if (!$error) {
827 $this->db->commit();
828 return $this->id;
829 } else {
830 $this->db->rollback();
831 return -4;
832 }
833 } else {
834 $this->error = $langs->trans('FailedToUpdatePrice');
835 $this->db->rollback();
836 return -3;
837 }
838 } else {
839 if ($this->db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
840 $this->error = $langs->trans('ErrorRefAlreadyExists');
841 $this->db->rollback();
842 return -1;
843 } else {
844 $this->error = $this->db->lasterror();
845 $this->db->rollback();
846 return -2;
847 }
848 }
849 }
850
859 public function fetch($id = 0, $ref = '', $ref_ext = '')
860 {
861 if (empty($id) && empty($ref) && empty($ref_ext)) {
862 return -1;
863 }
864
865 $sql = "SELECT";
866 $sql .= " t.rowid,";
867 $sql .= " t.ref,";
868 $sql .= " t.ref_supplier,";
869 $sql .= " t.ref_ext,";
870 $sql .= " t.entity,";
871 $sql .= " t.type,";
872 $sql .= " t.subtype,";
873 $sql .= " t.fk_soc,";
874 $sql .= " t.datec,";
875 $sql .= " t.datef,";
876 $sql .= " t.tms,";
877 $sql .= " t.libelle as label,";
878 $sql .= " t.paye,";
879 $sql .= " t.close_code,";
880 $sql .= " t.close_note,";
881 $sql .= " t.tva,";
882 $sql .= " t.localtax1,";
883 $sql .= " t.localtax2,";
884 $sql .= " t.total_ht,";
885 $sql .= " t.total_tva,";
886 $sql .= " t.total_ttc,";
887 $sql .= " t.fk_statut as status,";
888 $sql .= " t.fk_user_author,";
889 $sql .= " t.fk_user_valid,";
890 $sql .= " t.fk_facture_source,";
891 $sql .= " t.vat_reverse_charge,";
892 $sql .= " t.fk_fac_rec_source,";
893 $sql .= " t.fk_projet as fk_project,";
894 $sql .= " t.fk_cond_reglement,";
895 $sql .= " t.fk_account,";
896 $sql .= " t.fk_mode_reglement,";
897 $sql .= " t.date_lim_reglement,";
898 $sql .= " t.note_private,";
899 $sql .= " t.note_public,";
900 $sql .= " t.model_pdf,";
901 $sql .= " t.last_main_doc,";
902 $sql .= " t.import_key,";
903 $sql .= " t.extraparams,";
904 $sql .= " cr.code as cond_reglement_code, cr.libelle as cond_reglement_label, cr.libelle_facture as cond_reglement_doc,";
905 $sql .= " p.code as mode_reglement_code, p.libelle as mode_reglement_label,";
906 $sql .= ' s.nom as socnom, s.rowid as socid,';
907 $sql .= ' t.fk_incoterms, t.location_incoterms,';
908 $sql .= " i.libelle as label_incoterms,";
909 $sql .= ' t.fk_transport_mode,';
910 $sql .= ' t.fk_multicurrency, t.multicurrency_code, t.multicurrency_tx, t.multicurrency_total_ht, t.multicurrency_total_tva, t.multicurrency_total_ttc';
911 $sql .= ' FROM '.MAIN_DB_PREFIX.'facture_fourn as t';
912 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON (t.fk_soc = s.rowid)";
913 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_payment_term as cr ON t.fk_cond_reglement = cr.rowid";
914 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_paiement as p ON t.fk_mode_reglement = p.id";
915 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_incoterms as i ON t.fk_incoterms = i.rowid';
916 if ($id) {
917 $sql .= " WHERE t.rowid = ".((int) $id);
918 } else {
919 $sql .= ' WHERE t.entity IN ('.getEntity('supplier_invoice').')'; // Don't use entity if you use rowid
920 if ($ref) {
921 $sql .= " AND t.ref = '".$this->db->escape($ref)."'";
922 }
923 if ($ref_ext) {
924 $sql .= " AND t.ref_ext = '".$this->db->escape($ref_ext)."'";
925 }
926 }
927
928 dol_syslog(get_class($this)."::fetch", LOG_DEBUG);
929 $resql = $this->db->query($sql);
930 if ($resql) {
931 if ($this->db->num_rows($resql)) {
932 $obj = $this->db->fetch_object($resql);
933
934 $this->id = $obj->rowid;
935 $this->ref = $obj->ref ? $obj->ref : $obj->rowid; // We take rowid if ref is empty for backward compatibility
936
937 $this->ref_supplier = $obj->ref_supplier;
938 $this->ref_ext = $obj->ref_ext;
939 $this->entity = $obj->entity;
940 $this->type = empty($obj->type) ? self::TYPE_STANDARD : $obj->type;
941 $this->subtype = (int) $obj->subtype;
942 $this->socid = $obj->fk_soc;
943 $this->datec = $this->db->jdate($obj->datec);
944 $this->date = $this->db->jdate($obj->datef);
945 //$this->datep = $this->db->jdate($obj->datef);
946 $this->tms = $this->db->jdate($obj->tms);
947 $this->libelle = $obj->label; // deprecated
948 $this->label = $obj->label;
949 $this->paye = $obj->paye;
950 $this->paid = $obj->paye;
951 $this->close_code = $obj->close_code;
952 $this->close_note = $obj->close_note;
953 $this->total_localtax1 = $obj->localtax1;
954 $this->total_localtax2 = $obj->localtax2;
955 $this->total_ht = $obj->total_ht;
956 $this->total_tva = $obj->total_tva;
957 $this->total_ttc = $obj->total_ttc;
958 $this->status = $obj->status;
959 $this->statut = $obj->status; // For backward compatibility
960 $this->fk_statut = $obj->status; // For backward compatibility
961 $this->user_creation_id = $obj->fk_user_author;
962 $this->author = $obj->fk_user_author; // deprecated
963 $this->user_validation_id = $obj->fk_user_valid;
964 $this->fk_facture_source = $obj->fk_facture_source;
965 $this->vat_reverse_charge = empty($obj->vat_reverse_charge) ? 0 : 1;
966 $this->fk_fac_rec_source = $obj->fk_fac_rec_source;
967 $this->fk_project = $obj->fk_project;
968 $this->cond_reglement_id = $obj->fk_cond_reglement;
969 $this->cond_reglement_code = $obj->cond_reglement_code;
970 $this->cond_reglement = $obj->cond_reglement_label; // deprecated
971 $this->cond_reglement_label = $obj->cond_reglement_label;
972 $this->cond_reglement_doc = $obj->cond_reglement_doc;
973 $this->fk_account = $obj->fk_account;
974 $this->mode_reglement_id = $obj->fk_mode_reglement;
975 $this->mode_reglement_code = $obj->mode_reglement_code;
976 $this->mode_reglement = $obj->mode_reglement_label;
977 $this->date_echeance = $this->db->jdate($obj->date_lim_reglement);
978 $this->note = $obj->note_private; // deprecated
979 $this->note_private = $obj->note_private;
980 $this->note_public = $obj->note_public;
981 $this->model_pdf = $obj->model_pdf;
982 $this->last_main_doc = $obj->last_main_doc;
983 $this->import_key = $obj->import_key;
984
985 //Incoterms
986 $this->fk_incoterms = $obj->fk_incoterms;
987 $this->location_incoterms = $obj->location_incoterms;
988 $this->label_incoterms = $obj->label_incoterms;
989 $this->transport_mode_id = $obj->fk_transport_mode;
990
991 // Multicurrency
992 $this->fk_multicurrency = $obj->fk_multicurrency;
993 $this->multicurrency_code = $obj->multicurrency_code;
994 $this->multicurrency_tx = $obj->multicurrency_tx;
995 $this->multicurrency_total_ht = $obj->multicurrency_total_ht;
996 $this->multicurrency_total_tva = $obj->multicurrency_total_tva;
997 $this->multicurrency_total_ttc = $obj->multicurrency_total_ttc;
998
999 $this->extraparams = isset($obj->extraparams) ? (array) json_decode($obj->extraparams, true) : array();
1000
1001 $this->socid = $obj->socid;
1002
1003 // Retrieve all extrafield
1004 // fetch optionals attributes and labels
1005 $this->fetch_optionals();
1006
1007 $result = $this->fetch_lines();
1008 if ($result < 0) {
1009 $this->error = $this->db->lasterror();
1010 return -3;
1011 }
1012 } else {
1013 $this->error = 'Bill with id '.$id.' not found';
1014 dol_syslog(get_class($this).'::fetch '.$this->error);
1015 return 0;
1016 }
1017
1018 $this->db->free($resql);
1019 return 1;
1020 } else {
1021 $this->error = "Error ".$this->db->lasterror();
1022 return -1;
1023 }
1024 }
1025
1026
1027 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
1033 public function fetch_lines()
1034 {
1035 // phpcs:enable
1036 $this->lines = array();
1037
1038 $sql = 'SELECT f.rowid, f.ref as ref_supplier, f.description as line_desc, f.date_start, f.date_end, f.pu_ht, f.pu_ttc, f.qty, f.remise_percent, f.vat_src_code, f.tva_tx';
1039 $sql .= ', f.localtax1_tx, f.localtax2_tx, f.localtax1_type, f.localtax2_type, f.total_localtax1, f.total_localtax2, f.fk_facture_fourn, f.fk_remise_except';
1040 $sql .= ', f.total_ht, f.tva as total_tva, f.total_ttc, f.fk_product, f.product_type, f.info_bits, f.rang, f.special_code, f.fk_parent_line, f.fk_unit';
1041 $sql .= ', p.rowid as product_id, p.ref as product_ref, p.label as label, p.barcode as product_barcode, p.description as product_desc';
1042 $sql .= ', f.fk_code_ventilation, f.fk_multicurrency, f.multicurrency_code, f.multicurrency_subprice, f.multicurrency_total_ht, f.multicurrency_total_tva, f.multicurrency_total_ttc';
1043 $sql .= ' FROM '.MAIN_DB_PREFIX.'facture_fourn_det as f';
1044 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'product as p ON f.fk_product = p.rowid';
1045 $sql .= ' WHERE fk_facture_fourn='.((int) $this->id);
1046 $sql .= ' ORDER BY f.rang, f.rowid';
1047
1048 dol_syslog(get_class($this)."::fetch_lines", LOG_DEBUG);
1049
1050 $resql_rows = $this->db->query($sql);
1051 if ($resql_rows) {
1052 $num_rows = $this->db->num_rows($resql_rows);
1053 if ($num_rows) {
1054 $i = 0;
1055 while ($i < $num_rows) {
1056 $obj = $this->db->fetch_object($resql_rows);
1057
1058 $line = new SupplierInvoiceLine($this->db);
1059
1060 $line->id = $obj->rowid;
1061 $line->rowid = $obj->rowid;
1062 $line->description = $obj->line_desc;
1063 $line->desc = $obj->line_desc;
1064 $line->date_start = $obj->date_start;
1065 $line->date_end = $obj->date_end;
1066 $line->product_ref = $obj->product_ref;
1067 $line->ref = $obj->product_ref;
1068 $line->ref_supplier = $obj->ref_supplier;
1069 $line->libelle = $obj->label;
1070 $line->label = $obj->label;
1071 $line->product_barcode = $obj->product_barcode;
1072 $line->product_desc = $obj->product_desc;
1073 $line->subprice = $obj->pu_ht;
1074 $line->pu_ht = $obj->pu_ht;
1075 $line->pu_ttc = $obj->pu_ttc;
1076 $line->vat_src_code = $obj->vat_src_code;
1077 $line->tva_tx = $obj->tva_tx;
1078 $line->localtax1_tx = $obj->localtax1_tx;
1079 $line->localtax2_tx = $obj->localtax2_tx;
1080 $line->localtax1_type = $obj->localtax1_type;
1081 $line->localtax2_type = $obj->localtax2_type;
1082 $line->qty = $obj->qty;
1083 $line->remise_percent = $obj->remise_percent;
1084 $line->fk_remise_except = $obj->fk_remise_except;
1085 //$line->tva = $obj->total_tva; // deprecated
1086 $line->total_ht = $obj->total_ht;
1087 $line->total_ttc = $obj->total_ttc;
1088 $line->total_tva = $obj->total_tva;
1089 $line->total_localtax1 = $obj->total_localtax1;
1090 $line->total_localtax2 = $obj->total_localtax2;
1091 $line->fk_facture_fourn = $obj->fk_facture_fourn;
1092 $line->fk_product = $obj->fk_product;
1093 $line->product_type = $obj->product_type;
1094 $line->product_label = $obj->label;
1095 $line->info_bits = $obj->info_bits;
1096 $line->fk_parent_line = $obj->fk_parent_line;
1097 $line->special_code = $obj->special_code;
1098 $line->rang = $obj->rang;
1099 $line->fk_unit = $obj->fk_unit;
1100
1101 // Accountancy
1102 $line->fk_accounting_account = $obj->fk_code_ventilation;
1103
1104 // Multicurrency
1105 $line->fk_multicurrency = $obj->fk_multicurrency;
1106 $line->multicurrency_code = $obj->multicurrency_code;
1107 $line->multicurrency_subprice = $obj->multicurrency_subprice;
1108 $line->multicurrency_total_ht = $obj->multicurrency_total_ht;
1109 $line->multicurrency_total_tva = $obj->multicurrency_total_tva;
1110 $line->multicurrency_total_ttc = $obj->multicurrency_total_ttc;
1111
1112 // Extra fields
1113 $line->fetch_optionals();
1114
1115 $this->lines[$i] = $line;
1116
1117 $i++;
1118 }
1119 }
1120 $this->db->free($resql_rows);
1121 return 1;
1122 } else {
1123 $this->error = $this->db->error();
1124 dol_syslog(get_class($this)."::fetch_lines - No lines:{$this->error} Error:{$this->error}", LOG_DEBUG);
1125 return -3;
1126 }
1127 }
1128
1129
1137 public function update($user = null, $notrigger = 0)
1138 {
1139 global $langs;
1140 $error = 0;
1141
1142 // Clean parameters
1143 if (empty($this->type)) {
1144 $this->type = self::TYPE_STANDARD;
1145 }
1146 if (isset($this->ref)) {
1147 $this->ref = trim($this->ref);
1148 }
1149 if (isset($this->ref_supplier)) {
1150 $this->ref_supplier = trim($this->ref_supplier);
1151 }
1152 if (isset($this->ref_ext)) {
1153 $this->ref_ext = trim($this->ref_ext);
1154 }
1155 if (isset($this->entity)) {
1156 $this->entity = (int) $this->entity;
1157 }
1158 if (isset($this->type)) {
1159 $this->type = (int) $this->type;
1160 }
1161 if (isset($this->subtype)) {
1162 $this->subtype = (int) $this->subtype;
1163 }
1164 if (isset($this->socid)) {
1165 $this->socid = (int) $this->socid;
1166 }
1167 if (isset($this->label)) {
1168 $this->label = trim($this->label);
1169 }
1170 if (isset($this->paid)) {
1171 $this->paid = (int) (bool) $this->paye;
1172 $this->paye = $this->paid;
1173 } elseif (isset($this->paye)) {
1174 $this->paid = (int) (bool) $this->paye;
1175 $this->paye = $this->paid;
1176 }
1177 if (isset($this->close_code)) {
1178 $this->close_code = trim($this->close_code);
1179 }
1180 if (isset($this->close_note)) {
1181 $this->close_note = trim($this->close_note);
1182 }
1183 if (empty($this->total_ht)) {
1184 $this->total_ht = 0;
1185 }
1186 if (empty($this->total_tva)) {
1187 $this->total_tva = 0;
1188 }
1189 if (empty($this->total_localtax1)) {
1190 $this->total_localtax1 = 0;
1191 }
1192 if (empty($this->total_localtax2)) {
1193 $this->total_localtax2 = 0;
1194 }
1195 if (isset($this->total_ttc)) {
1196 $this->total_ttc = (float) $this->total_ttc;
1197 }
1198 if (isset($this->status)) {
1199 $this->status = (int) $this->status;
1200 $this->statut = $this->status;
1201 } elseif (isset($this->statut)) {
1202 $this->status = (int) $this->statut;
1203 $this->statut = $this->status;
1204 }
1205 if (isset($this->author)) { // TODO: user_creation_id?
1206 $this->author = (int) $this->author;
1207 }
1208 if (isset($this->fk_user_valid)) {
1209 $this->fk_user_valid = trim($this->fk_user_valid);
1210 }
1211 if (isset($this->fk_facture_source)) {
1212 $this->fk_facture_source = (int) $this->fk_facture_source;
1213 }
1214 if (isset($this->fk_project)) {
1215 if (empty($this->fk_project)) {
1216 $this->fk_project = 0;
1217 } else {
1218 $this->fk_project = (int) $this->fk_project;
1219 }
1220 }
1221 if (isset($this->cond_reglement_id)) {
1222 $this->cond_reglement_id = (int) $this->cond_reglement_id;
1223 }
1224 if (isset($this->note_private)) {
1225 $this->note_private = trim($this->note_private);
1226 $this->note = $this->note_private;
1227 }
1228 if (isset($this->note_public)) {
1229 $this->note_public = trim($this->note_public);
1230 }
1231 if (isset($this->model_pdf)) {
1232 $this->model_pdf = trim($this->model_pdf);
1233 }
1234 if (isset($this->import_key)) {
1235 $this->import_key = trim($this->import_key);
1236 }
1237
1238
1239 // Check parameters
1240 // Put here code to add control on parameters values
1241
1242 // Update request
1243 $sql = "UPDATE ".MAIN_DB_PREFIX."facture_fourn SET";
1244 $sql .= " ref=".(isset($this->ref) ? "'".$this->db->escape($this->ref)."'" : "null").",";
1245 $sql .= " ref_supplier=".(isset($this->ref_supplier) ? "'".$this->db->escape($this->ref_supplier)."'" : "null").",";
1246 $sql .= " ref_ext=".(isset($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : "null").",";
1247 $sql .= " entity=".(isset($this->entity) ? ((int) $this->entity) : "null").",";
1248 $sql .= " type=".(isset($this->type) ? ((int) $this->type) : "null").",";
1249 $sql .= " subtype=".((int) $this->subtype).",";
1250 $sql .= " fk_soc=".(isset($this->socid) ? ((int) $this->socid) : "null").",";
1251 $sql .= " datec=".(dol_strlen($this->datec) != 0 ? "'".$this->db->idate($this->datec)."'" : 'null').",";
1252 $sql .= " datef=".(dol_strlen($this->date) != 0 ? "'".$this->db->idate($this->date)."'" : 'null').",";
1253 if (dol_strlen($this->tms) != 0) {
1254 $sql .= " tms=".(dol_strlen($this->tms) != 0 ? "'".$this->db->idate($this->tms)."'" : 'null').",";
1255 }
1256 $sql .= " libelle=".(isset($this->label) ? "'".$this->db->escape($this->label)."'" : "null").",";
1257 $sql .= " paye=".(isset($this->paid) ? ((int) $this->paid) : "0").",";
1258 $sql .= " close_code=".(isset($this->close_code) ? "'".$this->db->escape($this->close_code)."'" : "null").",";
1259 $sql .= " close_note=".(isset($this->close_note) ? "'".$this->db->escape($this->close_note)."'" : "null").",";
1260 $sql .= " localtax1=".(isset($this->total_localtax1) ? ((float) $this->total_localtax1) : "null").",";
1261 $sql .= " localtax2=".(isset($this->total_localtax2) ? ((float) $this->total_localtax2) : "null").",";
1262 $sql .= " total_ht=".(isset($this->total_ht) ? ((float) $this->total_ht) : "null").",";
1263 $sql .= " total_tva=".(isset($this->total_tva) ? ((float) $this->total_tva) : "null").",";
1264 $sql .= " total_ttc=".(isset($this->total_ttc) ? ((float) $this->total_ttc) : "null").",";
1265 $sql .= " fk_statut=".(isset($this->status) ? ((int) $this->status) : (isset($this->statut) ? ((int) $this->statut) : "null")).",";
1266 $sql .= " fk_user_author=".(isset($this->author) ? ((int) $this->author) : "null").",";
1267 $sql .= " fk_user_valid=".(isset($this->fk_user_valid) ? ((int) $this->fk_user_valid) : "null").",";
1268 $sql .= " fk_facture_source=".($this->fk_facture_source ? ((int) $this->fk_facture_source) : "null").",";
1269 $sql .= " vat_reverse_charge = ".($this->vat_reverse_charge != '' ? ((int) $this->db->escape($this->vat_reverse_charge)) : 0).",";
1270 $sql .= " fk_projet=".(!empty($this->fk_project) ? ((int) $this->fk_project) : "null").",";
1271 $sql .= " fk_cond_reglement=".(isset($this->cond_reglement_id) ? ((int) $this->cond_reglement_id) : "null").",";
1272 $sql .= " date_lim_reglement=".(dol_strlen($this->date_echeance) != 0 ? "'".$this->db->idate($this->date_echeance)."'" : 'null').",";
1273 $sql .= " note_private=".(isset($this->note_private) ? "'".$this->db->escape($this->note_private)."'" : "null").",";
1274 $sql .= " note_public=".(isset($this->note_public) ? "'".$this->db->escape($this->note_public)."'" : "null").",";
1275 $sql .= " model_pdf=".(isset($this->model_pdf) ? "'".$this->db->escape($this->model_pdf)."'" : "null").",";
1276 $sql .= " import_key=".(isset($this->import_key) ? "'".$this->db->escape($this->import_key)."'" : "null");
1277 $sql .= " WHERE rowid=".((int) $this->id);
1278
1279 $this->db->begin();
1280
1281 dol_syslog(get_class($this)."::update", LOG_DEBUG);
1282 $resql = $this->db->query($sql);
1283
1284 if (!$resql) {
1285 $error++;
1286
1287 if ($this->db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
1288 $this->errors[] = $langs->trans('ErrorRefAlreadyExists');
1289 } else {
1290 $this->errors[] = "Error ".$this->db->lasterror();
1291 }
1292 }
1293
1294 if (!$error) {
1295 $result = $this->insertExtraFields();
1296 if ($result < 0) {
1297 $error++;
1298 }
1299 }
1300
1301 if (!$error) {
1302 if (!$notrigger) {
1303 // Call trigger
1304 $result = $this->call_trigger('BILL_SUPPLIER_MODIFY', $user);
1305 if ($result < 0) {
1306 $error++;
1307 }
1308 // End call triggers
1309 }
1310 }
1311
1312 // Commit or rollback
1313 if ($error) {
1314 foreach ($this->errors as $errmsg) {
1315 dol_syslog(get_class($this)."::update ".$errmsg, LOG_ERR);
1316 $this->error .= ($this->error ? ', '.$errmsg : $errmsg);
1317 }
1318 $this->db->rollback();
1319 return -1 * $error;
1320 } else {
1321 $this->db->commit();
1322 return 1;
1323 }
1324 }
1325
1326 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
1333 public function insert_discount($idremise)
1334 {
1335 // phpcs:enable
1336 global $conf, $langs;
1337
1338 include_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php';
1339 include_once DOL_DOCUMENT_ROOT.'/core/class/discount.class.php';
1340
1341 $this->db->begin();
1342
1343 $remise = new DiscountAbsolute($this->db);
1344 $result = $remise->fetch($idremise);
1345
1346 if ($result > 0) {
1347 if ($remise->fk_invoice_supplier) { // Protection against multiple submission
1348 $this->error = $langs->trans("ErrorDiscountAlreadyUsed");
1349 $this->db->rollback();
1350 return -5;
1351 }
1352
1353 $facligne = new SupplierInvoiceLine($this->db);
1354 $facligne->fk_facture_fourn = $this->id;
1355 $facligne->fk_remise_except = $remise->id;
1356 $facligne->desc = $remise->description; // Description ligne
1357 $facligne->vat_src_code = $remise->vat_src_code;
1358 $facligne->tva_tx = $remise->tva_tx;
1359 $facligne->subprice = -$remise->amount_ht;
1360 $facligne->fk_product = 0; // Id produit predefini
1361 $facligne->product_type = 0;
1362 $facligne->qty = 1;
1363 $facligne->remise_percent = 0;
1364 $facligne->rang = -1;
1365 $facligne->info_bits = 2;
1366
1367 if (getDolGlobalString('MAIN_ADD_LINE_AT_POSITION')) {
1368 $facligne->rang = 1;
1369 $linecount = count($this->lines);
1370 for ($ii = 1; $ii <= $linecount; $ii++) {
1371 $this->updateRangOfLine($this->lines[$ii - 1]->id, $ii + 1);
1372 }
1373 }
1374
1375 // Get buy/cost price of invoice that is source of discount
1376 if ($remise->fk_invoice_supplier_source > 0) {
1377 $srcinvoice = new FactureFournisseur($this->db);
1378 $srcinvoice->fetch($remise->fk_invoice_supplier_source);
1379 $totalcostpriceofinvoice = 0;
1380 include_once DOL_DOCUMENT_ROOT.'/core/class/html.formmargin.class.php'; // TODO Move this into commonobject
1381 $formmargin = new FormMargin($this->db);
1382 $arraytmp = $formmargin->getMarginInfosArray($srcinvoice, false);
1383 $facligne->pa_ht = $arraytmp['pa_total'];
1384 }
1385
1386 $facligne->total_ht = -$remise->amount_ht;
1387 $facligne->total_tva = -$remise->amount_tva;
1388 $facligne->total_ttc = -$remise->amount_ttc;
1389
1390 $facligne->multicurrency_subprice = -$remise->multicurrency_subprice;
1391 $facligne->multicurrency_total_ht = -$remise->multicurrency_total_ht;
1392 $facligne->multicurrency_total_tva = -$remise->multicurrency_total_tva;
1393 $facligne->multicurrency_total_ttc = -$remise->multicurrency_total_ttc;
1394
1395 $lineid = $facligne->insert();
1396 if ($lineid > 0) {
1397 $result = $this->update_price(1);
1398 if ($result > 0) {
1399 // Create link between discount and invoice line
1400 $result = $remise->link_to_invoice($lineid, 0);
1401 if ($result < 0) {
1402 $this->error = $remise->error;
1403 $this->db->rollback();
1404 return -4;
1405 }
1406
1407 $this->db->commit();
1408 return 1;
1409 } else {
1410 $this->error = $facligne->error;
1411 $this->db->rollback();
1412 return -1;
1413 }
1414 } else {
1415 $this->error = $facligne->error;
1416 $this->db->rollback();
1417 return -2;
1418 }
1419 } else {
1420 $this->db->rollback();
1421 return -3;
1422 }
1423 }
1424
1425
1433 public function delete(User $user, $notrigger = 0)
1434 {
1435 global $conf;
1436
1437 $rowid = $this->id;
1438
1439 dol_syslog("FactureFournisseur::delete rowid=".$rowid, LOG_DEBUG);
1440
1441 // TODO Test if there is at least on payment. If yes, refuse to delete.
1442
1443 $error = 0;
1444 $this->db->begin();
1445
1446 if (!$error && !$notrigger) {
1447 // Call trigger
1448 $result = $this->call_trigger('BILL_SUPPLIER_DELETE', $user);
1449 if ($result < 0) {
1450 $this->db->rollback();
1451 return -1;
1452 }
1453 // Fin appel triggers
1454 }
1455
1456 if (!$error) {
1457 // If invoice was converted into a discount not yet consumed, we remove discount
1458 $sql = 'DELETE FROM '.MAIN_DB_PREFIX.'societe_remise_except';
1459 $sql .= ' WHERE fk_invoice_supplier_source = '.((int) $rowid);
1460 $sql .= ' AND fk_invoice_supplier_line IS NULL';
1461 $resql = $this->db->query($sql);
1462
1463 // If invoice has consumned discounts
1464 $this->fetch_lines();
1465 $list_rowid_det = array();
1466 foreach ($this->lines as $key => $invoiceline) {
1467 $list_rowid_det[] = $invoiceline->id;
1468 }
1469
1470 // Consumned discounts are freed
1471 if (count($list_rowid_det)) {
1472 $sql = 'UPDATE '.MAIN_DB_PREFIX.'societe_remise_except';
1473 $sql .= ' SET fk_invoice_supplier = NULL, fk_invoice_supplier_line = NULL';
1474 $sql .= ' WHERE fk_invoice_supplier_line IN ('.$this->db->sanitize(implode(',', $list_rowid_det)).')';
1475
1476 dol_syslog(get_class($this)."::delete", LOG_DEBUG);
1477 if (!$this->db->query($sql)) {
1478 $error++;
1479 }
1480 }
1481 }
1482
1483 if (!$error) {
1484 $main = MAIN_DB_PREFIX.'facture_fourn_det';
1485 $ef = $main."_extrafields";
1486 $sqlef = "DELETE FROM $ef WHERE fk_object IN (SELECT rowid FROM ".$main." WHERE fk_facture_fourn = ".((int) $rowid).")";
1487 $resqlef = $this->db->query($sqlef);
1488 $sql = 'DELETE FROM '.MAIN_DB_PREFIX.'facture_fourn_det WHERE fk_facture_fourn = '.((int) $rowid);
1489 dol_syslog(get_class($this)."::delete", LOG_DEBUG);
1490 $resql = $this->db->query($sql);
1491 if ($resqlef && $resql) {
1492 $sql = 'DELETE FROM '.MAIN_DB_PREFIX.'facture_fourn WHERE rowid = '.((int) $rowid);
1493 dol_syslog(get_class($this)."::delete", LOG_DEBUG);
1494 $resql2 = $this->db->query($sql);
1495 if (!$resql2) {
1496 $error++;
1497 }
1498 } else {
1499 $error++;
1500 }
1501 }
1502
1503 if (!$error) {
1504 // Delete linked object
1505 $res = $this->deleteObjectLinked();
1506 if ($res < 0) {
1507 $error++;
1508 }
1509 }
1510
1511 if (!$error) {
1512 // Delete record into ECM index (Note that delete is also done when deleting files with the dol_delete_dir_recursive
1513 $this->deleteEcmFiles(0); // Deleting files physically is done later with the dol_delete_dir_recursive
1514 $this->deleteEcmFiles(1); // Deleting files physically is done later with the dol_delete_dir_recursive
1515
1516 // We remove directory
1517 if ($conf->fournisseur->facture->dir_output) {
1518 include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
1519
1520 $ref = dol_sanitizeFileName($this->ref);
1521 $dir = $conf->fournisseur->facture->dir_output.'/'.get_exdir($this->id, 2, 0, 0, $this, 'invoice_supplier').$ref;
1522 $file = $dir."/".$ref.".pdf";
1523 if (file_exists($file)) {
1524 if (!dol_delete_file($file, 0, 0, 0, $this)) { // For triggers
1525 $this->error = 'ErrorFailToDeleteFile';
1526 $error++;
1527 }
1528 }
1529 if (file_exists($dir)) {
1530 $res = @dol_delete_dir_recursive($dir);
1531
1532 if (!$res) {
1533 $this->error = 'ErrorFailToDeleteDir';
1534 $error++;
1535 }
1536 }
1537 }
1538 }
1539
1540 // Remove extrafields
1541 if (!$error) {
1542 $result = $this->deleteExtraFields();
1543 if ($result < 0) {
1544 $error++;
1545 dol_syslog(get_class($this)."::delete error -4 ".$this->error, LOG_ERR);
1546 }
1547 }
1548
1549 if (!$error) {
1550 dol_syslog(get_class($this)."::delete $this->id by $user->id", LOG_DEBUG);
1551 $this->db->commit();
1552 return 1;
1553 } else {
1554 $this->error = $this->db->lasterror();
1555 $this->db->rollback();
1556 return -$error;
1557 }
1558 }
1559
1560
1561 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
1572 public function set_paid($user, $close_code = '', $close_note = '')
1573 {
1574 // phpcs:enable
1575 dol_syslog(get_class($this)."::set_paid is deprecated, use setPaid instead", LOG_NOTICE);
1576 return $this->setPaid($user, $close_code, $close_note);
1577 }
1578
1587 public function setPaid($user, $close_code = '', $close_note = '')
1588 {
1589 $error = 0;
1590
1591 if ($this->paid != 1) {
1592 $this->db->begin();
1593
1594 $now = dol_now();
1595
1596 dol_syslog("FactureFournisseur::setPaid", LOG_DEBUG);
1597
1598 $sql = 'UPDATE '.MAIN_DB_PREFIX.'facture_fourn SET';
1599 $sql .= ' fk_statut = '.self::STATUS_CLOSED;
1600 if (!$close_code) {
1601 $sql .= ', paye=1';
1602 }
1603 if ($close_code) {
1604 $sql .= ", close_code='".$this->db->escape($close_code)."'";
1605 }
1606 if ($close_note) {
1607 $sql .= ", close_note='".$this->db->escape($close_note)."'";
1608 }
1609 $sql .= ', fk_user_closing = '.((int) $user->id);
1610 $sql .= ", date_closing = '".$this->db->idate($now)."'";
1611 $sql .= ' WHERE rowid = '.((int) $this->id);
1612
1613 $resql = $this->db->query($sql);
1614 if ($resql) {
1615 // Call trigger
1616 $result = $this->call_trigger('BILL_SUPPLIER_PAYED', $user);
1617 if ($result < 0) {
1618 $error++;
1619 }
1620 // End call triggers
1621 } else {
1622 $error++;
1623 $this->error = $this->db->error();
1624 dol_print_error($this->db);
1625 }
1626
1627 if (!$error) {
1628 $this->db->commit();
1629 return 1;
1630 } else {
1631 $this->db->rollback();
1632 return -1;
1633 }
1634 } else {
1635 return 0;
1636 }
1637 }
1638
1639 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
1650 public function set_unpaid($user)
1651 {
1652 // phpcs:enable
1653 dol_syslog(get_class($this)."::set_unpaid is deprecated, use setUnpaid instead", LOG_NOTICE);
1654 return $this->setUnpaid($user);
1655 }
1656
1665 public function setUnpaid($user)
1666 {
1667 $error = 0;
1668
1669 $this->db->begin();
1670
1671 $sql = 'UPDATE '.MAIN_DB_PREFIX.'facture_fourn';
1672 $sql .= ' SET paye=0, fk_statut='.self::STATUS_VALIDATED.', close_code=null, close_note=null,';
1673 $sql .= ' date_closing=null,';
1674 $sql .= ' fk_user_closing=null';
1675 $sql .= ' WHERE rowid = '.((int) $this->id);
1676
1677 dol_syslog(get_class($this)."::set_unpaid", LOG_DEBUG);
1678 $resql = $this->db->query($sql);
1679 if ($resql) {
1680 // Call trigger
1681 $result = $this->call_trigger('BILL_SUPPLIER_UNPAYED', $user);
1682 if ($result < 0) {
1683 $error++;
1684 }
1685 // End call triggers
1686 } else {
1687 $error++;
1688 $this->error = $this->db->error();
1689 dol_print_error($this->db);
1690 }
1691
1692 if (!$error) {
1693 $this->db->commit();
1694 return 1;
1695 } else {
1696 $this->db->rollback();
1697 return -1;
1698 }
1699 }
1700
1711 public function setCanceled($user, $close_code = '', $close_note = '')
1712 {
1713 dol_syslog(get_class($this)."::setCanceled rowid=".((int) $this->id), LOG_DEBUG);
1714
1715 $this->db->begin();
1716
1717 $sql = 'UPDATE '.MAIN_DB_PREFIX.'facture_fourn SET';
1718 $sql .= ' fk_statut='.self::STATUS_ABANDONED;
1719 if ($close_code) {
1720 $sql .= ", close_code='".$this->db->escape($close_code)."'";
1721 }
1722 if ($close_note) {
1723 $sql .= ", close_note='".$this->db->escape($close_note)."'";
1724 }
1725 $sql .= " WHERE rowid = ".((int) $this->id);
1726
1727 $resql = $this->db->query($sql);
1728 if ($resql) {
1729 // Bound discounts are deducted from the invoice
1730 // as they have not been used since the invoice is abandoned.
1731 $sql = 'UPDATE '.MAIN_DB_PREFIX.'societe_remise_except';
1732 $sql .= ' SET fk_invoice_supplier = NULL';
1733 $sql .= ' WHERE fk_invoice_supplier = '.((int) $this->id);
1734
1735 $resql = $this->db->query($sql);
1736 if ($resql) {
1737 // Call trigger
1738 $result = $this->call_trigger('BILL_SUPPLIER_CANCEL', $user);
1739 if ($result < 0) {
1740 $this->db->rollback();
1741 return -1;
1742 }
1743 // End call triggers
1744
1745 $this->db->commit();
1746 return 1;
1747 } else {
1748 $this->error = $this->db->error()." sql=".$sql;
1749 $this->db->rollback();
1750 return -1;
1751 }
1752 } else {
1753 $this->error = $this->db->error()." sql=".$sql;
1754 $this->db->rollback();
1755 return -2;
1756 }
1757 }
1758
1768 public function validate($user, $force_number = '', $idwarehouse = 0, $notrigger = 0)
1769 {
1770 global $mysoc, $conf, $langs;
1771
1772 require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
1773
1774 $now = dol_now();
1775
1776 $error = 0;
1777 dol_syslog(get_class($this).'::validate user='.$user->id.', force_number='.$force_number.', idwarehouse='.$idwarehouse);
1778
1779 // Force to have object complete for checks
1780 $this->fetch_thirdparty();
1781 $this->fetch_lines();
1782
1783 // Check parameters
1784 if ($this->status > self::STATUS_DRAFT) { // This is to avoid to validate twice (avoid errors on logs and stock management)
1785 dol_syslog(get_class($this)."::validate no draft status", LOG_WARNING);
1786 return 0;
1787 }
1788 if (preg_match('/^'.preg_quote($langs->trans("CopyOf").' ').'/', $this->ref_supplier)) {
1789 $langs->load("errors");
1790 $this->error = $langs->trans("ErrorFieldFormat", $langs->transnoentities("RefSupplier")).'. '.$langs->trans('RemoveString', $langs->transnoentitiesnoconv("CopyOf"));
1791 return -1;
1792 }
1793 if (count($this->lines) <= 0) {
1794 $langs->load("errors");
1795 $this->error = $langs->trans("ErrorObjectMustHaveLinesToBeValidated", $this->ref);
1796 return -1;
1797 }
1798
1799 // Check for mandatory fields in thirdparty (defined into setup)
1800 if (!empty($this->thirdparty) && is_object($this->thirdparty)) {
1801 $array_to_check = array('IDPROF1', 'IDPROF2', 'IDPROF3', 'IDPROF4', 'IDPROF5', 'IDPROF6', 'EMAIL', 'ACCOUNTANCY_CODE_SUPPLIER');
1802 foreach ($array_to_check as $key) {
1803 $keymin = strtolower($key);
1804 if ($keymin == 'accountancy_code_supplier') {
1805 $keymin = 'code_compta_fournisseur';
1806 }
1807 if (!property_exists($this->thirdparty, $keymin)) {
1808 continue;
1809 }
1810 $vallabel = $this->thirdparty->$keymin;
1811
1812 $i = (int) preg_replace('/[^0-9]/', '', $key);
1813 if ($i > 0) {
1814 if ($this->thirdparty->isACompany()) {
1815 // Check for mandatory prof id (but only if country is other than ours)
1816 if ($mysoc->country_id > 0 && $this->thirdparty->country_id == $mysoc->country_id) {
1817 $idprof_mandatory = 'SOCIETE_'.$key.'_INVOICE_MANDATORY';
1818 if (!$vallabel && getDolGlobalString($idprof_mandatory)) {
1819 $langs->load("errors");
1820 $this->error = $langs->trans('ErrorProdIdIsMandatory', $langs->transcountry('ProfId'.$i, $this->thirdparty->country_code)).' ('.$langs->trans("ForbiddenBySetupRules").') ['.$langs->trans('Company').' : '.$this->thirdparty->name.']';
1821 dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
1822 return -1;
1823 }
1824 }
1825 }
1826 } else {
1827 if ($key == 'EMAIL') {
1828 // Check for mandatory
1829 if (getDolGlobalString('SOCIETE_EMAIL_INVOICE_MANDATORY') && !isValidEmail($this->thirdparty->email)) {
1830 $langs->load("errors");
1831 $this->error = $langs->trans("ErrorBadEMail", $this->thirdparty->email).' ('.$langs->trans("ForbiddenBySetupRules").') ['.$langs->trans('Company').' : '.$this->thirdparty->name.']';
1832 dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
1833 return -1;
1834 }
1835 } elseif ($key == 'ACCOUNTANCY_CODE_SUPPLIER') {
1836 // Check for mandatory
1837 if (getDolGlobalString('SOCIETE_ACCOUNTANCY_CODE_SUPPLIER_INVOICE_MANDATORY') && empty($this->thirdparty->code_compta_fournisseur)) {
1838 $langs->load("errors");
1839 $this->error = $langs->trans("ErrorAccountancyCodeSupplierIsMandatory", $this->thirdparty->name).' ('.$langs->trans("ForbiddenBySetupRules").')';
1840 dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
1841 return -1;
1842 }
1843 }
1844 }
1845 }
1846 }
1847
1848 $this->db->begin();
1849
1850 // Define new ref
1851 if ($force_number) {
1852 $num = $force_number;
1853 } elseif (preg_match('/^[\‍(]?PROV/i', $this->ref) || empty($this->ref)) { // empty should not happened, but when it occurs, the test save life
1854 $num = $this->getNextNumRef($this->thirdparty);
1855 } else {
1856 $num = $this->ref;
1857 }
1858 $this->newref = dol_sanitizeFileName($num);
1859
1860 $sql = "UPDATE ".MAIN_DB_PREFIX."facture_fourn";
1861 $sql .= " SET ref='".$this->db->escape($num)."', fk_statut = 1, fk_user_valid = ".((int) $user->id).", date_valid = '".$this->db->idate($now)."'";
1862 $sql .= " WHERE rowid = ".((int) $this->id);
1863
1864 dol_syslog(get_class($this)."::validate", LOG_DEBUG);
1865 $resql = $this->db->query($sql);
1866 if ($resql) {
1867 // Si on incrémente le produit principal et ses composants à la validation de facture fournisseur
1868 if (!$error && isModEnabled('stock') && getDolGlobalString('STOCK_CALCULATE_ON_SUPPLIER_BILL')) {
1869 require_once DOL_DOCUMENT_ROOT.'/product/stock/class/mouvementstock.class.php';
1870 $langs->load("agenda");
1871
1872 $cpt = count($this->lines);
1873 for ($i = 0; $i < $cpt; $i++) {
1874 if ($this->lines[$i]->fk_product > 0) {
1875 $mouvP = new MouvementStock($this->db);
1876 $mouvP->origin = &$this;
1877 $mouvP->setOrigin($this->element, $this->id);
1878 // We increase stock for product
1879 $up_ht_disc = $this->lines[$i]->subprice;
1880 if (!empty($this->lines[$i]->remise_percent) && !getDolGlobalString('STOCK_EXCLUDE_DISCOUNT_FOR_PMP')) {
1881 $up_ht_disc = price2num($up_ht_disc * (100 - $this->lines[$i]->remise_percent) / 100, 'MU');
1882 }
1884 $result = $mouvP->livraison($user, $this->lines[$i]->fk_product, $idwarehouse, $this->lines[$i]->qty, $up_ht_disc, $langs->trans("InvoiceValidatedInDolibarr", $num));
1885 } else {
1886 $result = $mouvP->reception($user, $this->lines[$i]->fk_product, $idwarehouse, $this->lines[$i]->qty, $up_ht_disc, $langs->trans("InvoiceValidatedInDolibarr", $num));
1887 }
1888 if ($result < 0) {
1889 $this->error = $mouvP->error;
1890 if (count($mouvP->errors)) {
1891 $this->errors = $mouvP->errors;
1892 }
1893 return -2;
1894 }
1895 }
1896 }
1897 }
1898
1899 // Triggers call
1900 if (!$error && empty($notrigger)) {
1901 // Call trigger
1902 $result = $this->call_trigger('BILL_SUPPLIER_VALIDATE', $user);
1903 if ($result < 0) {
1904 $error++;
1905 }
1906 // End call triggers
1907 }
1908
1909 if (!$error) {
1910 $this->oldref = $this->ref;
1911
1912 // Rename directory if dir was a temporary ref
1913 if (preg_match('/^[\‍(]?PROV/i', $this->ref)) {
1914 // Now we rename also files into index
1915 $sql = 'UPDATE '.MAIN_DB_PREFIX."ecm_files set filename = CONCAT('".$this->db->escape($this->newref)."', SUBSTR(filename, ".(strlen($this->ref) + 1).")), filepath = 'fournisseur/facture/".get_exdir($this->id, 2, 0, 0, $this, 'invoice_supplier').$this->db->escape($this->newref)."'";
1916 $sql .= " WHERE filename LIKE '".$this->db->escape($this->ref)."%' AND filepath = 'fournisseur/facture/".get_exdir($this->id, 2, 0, 0, $this, 'invoice_supplier').$this->db->escape($this->ref)."' and entity = ".$conf->entity;
1917 $resql = $this->db->query($sql);
1918 if (!$resql) {
1919 $error++;
1920 $this->error = $this->db->lasterror();
1921 }
1922 $sql = 'UPDATE '.MAIN_DB_PREFIX."ecm_files set filepath = 'fournisseur/facture/".get_exdir($this->id, 2, 0, 0, $this, 'invoice_supplier').$this->db->escape($this->newref)."'";
1923 $sql .= " WHERE filepath = 'fournisseur/facture/".get_exdir($this->id, 2, 0, 0, $this, 'invoice_supplier').$this->db->escape($this->ref)."' and entity = ".$conf->entity;
1924 $resql = $this->db->query($sql);
1925 if (!$resql) {
1926 $error++;
1927 $this->error = $this->db->lasterror();
1928 }
1929
1930 // We rename directory ($this->ref = old ref, $num = new ref) in order not to lose the attachments
1931 $oldref = dol_sanitizeFileName($this->ref);
1932 $dirsource = $conf->fournisseur->facture->dir_output.'/'.get_exdir($this->id, 2, 0, 0, $this, 'invoice_supplier').$oldref;
1933 $dirdest = $conf->fournisseur->facture->dir_output.'/'.get_exdir($this->id, 2, 0, 0, $this, 'invoice_supplier').$this->newref;
1934 if (!$error && file_exists($dirsource)) {
1935 dol_syslog(get_class($this)."::validate rename dir ".$dirsource." into ".$dirdest);
1936
1937 if (@rename($dirsource, $dirdest)) {
1938 dol_syslog("Rename ok");
1939 // Rename docs starting with $oldref with $this->newref
1940 $listoffiles = dol_dir_list($conf->fournisseur->facture->dir_output.'/'.get_exdir($this->id, 2, 0, 0, $this, 'invoice_supplier').$this->newref, 'files', 1, '^'.preg_quote($oldref, '/'));
1941 foreach ($listoffiles as $fileentry) {
1942 $dirsource = $fileentry['name'];
1943 $dirdest = preg_replace('/^'.preg_quote($oldref, '/').'/', $this->newref, $dirsource);
1944 $dirsource = $fileentry['path'].'/'.$dirsource;
1945 $dirdest = $fileentry['path'].'/'.$dirdest;
1946 @rename($dirsource, $dirdest);
1947 }
1948 }
1949 }
1950 }
1951 }
1952
1953 // Set new ref and define current statut
1954 if (!$error) {
1955 $this->ref = $this->newref;
1958 //$this->date_validation=$now; this is stored into log table
1959 }
1960
1961 if (!$error) {
1962 $this->db->commit();
1963 return 1;
1964 } else {
1965 $this->db->rollback();
1966 return -1;
1967 }
1968 } else {
1969 $this->error = $this->db->error();
1970 $this->db->rollback();
1971 return -1;
1972 }
1973 }
1974
1983 public function setDraft($user, $idwarehouse = -1, $notrigger = 0)
1984 {
1985 // phpcs:enable
1986 global $conf, $langs;
1987
1988 $error = 0;
1989
1990 if ($this->status == self::STATUS_DRAFT) {
1991 dol_syslog(__METHOD__." already draft status", LOG_WARNING);
1992 return 0;
1993 }
1994
1995 dol_syslog(__METHOD__, LOG_DEBUG);
1996
1997 $this->db->begin();
1998
1999 $sql = "UPDATE ".MAIN_DB_PREFIX."facture_fourn";
2000 $sql .= " SET fk_statut = ".self::STATUS_DRAFT;
2001 $sql .= " WHERE rowid = ".((int) $this->id);
2002
2003 $result = $this->db->query($sql);
2004 if ($result) {
2005 if (!$error) {
2006 $this->oldcopy = clone $this;
2007 }
2008
2009 // Si on incremente le produit principal et ses composants a la validation de facture fournisseur, on decremente
2010 if ($result >= 0 && isModEnabled('stock') && getDolGlobalString('STOCK_CALCULATE_ON_SUPPLIER_BILL')) {
2011 require_once DOL_DOCUMENT_ROOT.'/product/stock/class/mouvementstock.class.php';
2012 $langs->load("agenda");
2013
2014 $cpt = count($this->lines);
2015 for ($i = 0; $i < $cpt; $i++) {
2016 if ($this->lines[$i]->fk_product > 0) {
2017 $mouvP = new MouvementStock($this->db);
2018 $mouvP->origin = &$this;
2019 $mouvP->setOrigin($this->element, $this->id);
2020 // We increase stock for product
2022 $result = $mouvP->reception($user, $this->lines[$i]->fk_product, $idwarehouse, $this->lines[$i]->qty, $this->lines[$i]->subprice, $langs->trans("InvoiceBackToDraftInDolibarr", $this->ref));
2023 } else {
2024 $result = $mouvP->livraison($user, $this->lines[$i]->fk_product, $idwarehouse, $this->lines[$i]->qty, $this->lines[$i]->subprice, $langs->trans("InvoiceBackToDraftInDolibarr", $this->ref));
2025 }
2026 }
2027 }
2028 }
2029 // Triggers call
2030 if (!$error && empty($notrigger)) {
2031 // Call trigger
2032 $result = $this->call_trigger('BILL_SUPPLIER_UNVALIDATE', $user);
2033 if ($result < 0) {
2034 $error++;
2035 }
2036 // End call triggers
2037 }
2038 if ($error == 0) {
2039 $this->db->commit();
2040 return 1;
2041 } else {
2042 $this->db->rollback();
2043 return -1;
2044 }
2045 } else {
2046 $this->error = $this->db->error();
2047 $this->db->rollback();
2048 return -1;
2049 }
2050 }
2051
2052
2086 public function addline($desc, $pu, $txtva, $txlocaltax1, $txlocaltax2, $qty, $fk_product = 0, $remise_percent = 0, $date_start = 0, $date_end = 0, $fk_code_ventilation = 0, $info_bits = 0, $price_base_type = 'HT', $type = 0, $rang = -1, $notrigger = 0, $array_options = [], $fk_unit = null, $origin_id = 0, $pu_devise = 0, $ref_supplier = '', $special_code = 0, $fk_parent_line = 0, $fk_remise_except = 0)
2087 {
2088 global $langs, $mysoc;
2089
2090 dol_syslog(get_class($this)."::addline $desc,$pu,$qty,$txtva,$fk_product,$remise_percent,$date_start,$date_end,$fk_code_ventilation,$info_bits,$price_base_type,$type,$fk_unit,fk_remise_except=$fk_remise_except", LOG_DEBUG);
2091 include_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php';
2092
2093 if ($this->status == self::STATUS_DRAFT) {
2094 // Clean parameters
2095 if (empty($remise_percent)) {
2096 $remise_percent = 0;
2097 }
2098 if (empty($qty)) {
2099 $qty = 0;
2100 }
2101 if (empty($info_bits)) {
2102 $info_bits = 0;
2103 }
2104 if (empty($rang)) {
2105 $rang = 0;
2106 }
2107 if (empty($fk_code_ventilation)) {
2108 $fk_code_ventilation = 0;
2109 }
2110 if (empty($txtva)) {
2111 $txtva = 0;
2112 }
2113 if (empty($txlocaltax1)) {
2114 $txlocaltax1 = 0;
2115 }
2116 if (empty($txlocaltax2)) {
2117 $txlocaltax2 = 0;
2118 }
2119
2120 $remise_percent = price2num($remise_percent);
2121 $qty = price2num($qty);
2122 $pu = price2num($pu);
2123 if (!preg_match('/\‍((.*)\‍)/', (string) $txtva)) {
2124 $txtva = price2num($txtva); // $txtva can have format '5,1' or '5.1' or '5.1(XXX)', we must clean only if '5,1'
2125 }
2126 $txlocaltax1 = price2num($txlocaltax1);
2127 $txlocaltax2 = price2num($txlocaltax2);
2128
2129 if ($date_start && $date_end && $date_start > $date_end) {
2130 $langs->load("errors");
2131 $this->error = $langs->trans('ErrorStartDateGreaterEnd');
2132 return -1;
2133 }
2134
2135 $this->db->begin();
2136
2137 if ($fk_product > 0) {
2138 if (getDolGlobalString('SUPPLIER_INVOICE_WITH_PREDEFINED_PRICES_ONLY')) {
2139 // Check quantity is enough
2140 dol_syslog(get_class($this)."::addline we check supplier prices fk_product=".$fk_product." qty=".$qty." ref_supplier=".$ref_supplier);
2141 $prod = new ProductFournisseur($this->db);
2142 if ($prod->fetch($fk_product) > 0) {
2143 $product_type = $prod->type;
2144 $label = $prod->label;
2145 $fk_prod_fourn_price = 0;
2146
2147 // We use 'none' instead of $ref_supplier, because $ref_supplier may not exists anymore. So we will take the first supplier price ok.
2148 // If we want a dedicated supplier price, we must provide $fk_prod_fourn_price.
2149 $result = $prod->get_buyprice($fk_prod_fourn_price, $qty, $fk_product, 'none', ($this->fk_soc ? $this->fk_soc : $this->socid)); // Search on couple $fk_prod_fourn_price/$qty first, then on triplet $qty/$fk_product/$ref_supplier/$this->fk_soc
2150 if ($result > 0) {
2151 if (empty($pu)) {
2152 $pu = $prod->fourn_pu; // Unit price supplier price set by get_buyprice
2153 }
2154 $ref_supplier = $prod->ref_supplier; // Ref supplier price set by get_buyprice
2155 // is remise percent not keyed but present for the product we add it
2156 if ($remise_percent == 0 && $prod->remise_percent != 0) {
2157 $remise_percent = $prod->remise_percent;
2158 }
2159 }
2160 if ($result == 0) { // If result == 0, we failed to found the supplier reference price
2161 $langs->load("errors");
2162 $this->error = "Ref ".$prod->ref." ".$langs->trans("ErrorQtyTooLowForThisSupplier");
2163 $this->db->rollback();
2164 dol_syslog(get_class($this)."::addline we did not found supplier price, so we can't guess unit price");
2165 //$pu = $prod->fourn_pu; // We do not overwrite unit price
2166 //$ref = $prod->ref_fourn; // We do not overwrite ref supplier price
2167 return -1;
2168 }
2169 if ($result == -1) {
2170 $langs->load("errors");
2171 $this->error = "Ref ".$prod->ref." ".$langs->trans("ErrorQtyTooLowForThisSupplier");
2172 $this->db->rollback();
2173 dol_syslog(get_class($this)."::addline result=".$result." - ".$this->error, LOG_DEBUG);
2174 return -1;
2175 }
2176 if ($result < -1) {
2177 $this->error = $prod->error;
2178 $this->db->rollback();
2179 dol_syslog(get_class($this)."::addline result=".$result." - ".$this->error, LOG_ERR);
2180 return -1;
2181 }
2182 } else {
2183 $this->error = $prod->error;
2184 $this->db->rollback();
2185 return -1;
2186 }
2187 }
2188 } else {
2189 $product_type = $type;
2190 }
2191
2192 if (isModEnabled("multicurrency") && $pu_devise > 0) {
2193 $pu = 0;
2194 }
2195
2196 $localtaxes_type = getLocalTaxesFromRate($txtva, 0, $mysoc, $this->thirdparty);
2197
2198 // Clean vat code
2199 $reg = array();
2200 $vat_src_code = '';
2201 if (preg_match('/\‍((.*)\‍)/', $txtva, $reg)) {
2202 $vat_src_code = $reg[1];
2203 $txtva = preg_replace('/\s*\‍(.*\‍)/', '', $txtva); // Remove code into vatrate.
2204 }
2205
2206 // Calcul du total TTC et de la TVA pour la ligne a partir de
2207 // qty, pu, remise_percent et txtva
2208 // TRES IMPORTANT: C'est au moment de l'insertion ligne qu'on doit stocker
2209 // la part ht, tva et ttc, et ce au niveau de la ligne qui a son propre taux tva.
2210
2211 $tabprice = calcul_price_total($qty, $pu, $remise_percent, $txtva, $txlocaltax1, $txlocaltax2, 0, $price_base_type, $info_bits, $type, $this->thirdparty, $localtaxes_type, 100, $this->multicurrency_tx, $pu_devise);
2212 $total_ht = $tabprice[0];
2213 $total_tva = $tabprice[1];
2214 $total_ttc = $tabprice[2];
2215 $total_localtax1 = $tabprice[9];
2216 $total_localtax2 = $tabprice[10];
2217 $pu_ht = $tabprice[3];
2218
2219 // MultiCurrency
2220 $multicurrency_total_ht = $tabprice[16];
2221 $multicurrency_total_tva = $tabprice[17];
2222 $multicurrency_total_ttc = $tabprice[18];
2223 $pu_ht_devise = $tabprice[19];
2224
2225 // Check parameters
2226 if ($type < 0) {
2227 return -1;
2228 }
2229
2230 if ($rang < 0) {
2231 $rangmax = $this->line_max();
2232 $rang = $rangmax + 1;
2233 }
2234
2235 // Insert line
2236 $supplierinvoiceline = new SupplierInvoiceLine($this->db);
2237
2238 $supplierinvoiceline->context = $this->context;
2239
2240 $supplierinvoiceline->fk_facture_fourn = $this->id;
2241 //$supplierinvoiceline->label=$label; // deprecated
2242 $supplierinvoiceline->desc = $desc;
2243 $supplierinvoiceline->ref_supplier = $ref_supplier;
2244
2245 $supplierinvoiceline->qty = ($this->type == self::TYPE_CREDIT_NOTE ? abs((float) $qty) : $qty); // For credit note, quantity is always positive and unit price negative
2246 $supplierinvoiceline->subprice = ($this->type == self::TYPE_CREDIT_NOTE ? -abs($pu_ht) : $pu_ht); // For credit note, unit price always negative, always positive otherwise
2247
2248 $supplierinvoiceline->vat_src_code = $vat_src_code;
2249 $supplierinvoiceline->tva_tx = $txtva;
2250 $supplierinvoiceline->localtax1_tx = ($total_localtax1 ? $localtaxes_type[1] : 0);
2251 $supplierinvoiceline->localtax2_tx = ($total_localtax2 ? $localtaxes_type[3] : 0);
2252 $supplierinvoiceline->localtax1_type = empty($localtaxes_type[0]) ? 0 : $localtaxes_type[0];
2253 $supplierinvoiceline->localtax2_type = empty($localtaxes_type[2]) ? 0 : $localtaxes_type[2];
2254
2255 $supplierinvoiceline->total_ht = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($total_ht) : $total_ht); // For credit note and if qty is negative, total is negative
2256 $supplierinvoiceline->total_tva = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($total_tva) : $total_tva); // For credit note and if qty is negative, total is negative
2257 $supplierinvoiceline->total_localtax1 = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($total_localtax1) : $total_localtax1); // For credit note and if qty is negative, total is negative
2258 $supplierinvoiceline->total_localtax2 = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($total_localtax2) : $total_localtax2); // For credit note and if qty is negative, total is negative
2259 $supplierinvoiceline->total_ttc = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($total_ttc) : $total_ttc); // For credit note and if qty is negative, total is negative
2260
2261 $supplierinvoiceline->fk_product = $fk_product;
2262 $supplierinvoiceline->product_type = $type;
2263 $supplierinvoiceline->remise_percent = $remise_percent;
2264 $supplierinvoiceline->date_start = $date_start;
2265 $supplierinvoiceline->date_end = $date_end;
2266 $supplierinvoiceline->fk_code_ventilation = $fk_code_ventilation;
2267 $supplierinvoiceline->rang = $rang;
2268 $supplierinvoiceline->info_bits = $info_bits;
2269 $supplierinvoiceline->fk_remise_except = $fk_remise_except;
2270
2271
2272 $supplierinvoiceline->special_code = (int) $special_code;
2273 $supplierinvoiceline->fk_parent_line = $fk_parent_line;
2274 $supplierinvoiceline->origin = $this->origin;
2275 $supplierinvoiceline->origin_id = $origin_id;
2276 $supplierinvoiceline->fk_unit = $fk_unit;
2277
2278 // Multicurrency
2279 $supplierinvoiceline->fk_multicurrency = $this->fk_multicurrency;
2280 $supplierinvoiceline->multicurrency_code = $this->multicurrency_code;
2281 $supplierinvoiceline->multicurrency_subprice = ($this->type == self::TYPE_CREDIT_NOTE ? -abs($pu_ht_devise) : $pu_ht_devise); // For credit note, unit price always negative, always positive otherwise
2282
2283 $supplierinvoiceline->multicurrency_total_ht = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($multicurrency_total_ht) : $multicurrency_total_ht); // For credit note and if qty is negative, total is negative
2284 $supplierinvoiceline->multicurrency_total_tva = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($multicurrency_total_tva) : $multicurrency_total_tva); // For credit note and if qty is negative, total is negative
2285 $supplierinvoiceline->multicurrency_total_ttc = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($multicurrency_total_ttc) : $multicurrency_total_ttc); // For credit note and if qty is negative, total is negative
2286
2287 if (is_array($array_options) && count($array_options) > 0) {
2288 $supplierinvoiceline->array_options = $array_options;
2289 }
2290
2291 $result = $supplierinvoiceline->insert($notrigger);
2292 if ($result > 0) {
2293 // Reorder if child line
2294 if (!empty($fk_parent_line)) {
2295 $this->line_order(true, 'DESC');
2296 } elseif ($rang > 0 && $rang <= count($this->lines)) { // Update all rank of all other lines
2297 $linecount = count($this->lines);
2298 for ($ii = $rang; $ii <= $linecount; $ii++) {
2299 $this->updateRangOfLine($this->lines[$ii - 1]->id, $ii + 1);
2300 }
2301 }
2302
2303 // Mise a jour information denormalisees au niveau de la facture meme
2304 $result = $this->update_price(1, 'auto', 0, $this->thirdparty); // The addline method is designed to add line from user input so total calculation with update_price must be done using 'auto' mode.
2305 if ($result > 0) {
2306 $this->db->commit();
2307 return $supplierinvoiceline->id;
2308 } else {
2309 $this->error = $this->db->error();
2310 $this->db->rollback();
2311 return -1;
2312 }
2313 } else {
2314 $this->error = $supplierinvoiceline->error;
2315 $this->errors = $supplierinvoiceline->errors;
2316 $this->db->rollback();
2317 return -2;
2318 }
2319 } else {
2320 return 0;
2321 }
2322 }
2323
2349 public function updateline($id, $desc, $pu, $vatrate, $txlocaltax1 = 0, $txlocaltax2 = 0, $qty = 1, $idproduct = 0, $price_base_type = 'HT', $info_bits = 0, $type = 0, $remise_percent = 0, $notrigger = 0, $date_start = '', $date_end = '', $array_options = [], $fk_unit = null, $pu_devise = 0, $ref_supplier = '', $rang = 0)
2350 {
2351 global $mysoc, $langs;
2352
2353 dol_syslog(get_class($this)."::updateline $id,$desc,$pu,$vatrate,$qty,$idproduct,$price_base_type,$info_bits,$type,$remise_percent,$notrigger,$date_start,$date_end,$fk_unit,$pu_devise,$ref_supplier", LOG_DEBUG);
2354 include_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php';
2355
2356 $pu = price2num($pu);
2357 $qty = price2num($qty);
2358 $remise_percent = (float) price2num($remise_percent);
2359 $pu_devise = price2num($pu_devise);
2360
2361 // Check parameters
2362 //if (! is_numeric($pu) || ! is_numeric($qty)) return -1;
2363 if ($type < 0) {
2364 return -1;
2365 }
2366
2367 if ($date_start && $date_end && $date_start > $date_end) {
2368 $langs->load("errors");
2369 $this->error = $langs->trans('ErrorStartDateGreaterEnd');
2370 return -1;
2371 }
2372
2373 // Clean parameters
2374 if (empty($vatrate)) {
2375 $vatrate = 0;
2376 }
2377 if (empty($txlocaltax1)) {
2378 $txlocaltax1 = 0;
2379 }
2380 if (empty($txlocaltax2)) {
2381 $txlocaltax2 = 0;
2382 }
2383
2384 $txlocaltax1 = (float) price2num($txlocaltax1);
2385 $txlocaltax2 = (float) price2num($txlocaltax2);
2386
2387 // Calcul du total TTC et de la TVA pour la ligne a partir de
2388 // qty, pu, remise_percent et txtva
2389 // TRES IMPORTANT: C'est au moment de l'insertion ligne qu'on doit stocker
2390 // la part ht, tva et ttc, et ce au niveau de la ligne qui a son propre taux tva.
2391
2392 $localtaxes_type = getLocalTaxesFromRate($vatrate, 0, $mysoc, $this->thirdparty);
2393
2394 $reg = array();
2395
2396 // Clean vat code
2397 $vat_src_code = '';
2398 if (preg_match('/\‍((.*)\‍)/', (string) $vatrate, $reg)) {
2399 $vat_src_code = $reg[1];
2400 $vatrate = preg_replace('/\s*\‍(.*\‍)/', '', (string) $vatrate); // Remove code into vatrate.
2401 }
2402
2403 $tabprice = calcul_price_total($qty, $pu, $remise_percent, $vatrate, $txlocaltax1, $txlocaltax2, 0, $price_base_type, $info_bits, $type, $this->thirdparty, $localtaxes_type, 100, $this->multicurrency_tx, $pu_devise);
2404 $total_ht = $tabprice[0];
2405 $total_tva = $tabprice[1];
2406 $total_ttc = $tabprice[2];
2407 $pu_ht = $tabprice[3];
2408 $pu_tva = $tabprice[4];
2409 $pu_ttc = $tabprice[5];
2410 $total_localtax1 = $tabprice[9];
2411 $total_localtax2 = $tabprice[10];
2412
2413 // MultiCurrency
2414 $multicurrency_total_ht = $tabprice[16];
2415 $multicurrency_total_tva = $tabprice[17];
2416 $multicurrency_total_ttc = $tabprice[18];
2417 $pu_ht_devise = $tabprice[19];
2418
2419 if (empty($info_bits)) {
2420 $info_bits = 0;
2421 }
2422
2423 //Fetch current line from the database and then clone the object and set it in $oldline property
2424 $line = new SupplierInvoiceLine($this->db);
2425 $line->fetch($id);
2426 $line->fetch_optionals();
2427
2428 $staticline = clone $line;
2429
2430 if ($idproduct) {
2431 $product = new Product($this->db);
2432 $result = $product->fetch($idproduct);
2433 $product_type = $product->type;
2434 } else {
2435 $idproduct = $staticline->fk_product;
2436 $product_type = $type;
2437 }
2438
2439 $line->oldline = $staticline;
2440 $line->context = $this->context;
2441
2442 $line->description = $desc;
2443 $line->desc = $desc;
2444
2445 $line->qty = ($this->type == self::TYPE_CREDIT_NOTE ? abs((float) $qty) : $qty); // For credit note, quantity is always positive and unit price negative
2446 $line->subprice = ($this->type == self::TYPE_CREDIT_NOTE ? -abs($pu_ht) : $pu_ht); // For credit note, unit price always negative, always positive otherwise
2447 $line->pu_ht = $line->subprice; // deprecated
2448 $line->pu_ttc = ($this->type == self::TYPE_CREDIT_NOTE ? -abs($pu_ttc) : $pu_ttc); // For credit note, unit price always negative, always positive otherwise
2449
2450 $line->remise_percent = $remise_percent;
2451 $line->ref_supplier = $ref_supplier;
2452
2453 $line->date_start = $date_start;
2454 $line->date_end = $date_end;
2455
2456 $line->vat_src_code = $vat_src_code;
2457 $line->tva_tx = $vatrate;
2458 $line->localtax1_tx = $txlocaltax1;
2459 $line->localtax2_tx = $txlocaltax2;
2460 $line->localtax1_type = empty($localtaxes_type[0]) ? 0 : $localtaxes_type[0];
2461 $line->localtax2_type = empty($localtaxes_type[2]) ? 0 : $localtaxes_type[2];
2462
2463 $line->total_ht = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($total_ht) : $total_ht);
2464 $line->total_tva = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($total_tva) : $total_tva);
2465 $line->total_localtax1 = $total_localtax1;
2466 $line->total_localtax2 = $total_localtax2;
2467 $line->total_ttc = (($this->type == self::TYPE_CREDIT_NOTE || $qty < 0) ? -abs($total_ttc) : $total_ttc);
2468
2469 $line->fk_product = $idproduct;
2470 $line->product_type = $product_type;
2471 $line->info_bits = $info_bits;
2472 $line->fk_unit = $fk_unit;
2473 $line->rang = $rang;
2474
2475 if (is_array($array_options) && count($array_options) > 0) {
2476 // We replace values in this->line->array_options only for entries defined into $array_options
2477 foreach ($array_options as $key => $value) {
2478 $line->array_options[$key] = $array_options[$key];
2479 }
2480 }
2481
2482 // Multicurrency
2483 $line->multicurrency_subprice = $pu_ht_devise;
2484 $line->multicurrency_total_ht = $multicurrency_total_ht;
2485 $line->multicurrency_total_tva = $multicurrency_total_tva;
2486 $line->multicurrency_total_ttc = $multicurrency_total_ttc;
2487
2488 $res = $line->update($notrigger);
2489
2490 if ($res < 1) {
2491 $this->errors[] = $line->error;
2492 } else {
2493 // Update total price into invoice record
2494 $res = $this->update_price('1', 'auto', 0, $this->thirdparty);
2495 }
2496
2497 return $res;
2498 }
2499
2507 public function deleteLine($rowid, $notrigger = 0)
2508 {
2509 if (!$rowid) {
2510 $rowid = $this->id;
2511 }
2512
2513 $this->db->begin();
2514
2515 // Free the discount linked to a line of invoice
2516 $sql = 'UPDATE '.MAIN_DB_PREFIX.'societe_remise_except';
2517 $sql .= ' SET fk_invoice_supplier_line = NULL';
2518 $sql .= ' WHERE fk_invoice_supplier_line = '.((int) $rowid);
2519
2520 dol_syslog(get_class($this)."::deleteline", LOG_DEBUG);
2521 $result = $this->db->query($sql);
2522 if (!$result) {
2523 $this->error = $this->db->error();
2524 $this->db->rollback();
2525 return -2;
2526 }
2527
2528 $line = new SupplierInvoiceLine($this->db);
2529
2530 if ($line->fetch($rowid) < 1) {
2531 return -1;
2532 }
2533
2534 $res = $line->delete($notrigger);
2535
2536 if ($res < 1) {
2537 $this->errors[] = $line->error;
2538 $this->db->rollback();
2539 return -3;
2540 } else {
2541 $res = $this->update_price(1);
2542
2543 if ($res > 0) {
2544 $this->db->commit();
2545 return 1;
2546 } else {
2547 $this->db->rollback();
2548 $this->error = $this->db->lasterror();
2549 return -4;
2550 }
2551 }
2552 }
2553
2554
2561 public function info($id)
2562 {
2563 $sql = 'SELECT c.rowid, datec, tms as datem, ';
2564 $sql .= ' fk_user_author, fk_user_modif, fk_user_valid';
2565 $sql .= ' FROM '.MAIN_DB_PREFIX.'facture_fourn as c';
2566 $sql .= ' WHERE c.rowid = '.((int) $id);
2567
2568 $result = $this->db->query($sql);
2569 if ($result) {
2570 if ($this->db->num_rows($result)) {
2571 $obj = $this->db->fetch_object($result);
2572
2573 $this->id = $obj->rowid;
2574
2575 $this->user_creation_id = $obj->fk_user_author;
2576 $this->user_validation_id = $obj->fk_user_valid;
2577 $this->user_modification_id = $obj->fk_user_modif;
2578 $this->date_creation = $this->db->jdate($obj->datec);
2579 $this->date_modification = $this->db->jdate($obj->datem);
2580 //$this->date_validation = $obj->datev; // This field is not available. Should be store into log table and using this function should be replaced with showing content of log (like for supplier orders)
2581 }
2582 $this->db->free($result);
2583 } else {
2584 dol_print_error($this->db);
2585 }
2586 }
2587
2588 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2597 public function list_replacable_supplier_invoices($socid = 0)
2598 {
2599 // phpcs:enable
2600 global $conf;
2601
2602 $return = array();
2603
2604 $sql = "SELECT f.rowid as rowid, f.ref, f.fk_statut,";
2605 $sql .= " ff.rowid as rowidnext";
2606 $sql .= " FROM ".MAIN_DB_PREFIX."facture_fourn as f";
2607 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."paiementfourn_facturefourn as pf ON f.rowid = pf.fk_facturefourn";
2608 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."facture_fourn as ff ON f.rowid = ff.fk_facture_source";
2609 $sql .= " WHERE (f.fk_statut = ".self::STATUS_VALIDATED." OR (f.fk_statut = ".self::STATUS_ABANDONED." AND f.close_code = '".self::CLOSECODE_ABANDONED."'))";
2610 $sql .= " AND f.entity = ".$conf->entity;
2611 $sql .= " AND f.paye = 0"; // Pas classee payee completement
2612 $sql .= " AND pf.fk_paiementfourn IS NULL"; // Aucun paiement deja fait
2613 $sql .= " AND ff.fk_statut IS NULL"; // Renvoi vrai si pas facture de replacement
2614 if ($socid > 0) {
2615 $sql .= " AND f.fk_soc = ".((int) $socid);
2616 }
2617 $sql .= " ORDER BY f.ref";
2618
2619 dol_syslog(get_class($this)."::list_replacable_supplier_invoices", LOG_DEBUG);
2620 $resql = $this->db->query($sql);
2621 if ($resql) {
2622 while ($obj = $this->db->fetch_object($resql)) {
2623 $return[$obj->rowid] = array(
2624 'id' => $obj->rowid,
2625 'ref' => $obj->ref,
2626 'status' => $obj->fk_statut
2627 );
2628 }
2629 //print_r($return);
2630 return $return;
2631 } else {
2632 $this->error = $this->db->error();
2633 return -1;
2634 }
2635 }
2636
2637 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2647 public function list_qualified_avoir_supplier_invoices($socid = 0)
2648 {
2649 // phpcs:enable
2650 global $conf;
2651
2652 $return = array();
2653
2654 $sql = "SELECT f.rowid as rowid, f.ref, f.fk_statut, f.type, f.subtype, f.paye, pf.fk_paiementfourn";
2655 $sql .= " FROM ".MAIN_DB_PREFIX."facture_fourn as f";
2656 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."paiementfourn_facturefourn as pf ON f.rowid = pf.fk_facturefourn";
2657 $sql .= " WHERE f.entity = ".$conf->entity;
2658 $sql .= " AND f.fk_statut in (".self::STATUS_VALIDATED.",".self::STATUS_CLOSED.")";
2659 $sql .= " AND NOT EXISTS (SELECT rowid from ".MAIN_DB_PREFIX."facture_fourn as ff WHERE f.rowid = ff.fk_facture_source";
2660 $sql .= " AND ff.type=".self::TYPE_REPLACEMENT.")";
2661 $sql .= " AND f.type != ".self::TYPE_CREDIT_NOTE; // Type non 2 si facture non avoir
2662 if ($socid > 0) {
2663 $sql .= " AND f.fk_soc = ".((int) $socid);
2664 }
2665 $sql .= " ORDER BY f.ref";
2666
2667 dol_syslog(get_class($this)."::list_qualified_avoir_supplier_invoices", LOG_DEBUG);
2668 $resql = $this->db->query($sql);
2669 if ($resql) {
2670 while ($obj = $this->db->fetch_object($resql)) {
2671 $qualified = 0;
2672 if ($obj->fk_statut == self::STATUS_VALIDATED) {
2673 $qualified = 1;
2674 }
2675 if ($obj->fk_statut == self::STATUS_CLOSED) {
2676 $qualified = 1;
2677 }
2678 if ($qualified) {
2679 $paymentornot = ($obj->fk_paiementfourn ? 1 : 0);
2680 $return[$obj->rowid] = array('ref' => $obj->ref, 'status' => $obj->fk_statut, 'type' => $obj->type, 'paye' => $obj->paye, 'paymentornot' => $paymentornot);
2681 }
2682 }
2683
2684 return $return;
2685 } else {
2686 $this->error = $this->db->error();
2687 return -1;
2688 }
2689 }
2690
2691 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2698 public function load_board($user)
2699 {
2700 // phpcs:enable
2701 global $conf, $langs;
2702
2703 $sql = 'SELECT ff.rowid, ff.date_lim_reglement as datefin, ff.fk_statut as status, ff.total_ht, ff.total_ttc';
2704 $sql .= ' FROM '.MAIN_DB_PREFIX.'facture_fourn as ff';
2705 if (!$user->hasRight("societe", "client", "voir") && !$user->socid) {
2706 $sql .= " JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON ff.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
2707 }
2708 $sql .= ' WHERE ff.paye = 0';
2709 $sql .= " AND ff.fk_statut IN (".self::STATUS_VALIDATED.")";
2710 $sql .= " AND ff.entity = ".$conf->entity;
2711 if ($user->socid) {
2712 $sql .= ' AND ff.fk_soc = '.((int) $user->socid);
2713 }
2714
2715 $resql = $this->db->query($sql);
2716 if ($resql) {
2717 $langs->load("bills");
2718 $now = dol_now();
2719
2720 $response = new WorkboardResponse();
2721 $response->warning_delay = $conf->facture->fournisseur->warning_delay / 60 / 60 / 24;
2722 $response->label = $langs->trans("SupplierBillsToPay");
2723 $response->labelShort = $langs->trans("StatusToPay");
2724
2725 $response->url = DOL_URL_ROOT.'/fourn/facture/list.php?search_status=1&mainmenu=billing&leftmenu=suppliers_bills';
2726 $response->img = img_object($langs->trans("Bills"), "bill");
2727
2728 $facturestatic = new FactureFournisseur($this->db);
2729
2730 while ($obj = $this->db->fetch_object($resql)) {
2731 $facturestatic->date_echeance = $this->db->jdate($obj->datefin);
2732 $facturestatic->statut = $obj->status; // For backward compatibility
2733 $facturestatic->status = $obj->status;
2734
2735 $response->nbtodo++;
2736 $response->total += $obj->total_ht;
2737
2738 if ($facturestatic->hasDelay()) {
2739 $response->nbtodolate++;
2740 $response->url_late = DOL_URL_ROOT.'/fourn/facture/list.php?search_option=late&mainmenu=billing&leftmenu=suppliers_bills';
2741 }
2742 }
2743
2744 $this->db->free($resql);
2745 return $response;
2746 } else {
2747 dol_print_error($this->db);
2748 $this->error = $this->db->error();
2749 return -1;
2750 }
2751 }
2752
2760 public function getTooltipContentArray($params)
2761 {
2762 global $conf, $langs, $mysoc;
2763
2764 $langs->load('bills');
2765
2766 $datas = [];
2767 $moretitle = $params['moretitle'] ?? '';
2768
2769 $picto = $this->picto;
2770 if ($this->type == self::TYPE_REPLACEMENT) {
2771 $picto .= 'r'; // Replacement invoice
2772 }
2773 if ($this->type == self::TYPE_CREDIT_NOTE) {
2774 $picto .= 'a'; // Credit note
2775 }
2776 if ($this->type == self::TYPE_DEPOSIT) {
2777 $picto .= 'd'; // Deposit invoice
2778 }
2779
2780 $datas['picto'] = img_picto('', $picto).' <u class="paddingrightonly">'.$langs->trans("SupplierInvoice").'</u>';
2781 if ($this->type == self::TYPE_REPLACEMENT) {
2782 $datas['picto'] .= '<u class="paddingrightonly">'.$langs->transnoentitiesnoconv("InvoiceReplace").'</u>';
2783 } elseif ($this->type == self::TYPE_CREDIT_NOTE) {
2784 $datas['picto'] .= '<u class="paddingrightonly">'.$langs->transnoentitiesnoconv("CreditNote").'</u>';
2785 } elseif ($this->type == self::TYPE_DEPOSIT) {
2786 $datas['picto'] .= '<u class="paddingrightonly">'.$langs->transnoentitiesnoconv("Deposit").'</u>';
2787 }
2788 if (isset($this->status)) {
2789 $alreadypaid = -1;
2790 if (isset($this->alreadypaid)) {
2791 $alreadypaid = $this->alreadypaid;
2792 }
2793
2794 $datas['picto'] .= ' '.$this->getLibStatut(5, $alreadypaid);
2795 }
2796 if ($moretitle) {
2797 $datas['picto'] .= ' - '.$moretitle;
2798 }
2799 if (!empty($this->ref)) {
2800 $datas['ref'] = '<br><b>'.$langs->trans('Ref').':</b> '.$this->ref;
2801 }
2802 if (!empty($this->ref_supplier)) {
2803 $datas['refsupplier'] = '<br><b>'.$langs->trans('RefSupplier').':</b> '.$this->ref_supplier;
2804 }
2805 if (!empty($this->label)) {
2806 $datas['label'] = '<br><b>'.$langs->trans('Label').':</b> '.$this->label;
2807 }
2808 if (!empty($this->date)) {
2809 $datas['date'] = '<br><b>'.$langs->trans('Date').':</b> '.dol_print_date($this->date, 'day');
2810 }
2811 if (!empty($this->date_echeance)) {
2812 $datas['date_echeance'] = '<br><b>'.$langs->trans('DateDue').':</b> '.dol_print_date($this->date_echeance, 'day');
2813 }
2814 if (!empty($this->total_ht)) {
2815 $datas['amountht'] = '<br><b>'.$langs->trans('AmountHT').':</b> '.price($this->total_ht, 0, $langs, 0, -1, -1, $conf->currency);
2816 }
2817 if (!empty($this->total_tva)) {
2818 $datas['totaltva'] = '<br><b>'.$langs->trans('AmountVAT').':</b> '.price($this->total_tva, 0, $langs, 0, -1, -1, $conf->currency);
2819 }
2820 if (!empty($this->total_localtax1) && $this->total_localtax1 != 0) {
2821 // We keep test != 0 because $this->total_localtax1 can be '0.00000000'
2822 $datas['amountlt1'] = '<br><b>'.$langs->transcountry('AmountLT1', $mysoc->country_code).':</b> '.price($this->total_localtax1, 0, $langs, 0, -1, -1, $conf->currency);
2823 }
2824 if (!empty($this->total_localtax2) && $this->total_localtax2 != 0) {
2825 $datas['amountlt2'] = '<br><b>'.$langs->transcountry('AmountLT2', $mysoc->country_code).':</b> '.price($this->total_localtax2, 0, $langs, 0, -1, -1, $conf->currency);
2826 }
2827 if (!empty($this->revenuestamp)) {
2828 $datas['amountrevenustamp'] = '<br><b>'.$langs->trans('RevenueStamp').':</b> '.price($this->revenuestamp, 0, $langs, 0, -1, -1, $conf->currency);
2829 }
2830 if (!empty($this->total_ttc)) {
2831 $datas['totalttc'] = '<br><b>'.$langs->trans('AmountTTC').':</b> '.price($this->total_ttc, 0, $langs, 0, -1, -1, $conf->currency);
2832 }
2833 return $datas;
2834 }
2835
2849 public function getNomUrl($withpicto = 0, $option = '', $max = 0, $short = 0, $moretitle = '', $notooltip = 0, $save_lastsearch_value = -1, $addlinktonotes = 0)
2850 {
2851 global $langs, $conf, $user, $hookmanager;
2852
2853 $result = '';
2854
2855 if ($option == 'withdraw') {
2856 $url = DOL_URL_ROOT.'/compta/facture/prelevement.php?facid='.$this->id.'&type=bank-transfer';
2857 } elseif ($option == 'document') {
2858 $url = DOL_URL_ROOT.'/fourn/facture/document.php?facid='.$this->id;
2859 } else {
2860 $url = DOL_URL_ROOT.'/fourn/facture/card.php?facid='.$this->id;
2861 }
2862
2863 if ($short) {
2864 return $url;
2865 }
2866
2867 if ($option !== 'nolink') {
2868 // Add param to save lastsearch_values or not
2869 $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
2870 if ($save_lastsearch_value == -1 && isset($_SERVER["PHP_SELF"]) && preg_match('/list\.php/', $_SERVER["PHP_SELF"])) {
2871 $add_save_lastsearch_values = 1;
2872 }
2873 if ($add_save_lastsearch_values) {
2874 $url .= '&save_lastsearch_values=1';
2875 }
2876 }
2877
2878 $picto = $this->picto;
2879 if ($this->type == self::TYPE_REPLACEMENT) {
2880 $picto .= 'r'; // Replacement invoice
2881 }
2882 if ($this->type == self::TYPE_CREDIT_NOTE) {
2883 $picto .= 'a'; // Credit note
2884 }
2885 if ($this->type == self::TYPE_DEPOSIT) {
2886 $picto .= 'd'; // Deposit invoice
2887 }
2888
2889 $params = [
2890 'id' => $this->id,
2891 'objecttype' => $this->element,
2892 'option' => $option,
2893 'moretitle' => $moretitle,
2894 ];
2895 $classfortooltip = 'classfortooltip';
2896 $dataparams = '';
2897 if (getDolGlobalInt('MAIN_ENABLE_AJAX_TOOLTIP')) {
2898 $classfortooltip = 'classforajaxtooltip';
2899 $dataparams = ' data-params="'.dol_escape_htmltag(json_encode($params)).'"';
2900 $label = '';
2901 } else {
2902 $label = implode($this->getTooltipContentArray($params));
2903 }
2904
2905 $ref = $this->ref;
2906 if (empty($ref)) {
2907 $ref = $this->id;
2908 }
2909
2910 $linkclose = '';
2911 if (empty($notooltip)) {
2912 if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
2913 $label = $langs->trans("ShowSupplierInvoice");
2914 $linkclose .= ' alt="'.dol_escape_htmltag($label, 1).'"';
2915 }
2916 $linkclose .= ($label ? ' title="'.dol_escape_htmltag($label, 1).'"' : ' title="tocomplete"');
2917 $linkclose .= $dataparams.' class="'.$classfortooltip.'"';
2918 }
2919
2920 $linkstart = '<a href="'.$url.'"';
2921 $linkstart .= $linkclose.'>';
2922 $linkend = '</a>';
2923
2924 $result .= $linkstart;
2925 if ($withpicto) {
2926 $result .= img_object(($notooltip ? '' : $label), ($picto ? $picto : 'generic'), ($notooltip ? (($withpicto != 2) ? 'class="paddingright"' : '') : 'class="'.(($withpicto != 2) ? 'paddingright ' : '').'"'), 0, 0, $notooltip ? 0 : 1);
2927 }
2928 if ($withpicto != 2) {
2929 $result .= ($max ? dol_trunc($ref, $max) : $ref);
2930 }
2931 $result .= $linkend;
2932
2933 if ($addlinktonotes) {
2934 $txttoshow = ($user->socid > 0 ? $this->note_public : $this->note_private);
2935 if ($txttoshow) {
2936 $notetoshow = $langs->trans("ViewPrivateNote").':<br>'.dol_string_nohtmltag($txttoshow, 1);
2937 $result .= ' <span class="note inline-block">';
2938 $result .= '<a href="'.DOL_URL_ROOT.'/fourn/facture/note.php?id='.$this->id.'" class="classfortooltip" title="'.dol_escape_htmltag($notetoshow).'">';
2939 $result .= img_picto('', 'note');
2940 $result .= '</a>';
2941 $result .= '</span>';
2942 }
2943 }
2944 global $action;
2945 $hookmanager->initHooks(array($this->element . 'dao'));
2946 $parameters = array('id' => $this->id, 'getnomurl' => &$result);
2947 $reshook = $hookmanager->executeHooks('getNomUrl', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
2948 if ($reshook > 0) {
2949 $result = $hookmanager->resPrint;
2950 } else {
2951 $result .= $hookmanager->resPrint;
2952 }
2953 return $result;
2954 }
2955
2964 public function getNextNumRef($soc, $mode = 'next')
2965 {
2966 global $db, $langs, $conf;
2967 $langs->load("orders");
2968
2969 // Clean parameters (if not defined or using deprecated value)
2970 if (!getDolGlobalString('INVOICE_SUPPLIER_ADDON_NUMBER')) {
2971 $conf->global->INVOICE_SUPPLIER_ADDON_NUMBER = 'mod_facture_fournisseur_cactus';
2972 }
2973
2974 $mybool = false;
2975
2976 $file = getDolGlobalString('INVOICE_SUPPLIER_ADDON_NUMBER') . ".php";
2977 $classname = getDolGlobalString('INVOICE_SUPPLIER_ADDON_NUMBER');
2978
2979 // Include file with class
2980 $dirmodels = array_merge(array('/'), (array) $conf->modules_parts['models']);
2981
2982 foreach ($dirmodels as $reldir) {
2983 $dir = dol_buildpath($reldir."core/modules/supplier_invoice/");
2984
2985 // Load file with numbering class (if found)
2986 $mybool = ((bool) @include_once $dir.$file) || $mybool;
2987 }
2988
2989 if (!$mybool) {
2990 dol_print_error(null, "Failed to include file ".$file);
2991 return '';
2992 }
2993
2994 $obj = new $classname();
2995 '@phan-var-force ModeleNumRefSuppliersInvoices $obj';
2996 $numref = "";
2997 $numref = $obj->getNextValue($soc, $this, $mode);
2998
2999 if ($numref != "") {
3000 return $numref;
3001 } else {
3002 $this->error = $obj->error;
3003 return -1;
3004 }
3005 }
3006
3007
3016 public function initAsSpecimen($option = '')
3017 {
3018 global $langs, $conf;
3019 include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
3020
3021 $now = dol_now();
3022
3023 // Load array of products prodids
3024 $num_prods = 0;
3025 $prodids = array();
3026
3027 $sql = "SELECT rowid";
3028 $sql .= " FROM ".MAIN_DB_PREFIX."product";
3029 $sql .= " WHERE entity IN (".getEntity('product').")";
3030 $sql .= $this->db->plimit(100);
3031
3032 $resql = $this->db->query($sql);
3033 if ($resql) {
3034 $num_prods = $this->db->num_rows($resql);
3035 $i = 0;
3036 while ($i < $num_prods) {
3037 $i++;
3038 $row = $this->db->fetch_row($resql);
3039 $prodids[$i] = $row[0];
3040 }
3041 }
3042
3043 // Initialise parameters
3044 $this->id = 0;
3045 $this->ref = 'SPECIMEN';
3046 $this->ref_supplier = 'SUPPLIER_REF_SPECIMEN';
3047 $this->specimen = 1;
3048 $this->socid = 1;
3049 $this->date = $now;
3050 $this->date_lim_reglement = $this->date + 3600 * 24 * 30;
3051 $this->cond_reglement_code = 'RECEP';
3052 $this->mode_reglement_code = 'CHQ';
3053
3054 $this->note_public = 'This is a comment (public)';
3055 $this->note_private = 'This is a comment (private)';
3056
3057 $this->multicurrency_tx = 1;
3058 $this->multicurrency_code = $conf->currency;
3059
3060 $xnbp = 0;
3061 if (empty($option) || $option != 'nolines') {
3062 // Lines
3063 $nbp = 5;
3064 while ($xnbp < $nbp) {
3065 $line = new SupplierInvoiceLine($this->db);
3066 $line->desc = $langs->trans("Description")." ".$xnbp;
3067 $line->qty = 1;
3068 $line->subprice = 100;
3069 $line->pu_ht = $line->subprice; // the canelle template use pu_ht and not subprice
3070 $line->price = 100;
3071 $line->tva_tx = 19.6;
3072 $line->localtax1_tx = 0;
3073 $line->localtax2_tx = 0;
3074 if ($xnbp == 2) {
3075 $line->total_ht = 50;
3076 $line->total_ttc = 59.8;
3077 $line->total_tva = 9.8;
3078 $line->remise_percent = 50;
3079 } else {
3080 $line->total_ht = 100;
3081 $line->total_ttc = 119.6;
3082 $line->total_tva = 19.6;
3083 $line->remise_percent = 0;
3084 }
3085
3086 if ($num_prods > 0) {
3087 $prodid = mt_rand(1, $num_prods);
3088 $line->fk_product = $prodids[$prodid];
3089 }
3090 $line->product_type = 0;
3091
3092 $this->lines[$xnbp] = $line;
3093
3094 $this->total_ht += $line->total_ht;
3095 $this->total_tva += $line->total_tva;
3096 $this->total_ttc += $line->total_ttc;
3097
3098 $xnbp++;
3099 }
3100 }
3101
3102 $this->total_ht = $xnbp * 100;
3103 $this->total_tva = $xnbp * 19.6;
3104 $this->total_ttc = $xnbp * 119.6;
3105
3106 return 1;
3107 }
3108
3114 public function loadStateBoard()
3115 {
3116 global $conf, $user;
3117
3118 $this->nb = array();
3119
3120 $clause = "WHERE";
3121
3122 $sql = "SELECT count(f.rowid) as nb";
3123 $sql .= " FROM ".MAIN_DB_PREFIX."facture_fourn as f";
3124 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON f.fk_soc = s.rowid";
3125 if (!$user->hasRight("societe", "client", "voir") && !$user->socid) {
3126 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON s.rowid = sc.fk_soc";
3127 $sql .= " WHERE sc.fk_user = ".((int) $user->id);
3128 $clause = "AND";
3129 }
3130 $sql .= " ".$clause." f.entity = ".$conf->entity;
3131
3132 $resql = $this->db->query($sql);
3133 if ($resql) {
3134 while ($obj = $this->db->fetch_object($resql)) {
3135 $this->nb["supplier_invoices"] = $obj->nb;
3136 }
3137 $this->db->free($resql);
3138 return 1;
3139 } else {
3140 dol_print_error($this->db);
3141 $this->error = $this->db->error();
3142 return -1;
3143 }
3144 }
3145
3154 public function createFromClone(User $user, $fromid, $invertdetail = 0)
3155 {
3156 global $conf, $langs;
3157
3158 $error = 0;
3159
3160 $object = new FactureFournisseur($this->db);
3161
3162 $this->db->begin();
3163
3164 // Load source object
3165 $object->fetch($fromid);
3166 $object->id = 0;
3167 $object->statut = self::STATUS_DRAFT; // For backward compatibility
3168 $object->status = self::STATUS_DRAFT;
3169
3170 $object->fetch_thirdparty(); // We need it to recalculate VAT localtaxes according to main sale taxes and vendor
3171
3172 // Clear fields
3173 $object->ref_supplier = (empty($this->ref_supplier) ? $langs->trans("CopyOf").' '.$object->ref_supplier : $this->ref_supplier);
3174 $object->author = $user->id; // FIXME? user_validation_id is replacement for author
3175 $object->user_validation_id = 0; // FIXME? user_validation_id is replacement for author
3176 $object->fk_facture_source = 0;
3177 $object->date_creation = '';
3178 $object->date_validation = '';
3179 $object->date = (empty($this->date) ? dol_now() : $this->date);
3180 $object->ref_client = '';
3181 $object->close_code = '';
3182 $object->close_note = '';
3183 if (getDolGlobalInt('MAIN_DONT_KEEP_NOTE_ON_CLONING') == 1) {
3184 $object->note_private = '';
3185 $object->note_public = '';
3186 }
3187
3188 $object->date_echeance = $object->calculate_date_lim_reglement();
3189
3190 // Loop on each line of new invoice
3191 foreach ($object->lines as $i => $line) {
3192 if (isset($object->lines[$i]->info_bits) && ($object->lines[$i]->info_bits & 0x02) == 0x02) { // We do not clone line of discounts
3193 unset($object->lines[$i]);
3194 }
3195 }
3196
3197 // Create clone
3198 $object->context['createfromclone'] = 'createfromclone';
3199 $result = $object->create($user);
3200
3201 // Other options
3202 if ($result < 0) {
3203 $this->error = $object->error;
3204 $this->errors = $object->errors;
3205 $error++;
3206 }
3207
3208 if (!$error) {
3209 }
3210
3211 unset($object->context['createfromclone']);
3212
3213 // End
3214 if (!$error) {
3215 $this->db->commit();
3216 return $object->id;
3217 } else {
3218 $this->db->rollback();
3219 return -1;
3220 }
3221 }
3222
3234 public function generateDocument($modele, $outputlangs, $hidedetails = 0, $hidedesc = 0, $hideref = 0, $moreparams = null)
3235 {
3236 global $langs;
3237
3238 $langs->load("suppliers");
3239 $outputlangs->load("products");
3240
3241 // Set the model on the model name to use
3242 if (empty($modele)) {
3243 if (getDolGlobalString('INVOICE_SUPPLIER_ADDON_PDF')) {
3244 $modele = getDolGlobalString('INVOICE_SUPPLIER_ADDON_PDF');
3245 } else {
3246 $modele = ''; // No default value. For supplier invoice, we allow to disable all PDF generation
3247 }
3248 }
3249
3250 if (empty($modele)) {
3251 return 0;
3252 } else {
3253 $modelpath = "core/modules/supplier_invoice/doc/";
3254
3255 return $this->commonGenerateDocument($modelpath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams);
3256 }
3257 }
3258
3263 public function getRights()
3264 {
3265 global $user;
3266
3267 return $user->hasRight("fournisseur", "facture");
3268 }
3269
3278 public static function replaceThirdparty(DoliDB $dbs, $origin_id, $dest_id)
3279 {
3280 $tables = array(
3281 'facture_fourn'
3282 );
3283
3284 return CommonObject::commonReplaceThirdparty($dbs, $origin_id, $dest_id, $tables);
3285 }
3286
3295 public static function replaceProduct(DoliDB $db, $origin_id, $dest_id)
3296 {
3297 $tables = array(
3298 'facture_fourn_det'
3299 );
3300
3301 return CommonObject::commonReplaceProduct($db, $origin_id, $dest_id, $tables);
3302 }
3303
3309 public function hasDelay()
3310 {
3311 global $conf;
3312
3313 $now = dol_now();
3314
3315 if (!$this->date_echeance) {
3316 return false;
3317 }
3318
3319 $status = isset($this->status) ? $this->status : $this->statut;
3320
3321 return ($status == self::STATUS_VALIDATED) && ($this->date_echeance < ($now - $conf->facture->fournisseur->warning_delay));
3322 }
3323
3329 public function isCreditNoteUsed()
3330 {
3331 $isUsed = false;
3332
3333 $sql = "SELECT fk_invoice_supplier FROM ".MAIN_DB_PREFIX."societe_remise_except WHERE fk_invoice_supplier_source = ".((int) $this->id);
3334 $resql = $this->db->query($sql);
3335 if (!empty($resql)) {
3336 $obj = $this->db->fetch_object($resql);
3337 if (!empty($obj->fk_invoice_supplier)) {
3338 $isUsed = true;
3339 }
3340 }
3341
3342 return $isUsed;
3343 }
3351 public function getKanbanView($option = '', $arraydata = null)
3352 {
3353 global $langs;
3354
3355 $selected = (empty($arraydata['selected']) ? 0 : $arraydata['selected']);
3356
3357 $picto = $this->picto;
3358 if ($this->type == self::TYPE_REPLACEMENT) {
3359 $picto .= 'r'; // Replacement invoice
3360 }
3361 if ($this->type == self::TYPE_CREDIT_NOTE) {
3362 $picto .= 'a'; // Credit note
3363 }
3364 if ($this->type == self::TYPE_DEPOSIT) {
3365 $picto .= 'd'; // Deposit invoice
3366 }
3367
3368 $return = '<div class="box-flex-item box-flex-grow-zero">';
3369 $return .= '<div class="info-box info-box-sm">';
3370 $return .= '<span class="info-box-icon bg-infobox-action">';
3371 $return .= img_picto('', $picto);
3372 $return .= '</span>';
3373 $return .= '<div class="info-box-content">';
3374 $return .= '<span class="info-box-ref inline-block tdoverflowmax150 valignmiddle">'.(method_exists($this, 'getNomUrl') ? $this->getNomUrl(1) : $this->ref).'</span>';
3375 if ($selected >= 0) {
3376 $return .= '<input id="cb'.$this->id.'" class="flat checkforselect fright" type="checkbox" name="toselect[]" value="'.$this->id.'"'.($selected ? ' checked="checked"' : '').'>';
3377 }
3378 if (!empty($arraydata['thirdparty'])) {
3379 $return .= '<br><span class="info-box-label">'.$arraydata['thirdparty'].'</span>';
3380 }
3381 if (property_exists($this, 'date')) {
3382 $return .= '<br><span class="info-box-label">'.dol_print_date($this->date, 'day').'</span>';
3383 }
3384 if (property_exists($this, 'total_ht')) {
3385 $return .= ' &nbsp; <span class="info-box-label amount" title="'.dol_escape_htmltag($langs->trans("AmountHT")).'">'.price($this->total_ht);
3386 $return .= ' '.$langs->trans("HT");
3387 $return .= '</span>';
3388 }
3389 if (method_exists($this, 'getLibStatut')) {
3390 $alreadypaid = (empty($arraydata['alreadypaid']) ? 0 : $arraydata['alreadypaid']);
3391 $return .= '<br><div class="info-box-status">'.$this->getLibStatut(3, $alreadypaid).'</div>';
3392 }
3393 $return .= '</div>';
3394 $return .= '</div>';
3395 $return .= '</div>';
3396 return $return;
3397 }
3398
3405 public function setVATReverseCharge($vatreversecharge)
3406 {
3407 if (!$this->table_element) {
3408 dol_syslog(get_class($this)."::setVATReverseCharge was called on object with property table_element not defined", LOG_ERR);
3409 return -1;
3410 }
3411
3412 dol_syslog(get_class($this).'::setVATReverseCharge('.$vatreversecharge.')');
3413
3414 $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element;
3415 $sql .= " SET vat_reverse_charge = ".((int) $vatreversecharge);
3416 $sql .= " WHERE rowid=".((int) $this->id);
3417
3418 if ($this->db->query($sql)) {
3419 $this->vat_reverse_charge = ($vatreversecharge == 0) ? 0 : 1;
3420 return 1;
3421 } else {
3422 dol_syslog(get_class($this).'::setVATReverseCharge Error ', LOG_DEBUG);
3423 $this->error = $this->db->error();
3424 return 0;
3425 }
3426 }
3427
3439 public function sendEmailsRemindersOnSupplierInvoiceDueDate($nbdays = 0, $paymentmode = 'all', $template = '', $datetouse = 'duedate', $forcerecipient = '')
3440 {
3441 global $conf, $langs, $user;
3442
3443 $this->output = '';
3444 $this->error = '';
3445 $nbMailSend = 0;
3446
3447 $error = 0;
3448 $errorsMsg = array();
3449
3450 $langs->load('bills');
3451
3452 if (!isModEnabled(empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD) ? 'fournisseur' : 'supplier_invoice')) { // Should not happen. If module disabled, cron job should not be visible.
3453 $this->output .= $langs->trans('ModuleNotEnabled', $langs->transnoentitiesnoconv('Suppliers'));
3454 return 0;
3455 }
3456 if (!in_array($datetouse, array('duedate', 'invoicedate'))) {
3457 $this->output .= 'Bad value for parameter datetouse. Must be "duedate" or "invoicedate"';
3458 return 0;
3459 }
3460
3461 require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
3462 require_once DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php';
3463 require_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
3464 $formmail = new FormMail($this->db);
3465
3466 $now = dol_now();
3467 $tmpidate = dol_get_first_hour(dol_time_plus_duree($now, $nbdays, 'd'), 'gmt');
3468
3469 $tmpinvoice = new FactureFournisseur($this->db);
3470
3471 dol_syslog(__METHOD__." start", LOG_INFO);
3472
3473 // Select all action comm reminder
3474 $sql = "SELECT rowid as id FROM ".MAIN_DB_PREFIX."facture_fourn as f";
3475 if (!empty($paymentmode) && $paymentmode != 'all') {
3476 $sql .= ", ".MAIN_DB_PREFIX."c_paiement as cp";
3477 }
3478 $sql .= " WHERE f.paye = 0"; // Only unpaid
3479 $sql .= " AND f.fk_statut = ".self::STATUS_VALIDATED; // Only validated status
3480 if ($datetouse == 'invoicedate') {
3481 $sql .= " AND f.datef = '".$this->db->idate($tmpidate, 'gmt')."'";
3482 } else {
3483 $sql .= " AND f.date_lim_reglement = '".$this->db->idate($tmpidate, 'gmt')."'";
3484 }
3485 $sql .= " AND f.entity IN (".getEntity('supplier_invoice', 0).")"; // One batch process only one company (no sharing)
3486 if (!empty($paymentmode) && $paymentmode != 'all') {
3487 $sql .= " AND f.fk_mode_reglement = cp.id AND cp.code = '".$this->db->escape($paymentmode)."'";
3488 }
3489 // TODO Add a filter to check there is no payment started yet
3490 if ($datetouse == 'invoicedate') {
3491 $sql .= $this->db->order("datef", "ASC");
3492 } else {
3493 $sql .= $this->db->order("date_lim_reglement", "ASC");
3494 }
3495
3496 $resql = $this->db->query($sql);
3497
3498 $stmpidate = dol_print_date($tmpidate, 'day', 'gmt');
3499 if ($datetouse == 'invoicedate') {
3500 $this->output .= $langs->transnoentitiesnoconv("SearchValidatedSupplierInvoicesWithDate", $stmpidate);
3501 } else {
3502 $this->output .= $langs->transnoentitiesnoconv("SearchUnpaidSupplierInvoicesWithDueDate", $stmpidate);
3503 }
3504 if (!empty($paymentmode) && $paymentmode != 'all') {
3505 $this->output .= ' ('.$langs->transnoentitiesnoconv("PaymentMode").' '.$paymentmode.')';
3506 }
3507 $this->output .= '<br>';
3508
3509 if ($resql) {
3510 while ($obj = $this->db->fetch_object($resql)) {
3511 if (!$error) {
3512 // Load event
3513 $res = $tmpinvoice->fetch($obj->id);
3514 if ($res > 0) {
3515 $tmpinvoice->fetch_thirdparty();
3516
3517 $outputlangs = new Translate('', $conf);
3518 if ($tmpinvoice->thirdparty->default_lang) {
3519 $outputlangs->setDefaultLang($tmpinvoice->thirdparty->default_lang);
3520 $outputlangs->loadLangs(array("main", "suppliers"));
3521 } else {
3522 $outputlangs = $langs;
3523 }
3524
3525 // Select email template according to language of recipient
3526 $templateId = 0;
3527 $templateLabel = '';
3528 if (empty($template) || $template == 'EmailTemplateCode') {
3529 $templateLabel = '(SendingReminderEmailOnUnpaidSupplierInvoice)';
3530 } else {
3531 if (is_numeric($template)) {
3532 $templateId = $template;
3533 } else {
3534 $templateLabel = $template;
3535 }
3536 }
3537
3538 $arraymessage = $formmail->getEMailTemplate($this->db, 'invoice_supplier_send', $user, $outputlangs, $templateId, 1, $templateLabel);
3539 if (is_numeric($arraymessage) && $arraymessage <= 0) {
3540 $langs->load("errors");
3541 $this->output .= $langs->trans('ErrorFailedToFindEmailTemplate', $template);
3542 return 0;
3543 }
3544
3545 // PREPARE EMAIL
3546 $errormesg = '';
3547
3548 // Make substitution in email content
3549 $substitutionarray = getCommonSubstitutionArray($outputlangs, 0, '', $tmpinvoice);
3550
3551 complete_substitutions_array($substitutionarray, $outputlangs, $tmpinvoice);
3552
3553 // Topic
3554 $sendTopic = make_substitutions(empty($arraymessage->topic) ? $outputlangs->transnoentitiesnoconv('InformationMessage') : $arraymessage->topic, $substitutionarray, $outputlangs, 1);
3555
3556 // Content
3557 $content = $outputlangs->transnoentitiesnoconv($arraymessage->content);
3558
3559 $sendContent = make_substitutions($content, $substitutionarray, $outputlangs, 1);
3560
3561 // Recipient
3562 $to = array();
3563 if ($forcerecipient) { // If a recipient was forced
3564 $to = array($forcerecipient);
3565 } else {
3566 $res = $tmpinvoice->fetch_thirdparty();
3567 $recipient = $tmpinvoice->thirdparty;
3568 if ($res > 0) {
3569 $tmparraycontact = $tmpinvoice->liste_contact(-1, 'internal', 0, 'SALESREPFOLL');
3570 if (is_array($tmparraycontact) && count($tmparraycontact) > 0) {
3571 foreach ($tmparraycontact as $data_email) {
3572 if (!empty($data_email['email'])) {
3573 $to[] = $data_email['email'];
3574 }
3575 }
3576 }
3577 if (empty($to) && !empty($recipient->email)) {
3578 $to[] = $recipient->email;
3579 }
3580 if (empty($to)) {
3581 $errormesg = "Failed to send remind to thirdparty id=".$tmpinvoice->socid.". No email defined for supplier invoice or customer.";
3582 $error++;
3583 }
3584 } else {
3585 $errormesg = "Failed to load recipient with thirdparty id=".$tmpinvoice->socid;
3586 $error++;
3587 }
3588 }
3589
3590 // Sender
3591 $from = getDolGlobalString('MAIN_MAIL_EMAIL_FROM');
3592 if (!empty($arraymessage->email_from)) { // If a sender is defined into template, we use it in priority
3593 $from = $arraymessage->email_from;
3594 }
3595 if (empty($from)) {
3596 $errormesg = "Failed to get sender into global setup MAIN_MAIL_EMAIL_FROM";
3597 $error++;
3598 }
3599
3600 if (!$error && !empty($to)) {
3601 $this->db->begin();
3602
3603 $to = implode(',', $to);
3604 if (!empty($arraymessage->email_to)) { // If a recipient is defined into template, we add it
3605 $to = $to.','.$arraymessage->email_to;
3606 }
3607
3608 // Errors Recipient
3609 $errors_to = $conf->global->MAIN_MAIL_ERRORS_TO;
3610
3611 $trackid = 'inv'.$tmpinvoice->id;
3612 $sendcontext = 'standard';
3613
3614 $email_tocc = '';
3615 if (!empty($arraymessage->email_tocc)) { // If a CC is defined into template, we use it
3616 $email_tocc = $arraymessage->email_tocc;
3617 }
3618
3619 $email_tobcc = '';
3620 if (!empty($arraymessage->email_tobcc)) { // If a BCC is defined into template, we use it
3621 $email_tobcc = $arraymessage->email_tobcc;
3622 }
3623
3624 // Mail Creation
3625 $cMailFile = new CMailFile($sendTopic, $to, $from, $sendContent, array(), array(), array(), $email_tocc, $email_tobcc, 0, 1, $errors_to, '', $trackid, '', $sendcontext, '');
3626
3627 // Sending Mail
3628 if ($cMailFile->sendfile()) {
3629 $nbMailSend++;
3630
3631 // Add a line into event table
3632 require_once DOL_DOCUMENT_ROOT.'/comm/action/class/actioncomm.class.php';
3633
3634 // Insert record of emails sent
3635 $actioncomm = new ActionComm($this->db);
3636
3637 $actioncomm->type_code = 'AC_OTH_AUTO'; // Event insert into agenda automatically
3638 $actioncomm->socid = $tmpinvoice->thirdparty->id; // To link to a company
3639 $actioncomm->contact_id = 0;
3640
3641 $actioncomm->code = 'AC_EMAIL';
3642 $actioncomm->label = 'sendEmailsRemindersOnInvoiceDueDateOK (nbdays='.$nbdays.' paymentmode='.$paymentmode.' template='.$template.' datetouse='.$datetouse.' forcerecipient='.$forcerecipient.')';
3643 $actioncomm->note_private = $sendContent;
3644 $actioncomm->fk_project = $tmpinvoice->fk_project;
3645 $actioncomm->datep = dol_now();
3646 $actioncomm->datef = $actioncomm->datep;
3647 $actioncomm->percentage = -1; // Not applicable
3648 $actioncomm->authorid = $user->id; // User saving action
3649 $actioncomm->userownerid = $user->id; // Owner of action
3650 // Fields when action is an email (content should be added into note)
3651 $actioncomm->email_msgid = $cMailFile->msgid;
3652 $actioncomm->email_subject = $sendTopic;
3653 $actioncomm->email_from = $from;
3654 $actioncomm->email_sender = '';
3655 $actioncomm->email_to = $to;
3656 //$actioncomm->email_tocc = $sendtocc;
3657 //$actioncomm->email_tobcc = $sendtobcc;
3658 //$actioncomm->email_subject = $subject;
3659 $actioncomm->errors_to = $errors_to;
3660
3661 $actioncomm->elementtype = 'invoice_supplier';
3662 $actioncomm->fk_element = $tmpinvoice->id;
3663
3664 //$actioncomm->extraparams = $extraparams;
3665
3666 $actioncomm->create($user);
3667 } else {
3668 $errormesg = $cMailFile->error.' : '.$to;
3669 $error++;
3670
3671 // Add a line into event table
3672 require_once DOL_DOCUMENT_ROOT.'/comm/action/class/actioncomm.class.php';
3673
3674 // Insert record of emails sent
3675 $actioncomm = new ActionComm($this->db);
3676
3677 $actioncomm->type_code = 'AC_OTH_AUTO'; // Event insert into agenda automatically
3678 $actioncomm->socid = $tmpinvoice->thirdparty->id; // To link to a company
3679 $actioncomm->contact_id = 0;
3680
3681 $actioncomm->code = 'AC_EMAIL';
3682 $actioncomm->label = 'sendEmailsRemindersOnInvoiceDueDateKO';
3683 $actioncomm->note_private = $errormesg;
3684 $actioncomm->fk_project = $tmpinvoice->fk_project;
3685 $actioncomm->datep = dol_now();
3686 $actioncomm->datef = $actioncomm->datep;
3687 $actioncomm->percentage = -1; // Not applicable
3688 $actioncomm->authorid = $user->id; // User saving action
3689 $actioncomm->userownerid = $user->id; // Owner of action
3690 // Fields when action is an email (content should be added into note)
3691 $actioncomm->email_msgid = $cMailFile->msgid;
3692 $actioncomm->email_from = $from;
3693 $actioncomm->email_sender = '';
3694 $actioncomm->email_to = $to;
3695 //$actioncomm->email_tocc = $sendtocc;
3696 //$actioncomm->email_tobcc = $sendtobcc;
3697 //$actioncomm->email_subject = $subject;
3698 $actioncomm->errors_to = $errors_to;
3699
3700 //$actioncomm->extraparams = $extraparams;
3701
3702 $actioncomm->create($user);
3703 }
3704
3705 $this->db->commit(); // We always commit
3706 }
3707
3708 if ($errormesg) {
3709 $errorsMsg[] = $errormesg;
3710 }
3711 } else {
3712 $errorsMsg[] = 'Failed to fetch record invoice with ID = '.$obj->id;
3713 $error++;
3714 }
3715 }
3716 }
3717 } else {
3718 $error++;
3719 }
3720
3721 if (!$error) {
3722 $this->output .= 'Nb of emails sent : '.$nbMailSend;
3723
3724 dol_syslog(__METHOD__." end - ".$this->output, LOG_INFO);
3725
3726 return 0;
3727 } else {
3728 $this->error = 'Nb of emails sent : '.$nbMailSend.', '.(empty($errorsMsg) ? $error : implode(', ', $errorsMsg));
3729
3730 dol_syslog(__METHOD__." end - ".$this->error, LOG_INFO);
3731
3732 return $error;
3733 }
3734 }
3735}
3736
3737
3738
3743{
3747 public $element = 'facture_fourn_det';
3748
3752 public $table_element = 'facture_fourn_det';
3753
3757 public $parent_element = 'facture_fourn';
3758
3762 public $fk_parent_attribute = 'fk_facture_fourn';
3763
3767 public $oldline;
3768
3773 public $ref;
3774
3779 public $product_ref;
3780
3786 public $ref_supplier;
3787
3792 public $product_desc;
3793
3800 public $pu_ht;
3801
3806 public $subprice;
3807
3812 public $pu_ttc;
3813
3814
3819 public $fk_facture_fourn;
3820
3826 public $label;
3827
3833 public $description;
3834
3835 public $date_start;
3836 public $date_end;
3837
3841 public $fk_code_ventilation;
3842
3846 public $skip_update_total; // Skip update price total for special lines
3847
3851 public $situation_percent;
3852
3856 public $fk_prev_id;
3857
3862 public $vat_src_code;
3863
3868 public $tva_tx;
3869
3874 public $localtax1_tx;
3875
3880 public $localtax2_tx;
3881
3886 public $qty;
3887
3892 public $remise_percent;
3893
3898 public $pa_ht;
3899
3904 public $total_ht;
3905
3910 public $total_ttc;
3911
3916 public $total_tva;
3917
3922 public $total_localtax1;
3923
3928 public $total_localtax2;
3929
3933 public $fk_product;
3934
3939 public $product_type;
3940
3945 public $product_label;
3946
3953 public $info_bits;
3954
3959 public $fk_remise_except;
3960
3964 public $fk_parent_line;
3965
3969 public $special_code;
3970
3974 public $rang;
3975
3980 public $localtax1_type;
3981
3986 public $localtax2_type;
3987
3988
3994 public function __construct($db)
3995 {
3996 $this->db = $db;
3997 }
3998
4005 public function fetch($rowid)
4006 {
4007 $sql = 'SELECT f.rowid, f.ref as ref_supplier, f.description as line_desc, f.date_start, f.date_end, f.pu_ht, f.pu_ttc, f.qty, f.remise_percent, f.tva_tx';
4008 $sql .= ', f.localtax1_type, f.localtax2_type, f.localtax1_tx, f.localtax2_tx, f.total_localtax1, f.total_localtax2, f.fk_remise_except';
4009 $sql .= ', f.total_ht, f.tva as total_tva, f.total_ttc, f.fk_facture_fourn, f.fk_product, f.product_type, f.info_bits, f.rang, f.special_code, f.fk_parent_line, f.fk_unit';
4010 $sql .= ', p.rowid as product_id, p.ref as product_ref, p.label as product_label, p.description as product_desc';
4011 $sql .= ', f.multicurrency_subprice, f.multicurrency_total_ht, f.multicurrency_total_tva, multicurrency_total_ttc';
4012 $sql .= ' FROM '.MAIN_DB_PREFIX.'facture_fourn_det as f';
4013 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'product as p ON f.fk_product = p.rowid';
4014 $sql .= ' WHERE f.rowid = '.((int) $rowid);
4015 $sql .= ' ORDER BY f.rang, f.rowid';
4016
4017 $query = $this->db->query($sql);
4018
4019 if (!$query) {
4020 $this->errors[] = $this->db->error();
4021 return -1;
4022 }
4023
4024 if (!$this->db->num_rows($query)) {
4025 return 0;
4026 }
4027
4028 $obj = $this->db->fetch_object($query);
4029
4030 $this->id = $obj->rowid;
4031 $this->rowid = $obj->rowid;
4032 $this->fk_facture_fourn = $obj->fk_facture_fourn;
4033 $this->description = $obj->line_desc;
4034 $this->desc = $obj->line_desc;
4035 $this->date_start = $obj->date_start;
4036 $this->date_end = $obj->date_end;
4037 $this->product_ref = $obj->product_ref;
4038 $this->ref_supplier = $obj->ref_supplier;
4039 $this->product_desc = $obj->product_desc;
4040
4041 $this->subprice = $obj->pu_ht;
4042 $this->pu_ht = $this->subprice;
4043 $this->pu_ttc = $obj->pu_ttc;
4044 $this->tva_tx = $obj->tva_tx;
4045 $this->localtax1_tx = $obj->localtax1_tx;
4046 $this->localtax2_tx = $obj->localtax2_tx;
4047 $this->localtax1_type = $obj->localtax1_type;
4048 $this->localtax2_type = $obj->localtax2_type;
4049
4050 $this->qty = $obj->qty;
4051 $this->remise_percent = $obj->remise_percent;
4052 $this->fk_remise_except = $obj->fk_remise_except;
4053 //$this->tva = $obj->total_tva; // deprecated
4054 $this->total_ht = $obj->total_ht;
4055 $this->total_tva = $obj->total_tva;
4056 $this->total_localtax1 = $obj->total_localtax1;
4057 $this->total_localtax2 = $obj->total_localtax2;
4058 $this->total_ttc = $obj->total_ttc;
4059 $this->fk_product = $obj->fk_product;
4060 $this->product_type = $obj->product_type;
4061 $this->product_label = $obj->product_label;
4062 $this->label = $obj->product_label;
4063 $this->info_bits = $obj->info_bits;
4064 $this->fk_parent_line = $obj->fk_parent_line;
4065 $this->special_code = $obj->special_code;
4066 $this->rang = $obj->rang;
4067 $this->fk_unit = $obj->fk_unit;
4068
4069 $this->multicurrency_subprice = $obj->multicurrency_subprice;
4070 $this->multicurrency_total_ht = $obj->multicurrency_total_ht;
4071 $this->multicurrency_total_tva = $obj->multicurrency_total_tva;
4072 $this->multicurrency_total_ttc = $obj->multicurrency_total_ttc;
4073
4074 $this->fetch_optionals();
4075
4076 return 1;
4077 }
4078
4085 public function delete($notrigger = 0)
4086 {
4087 global $user;
4088
4089 dol_syslog(get_class($this)."::deleteline rowid=".((int) $this->id), LOG_DEBUG);
4090
4091 $error = 0;
4092
4093 $this->db->begin();
4094
4095 if (!$notrigger) {
4096 if ($this->call_trigger('LINEBILL_SUPPLIER_DELETE', $user) < 0) {
4097 $error++;
4098 }
4099 }
4100
4101 $this->deleteObjectLinked();
4102
4103 // Remove extrafields
4104 if (!$error) {
4105 $result = $this->deleteExtraFields();
4106 if ($result < 0) {
4107 $error++;
4108 dol_syslog(get_class($this)."::delete error -4 ".$this->error, LOG_ERR);
4109 }
4110 }
4111
4112 if (!$error) {
4113 // Supprime ligne
4114 $sql = 'DELETE FROM '.MAIN_DB_PREFIX.'facture_fourn_det ';
4115 $sql .= " WHERE rowid = ".((int) $this->id);
4116 dol_syslog(get_class($this)."::delete", LOG_DEBUG);
4117 $resql = $this->db->query($sql);
4118 if (!$resql) {
4119 $error++;
4120 $this->error = $this->db->lasterror();
4121 }
4122 }
4123
4124 if (!$error) {
4125 $this->db->commit();
4126 return 1;
4127 } else {
4128 $this->db->rollback();
4129 return -1;
4130 }
4131 }
4132
4139 public function update($notrigger = 0)
4140 {
4141 global $conf;
4142
4143 $pu = price2num($this->subprice);
4144 $qty = price2num($this->qty);
4145
4146 // Check parameters
4147 if (empty($this->qty)) {
4148 $this->qty = 0;
4149 }
4150
4151 if ($this->product_type < 0) {
4152 return -1;
4153 }
4154
4155 // Clean parameters
4156 if (empty($this->remise_percent)) {
4157 $this->remise_percent = 0;
4158 }
4159 if (empty($this->tva_tx)) {
4160 $this->tva_tx = 0;
4161 }
4162 if (empty($this->localtax1_tx)) {
4163 $this->localtax1_tx = 0;
4164 }
4165 if (empty($this->localtax2_tx)) {
4166 $this->localtax2_tx = 0;
4167 }
4168
4169 if (empty($this->pa_ht)) {
4170 $this->pa_ht = 0;
4171 }
4172 if (empty($this->multicurrency_subprice)) {
4173 $this->multicurrency_subprice = 0;
4174 }
4175 if (empty($this->multicurrency_total_ht)) {
4176 $this->multicurrency_total_ht = 0;
4177 }
4178 if (empty($this->multicurrency_total_tva)) {
4179 $this->multicurrency_total_tva = 0;
4180 }
4181 if (empty($this->multicurrency_total_ttc)) {
4182 $this->multicurrency_total_ttc = 0;
4183 }
4184
4185 $fk_product = (int) $this->fk_product;
4186 $fk_unit = (int) $this->fk_unit;
4187
4188 $this->db->begin();
4189
4190 $sql = "UPDATE ".MAIN_DB_PREFIX."facture_fourn_det SET";
4191 $sql .= " description = '".$this->db->escape(empty($this->description) ? $this->desc : $this->description)."'";
4192 $sql .= ", ref = '".$this->db->escape($this->ref_supplier ? $this->ref_supplier : $this->ref)."'";
4193 $sql .= ", date_start = ".($this->date_start != '' ? "'".$this->db->idate($this->date_start)."'" : "null");
4194 $sql .= ", date_end = ".($this->date_end != '' ? "'".$this->db->idate($this->date_end)."'" : "null");
4195 $sql .= ", pu_ht = ".price2num($this->subprice);
4196 $sql .= ", pu_ttc = ".price2num($this->pu_ttc);
4197 $sql .= ", qty = ".price2num($this->qty);
4198 $sql .= ", remise_percent = ".price2num($this->remise_percent);
4199 if ($this->fk_remise_except > 0) {
4200 $sql .= ", fk_remise_except=".((int) $this->fk_remise_except);
4201 } else {
4202 $sql .= ", fk_remise_except=null";
4203 }
4204 $sql .= ", vat_src_code = '".$this->db->escape(empty($this->vat_src_code) ? '' : $this->vat_src_code)."'";
4205 $sql .= ", tva_tx = ".price2num($this->tva_tx);
4206 $sql .= ", localtax1_tx = ".price2num($this->localtax1_tx);
4207 $sql .= ", localtax2_tx = ".price2num($this->localtax2_tx);
4208 $sql .= ", localtax1_type = '".$this->db->escape($this->localtax1_type)."'";
4209 $sql .= ", localtax2_type = '".$this->db->escape($this->localtax2_type)."'";
4210 $sql .= ", total_ht = ".price2num($this->total_ht);
4211 $sql .= ", tva= ".price2num($this->total_tva);
4212 $sql .= ", total_localtax1= ".price2num($this->total_localtax1);
4213 $sql .= ", total_localtax2= ".price2num($this->total_localtax2);
4214 $sql .= ", total_ttc = ".price2num($this->total_ttc);
4215 $sql .= ", fk_product = ".($fk_product > 0 ? (int) $fk_product : 'null');
4216 $sql .= ", product_type = ".((int) $this->product_type);
4217 $sql .= ", info_bits = ".((int) $this->info_bits);
4218 $sql .= ", fk_unit = ".($fk_unit > 0 ? (int) $fk_unit : 'null');
4219
4220 if (!empty($this->rang)) {
4221 $sql .= ", rang=".((int) $this->rang);
4222 }
4223
4224 // Multicurrency
4225 $sql .= " , multicurrency_subprice=".price2num($this->multicurrency_subprice);
4226 $sql .= " , multicurrency_total_ht=".price2num($this->multicurrency_total_ht);
4227 $sql .= " , multicurrency_total_tva=".price2num($this->multicurrency_total_tva);
4228 $sql .= " , multicurrency_total_ttc=".price2num($this->multicurrency_total_ttc);
4229
4230 $sql .= " WHERE rowid = ".((int) $this->id);
4231
4232 dol_syslog(get_class($this)."::update", LOG_DEBUG);
4233 $resql = $this->db->query($sql);
4234
4235 if (!$resql) {
4236 $this->db->rollback();
4237 $this->error = $this->db->lasterror();
4238 return -1;
4239 }
4240
4241 $this->rowid = $this->id;
4242 $error = 0;
4243
4244 if (!$error) {
4245 $result = $this->insertExtraFields();
4246 if ($result < 0) {
4247 $error++;
4248 }
4249 }
4250
4251 if (!$error && !$notrigger) {
4252 global $langs, $user;
4253
4254 // Call trigger
4255 if ($this->call_trigger('LINEBILL_SUPPLIER_MODIFY', $user) < 0) {
4256 $this->db->rollback();
4257 return -1;
4258 }
4259 // End call triggers
4260 }
4261
4262 if ($error) {
4263 $this->db->rollback();
4264 return -1;
4265 }
4266
4267 $this->db->commit();
4268 return 1;
4269 }
4270
4278 public function insert($notrigger = 0, $noerrorifdiscountalreadylinked = 0)
4279 {
4280 global $user, $langs;
4281
4282 $error = 0;
4283
4284 dol_syslog(get_class($this)."::insert rang=".$this->rang, LOG_DEBUG);
4285
4286 // Clean parameters
4287 $this->desc = trim($this->desc);
4288 if (empty($this->tva_tx)) {
4289 $this->tva_tx = 0;
4290 }
4291 if (empty($this->localtax1_tx)) {
4292 $this->localtax1_tx = 0;
4293 }
4294 if (empty($this->localtax2_tx)) {
4295 $this->localtax2_tx = 0;
4296 }
4297 if (empty($this->localtax1_type)) {
4298 $this->localtax1_type = 0.0;
4299 }
4300 if (empty($this->localtax2_type)) {
4301 $this->localtax2_type = 0.0;
4302 }
4303 if (empty($this->total_tva)) {
4304 $this->total_tva = 0;
4305 }
4306 if (empty($this->total_localtax1)) {
4307 $this->total_localtax1 = 0;
4308 }
4309 if (empty($this->total_localtax2)) {
4310 $this->total_localtax2 = 0;
4311 }
4312 if (empty($this->rang)) {
4313 $this->rang = 0;
4314 }
4315 if (empty($this->remise_percent)) {
4316 $this->remise_percent = 0;
4317 }
4318 if (empty($this->info_bits)) {
4319 $this->info_bits = 0;
4320 }
4321 if (empty($this->subprice)) {
4322 $this->subprice = 0;
4323 }
4324 if (empty($this->special_code)) {
4325 $this->special_code = 0;
4326 }
4327 if (empty($this->fk_parent_line)) {
4328 $this->fk_parent_line = 0;
4329 }
4330 if (!isset($this->situation_percent) || $this->situation_percent > 100 || (string) $this->situation_percent == '') {
4331 $this->situation_percent = 100;
4332 }
4333
4334 if (empty($this->pa_ht)) {
4335 $this->pa_ht = 0;
4336 }
4337 if (empty($this->multicurrency_subprice)) {
4338 $this->multicurrency_subprice = 0;
4339 }
4340 if (empty($this->multicurrency_total_ht)) {
4341 $this->multicurrency_total_ht = 0;
4342 }
4343 if (empty($this->multicurrency_total_tva)) {
4344 $this->multicurrency_total_tva = 0;
4345 }
4346 if (empty($this->multicurrency_total_ttc)) {
4347 $this->multicurrency_total_ttc = 0;
4348 }
4349
4350
4351 // Check parameters
4352 if ($this->product_type < 0) {
4353 $this->error = 'ErrorProductTypeMustBe0orMore';
4354 return -1;
4355 }
4356 if (!empty($this->fk_product) && $this->fk_product > 0) {
4357 // Check product exists
4358 $result = Product::isExistingObject('product', $this->fk_product);
4359 if ($result <= 0) {
4360 $this->error = 'ErrorProductIdDoesNotExists';
4361 return -1;
4362 }
4363 }
4364
4365 $this->db->begin();
4366
4367 // Insertion dans base de la ligne
4368 $sql = 'INSERT INTO '.MAIN_DB_PREFIX.$this->table_element;
4369 $sql .= ' (fk_facture_fourn, fk_parent_line, label, description, ref, qty,';
4370 $sql .= ' vat_src_code, tva_tx, localtax1_tx, localtax2_tx, localtax1_type, localtax2_type,';
4371 $sql .= ' fk_product, product_type, remise_percent, fk_remise_except, pu_ht, pu_ttc,';
4372 $sql .= ' date_start, date_end, fk_code_ventilation, rang, special_code,';
4373 $sql .= ' info_bits, total_ht, tva, total_ttc, total_localtax1, total_localtax2, fk_unit';
4374 $sql .= ', fk_multicurrency, multicurrency_code, multicurrency_subprice, multicurrency_total_ht, multicurrency_total_tva, multicurrency_total_ttc';
4375 $sql .= ')';
4376 $sql .= " VALUES (".$this->fk_facture_fourn.",";
4377 $sql .= " ".($this->fk_parent_line > 0 ? "'".$this->db->escape($this->fk_parent_line)."'" : "null").",";
4378 $product_label
4379 = !empty($this->product_label)
4380 ? $this->product_label :
4381 (!empty($this->label) ? $this->label : null);
4382 $sql .= " ".(!empty($product_label) ? "'".$this->db->escape($product_label)."'" : "null").",";
4383 $sql .= " '".$this->db->escape($this->desc ? $this->desc : $this->description)."',";
4384 $sql .= " '".$this->db->escape($this->ref_supplier)."',";
4385 $sql .= " ".price2num($this->qty).",";
4386
4387 $sql .= " ".(empty($this->vat_src_code) ? "''" : "'".$this->db->escape($this->vat_src_code)."'").",";
4388 $sql .= " ".price2num($this->tva_tx).",";
4389 $sql .= " ".price2num($this->localtax1_tx).",";
4390 $sql .= " ".price2num($this->localtax2_tx).",";
4391 $sql .= " '".$this->db->escape($this->localtax1_type)."',";
4392 $sql .= " '".$this->db->escape($this->localtax2_type)."',";
4393 $sql .= ' '.((!empty($this->fk_product) && $this->fk_product > 0) ? $this->fk_product : "null").',';
4394 $sql .= " ".((int) $this->product_type).",";
4395 $sql .= " ".price2num($this->remise_percent).",";
4396 $sql .= ' '.(!empty($this->fk_remise_except) ? ((int) $this->fk_remise_except) : "null").',';
4397 $sql .= " ".price2num($this->subprice).",";
4398 $sql .= " ".(!empty($this->qty) ? price2num($this->total_ttc / $this->qty) : price2num($this->total_ttc)).",";
4399 $sql .= " ".(!empty($this->date_start) ? "'".$this->db->idate($this->date_start)."'" : "null").",";
4400 $sql .= " ".(!empty($this->date_end) ? "'".$this->db->idate($this->date_end)."'" : "null").",";
4401 $sql .= ' '.(!empty($this->fk_code_ventilation) ? $this->fk_code_ventilation : 0).',';
4402 $sql .= ' '.((int) $this->rang).',';
4403 $sql .= ' '.((int) $this->special_code).',';
4404 $sql .= " ".((int) $this->info_bits).",";
4405 $sql .= " ".price2num($this->total_ht).",";
4406 $sql .= " ".price2num($this->total_tva).",";
4407 $sql .= " ".price2num($this->total_ttc).",";
4408 $sql .= " ".price2num($this->total_localtax1).",";
4409 $sql .= " ".price2num($this->total_localtax2);
4410 $sql .= ", ".(!$this->fk_unit ? 'NULL' : $this->fk_unit);
4411 $sql .= ", ".(int) $this->fk_multicurrency;
4412 $sql .= ", '".$this->db->escape($this->multicurrency_code)."'";
4413 $sql .= ", ".price2num($this->multicurrency_subprice);
4414 $sql .= ", ".price2num($this->multicurrency_total_ht);
4415 $sql .= ", ".price2num($this->multicurrency_total_tva);
4416 $sql .= ", ".price2num($this->multicurrency_total_ttc);
4417 $sql .= ')';
4418
4419 $resql = $this->db->query($sql);
4420 if ($resql) {
4421 $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX.$this->table_element);
4422 $this->rowid = $this->id; // backward compatibility
4423
4424 if (!$error) {
4425 $result = $this->insertExtraFields();
4426 if ($result < 0) {
4427 $error++;
4428 }
4429 }
4430
4431 // Si fk_remise_except defini, on lie la remise a la facture
4432 // ce qui la flague comme "consommee".
4433 if ($this->fk_remise_except) {
4434 $discount = new DiscountAbsolute($this->db);
4435 $result = $discount->fetch($this->fk_remise_except);
4436 if ($result >= 0) {
4437 // Check if discount was found
4438 if ($result > 0) {
4439 // Check if discount not already affected to another invoice
4440 if ($discount->fk_facture_line > 0) {
4441 if (empty($noerrorifdiscountalreadylinked)) {
4442 $this->error = $langs->trans("ErrorDiscountAlreadyUsed", $discount->id);
4443 dol_syslog(get_class($this)."::insert Error ".$this->error, LOG_ERR);
4444 $this->db->rollback();
4445 return -3;
4446 }
4447 } else {
4448 $result = $discount->link_to_invoice($this->id, 0);
4449 if ($result < 0) {
4450 $this->error = $discount->error;
4451 dol_syslog(get_class($this)."::insert Error ".$this->error, LOG_ERR);
4452 $this->db->rollback();
4453 return -3;
4454 }
4455 }
4456 } else {
4457 $this->error = $langs->trans("ErrorADiscountThatHasBeenRemovedIsIncluded");
4458 dol_syslog(get_class($this)."::insert Error ".$this->error, LOG_ERR);
4459 $this->db->rollback();
4460 return -3;
4461 }
4462 } else {
4463 $this->error = $discount->error;
4464 dol_syslog(get_class($this)."::insert Error ".$this->error, LOG_ERR);
4465 $this->db->rollback();
4466 return -3;
4467 }
4468 }
4469
4470 if (!$error && !$notrigger) {
4471 // Call trigger
4472 $result = $this->call_trigger('LINEBILL_SUPPLIER_CREATE', $user);
4473 if ($result < 0) {
4474 $this->db->rollback();
4475 return -2;
4476 }
4477 // End call triggers
4478 }
4479
4480 $this->db->commit();
4481 return $this->id;
4482 } else {
4483 $this->error = $this->db->error();
4484 $this->db->rollback();
4485 return -2;
4486 }
4487 }
4488
4489 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4495 public function update_total()
4496 {
4497 // phpcs:enable
4498 $this->db->begin();
4499
4500 // Mise a jour ligne en base
4501 $sql = "UPDATE ".MAIN_DB_PREFIX."facture_fourn_det SET";
4502 $sql .= " total_ht = ".price2num($this->total_ht);
4503 $sql .= ", tva= ".price2num($this->total_tva);
4504 $sql .= ", total_localtax1 = ".price2num($this->total_localtax1);
4505 $sql .= ", total_localtax2 = ".price2num($this->total_localtax2);
4506 $sql .= ", total_ttc = ".price2num($this->total_ttc);
4507 $sql .= " WHERE rowid = ".((int) $this->id);
4508
4509 dol_syslog("FactureFournisseurLigne.class.php::update_total", LOG_DEBUG);
4510
4511 $resql = $this->db->query($sql);
4512 if ($resql) {
4513 $this->db->commit();
4514 return 1;
4515 } else {
4516 $this->error = $this->db->error();
4517 $this->db->rollback();
4518 return -2;
4519 }
4520 }
4521}
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:58
print $langs trans("AuditedSecurityEvents").'</strong >< span class="opacitymedium"></span >< br > status
Or an array listing all the potential status of the object: array: int of the status => translated la...
Definition security.php:637
$object ref
Definition info.php:79
Class to manage agenda events (actions)
Class to send emails (with attachments or not) Usage: $mailfile = new CMailFile($subject,...
Superclass for invoices classes.
calculate_date_lim_reglement($cond_reglement=0)
Returns an invoice payment deadline based on the invoice settlement conditions and billing date.
fetch_optionals($rowid=null, $optionsArray=null)
Function to get extra fields of an object into $this->array_options This method is in most cases call...
line_order($renum=false, $rowidorder='ASC', $fk_parent_line=true)
Save a new position (field rang) for details lines.
deleteEcmFiles($mode=0)
Delete related files of object in database.
update_price($exclspec=0, $roundingadjust='auto', $nodatabaseupdate=0, $seller=null)
Update total_ht, total_ttc, total_vat, total_localtax1, total_localtax2 for an object (sum of lines).
add_object_linked($origin=null, $origin_id=null, $f_user=null, $notrigger=0)
Add an object link into llx_element_element.
commonGenerateDocument($modelspath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams=null)
Common function for all objects extending CommonObject for generating documents.
fetch_thirdparty($force_thirdparty_id=0)
Load the third party of object, from id $this->socid or $this->fk_soc, into this->thirdparty.
deleteObjectLinked($sourceid=null, $sourcetype='', $targetid=null, $targettype='', $rowid=0, $f_user=null, $notrigger=0)
Delete all links between an object $this.
static isExistingObject($element, $id, $ref='', $ref_ext='')
Check if an object id or ref exists If you don't need or want to instantiate the object and just need...
updateRangOfLine($rowid, $rang)
Update position of line (rang)
deleteExtraFields()
Delete all extra fields values for the current object.
static commonReplaceThirdparty(DoliDB $dbs, $origin_id, $dest_id, array $tables, $ignoreerrors=0)
Function used to replace a thirdparty id with another one.
static commonReplaceProduct(DoliDB $dbs, $origin_id, $dest_id, array $tables, $ignoreerrors=0)
Function used to replace a product id with another one.
line_max($fk_parent_line=0)
Get max value used for position of line (rang)
insertExtraFields($trigger='', $userused=null)
Add/Update all extra fields values for the current object.
call_trigger($triggerName, $user)
Call trigger based on this instance.
Parent class for class inheritance lines of business objects This class is useless for the moment so ...
Class to manage absolute discounts.
Class to manage Dolibarr database access.
Class to manage suppliers invoices.
const TYPE_DEPOSIT
Deposit invoice.
create($user)
Create supplier invoice into database.
list_qualified_avoir_supplier_invoices($socid=0)
Return list of qualifying invoices for correction by credit note Invoices that respect the following ...
list_replacable_supplier_invoices($socid=0)
Return list of replaceable invoices Status valid or abandoned for other reason + not paid + no paymen...
deleteLine($rowid, $notrigger=0)
Delete a detail line from database.
set_unpaid($user)
Tag the invoice as not fully paid + trigger call BILL_UNPAYED Function used when a direct debit payme...
setCanceled($user, $close_code='', $close_note='')
Tag invoice as canceled, with no payment on it (example for replacement invoice or payment never rece...
fetch($id=0, $ref='', $ref_ext='')
Load object in memory from database.
addline($desc, $pu, $txtva, $txlocaltax1, $txlocaltax2, $qty, $fk_product=0, $remise_percent=0, $date_start=0, $date_end=0, $fk_code_ventilation=0, $info_bits=0, $price_base_type='HT', $type=0, $rang=-1, $notrigger=0, $array_options=[], $fk_unit=null, $origin_id=0, $pu_devise=0, $ref_supplier='', $special_code=0, $fk_parent_line=0, $fk_remise_except=0)
Adds an invoice line (associated with no predefined product/service) The parameters are already suppo...
info($id)
Loads the info order information into the invoice object.
const TYPE_CREDIT_NOTE
Credit note invoice.
isCreditNoteUsed()
Is credit note used.
getKanbanView($option='', $arraydata=null)
Return clicable link of object (with eventually picto)
load_board($user)
Load indicators for dashboard (this->nbtodo and this->nbtodolate)
getNomUrl($withpicto=0, $option='', $max=0, $short=0, $moretitle='', $notooltip=0, $save_lastsearch_value=-1, $addlinktonotes=0)
Return clicable name (with picto eventually)
getTooltipContentArray($params)
getTooltipContentArray
setPaid($user, $close_code='', $close_note='')
Tag invoice as a paid invoice.
update($user=null, $notrigger=0)
Update database.
static replaceThirdparty(DoliDB $dbs, $origin_id, $dest_id)
Function used to replace a thirdparty id with another one.
const TYPE_REPLACEMENT
Replacement invoice.
setUnpaid($user)
Tag the invoice as not fully paid + trigger call BILL_UNPAYED Function used when a direct debit payme...
const STATUS_VALIDATED
Validated (need to be paid)
setDraft($user, $idwarehouse=-1, $notrigger=0)
Set draft status.
getNextNumRef($soc, $mode='next')
Return next reference of supplier invoice not already used (or last reference) according to numbering...
updateline($id, $desc, $pu, $vatrate, $txlocaltax1=0, $txlocaltax2=0, $qty=1, $idproduct=0, $price_base_type='HT', $info_bits=0, $type=0, $remise_percent=0, $notrigger=0, $date_start='', $date_end='', $array_options=[], $fk_unit=null, $pu_devise=0, $ref_supplier='', $rang=0)
Update a line detail into database.
sendEmailsRemindersOnSupplierInvoiceDueDate($nbdays=0, $paymentmode='all', $template='', $datetouse='duedate', $forcerecipient='')
Send reminders by emails for supplier invoices validated that are due.
insert_discount($idremise)
Add a discount line into an invoice (as an invoice line) using an existing absolute discount (Consume...
initAsSpecimen($option='')
Initialise an instance with random values.
const TYPE_STANDARD
Standard invoice.
validate($user, $force_number='', $idwarehouse=0, $notrigger=0)
Tag invoice as validated + call trigger BILL_VALIDATE.
set_paid($user, $close_code='', $close_note='')
Tag invoice as a paid invoice.
createFromClone(User $user, $fromid, $invertdetail=0)
Load an object from its id and create a new one in database.
generateDocument($modele, $outputlangs, $hidedetails=0, $hidedesc=0, $hideref=0, $moreparams=null)
Create a document onto disk according to template model.
getRights()
Returns the rights used for this class.
const STATUS_ABANDONED
Classified abandoned and no payment done.
hasDelay()
Is the payment of the supplier invoice having a delay?
static replaceProduct(DoliDB $db, $origin_id, $dest_id)
Function used to replace a product id with another one.
loadStateBoard()
Load indicators for dashboard (this->nbtodo and this->nbtodolate)
const STATUS_CLOSED
Classified paid.
setVATReverseCharge($vatreversecharge)
Change the option VAT reverse charge.
Class to manage invoice templates.
Class permettant la generation du formulaire html d'envoi de mail unitaire Usage: $formail = new Form...
Class permettant la generation de composants html autre Only common components are here.
Class to manage stock movements.
static getIdFromCode($dbs, $code)
Get id of currency from code.
static getIdAndTxFromCode($dbs, $code, $date_document='')
Get id and rate of currency from code.
Class to manage predefined suppliers products.
Class to manage products or services.
Class to manage line invoices.
fetch($rowid)
Retrieves a supplier invoice line.
update($notrigger=0)
Update a supplier invoice line.
insert($notrigger=0, $noerrorifdiscountalreadylinked=0)
Insert line into database.
update_total()
Mise a jour de l'objet ligne de commande en base.
Class to manage translations.
Class to manage Dolibarr users.
dol_get_first_hour($date, $gm='tzserver')
Return GMT time for first hour of a given GMT date (it removes hours, min and second part)
Definition date.lib.php:655
dol_time_plus_duree($time, $duration_value, $duration_unit, $ruleforendofmonth=0)
Add a delay to a date.
Definition date.lib.php:125
print $script_file $mode $langs defaultlang(is_numeric($duration_value) ? " delay=". $duration_value :"").(is_numeric($duration_value2) ? " after cd cd cd description as description
Only used if Module[ID]Desc translation string is not found.
dol_delete_dir_recursive($dir, $count=0, $nophperrors=0, $onlysub=0, &$countdeleted=0, $indexdatabase=1, $nolog=0)
Remove a directory $dir and its subdirectories (or only files and subdirectories)
dol_delete_file($file, $disableglob=0, $nophperrors=0, $nohook=0, $object=null, $allowdotdot=false, $indexdatabase=1, $nolog=0)
Remove a file or several files with a mask.
dol_dir_list($utf8_path, $types="all", $recursive=0, $filter="", $excludefilter=null, $sortcriteria="name", $sortorder=SORT_ASC, $mode=0, $nohook=0, $relativename="", $donotfollowsymlinks=0, $nbsecondsold=0)
Scan a directory and return a list of files/directories.
Definition files.lib.php:63
img_object($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0)
Show a picto called object_picto (generic function)
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_string_nohtmltag($stringtoclean, $removelinefeed=1, $pagecodeto='UTF-8', $strip_tags=0, $removedoublespaces=1)
Clean a string from all HTML tags and entities.
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
dol_strlen($string, $stringencoding='UTF-8')
Make a strlen call.
price($amount, $form=0, $outlangs='', $trunc=1, $rounding=-1, $forcerounding=-1, $currency_code='')
Function to format a value into an amount for visual output Function used into PDF and HTML pages.
dol_now($mode='auto')
Return date for now.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
getLocalTaxesFromRate($vatrate, $local, $buyer, $seller, $firstparamisid=0)
Get type and rate of localtaxes for a particular vat rate/country of a thirdparty.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
dol_concatdesc($text1, $text2, $forxml=false, $invert=false)
Concat 2 descriptions with a new line between them (second operand after first one with appropriate n...
complete_substitutions_array(&$substitutionarray, $outputlangs, $object=null, $parameters=null, $callfunc="completesubstitutionarray")
Complete the $substitutionarray with more entries coming from external module that had set the "subst...
make_substitutions($text, $substitutionarray, $outputlangs=null, $converttextinhtmlifnecessary=0)
Make substitution into a text string, replacing keys with vals from $substitutionarray (oldval=>newva...
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_trunc($string, $size=40, $trunc='right', $stringencoding='UTF-8', $nodot=0, $display=0)
Truncate a string to a particular length adding '…' if string larger than length.
getCommonSubstitutionArray($outputlangs, $onlykey=0, $exclude=null, $object=null, $include=null)
Return array of possible common substitutions.
isValidEmail($address, $acceptsupervisorkey=0, $acceptuserkey=0)
Return true if email syntax is ok.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
get_exdir($num, $level, $alpha, $withoutslash, $object, $modulepart='')
Return a path to have a the directory according to object where files are stored.
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...
calcul_price_total($qty, $pu, $remise_percent_ligne, $txtva, $uselocaltax1_rate, $uselocaltax2_rate, $remise_percent_global, $price_base_type, $info_bits, $type, $seller='', $localtaxes_array=[], $progress=100, $multicurrency_tx=1, $pu_devise=0, $multicurrency_code='')
Calculate totals (net, vat, ...) of a line.
Definition price.lib.php:88
if(preg_match('/crypted:/i', $dolibarr_main_db_pass)||!empty($dolibarr_main_db_encrypted_pass)) $conf db type
Definition repair.php:137
publicphonebutton2 phonegreen basiclayout basiclayout TotalHT VATCode TotalVAT TotalLT1 TotalLT2 TotalTTC TotalHT clearboth nowraponall TAKEPOS_SHOW_SUBPRICE right right right takeposterminal SELECT e e e e e statut
Definition invoice.php:2010
publicphonebutton2 phonegreen basiclayout basiclayout TotalHT VATCode TotalVAT TotalLT1 TotalLT2 TotalTTC TotalHT clearboth nowraponall TAKEPOS_SHOW_SUBPRICE right right right takeposterminal SELECT e rowid
Definition invoice.php:2010