dolibarr 21.0.4
societe.class.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2002-2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3 * Copyright (C) 2004-2021 Laurent Destailleur <eldy@users.sourceforge.net>
4 * Copyright (C) 2004 Eric Seigne <eric.seigne@ryxeo.com>
5 * Copyright (C) 2003 Brian Fraval <brian@fraval.org>
6 * Copyright (C) 2006 Andre Cianfarani <acianfa@free.fr>
7 * Copyright (C) 2005-2017 Regis Houssin <regis.houssin@inodbox.com>
8 * Copyright (C) 2008 Patrick Raguin <patrick.raguin@auguria.net>
9 * Copyright (C) 2010-2018 Juanjo Menent <jmenent@2byte.es>
10 * Copyright (C) 2013 Florian Henry <florian.henry@open-concept.pro>
11 * Copyright (C) 2013-2024 Alexandre Spangaro <alexandre@inovea-conseil.com>
12 * Copyright (C) 2013 Peter Fontaine <contact@peterfontaine.fr>
13 * Copyright (C) 2014-2015 Marcos García <marcosgdf@gmail.com>
14 * Copyright (C) 2015 Raphaël Doursenaud <rdoursenaud@gpcsolutions.fr>
15 * Copyright (C) 2017 Rui Strecht <rui.strecht@aliartalentos.com>
16 * Copyright (C) 2018 Philippe Grand <philippe.grand@atoo-net.com>
17 * Copyright (C) 2019-2020 Josep Lluís Amador <joseplluis@lliuretic.cat>
18 * Copyright (C) 2019-2025 Frédéric France <frederic.france@free.fr>
19 * Copyright (C) 2020 Open-Dsi <support@open-dsi.fr>
20 * Copyright (C) 2022 ButterflyOfFire <butterflyoffire+dolibarr@protonmail.com>
21 * Copyright (C) 2023-2024 Alexandre Janniaux <alexandre.janniaux@gmail.com>
22 * Copyright (C) 2024 William Mead <william.mead@manchenumerique.fr>
23 * Copyright (C) 2024 MDW <mdeweerd@users.noreply.github.com>
24 *
25 * This program is free software; you can redistribute it and/or modify
26 * it under the terms of the GNU General Public License as published by
27 * the Free Software Foundation; either version 3 of the License, or
28 * (at your option) any later version.
29 *
30 * This program is distributed in the hope that it will be useful,
31 * but WITHOUT ANY WARRANTY; without even the implied warranty of
32 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
33 * GNU General Public License for more details.
34 *
35 * You should have received a copy of the GNU General Public License
36 * along with this program. If not, see <https://www.gnu.org/licenses/>.
37 */
38
44require_once DOL_DOCUMENT_ROOT.'/core/class/commonobject.class.php';
45require_once DOL_DOCUMENT_ROOT.'/core/class/commonincoterm.class.php';
46require_once DOL_DOCUMENT_ROOT.'/core/class/commonsocialnetworks.class.php';
47require_once DOL_DOCUMENT_ROOT.'/core/class/commonpeople.class.php';
48require_once DOL_DOCUMENT_ROOT.'/multicurrency/class/multicurrency.class.php';
49
50
54class Societe extends CommonObject
55{
56 use CommonIncoterm;
57 use CommonSocialNetworks;
58 use CommonPeople;
59
63 public $module = 'societe';
64
68 public $element = 'societe';
69
73 public $table_element = 'societe';
74
78 public $fk_element = 'fk_soc';
79
83 public $fieldsforcombobox = 'nom,name_alias';
84
88 protected $childtables = array(
89 'supplier_proposal' => array('name' => 'SupplierProposal'),
90 'propal' => array('name' => 'Proposal'),
91 'commande' => array('name' => 'Order'),
92 'facture' => array('name' => 'Invoice'),
93 'facture_rec' => array('name' => 'RecurringInvoiceTemplate'),
94 'contrat' => array('name' => 'Contract'),
95 'fichinter' => array('name' => 'Fichinter'),
96 'facture_fourn' => array('name' => 'SupplierInvoice'),
97 'commande_fournisseur' => array('name' => 'SupplierOrder'),
98 'projet' => array('name' => 'Project'),
99 'expedition' => array('name' => 'Shipment'),
100 'prelevement_lignes' => array('name' => 'DirectDebitRecord'),
101 );
102
107 protected $childtablesoncascade = array(
108 'societe_prices',
109 'product_fournisseur_price',
110 'product_customer_price_log',
111 'product_customer_price',
112 '@Contact:/contact/class/contact.class.php:fk_soc',
113 'adherent',
114 'societe_account',
115 'societe_rib',
116 'societe_remise',
117 'societe_remise_except',
118 'societe_commerciaux',
119 'categorie',
120 'notify',
121 'notify_def',
122 'actioncomm',
123 );
124
128 public $picto = 'company';
129
134 public $restrictiononfksoc = 1;
135
140 public $SupplierCategories = array();
141
146 public $prefixCustomerIsRequired;
147
177 public $fields = array(
178 'rowid' => array('type' => 'integer', 'label' => 'TechnicalID', 'enabled' => 1, 'visible' => -2, 'noteditable' => 1, 'notnull' => 1, 'index' => 1, 'position' => 1, 'comment' => 'Id', 'css' => 'left'),
179 'parent' => array('type' => 'integer', 'label' => 'Parent', 'enabled' => 1, 'visible' => -1, 'position' => 20),
180 'tms' => array('type' => 'timestamp', 'label' => 'DateModification', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 25),
181 'datec' => array('type' => 'datetime', 'label' => 'DateCreation', 'enabled' => 1, 'visible' => -1, 'position' => 30),
182 'nom' => array('type' => 'varchar(128)', 'length' => 128, 'label' => 'Nom', 'enabled' => 1, 'visible' => -1, 'position' => 35, 'showoncombobox' => 1, 'csslist' => 'tdoverflowmax150'),
183 'name_alias' => array('type' => 'varchar(128)', 'label' => 'Name alias', 'enabled' => 1, 'visible' => -1, 'position' => 36, 'showoncombobox' => 2),
184 'entity' => array('type' => 'integer', 'label' => 'Entity', 'default' => '1', 'enabled' => 1, 'visible' => -2, 'notnull' => 1, 'position' => 40, 'index' => 1),
185 'ref_ext' => array('type' => 'varchar(255)', 'label' => 'RefExt', 'enabled' => 1, 'visible' => 0, 'position' => 45),
186 'code_client' => array('type' => 'varchar(24)', 'label' => 'CustomerCode', 'enabled' => 1, 'visible' => -1, 'position' => 55),
187 'code_fournisseur' => array('type' => 'varchar(24)', 'label' => 'SupplierCode', 'enabled' => 1, 'visible' => -1, 'position' => 60),
188 'code_compta' => array('type' => 'varchar(24)', 'label' => 'CustomerAccountancyCode', 'enabled' => 1, 'visible' => -1, 'position' => 65),
189 'code_compta_fournisseur' => array('type' => 'varchar(24)', 'label' => 'SupplierAccountancyCode', 'enabled' => 1, 'visible' => -1, 'position' => 70),
190 'address' => array('type' => 'varchar(255)', 'label' => 'Address', 'enabled' => 1, 'visible' => -1, 'position' => 75),
191 'zip' => array('type' => 'varchar(25)', 'label' => 'Zip', 'enabled' => 1, 'visible' => -1, 'position' => 80),
192 'town' => array('type' => 'varchar(50)', 'label' => 'Town', 'enabled' => 1, 'visible' => -1, 'position' => 85),
193 'fk_departement' => array('type' => 'integer', 'label' => 'State', 'enabled' => 1, 'visible' => -1, 'position' => 90),
194 'fk_pays' => array('type' => 'integer:Ccountry:core/class/ccountry.class.php', 'label' => 'Country', 'enabled' => 1, 'visible' => -1, 'position' => 95),
195 'phone' => array('type' => 'varchar(20)', 'label' => 'Phone', 'enabled' => 1, 'visible' => -1, 'position' => 100),
196 'phone_mobile' => array('type' => 'varchar(20)', 'label' => 'PhoneMobile', 'enabled' => 1, 'visible' => -1, 'position' => 102),
197 'fax' => array('type' => 'varchar(20)', 'label' => 'Fax', 'enabled' => 1, 'visible' => -1, 'position' => 105),
198 'url' => array('type' => 'varchar(255)', 'label' => 'Url', 'enabled' => 1, 'visible' => -1, 'position' => 110),
199 'email' => array('type' => 'varchar(128)', 'label' => 'Email', 'enabled' => 1, 'visible' => -1, 'position' => 115),
200 'socialnetworks' => array('type' => 'text', 'label' => 'Socialnetworks', 'enabled' => 1, 'visible' => -1, 'position' => 120),
201 'fk_effectif' => array('type' => 'integer', 'label' => 'Workforce', 'enabled' => 1, 'visible' => -1, 'position' => 170),
202 'fk_typent' => array('type' => 'integer', 'label' => 'TypeOfCompany', 'enabled' => 1, 'visible' => -1, 'position' => 175, 'csslist' => 'minwidth200'),
203 'fk_forme_juridique' => array('type' => 'integer', 'label' => 'JuridicalStatus', 'enabled' => 1, 'visible' => -1, 'position' => 180),
204 'fk_currency' => array('type' => 'varchar(3)', 'label' => 'Currency', 'enabled' => 1, 'visible' => -1, 'position' => 185),
205 'siren' => array('type' => 'varchar(128)', 'label' => 'Idprof1', 'enabled' => 1, 'visible' => -1, 'position' => 190),
206 'siret' => array('type' => 'varchar(128)', 'label' => 'Idprof2', 'enabled' => 1, 'visible' => -1, 'position' => 195),
207 'ape' => array('type' => 'varchar(128)', 'label' => 'Idprof3', 'enabled' => 1, 'visible' => -1, 'position' => 200),
208 'idprof4' => array('type' => 'varchar(128)', 'label' => 'Idprof4', 'enabled' => 1, 'visible' => -1, 'position' => 205),
209 'idprof5' => array('type' => 'varchar(128)', 'label' => 'Idprof5', 'enabled' => 1, 'visible' => -1, 'position' => 206),
210 'idprof6' => array('type' => 'varchar(128)', 'label' => 'Idprof6', 'enabled' => 1, 'visible' => -1, 'position' => 207),
211 'tva_intra' => array('type' => 'varchar(20)', 'label' => 'Tva intra', 'enabled' => 1, 'visible' => -1, 'position' => 210),
212 'capital' => array('type' => 'double(24,8)', 'label' => 'Capital', 'enabled' => 1, 'visible' => -1, 'position' => 215),
213 'fk_stcomm' => array('type' => 'integer', 'label' => 'CommercialStatus', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 220),
214 'note_public' => array('type' => 'html', 'label' => 'NotePublic', 'enabled' => 1, 'visible' => 0, 'position' => 225),
215 'note_private' => array('type' => 'html', 'label' => 'NotePrivate', 'enabled' => 1, 'visible' => 0, 'position' => 230),
216 'prefix_comm' => array('type' => 'varchar(5)', 'label' => 'Prefix comm', 'enabled' => "getDolGlobalInt('SOCIETE_USEPREFIX')", 'visible' => -1, 'position' => 235),
217 'client' => array('type' => 'tinyint(4)', 'label' => 'Client', 'enabled' => 1, 'visible' => -1, 'position' => 240),
218 'fournisseur' => array('type' => 'tinyint(4)', 'label' => 'Fournisseur', 'enabled' => 1, 'visible' => -1, 'position' => 245),
219 'supplier_account' => array('type' => 'varchar(32)', 'label' => 'Supplier account', 'enabled' => 1, 'visible' => -1, 'position' => 250),
220 'fk_prospectlevel' => array('type' => 'varchar(12)', 'label' => 'ProspectLevel', 'enabled' => 1, 'visible' => -1, 'position' => 255),
221 'customer_bad' => array('type' => 'tinyint(4)', 'label' => 'Customer bad', 'enabled' => 1, 'visible' => -1, 'position' => 260),
222 'customer_rate' => array('type' => 'double', 'label' => 'Customer rate', 'enabled' => 1, 'visible' => -1, 'position' => 265),
223 'supplier_rate' => array('type' => 'double', 'label' => 'Supplier rate', 'enabled' => 1, 'visible' => -1, 'position' => 270),
224 'fk_user_creat' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserAuthor', 'enabled' => 1, 'visible' => -2, 'position' => 275),
225 'fk_user_modif' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserModif', 'enabled' => 1, 'visible' => -2, 'notnull' => -1, 'position' => 280),
226 //'remise_client' =>array('type'=>'double', 'label'=>'CustomerDiscount', 'enabled'=>1, 'visible'=>-1, 'position'=>285, 'isameasure'=>1),
227 //'remise_supplier' =>array('type'=>'double', 'label'=>'SupplierDiscount', 'enabled'=>1, 'visible'=>-1, 'position'=>290, 'isameasure'=>1),
228 'mode_reglement' => array('type' => 'tinyint(4)', 'label' => 'Mode reglement', 'enabled' => 1, 'visible' => -1, 'position' => 295),
229 'cond_reglement' => array('type' => 'tinyint(4)', 'label' => 'Cond reglement', 'enabled' => 1, 'visible' => -1, 'position' => 300),
230 'deposit_percent' => array('type' => 'varchar(63)', 'label' => 'DepositPercent', 'enabled' => 1, 'visible' => -1, 'position' => 301),
231 'mode_reglement_supplier' => array('type' => 'integer', 'label' => 'Mode reglement supplier', 'enabled' => 1, 'visible' => -1, 'position' => 305),
232 'cond_reglement_supplier' => array('type' => 'integer', 'label' => 'Cond reglement supplier', 'enabled' => 1, 'visible' => -1, 'position' => 308),
233 'outstanding_limit' => array('type' => 'double(24,8)', 'label' => 'OutstandingBill', 'enabled' => 1, 'visible' => -1, 'position' => 310, 'isameasure' => 1),
234 'order_min_amount' => array('type' => 'double(24,8)', 'label' => 'Order min amount', 'enabled' => 'isModEnabled("order") && !empty($conf->global->ORDER_MANAGE_MIN_AMOUNT)', 'visible' => -1, 'position' => 315, 'isameasure' => 1),
235 'supplier_order_min_amount' => array('type' => 'double(24,8)', 'label' => 'Supplier order min amount', 'enabled' => 'isModEnabled("order") && !empty($conf->global->ORDER_MANAGE_MIN_AMOUNT)', 'visible' => -1, 'position' => 320, 'isameasure' => 1),
236 'fk_shipping_method' => array('type' => 'integer', 'label' => 'Fk shipping method', 'enabled' => 1, 'visible' => -1, 'position' => 330),
237 'tva_assuj' => array('type' => 'tinyint(4)', 'label' => 'Tva assuj', 'enabled' => 1, 'visible' => -1, 'position' => 335),
238 'localtax1_assuj' => array('type' => 'tinyint(4)', 'label' => 'Localtax1 assuj', 'enabled' => 1, 'visible' => -1, 'position' => 340),
239 'localtax1_value' => array('type' => 'double(6,3)', 'label' => 'Localtax1 value', 'enabled' => 1, 'visible' => -1, 'position' => 345),
240 'localtax2_assuj' => array('type' => 'tinyint(4)', 'label' => 'Localtax2 assuj', 'enabled' => 1, 'visible' => -1, 'position' => 350),
241 'localtax2_value' => array('type' => 'double(6,3)', 'label' => 'Localtax2 value', 'enabled' => 1, 'visible' => -1, 'position' => 355),
242 'vat_reverse_charge' => array('type' => 'tinyint(4)', 'label' => 'Vat reverse charge', 'enabled' => 1, 'visible' => -1, 'position' => 335),
243 'barcode' => array('type' => 'varchar(255)', 'label' => 'Barcode', 'enabled' => 1, 'visible' => -1, 'position' => 360),
244 'price_level' => array('type' => 'integer', 'label' => 'Price level', 'enabled' => '$conf->global->PRODUIT_MULTIPRICES || getDolGlobalString("PRODUIT_CUSTOMER_PRICES_BY_QTY_MULTIPRICES") || getDolGlobalString("PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES")', 'visible' => -1, 'position' => 365),
245 'default_lang' => array('type' => 'varchar(6)', 'label' => 'Default lang', 'enabled' => 1, 'visible' => -1, 'position' => 370),
246 'canvas' => array('type' => 'varchar(32)', 'label' => 'Canvas', 'enabled' => 1, 'visible' => -1, 'position' => 375),
247 'fk_barcode_type' => array('type' => 'integer', 'label' => 'Fk barcode type', 'enabled' => 1, 'visible' => -1, 'position' => 405),
248 'webservices_url' => array('type' => 'varchar(255)', 'label' => 'Webservices url', 'enabled' => 1, 'visible' => -1, 'position' => 410),
249 'webservices_key' => array('type' => 'varchar(128)', 'label' => 'Webservices key', 'enabled' => 1, 'visible' => -1, 'position' => 415),
250 'fk_incoterms' => array('type' => 'integer', 'label' => 'Fk incoterms', 'enabled' => 1, 'visible' => -1, 'position' => 425),
251 'location_incoterms' => array('type' => 'varchar(255)', 'label' => 'Location incoterms', 'enabled' => 1, 'visible' => -1, 'position' => 430),
252 'model_pdf' => array('type' => 'varchar(255)', 'label' => 'Model pdf', 'enabled' => 1, 'visible' => 0, 'position' => 435),
253 'last_main_doc' => array('type' => 'varchar(255)', 'label' => 'LastMainDoc', 'enabled' => 1, 'visible' => -1, 'position' => 270),
254 'fk_multicurrency' => array('type' => 'integer', 'label' => 'Fk multicurrency', 'enabled' => 1, 'visible' => -1, 'position' => 440),
255 'multicurrency_code' => array('type' => 'varchar(255)', 'label' => 'Multicurrency code', 'enabled' => 1, 'visible' => -1, 'position' => 445),
256 'fk_account' => array('type' => 'integer', 'label' => 'PaymentBankAccount', 'enabled' => 1, 'visible' => -1, 'position' => 450),
257 'fk_warehouse' => array('type' => 'integer', 'label' => 'Warehouse', 'enabled' => 1, 'visible' => -1, 'position' => 455),
258 'logo' => array('type' => 'varchar(255)', 'label' => 'Logo', 'enabled' => 1, 'visible' => -1, 'position' => 400),
259 'logo_squarred' => array('type' => 'varchar(255)', 'label' => 'Logo squarred', 'enabled' => 1, 'visible' => -1, 'position' => 401),
260 'status' => array('type' => 'tinyint(4)', 'label' => 'Status', 'enabled' => 1, 'visible' => -1, 'position' => 500),
261 'import_key' => array('type' => 'varchar(14)', 'label' => 'ImportId', 'enabled' => 1, 'visible' => -2, 'position' => 1000),
262 );
263
267 public $entity;
268
275 public $nom;
276
280 public $name;
281
286 public $name_alias;
287
291 public $particulier;
292
297 public $status = 1;
298
302 public $region_code;
303
307 public $region;
308
312 public $country_id;
313
319 public $departement_code;
320
326 public $departement;
327
333 public $pays;
334
339 public $phone;
344 public $phone_mobile;
349 public $fax;
350
355 public $email;
356
361 public $no_email;
362
368 public $skype;
369
375 public $twitter;
376
382 public $facebook;
383
389 public $linkedin;
390
395 public $url;
396
401 public $barcode;
402
403 // 6 professional id (usage depends on country)
404
409 public $idprof1;
410
416 public $siren;
417
418
423 public $idprof2;
424
430 public $siret;
431
436 public $idprof3;
437
443 public $ape;
444
449 public $idprof4;
450
455 public $idprof5;
456
461 public $idprof6;
462
467 public $idprof7;
468
473 public $idprof8;
474
479 public $idprof9;
480
485 public $idprof10;
486
491 public $socialobject;
492
496 public $prefix_comm;
497
501 public $tva_assuj = 1;
502
506 public $tva_intra;
507
511 public $vat_reverse_charge = 0;
512
513 // Local taxes
517 public $localtax1_assuj;
521 public $localtax1_value;
525 public $localtax2_assuj;
529 public $localtax2_value;
530
534 public $managers;
535
539 public $capital;
540
544 public $typent_id = 0;
548 public $typent_code;
552 public $effectif;
556 public $effectif_id = 0;
560 public $forme_juridique_code = 0;
565 public $forme_juridique;
566
570 public $remise_percent;
574 public $remise_supplier_percent;
575
579 public $mode_reglement_id;
583 public $cond_reglement_id;
587 public $deposit_percent;
591 public $mode_reglement_supplier_id;
595 public $cond_reglement_supplier_id;
599 public $transport_mode_supplier_id;
600
604 public $fk_prospectlevel;
605
609 public $name_bis;
610
616 public $user_modification;
617
623 public $user_creation;
624
629 public $client = 0;
630
635 public $prospect = 0;
636
641 public $fournisseur;
642
647 public $code_client;
648
653 public $code_fournisseur;
654
659 public $code_compta_client;
660
665 public $accountancy_code_customer_general;
666
671 public $accountancy_code_customer;
672
677 public $code_compta_fournisseur;
678
683 public $accountancy_code_supplier_general;
684
689 public $accountancy_code_supplier;
690
695 public $code_compta_product;
696
702 public $note;
703
708 public $note_private;
709
714 public $note_public;
715
720 public $stcomm_id;
721
726 public $stcomm_picto;
727
732 public $status_prospect_label;
733
738 public $price_level;
739
743 public $outstanding_limit;
744
748 public $order_min_amount;
749
753 public $supplier_order_min_amount;
754
759 public $commercial_id;
760
765 public $parent;
766
771 public $default_lang;
772
776 public $ref;
777
783 public $ref_ext;
784
788 public $ip;
789
796 public $import_key;
797
802 public $webservices_url;
803
808 public $webservices_key;
809
813 public $logo;
814
818 public $logo_small;
819
823 public $logo_mini;
824
828 public $logo_squarred;
829
833 public $logo_squarred_small;
834
838 public $logo_squarred_mini;
839
843 public $accountancy_code_sell;
844
848 public $accountancy_code_buy;
849
850 // Multicurrency
854 public $fk_multicurrency;
855
859 public $multicurrency_code;
860
861 // Warehouse
865 public $fk_warehouse;
866
870 public $termsofsale;
871
872
873 // Fields loaded by fetchPartnerships()
874
878 public $partnerships = array();
879
880
884 public $bank_account;
885
886
887 const STATUS_CEASED = 0;
888 const STATUS_INACTIVITY = 1;
889
893 const NO_CUSTOMER = 0;
894
898 const CUSTOMER = 1;
899
903 const PROSPECT = 2;
904
908 const CUSTOMER_AND_PROSPECT = 3;
909
913 const NO_SUPPLIER = 0;
914
918 const SUPPLIER = 1;
919
925 protected function deprecatedProperties()
926 {
927 return
928 array(
929 'code_compta' => 'code_compta_client',
930 )
931 + parent::deprecatedProperties();
932 }
933
934
935
941 public function __construct($db)
942 {
943 $this->db = $db;
944
945 $this->ismultientitymanaged = 1;
946 $this->isextrafieldmanaged = 1;
947 $this->client = 0;
948 $this->prospect = 0;
949 $this->fournisseur = 0;
950 $this->typent_id = 0;
951 $this->effectif_id = 0;
952 $this->forme_juridique_code = 0;
953 $this->tva_assuj = 1;
954 $this->vat_reverse_charge = 0;
955 $this->status = 1;
956
957 if (getDolGlobalString('COMPANY_SHOW_ADDRESS_SELECTLIST')) {
958 $this->fields['address']['showoncombobox'] = getDolGlobalInt('COMPANY_SHOW_ADDRESS_SELECTLIST');
959 $this->fields['zip']['showoncombobox'] = getDolGlobalInt('COMPANY_SHOW_ADDRESS_SELECTLIST');
960 $this->fields['town']['showoncombobox'] = getDolGlobalInt('COMPANY_SHOW_ADDRESS_SELECTLIST');
961 //$this->fields['fk_pays']['showoncombobox'] = $conf->global->COMPANY_SHOW_ADDRESS_SELECTLIST;
962 }
963 }
964
965
974 public function create(User $user, $notrigger = 0)
975 {
976 global $langs, $conf;
977
978 $error = 0;
979
980 // Clean parameters
981 if (empty($this->status)) {
982 $this->status = 0;
983 }
984 $this->name = $this->name ? trim($this->name) : trim((string) $this->nom);
985 $this->setUpperOrLowerCase();
986 $this->nom = $this->name; // For backward compatibility
987
988 if (empty($this->client)) {
989 $this->client = 0;
990 }
991 if (empty($this->fournisseur)) {
992 $this->fournisseur = 0;
993 }
994 $this->import_key = trim((string) $this->import_key);
995
996 $this->code_compta_client = trim($this->code_compta_client);
997
998 $this->accountancy_code_customer_general = trim($this->accountancy_code_customer_general);
999 $this->accountancy_code_customer = trim((string) $this->code_compta_client);
1000 $this->accountancy_code_supplier_general = trim($this->accountancy_code_supplier_general);
1001 $this->accountancy_code_supplier = trim((string) $this->code_compta_fournisseur);
1002 $this->accountancy_code_buy = trim((string) $this->accountancy_code_buy);
1003 $this->accountancy_code_sell = trim((string) $this->accountancy_code_sell);
1004
1005 if (!empty($this->multicurrency_code)) {
1006 $this->fk_multicurrency = MultiCurrency::getIdFromCode($this->db, $this->multicurrency_code);
1007 }
1008 if (empty($this->fk_multicurrency)) {
1009 $this->multicurrency_code = '';
1010 $this->fk_multicurrency = 0;
1011 }
1012
1013 if (empty($this->country_id) && !empty($this->country_code)) {
1014 $country_id = getCountry($this->country_code, '3');
1015 $this->country_id = is_int($country_id) ? $country_id : 0;
1016 }
1017
1018 dol_syslog(get_class($this)."::create ".$this->name);
1019
1020 $now = dol_now();
1021
1022 if (empty($this->date_creation)) {
1023 $this->date_creation = $now;
1024 }
1025
1026 $this->db->begin();
1027
1028 // For automatic creation during create action (not used by Dolibarr GUI, can be used by scripts)
1029 if ($this->code_client == -1 || $this->code_client === 'auto') {
1030 $this->get_codeclient($this, 0);
1031 }
1032 if ($this->code_fournisseur == '-1' || $this->code_fournisseur === 'auto') {
1033 $this->get_codefournisseur($this, 1);
1034 }
1035
1036 // Check more parameters (including mandatory setup
1037 // If error, this->errors[] is filled
1038 $result = $this->verify();
1039
1040 if ($result >= 0) {
1041 $this->entity = setEntity($this);
1042
1043 $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe (";
1044 $sql .= "nom";
1045 $sql .= ", name_alias";
1046 $sql .= ", entity";
1047 $sql .= ", datec";
1048 $sql .= ", fk_user_creat";
1049 $sql .= ", fk_typent";
1050 $sql .= ", canvas";
1051 $sql .= ", status";
1052 $sql .= ", ref_ext";
1053 $sql .= ", fk_stcomm";
1054 $sql .= ", fk_incoterms";
1055 $sql .= ", location_incoterms";
1056 $sql .= ", import_key";
1057 $sql .= ", fk_multicurrency";
1058 $sql .= ", multicurrency_code";
1059 $sql .= ", ip";
1060 if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
1061 $sql .= ", vat_reverse_charge";
1062 $sql .= ", accountancy_code_buy";
1063 $sql .= ", accountancy_code_sell";
1064 }
1065 $sql .= ") VALUES ('".$this->db->escape($this->name)."',";
1066 $sql .= " '".$this->db->escape($this->name_alias)."',";
1067 $sql .= " ".((int) $this->entity).",";
1068 $sql .= " '".$this->db->idate($this->date_creation)."'";
1069 $sql .= ", ".(!empty($user->id) ? ((int) $user->id) : "null");
1070 $sql .= ", ".(!empty($this->typent_id) ? ((int) $this->typent_id) : "null");
1071 $sql .= ", ".(!empty($this->canvas) ? "'".$this->db->escape($this->canvas)."'" : "null");
1072 $sql .= ", ".((int) $this->status);
1073 $sql .= ", ".(!empty($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : "null");
1074 $sql .= ", 0";
1075 $sql .= ", ".(int) $this->fk_incoterms;
1076 $sql .= ", '".$this->db->escape($this->location_incoterms)."'";
1077 $sql .= ", ".(!empty($this->import_key) ? "'".$this->db->escape($this->import_key)."'" : "null");
1078 $sql .= ", ".(int) $this->fk_multicurrency;
1079 $sql .= ", '".$this->db->escape($this->multicurrency_code)."'";
1080 $sql .= ", '".$this->db->escape($this->ip)."'";
1081 if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
1082 $sql .= ", ".(empty($this->vat_reverse_charge) ? '0' : '1');
1083 $sql .= ", '" . $this->db->escape($this->accountancy_code_buy) . "'";
1084 $sql .= ", '" . $this->db->escape($this->accountancy_code_sell) . "'";
1085 }
1086 $sql .= ")";
1087
1088 dol_syslog(get_class($this)."::create", LOG_DEBUG);
1089
1090 $result = $this->db->query($sql);
1091 if ($result) {
1092 $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."societe");
1093
1094 $ret = $this->update($this->id, $user, 0, 1, 1, 'add');
1095
1096 // update accountancy for this entity
1097 if (!$error && getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
1098 $this->db->query("DELETE FROM ".MAIN_DB_PREFIX."societe_perentity WHERE fk_soc = ".((int) $this->id)." AND entity = ".((int) $conf->entity));
1099
1100 $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_perentity (";
1101 $sql .= " fk_soc";
1102 $sql .= ", entity";
1103 $sql .= ", vat_reverse_charge";
1104 $sql .= ", accountancy_code_customer_general";
1105 $sql .= ", accountancy_code_customer";
1106 $sql .= ", accountancy_code_supplier_general";
1107 $sql .= ", accountancy_code_supplier";
1108 $sql .= ", accountancy_code_buy";
1109 $sql .= ", accountancy_code_sell";
1110 $sql .= ") VALUES (";
1111 $sql .= $this->id;
1112 $sql .= ", ".((int) $conf->entity);
1113 $sql .= ", ".(empty($this->vat_reverse_charge) ? '0' : '1');
1114 $sql .= ", '".$this->db->escape($this->accountancy_code_customer_general)."'";
1115 $sql .= ", '".$this->db->escape($this->accountancy_code_customer)."'";
1116 $sql .= ", '".$this->db->escape($this->accountancy_code_supplier_general)."'";
1117 $sql .= ", '".$this->db->escape($this->accountancy_code_supplier)."'";
1118 $sql .= ", '".$this->db->escape($this->accountancy_code_buy)."'";
1119 $sql .= ", '".$this->db->escape($this->accountancy_code_sell)."'";
1120 $sql .= ")";
1121 $result = $this->db->query($sql);
1122 if (!$result) {
1123 $error++;
1124 $this->error = 'ErrorFailedToUpdateAccountancyForEntity';
1125 }
1126 }
1127
1128 // Ajout du commercial affecte
1129 if ($this->commercial_id != '' && $this->commercial_id != -1) {
1130 $this->add_commercial($user, $this->commercial_id);
1131 } elseif (!$user->hasRight('societe', 'client', 'voir')) {
1132 // si un commercial cree un client il lui est affecte automatiquement
1133 $this->add_commercial($user, $user->id);
1134 }
1135
1136 if ($ret >= 0) {
1137 if (! $notrigger) {
1138 // Call trigger
1139 $result = $this->call_trigger('COMPANY_CREATE', $user);
1140 if ($result < 0) {
1141 $error++;
1142 }
1143 // End call triggers
1144 }
1145 } else {
1146 $error++;
1147 }
1148
1149 if (!$error) {
1150 dol_syslog(get_class($this)."::Create success id=".$this->id);
1151 $this->db->commit();
1152 return $this->id;
1153 } else {
1154 dol_syslog(get_class($this)."::Create echec update ".$this->error.(empty($this->errors) ? '' : ' '.implode(',', $this->errors)), LOG_ERR);
1155 $this->db->rollback();
1156 return -4;
1157 }
1158 } else {
1159 if ($this->db->lasterrno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
1160 $this->error = $langs->trans("ErrorCompanyNameAlreadyExists", $this->name); // duplicate on a field (code or profid or ...)
1161 $result = -1;
1162 } else {
1163 $this->error = $this->db->lasterror();
1164 $result = -2;
1165 }
1166 $this->db->rollback();
1167 return $result;
1168 }
1169 } else {
1170 $this->db->rollback();
1171 dol_syslog(get_class($this)."::Create fails verify ".implode(',', $this->errors), LOG_WARNING);
1172 return -3;
1173 }
1174 }
1175
1176
1177 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
1187 public function create_individual(User $user, $no_email = 0, $tags = array(), $notrigger = 0)
1188 {
1189 global $conf;
1190
1191 $error = 0;
1192
1193 $this->db->begin();
1194
1195 // phpcs:enable
1196 require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
1197 $contact = new Contact($this->db);
1198
1199 $contact->name = $this->name_bis;
1200 $contact->firstname = $this->firstname;
1201 $contact->civility_id = $this->civility_id;
1202 $contact->socid = $this->id; // fk_soc
1203 $contact->statut = 1; // deprecated
1204 $contact->status = 1;
1205 $contact->priv = 0;
1206 $contact->country_id = $this->country_id;
1207 $contact->state_id = $this->state_id;
1208 $contact->address = $this->address;
1209 $contact->email = $this->email;
1210 $contact->zip = $this->zip;
1211 $contact->town = $this->town;
1212 $this->setUpperOrLowerCase();
1213 $contact->phone_pro = $this->phone;
1214 if (getDolGlobalString('CONTACTS_DEFAULT_ROLES')) {
1215 $contact->roles = explode(',', getDolGlobalString('CONTACTS_DEFAULT_ROLES'));
1216 }
1217
1218 $contactId = $contact->create($user, $notrigger);
1219 if ($contactId < 0) {
1220 $error++;
1221 $this->setErrorsFromObject($contact);
1222 dol_syslog(get_class($this)."::create_individual ERROR:".$this->error, LOG_ERR);
1223 }
1224
1225 if (empty($error) && is_array($tags) && !empty($tags)) {
1226 $result = $contact->setCategories($tags);
1227 if ($result < 0) {
1228 $error++;
1229 $this->setErrorsFromObject($contact);
1230 dol_syslog(get_class($this)."::create_individual Affect Tag ERROR:".$this->error, LOG_ERR);
1231 $contactId = $result;
1232 }
1233 }
1234
1235 if (empty($error) && isModEnabled('mailing') && !empty($contact->email) && isset($no_email)) {
1236 $result = $contact->setNoEmail($no_email);
1237 if ($result < 0) {
1238 $this->setErrorsFromObject($contact);
1239 dol_syslog(get_class($this)."::create_individual set mailing status ERROR:".$this->error, LOG_ERR);
1240 $contactId = $result;
1241 }
1242 }
1243
1244 if (empty($error)) {
1245 dol_syslog(get_class($this)."::create_individual success");
1246 $this->db->commit();
1247 } else {
1248 $this->db->rollback();
1249 }
1250
1251 return $contactId;
1252 }
1253
1260 public function verify()
1261 {
1262 global $conf, $langs, $mysoc;
1263
1264 $error = 0;
1265 $this->errors = array();
1266
1267 $result = 0;
1268 $this->name = trim($this->name);
1269 $this->nom = $this->name; // For backward compatibility
1270
1271 if (!$this->name) {
1272 $this->errors[] = 'ErrorBadThirdPartyName';
1273 $result = -2;
1274 }
1275
1276 if ($this->client) {
1277 $rescode = $this->check_codeclient();
1278 if ($rescode != 0 && $rescode != -5) {
1279 if ($rescode == -1) {
1280 $this->errors[] = 'ErrorBadCustomerCodeSyntax';
1281 } elseif ($rescode == -2) {
1282 $this->errors[] = 'ErrorCustomerCodeRequired';
1283 } elseif ($rescode == -3) {
1284 $this->errors[] = 'ErrorCustomerCodeAlreadyUsed';
1285 } elseif ($rescode == -4) {
1286 $this->errors[] = 'ErrorPrefixRequired';
1287 } else {
1288 $this->errors[] = 'ErrorUnknownOnCustomerCodeCheck';
1289 }
1290
1291 $result = -3;
1292 }
1293 }
1294
1295 if ($this->fournisseur) {
1296 $rescode = $this->check_codefournisseur();
1297 if ($rescode != 0 && $rescode != -5) {
1298 if ($rescode == -1) {
1299 $this->errors[] = 'ErrorBadSupplierCodeSyntax';
1300 } elseif ($rescode == -2) {
1301 $this->errors[] = 'ErrorSupplierCodeRequired';
1302 } elseif ($rescode == -3) {
1303 $this->errors[] = 'ErrorSupplierCodeAlreadyUsed';
1304 } elseif ($rescode == -4) {
1305 $this->errors[] = 'ErrorPrefixRequired';
1306 } else {
1307 $this->errors[] = 'ErrorUnknownOnSupplierCodeCheck';
1308 }
1309 $result = -3;
1310 }
1311 }
1312
1313 // Check for duplicate or mandatory fields defined into setup
1314 $array_to_check = array('IDPROF1', 'IDPROF2', 'IDPROF3', 'IDPROF4', 'IDPROF5', 'IDPROF6', 'EMAIL', 'TVA_INTRA', 'ACCOUNTANCY_CODE_CUSTOMER', 'ACCOUNTANCY_CODE_SUPPLIER');
1315 foreach ($array_to_check as $key) {
1316 $keymin = strtolower($key);
1317 $keyfield_db = $keymin;
1318 if ($key == 'ACCOUNTANCY_CODE_CUSTOMER') {
1319 $keymin = 'code_compta_client';
1320 $keyfield_db = 'code_compta';
1321 } elseif ($key == 'ACCOUNTANCY_CODE_SUPPLIER') {
1322 $keymin = 'code_compta_fournisseur';
1323 $keyfield_db = 'code_compta_fournisseur';
1324 }
1325 $i = (int) preg_replace('/[^0-9]/', '', $key);
1326 $vallabel = $this->$keymin;
1327
1328 if ($i > 0) {
1329 if ($mysoc != null && $this->isACompany()) {
1330 // Check for mandatory prof id (but only if country is same than ours)
1331 if ($mysoc->country_id > 0 && $this->country_id == $mysoc->country_id) {
1332 $idprof_mandatory = 'SOCIETE_'.$key.'_MANDATORY';
1333 if (!$vallabel && getDolGlobalString($idprof_mandatory)) {
1334 $langs->load("errors");
1335 $error++;
1336 $this->errors[] = $langs->trans("ErrorProdIdIsMandatory", $langs->transcountry('ProfId'.$i, $this->country_code)).' ('.$langs->trans("ForbiddenBySetupRules").')';
1337 }
1338 }
1339 }
1340
1341 // Check for unicity on profid
1342 if (!$error && $vallabel && $this->id_prof_verifiable($i)) {
1343 if ($this->id_prof_exists($keymin, $vallabel, ($this->id > 0 ? $this->id : 0))) {
1344 $langs->load("errors");
1345 $error++;
1346 $this->errors[] = $langs->transcountry('ProfId'.$i, $this->country_code)." ".$langs->trans("ErrorProdIdAlreadyExist", $vallabel).' ('.$langs->trans("ForbiddenBySetupRules").')';
1347 }
1348 }
1349 } else {
1350 //var_dump($conf->global->SOCIETE_EMAIL_UNIQUE);
1351 //var_dump($conf->global->SOCIETE_EMAIL_MANDATORY);
1352 if ($key == 'EMAIL') {
1353 // Check for mandatory
1354 if (getDolGlobalString('SOCIETE_EMAIL_MANDATORY') && !isValidEmail($this->email)) {
1355 $langs->load("errors");
1356 $error++;
1357 $this->errors[] = $langs->trans("ErrorBadEMail", $this->email).' ('.$langs->trans("ForbiddenBySetupRules").')';
1358 }
1359
1360 // Check for unicity
1361 if (!$error && $vallabel && getDolGlobalString('SOCIETE_EMAIL_UNIQUE')) {
1362 if ($this->id_prof_exists($keymin, $vallabel, ($this->id > 0 ? $this->id : 0))) {
1363 $langs->load("errors");
1364 $error++;
1365 $this->errors[] = $langs->trans('Email')." ".$langs->trans("ErrorProdIdAlreadyExist", $vallabel).' ('.$langs->trans("ForbiddenBySetupRules").')';
1366 }
1367 }
1368 } elseif ($key == 'TVA_INTRA') {
1369 // Check for unicity
1370 if ($vallabel && getDolGlobalString('SOCIETE_VAT_INTRA_UNIQUE')) {
1371 if ($this->id_prof_exists($keymin, $vallabel, ($this->id > 0 ? $this->id : 0))) {
1372 $langs->load("errors");
1373 $error++;
1374 $this->errors[] = $langs->trans('VATIntra')." ".$langs->trans("ErrorProdIdAlreadyExist", $vallabel).' ('.$langs->trans("ForbiddenBySetupRules").')';
1375 }
1376 }
1377 if ($this->tva_assuj && !$vallabel && getDolGlobalString('SOCIETE_VAT_INTRA_MANDATORY')) {
1378 $langs->load("errors");
1379 $error++;
1380 $this->errors[] = $langs->trans("ErrorProdIdIsMandatory", $langs->trans('VATIntra')).' ('.$langs->trans("ForbiddenBySetupRules").')';
1381 }
1382 } elseif ($key == 'ACCOUNTANCY_CODE_CUSTOMER' && !empty($this->client)) {
1383 // Check for unicity
1384 if ($vallabel && getDolGlobalString('SOCIETE_ACCOUNTANCY_CODE_CUSTOMER_UNIQUE')) {
1385 if ($this->id_prof_exists($keyfield_db, $vallabel, ($this->id > 0 ? $this->id : 0))) {
1386 $langs->loadLangs(array("errors", 'compta'));
1387 $error++;
1388 $this->errors[] = $langs->trans('CustomerAccountancyCodeShort') . " " . $langs->trans("ErrorProdIdAlreadyExist", $vallabel) . ' (' . $langs->trans("ForbiddenBySetupRules") . ')';
1389 }
1390 }
1391
1392 // Check for mandatory
1393 if (getDolGlobalString('SOCIETE_ACCOUNTANCY_CODE_CUSTOMER_MANDATORY') && (!isset($vallabel) || trim($vallabel) === '')) {
1394 $langs->loadLangs(array("errors", 'compta'));
1395 $error++;
1396 $this->errors[] = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv('CustomerAccountancyCodeShort')) . ' (' . $langs->trans("ForbiddenBySetupRules") . ')';
1397 }
1398 } elseif ($key == 'ACCOUNTANCY_CODE_SUPPLIER' && !empty($this->fournisseur)) {
1399 // Check for unicity
1400 if ($vallabel && getDolGlobalString('SOCIETE_ACCOUNTANCY_CODE_SUPPLIER_UNIQUE')) {
1401 if ($this->id_prof_exists($keyfield_db, $vallabel, ($this->id > 0 ? $this->id : 0))) {
1402 $langs->loadLangs(array("errors", 'compta'));
1403 $error++;
1404 $this->errors[] = $langs->trans('SupplierAccountancyCodeShort') . " " . $langs->trans("ErrorProdIdAlreadyExist", $vallabel) . ' (' . $langs->trans("ForbiddenBySetupRules") . ')';
1405 }
1406 }
1407
1408 // Check for mandatory
1409 if (getDolGlobalString('SOCIETE_ACCOUNTANCY_CODE_SUPPLIER_MANDATORY') && (!isset($vallabel) || trim($vallabel) === '')) {
1410 $langs->loadLangs(array("errors", 'compta'));
1411 $error++;
1412 $this->errors[] = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv('SupplierAccountancyCodeShort')) . ' (' . $langs->trans("ForbiddenBySetupRules") . ')';
1413 }
1414 }
1415 }
1416 }
1417
1418 if ($error) {
1419 $result = -4;
1420 }
1421
1422 return $result;
1423 }
1424
1437 public function update($id, User $user, $call_trigger = 1, $allowmodcodeclient = 0, $allowmodcodefournisseur = 0, $action = 'update', $nosyncmember = 1)
1438 {
1439 global $langs, $conf, $hookmanager;
1440
1441 require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
1442
1443 if (empty($id)) {
1444 $id = $this->id;
1445 }
1446 if (empty($this->country_id) && !empty($this->country_code)) {
1447 $this->country_id = dol_getIdFromCode($this->db, $this->country_code, 'c_country', 'code', 'rowid');
1448 }
1449
1450 $error = 0;
1451
1452 dol_syslog(get_class($this)."::Update id=".$id." call_trigger=".$call_trigger." allowmodcodeclient=".$allowmodcodeclient." allowmodcodefournisseur=".$allowmodcodefournisseur);
1453
1454 $now = dol_now();
1455
1456 // Clean parameters
1457 $this->id = $id;
1458 $this->entity = ((isset($this->entity) && is_numeric($this->entity)) ? $this->entity : $conf->entity);
1459 $this->name = $this->name ? trim($this->name) : trim((string) $this->nom);
1460 $this->nom = $this->name; // For backward compatibility
1461 $this->name_alias = trim((string) $this->name_alias);
1462 $this->ref_ext = (empty($this->ref_ext) ? '' : trim($this->ref_ext));
1463 $this->address = trim((string) $this->address);
1464 $this->zip = trim((string) $this->zip);
1465 $this->town = trim((string) $this->town);
1466 $this->state_id = (is_numeric($this->state_id)) ? (int) $this->state_id : 0;
1467 $this->country_id = ($this->country_id > 0) ? $this->country_id : 0;
1468 $this->phone = trim((string) $this->phone);
1469 $this->phone = preg_replace("/\s/", "", $this->phone);
1470 $this->phone = preg_replace("/\./", "", $this->phone);
1471 $this->phone_mobile = trim((string) $this->phone_mobile);
1472 $this->phone_mobile = preg_replace("/\s/", "", $this->phone_mobile);
1473 $this->phone_mobile = preg_replace("/\./", "", $this->phone_mobile);
1474 $this->fax = trim((string) $this->fax);
1475 $this->fax = preg_replace("/\s/", "", $this->fax);
1476 $this->fax = preg_replace("/\./", "", $this->fax);
1477 $this->email = trim((string) $this->email);
1478 $this->url = $this->url ? clean_url($this->url, 0) : '';
1479 $this->note_private = (empty($this->note_private) ? '' : trim($this->note_private));
1480 $this->note_public = (empty($this->note_public) ? '' : trim($this->note_public));
1481 $this->idprof1 = trim((string) $this->idprof1);
1482 $this->idprof2 = trim((string) $this->idprof2);
1483 $this->idprof3 = trim((string) $this->idprof3);
1484 $this->idprof4 = trim((string) $this->idprof4);
1485 $this->idprof5 = (!empty($this->idprof5) ? trim($this->idprof5) : '');
1486 $this->idprof6 = (!empty($this->idprof6) ? trim($this->idprof6) : '');
1487 $this->prefix_comm = trim((string) $this->prefix_comm);
1488 $this->outstanding_limit = price2num($this->outstanding_limit);
1489 $this->order_min_amount = price2num($this->order_min_amount);
1490 $this->supplier_order_min_amount = price2num($this->supplier_order_min_amount);
1491
1492 $this->tva_assuj = (is_numeric($this->tva_assuj)) ? (int) trim((string) $this->tva_assuj) : 0;
1493 $this->tva_intra = trim($this->tva_intra);
1494 $this->vat_reverse_charge = empty($this->vat_reverse_charge) ? 0 : 1;
1495 if (empty($this->status)) {
1496 $this->status = 0;
1497 }
1498
1499 if (!empty($this->multicurrency_code)) {
1500 $this->fk_multicurrency = MultiCurrency::getIdFromCode($this->db, $this->multicurrency_code);
1501 }
1502 if (empty($this->fk_multicurrency)) {
1503 $this->multicurrency_code = '';
1504 $this->fk_multicurrency = 0;
1505 }
1506
1507 // Local taxes
1508 $this->localtax1_assuj = (int) trim((string) $this->localtax1_assuj);
1509 $this->localtax2_assuj = (int) trim((string) $this->localtax2_assuj);
1510
1511 $this->localtax1_value = trim($this->localtax1_value);
1512 $this->localtax2_value = trim($this->localtax2_value);
1513
1514 $this->capital = ($this->capital != '') ? (float) price2num(trim((string) $this->capital)) : null;
1515
1516 $this->effectif_id = (int) $this->effectif_id;
1517 $this->forme_juridique_code = (int) $this->forme_juridique_code;
1518
1519 //Gencod
1520 $this->barcode = trim((string) $this->barcode);
1521
1522 // For automatic creation
1523 if ($this->code_client == -1 || $this->code_client === 'auto') {
1524 $this->get_codeclient($this, 0);
1525 }
1526 if ($this->code_fournisseur == '-1' || $this->code_fournisseur === 'auto') {
1527 $this->get_codefournisseur($this, 1);
1528 }
1529
1530 $this->accountancy_code_customer_general = trim((string) $this->accountancy_code_customer_general);
1531 $this->code_compta_client = trim((string) $this->code_compta_client);
1532 $this->accountancy_code_supplier_general = trim((string) $this->accountancy_code_supplier_general);
1533 $this->code_compta_fournisseur = trim((string) $this->code_compta_fournisseur);
1534
1535 // Check parameters. More tests are done later in the ->verify()
1536 if (!is_numeric($this->client) && !is_numeric($this->fournisseur)) {
1537 $langs->load("errors");
1538 $this->error = $langs->trans("BadValueForParameterClientOrSupplier");
1539 return -1;
1540 }
1541
1542 $customer = false;
1543 if (!empty($allowmodcodeclient) && !empty($this->client)) {
1544 // If $allowmodcodeclient is set and value is not set, we generate it
1545 if (empty($this->code_compta_client)) {
1546 $ret = $this->get_codecompta('customer');
1547 if ($ret < 0) {
1548 return -1;
1549 }
1550 }
1551
1552 $customer = true;
1553 }
1554
1555 $supplier = false;
1556 if (!empty($allowmodcodefournisseur) && !empty($this->fournisseur)) {
1557 // If $allowmodcodefournisseur is set and value is not set, we generate it
1558 if (empty($this->code_compta_fournisseur)) {
1559 $ret = $this->get_codecompta('supplier');
1560 if ($ret < 0) {
1561 return -1;
1562 }
1563 }
1564
1565 $supplier = true;
1566 }
1567
1568 //Web services
1569 $this->webservices_url = empty($this->webservices_url) ? '' : clean_url($this->webservices_url, 0);
1570 $this->webservices_key = trim((string) $this->webservices_key);
1571
1572 $this->accountancy_code_buy = (empty($this->accountancy_code_buy) ? '' : trim($this->accountancy_code_buy));
1573 $this->accountancy_code_sell = (empty($this->accountancy_code_sell) ? '' : trim($this->accountancy_code_sell));
1574
1575 //Incoterms
1576 $this->fk_incoterms = (int) $this->fk_incoterms;
1577 $this->location_incoterms = trim((string) $this->location_incoterms);
1578
1579 $this->db->begin();
1580
1581 // Check name is required and codes are ok or unique.
1582 // If error, this->errors[] is filled
1583 $result = 0;
1584 if ($action != 'add' && $action != 'merge') {
1585 // We don't check when update called during a create because verify was already done.
1586 // For a merge, we suppose source data is clean and a customer code of a deleted thirdparty must be accepted into a target thirdparty with empty code without duplicate error
1587 $result = $this->verify();
1588
1589 // If there is only one error and error is ErrorBadCustomerCodeSyntax and we don't change customer code, we allow the update
1590 // So we can update record that were using and old numbering rule.
1591 if (is_array($this->errors)) {
1592 if (in_array('ErrorBadCustomerCodeSyntax', $this->errors) && is_object($this->oldcopy) && $this->oldcopy->code_client == $this->code_client) {
1593 if (($key = array_search('ErrorBadCustomerCodeSyntax', $this->errors)) !== false) {
1594 unset($this->errors[$key]); // Remove error message
1595 }
1596 }
1597 if (in_array('ErrorBadSupplierCodeSyntax', $this->errors) && is_object($this->oldcopy) && $this->oldcopy->code_fournisseur == $this->code_fournisseur) {
1598 if (($key = array_search('ErrorBadSupplierCodeSyntax', $this->errors)) !== false) {
1599 unset($this->errors[$key]); // Remove error message
1600 }
1601 }
1602 if (empty($this->errors)) { // If there is no more error, we can make like if there is no error at all
1603 $result = 0;
1604 }
1605 }
1606 }
1607 $this->setUpperOrLowerCase();
1608 if ($result >= 0) {
1609 dol_syslog(get_class($this)."::update verify ok or not done");
1610
1611 $sql = "UPDATE ".MAIN_DB_PREFIX."societe SET ";
1612 $sql .= "entity = ".((int) $this->entity);
1613 $sql .= ",nom = '".$this->db->escape($this->name)."'"; // Required
1614 $sql .= ",name_alias = '".$this->db->escape($this->name_alias)."'";
1615 $sql .= ",ref_ext = ".(!empty($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : "null");
1616 $sql .= ",address = '".$this->db->escape($this->address)."'";
1617
1618 $sql .= ",zip = ".(!empty($this->zip) ? "'".$this->db->escape($this->zip)."'" : "null");
1619 $sql .= ",town = ".(!empty($this->town) ? "'".$this->db->escape($this->town)."'" : "null");
1620
1621 $sql .= ",fk_departement = ".((!empty($this->state_id) && $this->state_id > 0) ? ((int) $this->state_id) : 'null');
1622 $sql .= ",fk_pays = ".((!empty($this->country_id) && $this->country_id > 0) ? ((int) $this->country_id) : 'null');
1623
1624 $sql .= ",phone = ".(!empty($this->phone) ? "'".$this->db->escape($this->phone)."'" : "null");
1625 $sql .= ",phone_mobile = ".(!empty($this->phone_mobile) ? "'".$this->db->escape($this->phone_mobile)."'" : "null");
1626 $sql .= ",fax = ".(!empty($this->fax) ? "'".$this->db->escape($this->fax)."'" : "null");
1627 $sql .= ",email = ".(!empty($this->email) ? "'".$this->db->escape($this->email)."'" : "null");
1628 $sql .= ",socialnetworks = '".$this->db->escape(json_encode($this->socialnetworks))."'";
1629 $sql .= ",url = ".(!empty($this->url) ? "'".$this->db->escape($this->url)."'" : "null");
1630
1631 $sql .= ",parent = ".($this->parent > 0 ? $this->parent : "null");
1632
1633 $sql .= ",note_private = ".(!empty($this->note_private) ? "'".$this->db->escape($this->note_private)."'" : "null");
1634 $sql .= ",note_public = ".(!empty($this->note_public) ? "'".$this->db->escape($this->note_public)."'" : "null");
1635
1636 $sql .= ",siren = '".$this->db->escape($this->idprof1)."'";
1637 $sql .= ",siret = '".$this->db->escape($this->idprof2)."'";
1638 $sql .= ",ape = '".$this->db->escape($this->idprof3)."'";
1639 $sql .= ",idprof4 = '".$this->db->escape($this->idprof4)."'";
1640 $sql .= ",idprof5 = '".$this->db->escape($this->idprof5)."'";
1641 $sql .= ",idprof6 = '".$this->db->escape($this->idprof6)."'";
1642
1643 $sql .= ",tva_assuj = ".($this->tva_assuj != '' ? "'".$this->db->escape($this->tva_assuj)."'" : "null");
1644 $sql .= ",tva_intra = '".$this->db->escape($this->tva_intra)."'";
1645 if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
1646 $sql .= ",vat_reverse_charge = " . ($this->vat_reverse_charge != '' ? "'" . $this->db->escape($this->vat_reverse_charge) . "'" : 0);
1647 }
1648 $sql .= ",status = ".((int) $this->status);
1649
1650 // Local taxes
1651 $sql .= ",localtax1_assuj = ".($this->localtax1_assuj != '' ? "'".$this->db->escape($this->localtax1_assuj)."'" : "null");
1652 $sql .= ",localtax2_assuj = ".($this->localtax2_assuj != '' ? "'".$this->db->escape($this->localtax2_assuj)."'" : "null");
1653 if ($this->localtax1_assuj == 1) {
1654 if ($this->localtax1_value != '') {
1655 $sql .= ",localtax1_value =".$this->localtax1_value;
1656 } else {
1657 $sql .= ",localtax1_value =0.000";
1658 }
1659 } else {
1660 $sql .= ",localtax1_value =0.000";
1661 }
1662
1663 if ($this->localtax2_assuj == 1) {
1664 if ($this->localtax2_value != '') {
1665 $sql .= ",localtax2_value =".$this->localtax2_value;
1666 } else {
1667 $sql .= ",localtax2_value =0.000";
1668 }
1669 } else {
1670 $sql .= ",localtax2_value =0.000";
1671 }
1672
1673 $sql .= ",capital = ".($this->capital === null ? "null" : $this->capital);
1674
1675 $sql .= ",prefix_comm = ".(!empty($this->prefix_comm) ? "'".$this->db->escape($this->prefix_comm)."'" : "null");
1676
1677 $sql .= ",fk_effectif = ".($this->effectif_id > 0 ? ((int) $this->effectif_id) : "null");
1678 if (isset($this->stcomm_id)) {
1679 $sql .= ",fk_stcomm=".(int) $this->stcomm_id;
1680 }
1681 if (isset($this->typent_id)) {
1682 $sql .= ",fk_typent = ".($this->typent_id > 0 ? ((int) $this->typent_id) : "0");
1683 }
1684
1685 $sql .= ",fk_forme_juridique = ".(!empty($this->forme_juridique_code) ? "'".$this->db->escape($this->forme_juridique_code)."'" : "null");
1686
1687 $sql .= ",mode_reglement = ".(!empty($this->mode_reglement_id) ? "'".$this->db->escape($this->mode_reglement_id)."'" : "null");
1688 $sql .= ",cond_reglement = ".(!empty($this->cond_reglement_id) ? "'".$this->db->escape($this->cond_reglement_id)."'" : "null");
1689 $sql .= ",deposit_percent = ".(!empty($this->deposit_percent) ? "'".$this->db->escape($this->deposit_percent)."'" : "null");
1690 $sql .= ",transport_mode = ".(!empty($this->transport_mode_id) ? "'".$this->db->escape($this->transport_mode_id)."'" : "null");
1691 $sql .= ",mode_reglement_supplier = ".(!empty($this->mode_reglement_supplier_id) ? "'".$this->db->escape($this->mode_reglement_supplier_id)."'" : "null");
1692 $sql .= ",cond_reglement_supplier = ".(!empty($this->cond_reglement_supplier_id) ? "'".$this->db->escape($this->cond_reglement_supplier_id)."'" : "null");
1693 $sql .= ",transport_mode_supplier = ".(!empty($this->transport_mode_supplier_id) ? "'".$this->db->escape($this->transport_mode_supplier_id)."'" : "null");
1694 $sql .= ",fk_shipping_method = ".(!empty($this->shipping_method_id) ? "'".$this->db->escape($this->shipping_method_id)."'" : "null");
1695
1696 $sql .= ",client = ".(!empty($this->client) ? $this->client : 0);
1697 $sql .= ",fournisseur = ".(!empty($this->fournisseur) ? $this->fournisseur : 0);
1698 $sql .= ",barcode = ".(!empty($this->barcode) ? "'".$this->db->escape($this->barcode)."'" : "null");
1699 $sql .= ",default_lang = ".(!empty($this->default_lang) ? "'".$this->db->escape($this->default_lang)."'" : "null");
1700 $sql .= ",logo = ".(!empty($this->logo) ? "'".$this->db->escape($this->logo)."'" : "null");
1701 $sql .= ",logo_squarred = ".(!empty($this->logo_squarred) ? "'".$this->db->escape($this->logo_squarred)."'" : "null");
1702 $sql .= ",outstanding_limit= ".($this->outstanding_limit != '' ? $this->outstanding_limit : 'null');
1703 $sql .= ",order_min_amount= ".($this->order_min_amount != '' ? $this->order_min_amount : 'null');
1704 $sql .= ",supplier_order_min_amount= ".($this->supplier_order_min_amount != '' ? $this->supplier_order_min_amount : 'null');
1705 $sql .= ",fk_prospectlevel='".$this->db->escape($this->fk_prospectlevel)."'";
1706 if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
1707 $sql .= ", accountancy_code_buy = '" . $this->db->escape($this->accountancy_code_buy) . "'";
1708 $sql .= ", accountancy_code_sell= '" . $this->db->escape($this->accountancy_code_sell) . "'";
1709 if ($customer) {
1710 $sql .= ", accountancy_code_customer_general = ".(!empty($this->accountancy_code_customer_general) ? "'".$this->db->escape($this->accountancy_code_customer_general)."'" : "null");
1711 $sql .= ", code_compta = ".(!empty($this->code_compta_client) ? "'".$this->db->escape($this->code_compta_client)."'" : "null");
1712 }
1713
1714 if ($supplier) {
1715 $sql .= ", accountancy_code_supplier_general = ".(!empty($this->accountancy_code_supplier_general) ? "'".$this->db->escape($this->accountancy_code_supplier_general)."'" : "null");
1716 $sql .= ", code_compta_fournisseur = ".(($this->code_compta_fournisseur != "") ? "'".$this->db->escape($this->code_compta_fournisseur)."'" : "null");
1717 }
1718 }
1719 $sql .= ",webservices_url = ".(!empty($this->webservices_url) ? "'".$this->db->escape($this->webservices_url)."'" : "null");
1720 $sql .= ",webservices_key = ".(!empty($this->webservices_key) ? "'".$this->db->escape($this->webservices_key)."'" : "null");
1721
1722 //Incoterms
1723 $sql .= ", fk_incoterms = ".((int) $this->fk_incoterms);
1724 $sql .= ", location_incoterms = ".(!empty($this->location_incoterms) ? "'".$this->db->escape($this->location_incoterms)."'" : "null");
1725
1726 if ($customer) {
1727 $sql .= ", code_client = ".(!empty($this->code_client) ? "'".$this->db->escape($this->code_client)."'" : "null");
1728 }
1729
1730 if ($supplier) {
1731 $sql .= ", code_fournisseur = ".(!empty($this->code_fournisseur) ? "'".$this->db->escape($this->code_fournisseur)."'" : "null");
1732 }
1733 $sql .= ", fk_user_modif = ".($user->id > 0 ? $user->id : "null");
1734 $sql .= ", fk_multicurrency = ".(int) $this->fk_multicurrency;
1735 $sql .= ", multicurrency_code = '".$this->db->escape($this->multicurrency_code)."'";
1736 $sql .= ", model_pdf = '".$this->db->escape($this->model_pdf)."'";
1737 $sql .= " WHERE rowid = ".(int) $id;
1738
1739 $resql = $this->db->query($sql);
1740 if ($resql) {
1741 if (is_object($this->oldcopy)) { // If we have information on old values
1742 if ($this->oldcopy->country_id != $this->country_id) {
1743 unset($this->country_code);
1744 unset($this->country);
1745 }
1746 if ($this->oldcopy->state_id != $this->state_id) {
1747 unset($this->state_code);
1748 unset($this->state);
1749 }
1750 } else {
1751 unset($this->country_code); // We clean this, in the doubt, because it may have been changed after an update of country_id
1752 unset($this->country);
1753 unset($this->state_code);
1754 unset($this->state);
1755 }
1756
1757 $nbrowsaffected = $this->db->affected_rows($resql);
1758
1759 if (!$error && $nbrowsaffected) {
1760 // Update information on linked member if it is an update
1761 if (!$nosyncmember && isModEnabled('member')) {
1762 require_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent.class.php';
1763
1764 dol_syslog(get_class($this)."::update update linked member");
1765
1766 $lmember = new Adherent($this->db);
1767 $result = $lmember->fetch(0, 0, $this->id);
1768
1769 if ($result > 0) {
1770 $lmember->company = $this->name;
1771 //$lmember->firstname=$this->firstname?$this->firstname:$lmember->firstname; // We keep firstname and lastname of member unchanged
1772 //$lmember->lastname=$this->lastname?$this->lastname:$lmember->lastname; // We keep firstname and lastname of member unchanged
1773 $lmember->address = $this->address;
1774 $lmember->zip = $this->zip;
1775 $lmember->town = $this->town;
1776 $lmember->email = $this->email;
1777 $lmember->socialnetworks = $this->socialnetworks;
1778 $lmember->phone = $this->phone;
1779 $lmember->state_id = $this->state_id;
1780 $lmember->country_id = $this->country_id;
1781 $lmember->default_lang = $this->default_lang;
1782
1783 $result = $lmember->update($user, 0, 1, 1, 1); // Use nosync to 1 to avoid cyclic updates
1784 if ($result < 0) {
1785 $this->error = $lmember->error;
1786 $this->errors = array_merge($this->errors, $lmember->errors);
1787 dol_syslog(get_class($this)."::update ".$this->error, LOG_ERR);
1788 $error++;
1789 }
1790 } elseif ($result < 0) {
1791 $this->error = $lmember->error;
1792 $error++;
1793 }
1794 }
1795 }
1796
1797 $action = 'update';
1798
1799 // update accountancy for this entity
1800 if (!$error && getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
1801 $this->db->query("DELETE FROM ".MAIN_DB_PREFIX."societe_perentity WHERE fk_soc = ".((int) $this->id)." AND entity = ".((int) $conf->entity));
1802
1803 $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_perentity (";
1804 $sql .= " fk_soc";
1805 $sql .= ", entity";
1806 $sql .= ", vat_reverse_charge";
1807 $sql .= ", accountancy_code_customer_general";
1808 $sql .= ", accountancy_code_customer";
1809 $sql .= ", accountancy_code_supplier_general";
1810 $sql .= ", accountancy_code_supplier";
1811 $sql .= ", accountancy_code_buy";
1812 $sql .= ", accountancy_code_sell";
1813 $sql .= ") VALUES (";
1814 $sql .= $this->id;
1815 $sql .= ", ".$conf->entity;
1816 $sql .= ", ".(empty($this->vat_reverse_charge) ? '0' : '1');
1817 $sql .= ", '".$this->db->escape($this->accountancy_code_customer_general)."'";
1818 $sql .= ", '".$this->db->escape($this->code_compta_client)."'";
1819 $sql .= ", '".$this->db->escape($this->accountancy_code_supplier_general)."'";
1820 $sql .= ", '".$this->db->escape($this->code_compta_fournisseur)."'";
1821 $sql .= ", '".$this->db->escape($this->accountancy_code_buy)."'";
1822 $sql .= ", '".$this->db->escape($this->accountancy_code_sell)."'";
1823 $sql .= ")";
1824 $result = $this->db->query($sql);
1825 if (!$result) {
1826 $error++;
1827 $this->error = 'ErrorFailedToUpdateAccountancyForEntity';
1828 }
1829 }
1830
1831 // Actions on extra fields
1832 if (!$error) {
1833 $result = $this->insertExtraFields();
1834 if ($result < 0) {
1835 $error++;
1836 }
1837 }
1838 // Actions on extra languages
1839 if (!$error && !getDolGlobalString('MAIN_EXTRALANGUAGES_DISABLED')) { // For avoid conflicts if trigger used
1840 $result = $this->insertExtraLanguages();
1841 if ($result < 0) {
1842 $error++;
1843 }
1844 }
1845
1846 if (!$error && $call_trigger) {
1847 // Call trigger
1848 $result = $this->call_trigger('COMPANY_MODIFY', $user);
1849 if ($result < 0) {
1850 $error++;
1851 }
1852 // End call triggers
1853 }
1854
1855 if (!$error) {
1856 dol_syslog(get_class($this)."::Update success");
1857 $this->db->commit();
1858 return 1;
1859 } else {
1860 $this->db->rollback();
1861 return -1;
1862 }
1863 } else {
1864 if ($this->db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
1865 // Doublon
1866 $this->error = $langs->trans("ErrorDuplicateField");
1867 $result = -1;
1868 } else {
1869 $this->error = $this->db->lasterror();
1870 $result = -2;
1871 }
1872 $this->db->rollback();
1873 return $result;
1874 }
1875 } else {
1876 $this->db->rollback();
1877 dol_syslog(get_class($this)."::Update fails verify ".implode(',', $this->errors), LOG_WARNING);
1878 return -3;
1879 }
1880 }
1881
1901 public function fetch($rowid, $ref = '', $ref_ext = '', $barcode = '', $idprof1 = '', $idprof2 = '', $idprof3 = '', $idprof4 = '', $idprof5 = '', $idprof6 = '', $email = '', $ref_alias = '', $is_client = 0, $is_supplier = 0)
1902 {
1903 global $langs;
1904 global $conf;
1905
1906 if (empty($rowid) && empty($ref) && empty($ref_ext) && empty($barcode) && empty($idprof1) && empty($idprof2) && empty($idprof3) && empty($idprof4) && empty($idprof5) && empty($idprof6) && empty($email) && empty($ref_alias)) {
1907 return -1;
1908 }
1909
1910 $sql = 'SELECT s.rowid, s.nom as name, s.name_alias, s.entity, s.ref_ext, s.address, s.datec as date_creation, s.prefix_comm';
1911 $sql .= ', s.status, s.fk_warehouse';
1912 $sql .= ', s.price_level';
1913 $sql .= ', s.tms as date_modification, s.fk_user_creat, s.fk_user_modif';
1914 $sql .= ', s.phone, s.phone_mobile, s.fax, s.email';
1915 $sql .= ', s.socialnetworks';
1916 $sql .= ', s.url, s.zip, s.town, s.note_private, s.note_public, s.client, s.fournisseur';
1917 $sql .= ', s.siren as idprof1, s.siret as idprof2, s.ape as idprof3, s.idprof4, s.idprof5, s.idprof6';
1918 $sql .= ', s.capital, s.tva_intra';
1919 $sql .= ', s.fk_typent as typent_id';
1920 $sql .= ', s.fk_effectif as effectif_id';
1921 $sql .= ', s.fk_forme_juridique as forme_juridique_code';
1922 $sql .= ', s.webservices_url, s.webservices_key, s.model_pdf, s.last_main_doc';
1923 if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
1924 $sql .= ', s.accountancy_code_customer_general, s.code_compta';
1925 $sql .= ', s.accountancy_code_supplier_general, s.code_compta_fournisseur';
1926 $sql .= ', s.accountancy_code_buy, s.accountancy_code_sell';
1927 $sql .= ', s.vat_reverse_charge as soc_vat_reverse_charge';
1928 } else {
1929 $sql .= ', spe.accountancy_code_customer_general, spe.accountancy_code_customer as code_compta';
1930 $sql .= ', spe.accountancy_code_supplier_general, spe.accountancy_code_supplier as code_compta_fournisseur';
1931 $sql .= ', spe.accountancy_code_buy, spe.accountancy_code_sell';
1932 $sql .= ', spe.vat_reverse_charge as spe_vat_reverse_charge';
1933 }
1934 $sql .= ', s.code_client, s.code_fournisseur, s.parent, s.barcode';
1935 $sql .= ', s.fk_departement as state_id, s.fk_pays as country_id, s.fk_stcomm, s.mode_reglement, s.cond_reglement, s.deposit_percent, s.transport_mode';
1936 $sql .= ', s.fk_account, s.tva_assuj';
1937 $sql .= ', s.mode_reglement_supplier, s.cond_reglement_supplier, s.transport_mode_supplier';
1938 $sql .= ', s.localtax1_assuj, s.localtax1_value, s.localtax2_assuj, s.localtax2_value, s.fk_prospectlevel, s.default_lang, s.logo, s.logo_squarred';
1939 $sql .= ', s.fk_shipping_method';
1940 $sql .= ', s.outstanding_limit, s.import_key, s.canvas, s.fk_incoterms, s.location_incoterms';
1941 $sql .= ', s.order_min_amount, s.supplier_order_min_amount';
1942 $sql .= ', s.fk_multicurrency, s.multicurrency_code';
1943 $sql .= ', fj.libelle as forme_juridique';
1944 $sql .= ', e.libelle as effectif';
1945 $sql .= ', c.code as country_code, c.label as country';
1946 $sql .= ', d.code_departement as state_code, d.nom as state';
1947 $sql .= ', r.rowid as region_id, r.code_region as region_code';
1948 $sql .= ', st.libelle as stcomm, st.picto as stcomm_picto';
1949 $sql .= ', te.code as typent_code';
1950 $sql .= ', i.libelle as label_incoterms';
1951 if (!isModEnabled('multicompany')) {
1952 $sql .= ', s.remise_client, s.remise_supplier';
1953 } else {
1954 $sql .= ', sr.remise_client, sr2.remise_supplier';
1955 }
1956 $sql .= ' FROM '.MAIN_DB_PREFIX.'societe as s';
1957 if (getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
1958 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe_perentity as spe ON spe.fk_soc = s.rowid AND spe.entity = ".((int) $conf->entity);
1959 }
1960 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_effectif as e ON s.fk_effectif = e.id';
1961 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_country as c ON s.fk_pays = c.rowid';
1962 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_stcomm as st ON s.fk_stcomm = st.id';
1963 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_forme_juridique as fj ON s.fk_forme_juridique = fj.code';
1964 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_departements as d ON s.fk_departement = d.rowid';
1965 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_regions as r ON d.fk_region = r.code_region ';
1966 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_typent as te ON s.fk_typent = te.id';
1967 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_incoterms as i ON s.fk_incoterms = i.rowid';
1968 // With default setup, llx_societe_remise is a history table in default setup and current value is in llx_societe.
1969 // We use it for real value when multicompany is on. A better place would be into llx_societe_perentity.
1970 if (isModEnabled('multicompany')) {
1971 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'societe_remise as sr ON sr.rowid = (SELECT MAX(rowid) FROM '.MAIN_DB_PREFIX.'societe_remise WHERE fk_soc = s.rowid AND entity IN ('.getEntity('discount').'))';
1972 $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'societe_remise_supplier as sr2 ON sr2.rowid = (SELECT MAX(rowid) FROM '.MAIN_DB_PREFIX.'societe_remise_supplier WHERE fk_soc = s.rowid AND entity IN ('.getEntity('discount').'))';
1973 }
1974 $sql .= ' WHERE s.entity IN ('.getEntity($this->element).')';
1975
1976 // Filter on client or supplier, for Client::fetch() and Fournisseur::fetch()
1977 if ($is_client) {
1978 $sql .= ' AND s.client > 0';
1979 }
1980 if ($is_supplier) {
1981 $sql .= ' AND s.fournisseur > 0';
1982 } // if both false, no test (the thirdparty can be client and/or supplier)
1983
1984 if ($rowid) {
1985 $sql .= ' AND s.rowid = '.((int) $rowid);
1986 }
1987 if ($ref) {
1988 $sql .= " AND s.nom = '".$this->db->escape($ref)."'";
1989 }
1990 if ($ref_alias) {
1991 $sql .= " AND s.name_alias = '".$this->db->escape($ref_alias)."'";
1992 }
1993 if ($ref_ext) {
1994 $sql .= " AND s.ref_ext = '".$this->db->escape($ref_ext)."'";
1995 }
1996 if ($barcode) {
1997 $sql .= " AND s.barcode = '".$this->db->escape($barcode)."'";
1998 }
1999 if ($idprof1) {
2000 $sql .= " AND s.siren = '".$this->db->escape($idprof1)."'";
2001 }
2002 if ($idprof2) {
2003 $sql .= " AND s.siret = '".$this->db->escape($idprof2)."'";
2004 }
2005 if ($idprof3) {
2006 $sql .= " AND s.ape = '".$this->db->escape($idprof3)."'";
2007 }
2008 if ($idprof4) {
2009 $sql .= " AND s.idprof4 = '".$this->db->escape($idprof4)."'";
2010 }
2011 if ($idprof5) {
2012 $sql .= " AND s.idprof5 = '".$this->db->escape($idprof5)."'";
2013 }
2014 if ($idprof6) {
2015 $sql .= " AND s.idprof6 = '".$this->db->escape($idprof6)."'";
2016 }
2017 if ($email) {
2018 $sql .= " AND s.email = '".$this->db->escape($email)."'";
2019 }
2020
2021 $resql = $this->db->query($sql);
2022 if ($resql) {
2023 $num = $this->db->num_rows($resql);
2024 if ($num > 1) {
2025 $this->error = 'Fetch found several records. Rename one of thirdparties to avoid duplicate.';
2026 dol_syslog($this->error, LOG_ERR);
2027 $result = -2;
2028 } elseif ($num) { // $num = 1
2029 $obj = $this->db->fetch_object($resql);
2030
2031 $this->id = $obj->rowid;
2032 $this->entity = $obj->entity;
2033 $this->canvas = $obj->canvas;
2034
2035 $this->ref = $obj->name;
2036 $this->name = $obj->name;
2037 $this->nom = $obj->name; // deprecated
2038 $this->name_alias = $obj->name_alias;
2039 $this->ref_ext = $obj->ref_ext;
2040
2041 $this->date_creation = $this->db->jdate($obj->date_creation);
2042 $this->date_modification = $this->db->jdate($obj->date_modification);
2043 $this->user_creation_id = $obj->fk_user_creat;
2044 $this->user_modification_id = $obj->fk_user_modif;
2045
2046 $this->address = $obj->address;
2047 $this->zip = $obj->zip;
2048 $this->town = $obj->town;
2049
2050 $this->country_id = $obj->country_id;
2051 $this->country_code = $obj->country_id ? $obj->country_code : '';
2052 $this->country = $obj->country_id ? (($langs->transnoentities('Country'.$obj->country_code) != 'Country'.$obj->country_code) ? $langs->transnoentities('Country'.$obj->country_code) : $obj->country) : '';
2053
2054 $this->state_id = $obj->state_id;
2055 $this->state_code = $obj->state_code;
2056 $this->region_id = $obj->region_id;
2057 $this->region_code = $obj->region_code;
2058 $this->state = ($obj->state != '-' ? $obj->state : '');
2059
2060 $transcode = $langs->trans('StatusProspect'.$obj->fk_stcomm);
2061 $label = ($transcode != 'StatusProspect'.$obj->fk_stcomm ? $transcode : $obj->stcomm);
2062 $this->stcomm_id = $obj->fk_stcomm; // id status prospect
2063 $this->status_prospect_label = $label; // label status prospect
2064 $this->stcomm_picto = $obj->stcomm_picto; // picto statut commercial
2065
2066 $this->email = $obj->email;
2067 $this->socialnetworks = ($obj->socialnetworks ? (array) json_decode($obj->socialnetworks, true) : array());
2068
2069 $this->url = $obj->url;
2070 $this->phone = $obj->phone;
2071 $this->phone_mobile = $obj->phone_mobile;
2072 $this->fax = $obj->fax;
2073
2074 $this->parent = $obj->parent;
2075
2076 $this->idprof1 = $obj->idprof1;
2077 $this->idprof2 = $obj->idprof2;
2078 $this->idprof3 = $obj->idprof3;
2079 $this->idprof4 = $obj->idprof4;
2080 $this->idprof5 = $obj->idprof5;
2081 $this->idprof6 = $obj->idprof6;
2082
2083 $this->capital = $obj->capital;
2084
2085 $this->code_client = $obj->code_client;
2086 $this->code_fournisseur = $obj->code_fournisseur;
2087
2088 $this->accountancy_code_customer_general = $obj->accountancy_code_customer_general;
2089 $this->code_compta_client = $obj->code_compta;
2090 $this->accountancy_code_supplier_general = $obj->accountancy_code_supplier_general;
2091 $this->code_compta_fournisseur = $obj->code_compta_fournisseur;
2092
2093 $this->barcode = $obj->barcode;
2094
2095 $this->tva_assuj = $obj->tva_assuj;
2096 $this->tva_intra = $obj->tva_intra;
2097
2098 if (!empty($obj->spe_vat_reverse_charge)) {
2099 $this->vat_reverse_charge = $obj->spe_vat_reverse_charge;
2100 } elseif (!empty($obj->soc_vat_reverse_charge)) {
2101 $this->vat_reverse_charge = $obj->soc_vat_reverse_charge;
2102 } else {
2103 $this->vat_reverse_charge = 0;
2104 }
2105
2106 $this->status = $obj->status;
2107
2108 // Local Taxes
2109 $this->localtax1_assuj = $obj->localtax1_assuj;
2110 $this->localtax2_assuj = $obj->localtax2_assuj;
2111
2112 $this->localtax1_value = $obj->localtax1_value;
2113 $this->localtax2_value = $obj->localtax2_value;
2114
2115 $this->typent_id = $obj->typent_id;
2116 $this->typent_code = $obj->typent_code;
2117
2118 $this->effectif_id = $obj->effectif_id;
2119 $this->effectif = $obj->effectif_id ? $obj->effectif : '';
2120
2121 $this->forme_juridique_code = $obj->forme_juridique_code;
2122 $this->forme_juridique = $obj->forme_juridique_code ? $obj->forme_juridique : '';
2123
2124 $this->fk_prospectlevel = $obj->fk_prospectlevel;
2125
2126 $this->prefix_comm = $obj->prefix_comm;
2127
2128 $this->remise_percent = $obj->remise_client ? price2num($obj->remise_client) : 0; // 0.000000 must be 0
2129 $this->remise_supplier_percent = $obj->remise_supplier;
2130
2131 $this->mode_reglement_id = $obj->mode_reglement;
2132 $this->cond_reglement_id = $obj->cond_reglement;
2133 $this->deposit_percent = $obj->deposit_percent;
2134 $this->transport_mode_id = $obj->transport_mode;
2135 $this->mode_reglement_supplier_id = $obj->mode_reglement_supplier;
2136 $this->cond_reglement_supplier_id = $obj->cond_reglement_supplier;
2137 $this->transport_mode_supplier_id = $obj->transport_mode_supplier;
2138 $this->shipping_method_id = ($obj->fk_shipping_method > 0) ? $obj->fk_shipping_method : null;
2139 $this->fk_account = $obj->fk_account;
2140
2141 $this->client = $obj->client;
2142 $this->fournisseur = $obj->fournisseur;
2143
2144 $this->note = $obj->note_private; // TODO Deprecated for backward comtability
2145 $this->note_private = $obj->note_private;
2146 $this->note_public = $obj->note_public;
2147 $this->model_pdf = $obj->model_pdf;
2148 $this->default_lang = $obj->default_lang;
2149 $this->logo = $obj->logo;
2150 $this->logo_squarred = $obj->logo_squarred;
2151
2152 $this->webservices_url = $obj->webservices_url;
2153 $this->webservices_key = $obj->webservices_key;
2154
2155 $this->accountancy_code_buy = $obj->accountancy_code_buy;
2156 $this->accountancy_code_sell = $obj->accountancy_code_sell;
2157
2158 $this->outstanding_limit = $obj->outstanding_limit;
2159 $this->order_min_amount = $obj->order_min_amount;
2160 $this->supplier_order_min_amount = $obj->supplier_order_min_amount;
2161
2162 // multiprix
2163 $this->price_level = $obj->price_level;
2164
2165 // warehouse
2166 $this->fk_warehouse = $obj->fk_warehouse;
2167
2168 $this->import_key = $obj->import_key;
2169
2170 //Incoterms
2171 $this->fk_incoterms = $obj->fk_incoterms;
2172 $this->location_incoterms = $obj->location_incoterms;
2173 $this->label_incoterms = $obj->label_incoterms;
2174
2175 // multicurrency
2176 $this->fk_multicurrency = $obj->fk_multicurrency;
2177 $this->multicurrency_code = $obj->multicurrency_code;
2178
2179 // pdf
2180 $this->model_pdf = $obj->model_pdf;
2181 $this->last_main_doc = $obj->last_main_doc;
2182
2183 $result = $this->id;
2184
2185 // fetch optionals attributes and labels
2186 $this->fetch_optionals();
2187 } else {
2188 $result = 0;
2189 }
2190
2191 $this->db->free($resql);
2192 } else {
2193 $this->error = $this->db->lasterror();
2194 $this->errors[] = $this->db->lasterror();
2195 $result = -3;
2196 }
2197
2198 // Use first price level if level not defined for third party
2199 if ((getDolGlobalString('PRODUIT_MULTIPRICES') || getDolGlobalString('PRODUIT_CUSTOMER_PRICES_BY_QTY_MULTIPRICES') || getDolGlobalString('PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES')) && empty($this->price_level)) {
2200 $this->price_level = 1;
2201 }
2202
2203 return $result;
2204 }
2205
2226 public function findNearest($rowid = 0, $ref = '', $ref_ext = '', $barcode = '', $idprof1 = '', $idprof2 = '', $idprof3 = '', $idprof4 = '', $idprof5 = '', $idprof6 = '', $email = '', $ref_alias = '', $is_client = 0, $is_supplier = 0)
2227 {
2228 // A rowid is known, it is a unique key so we found it
2229 if ($rowid) {
2230 return $rowid;
2231 }
2232
2233 // We try to find the thirdparty with exact matching on all fields
2234 // TODO Replace this with step by step search
2235 // Then search on barcode if we have it (+ restriction on is_client and is_supplier)
2236 // Then search on profids with a OR (+ restriction on is_client and is_supplier)
2237 // Then search on email (+ restriction on is_client and is_supplier)
2238 // Then search ref, ref_ext or alias with a OR (+ restriction on is_client and is_supplier)
2239 $tmpthirdparty = new Societe($this->db);
2240 $result = $tmpthirdparty->fetch($rowid, $ref, $ref_ext, $barcode, $idprof1, $idprof2, $idprof3, $idprof4, $idprof5, $idprof6, $email, $ref_alias, $is_client, $is_supplier);
2241
2242 return $result;
2243 }
2244
2253 public function delete($id, $fuser = null, $call_trigger = 1)
2254 {
2255 global $conf, $user;
2256
2257 if (empty($fuser)) {
2258 $fuser = $user;
2259 }
2260
2261 require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
2262
2263 $entity = isset($this->entity) ? $this->entity : $conf->entity;
2264
2265 dol_syslog(get_class($this)."::delete", LOG_DEBUG);
2266 $error = 0;
2267
2268 // Test if child exists
2269 $objectisused = $this->isObjectUsed($id);
2270 if (empty($objectisused)) {
2271 $this->db->begin();
2272
2273 // User is mandatory for trigger call
2274 if (!$error && $call_trigger) {
2275 // Call trigger
2276 $result = $this->call_trigger('COMPANY_DELETE', $fuser);
2277 if ($result < 0) {
2278 $error++;
2279 }
2280 // End call triggers
2281 }
2282
2283 if (!$error) {
2284 require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
2285 $static_cat = new Categorie($this->db);
2286 $toute_categs = array();
2287
2288 // Fill $toute_categs array with an array of (type => array of ("Categorie" instance))
2289 $toute_categs['customer'] = $static_cat->containing($this->id, Categorie::TYPE_CUSTOMER);
2290 $toute_categs['supplier'] = $static_cat->containing($this->id, Categorie::TYPE_SUPPLIER);
2291
2292 // Remove each "Categorie"
2293 foreach ($toute_categs as $type => $categs_type) {
2294 foreach ($categs_type as $cat) {
2295 $cat->del_type($this, $type);
2296 }
2297 }
2298 }
2299
2300 if (!$error) {
2301 foreach ($this->childtablesoncascade as $tabletodelete) {
2302 $deleteFromObject = explode(':', $tabletodelete, 4);
2303 if (count($deleteFromObject) >= 2) {
2304 $className = str_replace('@', '', $deleteFromObject[0]);
2305 $filepath = $deleteFromObject[1];
2306 $columnName = $deleteFromObject[2];
2307 if (dol_include_once($filepath)) {
2308 $child_object = new $className($this->db);
2309 '@phan-var-force CommonObject $child_object';
2310 $result = $child_object->deleteByParentField($id, $columnName);
2311 if ($result < 0) {
2312 $error++;
2313 $this->errors[] = $child_object->error;
2314 break;
2315 }
2316 } else {
2317 $error++;
2318 $this->errors[] = 'Cannot include child class file '.$filepath;
2319 break;
2320 }
2321 } else {
2322 $sql = "DELETE FROM ".MAIN_DB_PREFIX.$tabletodelete;
2323 $sql .= " WHERE fk_soc = ".((int) $id);
2324 if (!$this->db->query($sql)) {
2325 $error++;
2326 $this->errors[] = $this->db->lasterror();
2327 break;
2328 }
2329 }
2330 }
2331 }
2332
2333 // Removed extrafields
2334 if (!$error) {
2335 $result = $this->deleteExtraFields();
2336 if ($result < 0) {
2337 $error++;
2338 dol_syslog(get_class($this)."::delete error -3 ".$this->error, LOG_ERR);
2339 }
2340 }
2341
2342 // Remove links to subsidiaries companies
2343 if (!$error) {
2344 $sql = "UPDATE ".MAIN_DB_PREFIX."societe";
2345 $sql .= " SET parent = NULL";
2346 $sql .= " WHERE parent = ".((int) $id);
2347 if (!$this->db->query($sql)) {
2348 $error++;
2349 $this->errors[] = $this->db->lasterror();
2350 }
2351 }
2352
2353 // Remove third party
2354 if (!$error) {
2355 if (getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
2356 $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe_perentity";
2357 $sql .= " WHERE fk_soc = ".((int) $id);
2358 if (!$this->db->query($sql)) {
2359 $error++;
2360 $this->errors[] = $this->db->lasterror();
2361 }
2362 }
2363
2364 $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe";
2365 $sql .= " WHERE rowid = ".((int) $id);
2366 if (!$this->db->query($sql)) {
2367 $error++;
2368 $this->errors[] = $this->db->lasterror();
2369 }
2370 }
2371
2372 if (!$error) {
2373 $this->db->commit();
2374
2375 // Delete directory
2376 if (!empty($conf->societe->multidir_output[$entity])) {
2377 $docdir = $conf->societe->multidir_output[$entity]."/".$id;
2378 if (dol_is_dir($docdir)) {
2379 dol_delete_dir_recursive($docdir);
2380 }
2381 }
2382
2383 return 1;
2384 } else {
2385 dol_syslog($this->error, LOG_ERR);
2386 $this->db->rollback();
2387 return -1;
2388 }
2389 } else {
2390 dol_syslog("Can't remove thirdparty with id ".$id.". There are ".$objectisused." children", LOG_WARNING);
2391 }
2392 return 0;
2393 }
2394
2395 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2403 public function set_as_client()
2404 {
2405 // phpcs:enable
2406 dol_syslog(get_class($this)."::set_as_client is deprecated use setAsCustomer instead", LOG_NOTICE);
2407 return $this->setAsCustomer();
2408 }
2409
2416 public function setAsCustomer()
2417 {
2418 if ($this->id) {
2419 $newclient = 1;
2420 if (($this->client == 2 || $this->client == 3) && !getDolGlobalInt('SOCIETE_DISABLE_PROSPECTSCUSTOMERS')) {
2421 $newclient = 3; //If prospect, we keep prospect tag
2422 }
2423 $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element;
2424 $sql .= " SET client = ".((int) $newclient);
2425 $sql .= " WHERE rowid = ".((int) $this->id);
2426
2427 $resql = $this->db->query($sql);
2428 if ($resql) {
2429 $this->client = $newclient;
2430 return 1;
2431 } else {
2432 return -1;
2433 }
2434 }
2435 return 0;
2436 }
2437
2438 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2447 public function set_remise_client($remise, $note, User $user)
2448 {
2449 // phpcs:enable
2450 global $conf, $langs;
2451
2452 // Parameter cleaning
2453 $note = trim($note);
2454 if (!$note) {
2455 $this->error = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NoteReason"));
2456 return -2;
2457 }
2458
2459 dol_syslog(get_class($this)."::set_remise_client ".$remise.", ".$note.", ".$user->id);
2460
2461 if ($this->id) {
2462 $this->db->begin();
2463
2464 $now = dol_now();
2465
2466 // Position current discount
2467 $sql = "UPDATE ".MAIN_DB_PREFIX."societe ";
2468 $sql .= " SET remise_client = '".$this->db->escape($remise)."'";
2469 $sql .= " WHERE rowid = ".((int) $this->id);
2470 $resql = $this->db->query($sql);
2471 if (!$resql) {
2472 $this->db->rollback();
2473 $this->error = $this->db->error();
2474 return -1;
2475 }
2476
2477 // Writes trace in discount history
2478 $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_remise";
2479 $sql .= " (entity, datec, fk_soc, remise_client, note, fk_user_author)";
2480 $sql .= " VALUES (".((int) $conf->entity).", '".$this->db->idate($now)."', ".((int) $this->id).", '".$this->db->escape($remise)."',";
2481 $sql .= " '".$this->db->escape($note)."',";
2482 $sql .= " ".((int) $user->id);
2483 $sql .= ")";
2484
2485 $resql = $this->db->query($sql);
2486 if (!$resql) {
2487 $this->db->rollback();
2488 $this->error = $this->db->lasterror();
2489 return -1;
2490 }
2491
2492 $this->db->commit();
2493
2494 return 1;
2495 }
2496 return -1;
2497 }
2498
2499 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2508 public function set_remise_supplier($remise, $note, User $user)
2509 {
2510 // phpcs:enable
2511 global $conf, $langs;
2512
2513 // Parameter cleaning
2514 $note = trim($note);
2515 if (!$note) {
2516 $this->error = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NoteReason"));
2517 return -2;
2518 }
2519
2520 dol_syslog(get_class($this)."::set_remise_supplier ".$remise.", ".$note.", ".$user->id);
2521
2522 if ($this->id) {
2523 $this->db->begin();
2524
2525 $now = dol_now();
2526
2527 // Position current discount
2528 $sql = "UPDATE ".MAIN_DB_PREFIX."societe ";
2529 $sql .= " SET remise_supplier = '".$this->db->escape($remise)."'";
2530 $sql .= " WHERE rowid = ".((int) $this->id);
2531 $resql = $this->db->query($sql);
2532 if (!$resql) {
2533 $this->db->rollback();
2534 $this->error = $this->db->error();
2535 return -1;
2536 }
2537
2538 // Writes trace in discount history
2539 $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_remise_supplier";
2540 $sql .= " (entity, datec, fk_soc, remise_supplier, note, fk_user_author)";
2541 $sql .= " VALUES (".((int) $conf->entity).", '".$this->db->idate($now)."', ".((int) $this->id).", '".$this->db->escape($remise)."',";
2542 $sql .= " '".$this->db->escape($note)."',";
2543 $sql .= " ".((int) $user->id);
2544 $sql .= ")";
2545
2546 $resql = $this->db->query($sql);
2547 if (!$resql) {
2548 $this->db->rollback();
2549 $this->error = $this->db->lasterror();
2550 return -1;
2551 }
2552
2553 $this->db->commit();
2554 return 1;
2555 }
2556
2557 return -1;
2558 }
2559
2560 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2572 public function set_remise_except($remise, User $user, $desc, $vatrate = '', $discount_type = 0, $price_base_type = 'HT')
2573 {
2574 // phpcs:enable
2575 global $langs;
2576
2577 // Clean parameters
2578 $remise = price2num($remise);
2579 $desc = trim($desc);
2580
2581 // Check parameters
2582 if (!($remise > 0)) {
2583 $this->error = $langs->trans("ErrorWrongValueForParameter", "1");
2584 return -1;
2585 }
2586 if (!$desc) {
2587 $this->error = $langs->trans("ErrorWrongValueForParameter", "3");
2588 return -2;
2589 }
2590
2591 if ($this->id > 0) {
2592 // Clean vat code
2593 $reg = array();
2594 $vat_src_code = '';
2595 if (preg_match('/\‍((.*)\‍)/', $vatrate, $reg)) {
2596 $vat_src_code = $reg[1];
2597 $vatrate = preg_replace('/\s*\‍(.*\‍)/', '', $vatrate); // Remove code into vatrate.
2598 }
2599
2600 require_once DOL_DOCUMENT_ROOT.'/core/class/discount.class.php';
2601
2602 $discount = new DiscountAbsolute($this->db);
2603 $discount->fk_soc = $this->id;
2604 $discount->socid = $this->id;
2605
2606 $discount->discount_type = $discount_type;
2607 $discount->multicurrency_code = $this->multicurrency_code;
2608 list($this->fk_multicurrency, $this->multicurrency_tx) = MultiCurrency::getIdAndTxFromCode($this->db, $this->multicurrency_code);
2609 $discount->multicurrency_tx = $this->multicurrency_tx;
2610
2611 if ($price_base_type == 'TTC') {
2612 $discount->amount_ttc = price2num($remise, 'MT');
2613 $discount->amount_ht = price2num((float) $remise / (1 + (float) $vatrate / 100), 'MT');
2614 $discount->amount_tva = price2num((float) $discount->amount_ttc - (float) $discount->amount_ht, 'MT');
2615
2616 $discount->multicurrency_amount_ttc = price2num((float) $remise * (float) $discount->multicurrency_tx, 'MT');
2617 $discount->multicurrency_amount_ht = price2num(((float) $remise / (1 + (float) $vatrate / 100)) * (float) $discount->multicurrency_tx, 'MT');
2618 $discount->multicurrency_amount_tva = price2num(((float) $discount->amount_ttc - (float) $discount->amount_ht) * (float) $discount->multicurrency_tx, 'MT');
2619 } else {
2620 $discount->amount_ht = price2num($remise, 'MT');
2621 $discount->amount_tva = price2num((float) $remise * (float) $vatrate / 100, 'MT');
2622 $discount->amount_ttc = price2num((float) $discount->amount_ht + (float) $discount->amount_tva, 'MT');
2623
2624 $discount->multicurrency_amount_ht = price2num((float) $remise * (float) $discount->multicurrency_tx, 'MT');
2625 $discount->multicurrency_amount_tva = price2num(((float) $remise * (float) $vatrate / 100) * (float) $discount->multicurrency_tx, 'MT');
2626 $discount->multicurrency_amount_ttc = price2num(((float) $discount->amount_ht + (float) $discount->amount_tva) * (float) $discount->multicurrency_tx, 'MT');
2627 }
2628
2629 $discount->tva_tx = (float) price2num($vatrate);
2630 $discount->vat_src_code = $vat_src_code;
2631
2632 $discount->description = $desc;
2633
2634 $result = $discount->create($user);
2635 if ($result > 0) {
2636 return $result;
2637 } else {
2638 $this->error = $discount->error;
2639 return -3;
2640 }
2641 } else {
2642 return 0;
2643 }
2644 }
2645
2655 public function getAvailableDiscounts($user = null, $filter = '', $maxvalue = 0, $discount_type = 0)
2656 {
2657 require_once DOL_DOCUMENT_ROOT.'/core/class/discount.class.php';
2658
2659 $discountstatic = new DiscountAbsolute($this->db);
2660 $result = $discountstatic->getAvailableDiscounts($this, $user, $filter, $maxvalue, $discount_type);
2661 if ($result >= 0) {
2662 return $result;
2663 } else {
2664 $this->error = $discountstatic->error;
2665 return -1;
2666 }
2667 }
2668
2678 public function getSalesRepresentatives(User $user, $mode = 0, $sortfield = null, $sortorder = null)
2679 {
2680 global $conf;
2681
2682 $reparray = array();
2683
2684 $sql = "SELECT u.rowid, u.login, u.lastname, u.firstname, u.office_phone, u.job, u.email, u.statut as status, u.entity, u.photo, u.gender";
2685 $sql .= ", u.office_fax, u.user_mobile, u.personal_mobile";
2686 $sql .= " FROM ".MAIN_DB_PREFIX."societe_commerciaux as sc, ".MAIN_DB_PREFIX."user as u";
2687 // Condition here should be the same than into select_dolusers()
2688 if (isModEnabled('multicompany') && getDolGlobalString('MULTICOMPANY_TRANSVERSE_MODE')) {
2689 $sql .= " WHERE u.rowid IN (SELECT ug.fk_user FROM ".$this->db->prefix()."usergroup_user as ug WHERE ug.entity IN (".getEntity('usergroup')."))";
2690 } else {
2691 $sql .= " WHERE entity IN (0, ".$this->db->sanitize($conf->entity).")";
2692 }
2693
2694 $sql .= " AND u.rowid = sc.fk_user AND sc.fk_soc = ".((int) $this->id);
2695 if (empty($sortfield) && empty($sortorder)) {
2696 $sortfield = 'u.lastname,u.firstname';
2697 $sortorder = 'ASC,ASC';
2698 }
2699 $sql .= $this->db->order($sortfield, $sortorder);
2700
2701 $resql = $this->db->query($sql);
2702 if ($resql) {
2703 $num = $this->db->num_rows($resql);
2704 $i = 0;
2705 while ($i < $num) {
2706 $obj = $this->db->fetch_object($resql);
2707
2708 if (empty($mode)) {
2709 $reparray[$i]['id'] = $obj->rowid;
2710 $reparray[$i]['lastname'] = $obj->lastname;
2711 $reparray[$i]['firstname'] = $obj->firstname;
2712 $reparray[$i]['email'] = $obj->email;
2713 $reparray[$i]['phone'] = $obj->office_phone;
2714 $reparray[$i]['office_phone'] = $obj->office_phone; // Pro phone
2715 $reparray[$i]['office_fax'] = $obj->office_fax;
2716 $reparray[$i]['user_mobile'] = $obj->user_mobile; // Pro mobile
2717 $reparray[$i]['personal_mobile'] = $obj->personal_mobile; // Personal mobile
2718 $reparray[$i]['job'] = $obj->job;
2719 $reparray[$i]['statut'] = $obj->status; // deprecated
2720 $reparray[$i]['status'] = $obj->status;
2721 $reparray[$i]['entity'] = $obj->entity;
2722 $reparray[$i]['login'] = $obj->login;
2723 $reparray[$i]['photo'] = $obj->photo;
2724 $reparray[$i]['gender'] = $obj->gender;
2725 } else {
2726 $reparray[] = $obj->rowid;
2727 }
2728 $i++;
2729 }
2730 return $reparray;
2731 } else {
2732 dol_print_error($this->db);
2733 return -1;
2734 }
2735 }
2736
2744 public function setPriceLevel($price_level, User $user)
2745 {
2746 if ($this->id) {
2747 $now = dol_now();
2748
2749 $sql = "UPDATE ".MAIN_DB_PREFIX."societe";
2750 $sql .= " SET price_level = ".((int) $price_level);
2751 $sql .= " WHERE rowid = ".((int) $this->id);
2752
2753 if (!$this->db->query($sql)) {
2754 dol_print_error($this->db);
2755 return -1;
2756 }
2757
2758 $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_prices";
2759 $sql .= " (datec, fk_soc, price_level, fk_user_author)";
2760 $sql .= " VALUES ('".$this->db->idate($now)."', ".((int) $this->id).", ".((int) $price_level).", ".((int) $user->id).")";
2761
2762 if (!$this->db->query($sql)) {
2763 dol_print_error($this->db);
2764 return -1;
2765 }
2766 return 1;
2767 }
2768 return -1;
2769 }
2770
2771 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2779 public function add_commercial(User $user, $commid)
2780 {
2781 // phpcs:enable
2782 $error = 0;
2783
2784 if ($this->id > 0 && $commid > 0) {
2785 $this->db->begin();
2786
2787 if (!$error) {
2788 $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe_commerciaux";
2789 $sql .= " WHERE fk_soc = ".((int) $this->id)." AND fk_user = ".((int) $commid);
2790
2791 $resql = $this->db->query($sql);
2792 if (!$resql) {
2793 dol_syslog(get_class($this)."::add_commercial Error ".$this->db->lasterror());
2794 $error++;
2795 }
2796 }
2797
2798 if (!$error) {
2799 $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_commerciaux";
2800 $sql .= " (fk_soc, fk_user)";
2801 $sql .= " VALUES (".((int) $this->id).", ".((int) $commid).")";
2802
2803 $resql = $this->db->query($sql);
2804 if (!$resql) {
2805 dol_syslog(get_class($this)."::add_commercial Error ".$this->db->lasterror());
2806 $error++;
2807 }
2808 }
2809
2810 if (!$error) {
2811 $this->context = array('commercial_modified' => $commid);
2812
2813 $result = $this->call_trigger('COMPANY_LINK_SALE_REPRESENTATIVE', $user);
2814 if ($result < 0) {
2815 $error++;
2816 }
2817 }
2818
2819 if (!$error) {
2820 $this->db->commit();
2821 return 1;
2822 } else {
2823 $this->db->rollback();
2824 return -1;
2825 }
2826 }
2827
2828 return 0;
2829 }
2830
2831 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
2839 public function del_commercial(User $user, $commid)
2840 {
2841 // phpcs:enable
2842 $error = 0;
2843 $this->context = array('commercial_modified' => $commid);
2844
2845 $result = $this->call_trigger('COMPANY_UNLINK_SALE_REPRESENTATIVE', $user);
2846 if ($result < 0) {
2847 $error++;
2848 }
2849
2850 if ($this->id > 0 && $commid > 0) {
2851 $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe_commerciaux ";
2852 $sql .= " WHERE fk_soc = ".((int) $this->id)." AND fk_user = ".((int) $commid);
2853
2854 if (!$this->db->query($sql)) {
2855 $error++;
2856 dol_syslog(get_class($this)."::del_commercial Erreur");
2857 }
2858 }
2859
2860 if ($error) {
2861 return -1;
2862 } else {
2863 return 1;
2864 }
2865 }
2866
2874 public function getTooltipContentArray($params)
2875 {
2876 global $conf, $langs, $user;
2877
2878 $langs->loadLangs(['companies', 'commercial']);
2879
2880 $datas = array();
2881
2882 $option = $params['option'] ?? '';
2883 $nofetch = !empty($params['nofetch']);
2884
2885 $noaliasinname = (empty($params['noaliasinname']) ? 0 : $params['noaliasinname']);
2886
2887 if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
2888 return ['optimize' => $langs->trans("ShowCompany")];
2889 }
2890
2891 if (!empty($this->logo) && class_exists('Form')) {
2892 $photo = '<div class="photointooltip floatright">';
2893 $photo .= Form::showphoto('societe', $this, 0, 40, 0, 'photoref', 'mini', 0); // Important, we must force height so image will have height tags and if image is inside a tooltip, the tooltip manager can calculate height and position correctly the tooltip.
2894 $photo .= '</div>';
2895 $datas['photo'] = $photo;
2896 } //elseif (!empty($this->logo_squarred) && class_exists('Form')) {
2897 /*$label.= '<div class="photointooltip">';
2898 $label.= Form::showphoto('societe', $this, 0, 40, 0, 'photowithmargin', 'mini', 0); // Important, we must force height so image will have height tags and if image is inside a tooltip, the tooltip manager can calculate height and position correctly the tooltip.
2899 $label.= '</div><div style="clear: both;"></div>';*/
2900 // }
2901
2902 $datas['divopen'] = '<div class="centpercent">';
2903
2904 if ($option == 'customer' || $option == 'compta' || $option == 'category') {
2905 $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("Customer").'</u>';
2906 } elseif ($option == 'prospect' && !getDolGlobalString('SOCIETE_DISABLE_PROSPECTS')) {
2907 $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("Prospect").'</u>';
2908 } elseif ($option == 'supplier' || $option == 'category_supplier') {
2909 $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("Supplier").'</u>';
2910 } elseif ($option == 'agenda') {
2911 $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
2912 } elseif ($option == 'project') {
2913 $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
2914 } elseif ($option == 'margin') {
2915 $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
2916 } elseif ($option == 'contact') {
2917 $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
2918 } elseif ($option == 'ban') {
2919 $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
2920 }
2921
2922 // By default
2923 if (empty($datas['picto'])) {
2924 $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
2925 }
2926 if (isset($this->status)) {
2927 $datas['status'] = ' '.$this->getLibStatut(5);
2928 }
2929 if (isset($this->client) && isset($this->fournisseur)) {
2930 $datas['type'] = ' &nbsp; ' . $this->getTypeUrl(1, '', 0, 'span');
2931 }
2932 $datas['name'] = '<br><b>'.$langs->trans('Name').':</b> '.dol_escape_htmltag(dol_string_nohtmltag($this->name));
2933 if (!empty($this->name_alias) && empty($noaliasinname)) {
2934 $datas['namealias'] = ' ('.dol_escape_htmltag(dol_string_nohtmltag($this->name_alias)).')';
2935 }
2936 if (!empty($this->email)) {
2937 $datas['email'] = '<br>'.img_picto('', 'email', 'class="pictofixedwidth"').$this->email;
2938 }
2939 if (!empty($this->url)) {
2940 $datas['url'] = '<br>'.img_picto('', 'globe', 'class="pictofixedwidth"').$this->url;
2941 }
2942 if (!empty($this->phone) || !empty($this->phone_mobile) || !empty($this->fax)) {
2943 $phonelist = array();
2944 if ($this->phone) {
2945 $phonelist[] = dol_print_phone($this->phone, $this->country_code, $this->id, 0, '', '&nbsp', 'phone');
2946 }
2947 // deliberately not making new list because fax uses same list as phone
2948 if ($this->phone_mobile) {
2949 $phonelist[] = dol_print_phone($this->phone_mobile, $this->country_code, $this->id, 0, '', '&nbsp', 'phone_mobile');
2950 }
2951 if ($this->fax) {
2952 $phonelist[] = dol_print_phone($this->fax, $this->country_code, $this->id, 0, '', '&nbsp', 'fax');
2953 }
2954 $datas['phonelist'] = '<br>'.implode('&nbsp;', $phonelist);
2955 }
2956
2957 if (!empty($this->address)) {
2958 $datas['address'] = '<br><b>'.$langs->trans("Address").':</b> '.dol_format_address($this, 1, ', ', $langs); // Address + country
2959 } elseif (!empty($this->country_code)) {
2960 $datas['address'] = '<br><b>'.$langs->trans('Country').':</b> '.$this->country_code;
2961 }
2962 if (!empty($this->tva_intra) || (getDolGlobalString('SOCIETE_SHOW_FIELD_IN_TOOLTIP') && strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'vatnumber') !== false)) {
2963 $datas['vatintra'] = '<br><b>'.$langs->trans('VATIntra').':</b> '.dol_escape_htmltag($this->tva_intra);
2964 }
2965
2966 if (getDolGlobalString('SOCIETE_SHOW_FIELD_IN_TOOLTIP')) {
2967 if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid1') !== false && $langs->trans('ProfId1'.$this->country_code) != '-') {
2968 $datas['profid1'] = '<br><b>'.$langs->trans('ProfId1'.$this->country_code).':</b> '.$this->idprof1;
2969 }
2970 if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid2') !== false && $langs->trans('ProfId2'.$this->country_code) != '-') {
2971 $datas['profid2'] = '<br><b>'.$langs->trans('ProfId2'.$this->country_code).':</b> '.$this->idprof2;
2972 }
2973 if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid3') !== false && $langs->trans('ProfId3'.$this->country_code) != '-') {
2974 $datas['profid3'] = '<br><b>'.$langs->trans('ProfId3'.$this->country_code).':</b> '.$this->idprof3;
2975 }
2976 if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid4') !== false && $langs->trans('ProfId4'.$this->country_code) != '-') {
2977 $datas['profid4'] = '<br><b>'.$langs->trans('ProfId4'.$this->country_code).':</b> '.$this->idprof4;
2978 }
2979 if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid5') !== false && $langs->trans('ProfId5'.$this->country_code) != '-') {
2980 $datas['profid5'] = '<br><b>'.$langs->trans('ProfId5'.$this->country_code).':</b> '.$this->idprof5;
2981 }
2982 if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid6') !== false && $langs->trans('ProfId6'.$this->country_code) != '-') {
2983 $datas['profid6'] = '<br><b>'.$langs->trans('ProfId6'.$this->country_code).':</b> '.$this->idprof6;
2984 }
2985 }
2986
2987 $datas['separator'] = '<br>';
2988
2989 if (!empty($this->code_client) && ($this->client == 1 || $this->client == 3)) {
2990 $datas['customercode'] = '<br><b>'.$langs->trans('CustomerCode').':</b> '.$this->code_client;
2991 }
2992 if (isModEnabled('accounting') && ($this->client == 1 || $this->client == 3)) {
2993 $langs->load('compta');
2994 $datas['accountancycustomercode'] = '<br><b>'.$langs->trans('CustomerAccountancyCode').':</b> '.$this->code_compta_client;
2995 }
2996 // show categories for this record only in ajax to not overload lists
2997 if (!$nofetch && isModEnabled('category') && $this->client) {
2998 require_once DOL_DOCUMENT_ROOT . '/categories/class/categorie.class.php';
2999 $form = new Form($this->db);
3000 $datas['categories_customer'] = '<br>' . $form->showCategories($this->id, Categorie::TYPE_CUSTOMER, 1, 1);
3001 }
3002 if (!empty($this->code_fournisseur) && $this->fournisseur) {
3003 $datas['suppliercode'] = '<br><b>'.$langs->trans('SupplierCode').':</b> '.$this->code_fournisseur;
3004 }
3005 if (isModEnabled('accounting') && $this->fournisseur) {
3006 $langs->load('compta');
3007 $datas['accountancysuppliercode'] = '<br><b>'.$langs->trans('SupplierAccountancyCode').':</b> '.$this->code_compta_fournisseur;
3008 }
3009 // show categories for this record only in ajax to not overload lists
3010 if (!$nofetch && isModEnabled('category') && $this->fournisseur) {
3011 require_once DOL_DOCUMENT_ROOT . '/categories/class/categorie.class.php';
3012 $form = new Form($this->db);
3013 $datas['categories_supplier'] = '<br>' . $form->showCategories($this->id, Categorie::TYPE_SUPPLIER, 1, 1);
3014 }
3015
3016 $datas['divclose'] = '</div>';
3017
3018 return $datas;
3019 }
3020
3034 public function getNomUrl($withpicto = 0, $option = '', $maxlen = 0, $notooltip = 0, $save_lastsearch_value = -1, $noaliasinname = 0, $target = '', $morecss = '')
3035 {
3036 global $conf, $langs, $hookmanager, $user;
3037
3038 if (!empty($conf->dol_no_mouse_hover)) {
3039 $notooltip = 1; // Force disable tooltips
3040 }
3041
3042 $name = $this->name ? $this->name : $this->nom;
3043
3044 if (getDolGlobalString('SOCIETE_ON_SEARCH_AND_LIST_GO_ON_CUSTOMER_OR_SUPPLIER_CARD')) {
3045 if (empty($option) && $this->client > 0) {
3046 $option = 'customer';
3047 }
3048 if (empty($option) && $this->fournisseur > 0) {
3049 $option = 'supplier';
3050 }
3051 }
3052
3053 if (getDolGlobalString('SOCIETE_ADD_REF_IN_LIST') && (!empty($withpicto))) {
3054 $code = '';
3055 if (($this->client) && (!empty($this->code_client)) && (getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 1 || getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 2)) {
3056 $code = $this->code_client.' - ';
3057 }
3058
3059 if (($this->fournisseur) && (!empty($this->code_fournisseur)) && (getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 1 || getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 3)) {
3060 $code .= $this->code_fournisseur.' - ';
3061 }
3062
3063 if ($code) {
3064 if (getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 1) {
3065 $name = $code.' '.$name;
3066 } else {
3067 $name = $code;
3068 }
3069 }
3070 }
3071
3072 if (!empty($this->name_alias) && empty($noaliasinname)) {
3073 $name .= ' ('.$this->name_alias.')';
3074 }
3075
3076 $result = '';
3077 $params = [
3078 'id' => $this->id,
3079 'objecttype' => $this->element,
3080 'option' => $option,
3081 'nofetch' => 1,
3082 ];
3083 $classfortooltip = 'classfortooltip';
3084 $dataparams = '';
3085 if (getDolGlobalInt('MAIN_ENABLE_AJAX_TOOLTIP')) {
3086 $classfortooltip = 'classforajaxtooltip';
3087 $dataparams = ' data-params="'.dol_escape_htmltag(json_encode($params)).'"';
3088 $label = '';
3089 } else {
3090 $label = implode($this->getTooltipContentArray($params));
3091 }
3092
3093 $linkstart = '';
3094 $linkend = '';
3095
3096 if ($option == 'customer' || $option == 'compta' || $option == 'category') {
3097 $linkstart = '<a href="'.DOL_URL_ROOT.'/comm/card.php?socid='.$this->id;
3098 } elseif ($option == 'prospect' && !getDolGlobalString('SOCIETE_DISABLE_PROSPECTS')) {
3099 $linkstart = '<a href="'.DOL_URL_ROOT.'/comm/card.php?socid='.$this->id;
3100 } elseif ($option == 'supplier' || $option == 'category_supplier') {
3101 $linkstart = '<a href="'.DOL_URL_ROOT.'/fourn/card.php?socid='.$this->id;
3102 } elseif ($option == 'agenda') {
3103 $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/agenda.php?socid='.$this->id;
3104 } elseif ($option == 'project') {
3105 $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/project.php?socid='.$this->id;
3106 } elseif ($option == 'margin') {
3107 $linkstart = '<a href="'.DOL_URL_ROOT.'/margin/tabs/thirdpartyMargins.php?socid='.$this->id.'&type=1';
3108 } elseif ($option == 'contact') {
3109 $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/contact.php?socid='.$this->id;
3110 } elseif ($option == 'ban') {
3111 $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$this->id;
3112 }
3113
3114 // By default
3115 if (empty($linkstart)) {
3116 $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/card.php?socid='.$this->id;
3117 }
3118
3119 // Add type of canvas
3120 $linkstart .= (!empty($this->canvas) ? '&canvas='.$this->canvas : '');
3121 // Add param to save lastsearch_values or not
3122 $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
3123 if ($save_lastsearch_value == -1 && isset($_SERVER["PHP_SELF"]) && preg_match('/list\.php/', $_SERVER["PHP_SELF"])) {
3124 $add_save_lastsearch_values = 1;
3125 }
3126 if ($add_save_lastsearch_values) {
3127 $linkstart .= '&save_lastsearch_values=1';
3128 }
3129 $linkstart .= '"';
3130
3131 $linkclose = '';
3132 if (empty($notooltip)) {
3133 if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
3134 $label = $langs->trans("ShowCompany");
3135 $linkclose .= ' alt="'.dolPrintHTMLForAttribute($label).'"';
3136 }
3137 $linkclose .= ($label ? ' title="'.dolPrintHTMLForAttribute($label).'"' : ' title="tocomplete"');
3138 $linkclose .= $dataparams.' class="'.$classfortooltip.($morecss ? ' '.$morecss : '').' refurl valignmiddle"';
3139 $target_value = array('_self', '_blank', '_parent', '_top');
3140 if (in_array($target, $target_value)) {
3141 $linkclose .= ' target="'.dol_escape_htmltag($target).'"';
3142 }
3143 } else {
3144 $linkclose .= ' class="valignmiddle'.($morecss ? ' '.$morecss : '').'"';
3145 }
3146 $linkstart .= $linkclose.'>';
3147 $linkend = '</a>';
3148
3149 if (!$user->hasRight('societe', 'client', 'voir') && $user->socid > 0 && $this->id != $user->socid) {
3150 $linkstart = '';
3151 $linkend = '';
3152 }
3153
3154 $result .= $linkstart;
3155 if ($withpicto) {
3156 $result .= img_object(($notooltip ? '' : $label), ($this->picto ? $this->picto : 'generic'), (' class="'.(($withpicto != 2) ? 'paddingright' : '').'"'), 0, 0, $notooltip ? 0 : 1);
3157 }
3158 if ($withpicto != 2) {
3159 $result .= dol_escape_htmltag($maxlen ? dol_trunc($name, $maxlen) : $name);
3160 }
3161 $result .= $linkend;
3162
3163 global $action;
3164 $hookmanager->initHooks(array('thirdpartydao'));
3165 $parameters = array(
3166 'id' => $this->id,
3167 'getnomurl' => &$result,
3168 'withpicto ' => $withpicto,
3169 'option' => $option,
3170 'maxlen' => $maxlen,
3171 'notooltip' => $notooltip,
3172 'save_lastsearch_value' => $save_lastsearch_value
3173 );
3174 $reshook = $hookmanager->executeHooks('getNomUrl', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
3175 if ($reshook > 0) {
3176 $result = $hookmanager->resPrint;
3177 } else {
3178 $result .= $hookmanager->resPrint;
3179 }
3180
3181 return $result;
3182 }
3183
3193 public function getTypeUrl($withpicto = 0, $option = '', $notooltip = 0, $tag = 'a')
3194 {
3195 global $langs;
3196
3197 $s = '';
3198 if (empty($option) || preg_match('/prospect/', $option)) {
3199 if (($this->client == 2 || $this->client == 3) && !getDolGlobalString('SOCIETE_DISABLE_PROSPECTS')) {
3200 $s .= '<'.$tag.' class="customer-back opacitymedium" title="'.dolPrintHTMLForAttribute($langs->trans("Prospect")).'"';
3201 $s .= $tag == 'a' ? ' href="'.DOL_URL_ROOT.'/comm/card.php?socid='.$this->id.'"' : '';
3202 $s .= '>'.dol_substr($langs->trans("Prospect"), 0, 1).'</'.$tag.'>';
3203 }
3204 }
3205 if (empty($option) || preg_match('/customer/', $option)) {
3206 if (($this->client == 1 || $this->client == 3) && !getDolGlobalString('SOCIETE_DISABLE_CUSTOMERS')) {
3207 $s .= '<'.$tag.' class="customer-back" title="'.dolPrintHTMLForAttribute($langs->trans("Customer")).'"';
3208 $s.= $tag == 'a' ? ' href="'.DOL_URL_ROOT.'/comm/card.php?socid='.$this->id.'"' : '';
3209 $s .= '>'.dol_substr($langs->trans("Customer"), 0, 1).'</'.$tag.'>';
3210 }
3211 }
3212 if (empty($option) || preg_match('/supplier/', $option)) {
3213 if ((isModEnabled("supplier_order") || isModEnabled("supplier_invoice")) && $this->fournisseur) {
3214 $s .= '<'.$tag.' class="vendor-back" title="'.dolPrintHTMLForAttribute($langs->trans("Supplier")).'"';
3215 $s .= $tag == 'a' ? ' href="'.DOL_URL_ROOT.'/fourn/card.php?socid='.$this->id.'"' : '';
3216 $s .= '>'.dol_substr($langs->trans("Supplier"), 0, 1).'</'.$tag.'>';
3217 }
3218 }
3219
3220 return $s;
3221 }
3222
3223
3230 public function getLibStatut($mode = 0)
3231 {
3232 return $this->LibStatut($this->status, $mode);
3233 }
3234
3235 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3243 public function LibStatut($status, $mode = 0)
3244 {
3245 // phpcs:enable
3246 global $langs;
3247 $langs->load('companies');
3248
3249 $statusType = 'status4';
3250 if ($status == 0) {
3251 $statusType = 'status6';
3252 }
3253
3254 if (empty($this->labelStatus) || empty($this->labelStatusShort)) {
3255 $this->labelStatus[0] = $langs->transnoentitiesnoconv("ActivityCeased");
3256 $this->labelStatus[1] = $langs->transnoentitiesnoconv("InActivity");
3257 $this->labelStatusShort[0] = $langs->transnoentitiesnoconv("ActivityCeased");
3258 $this->labelStatusShort[1] = $langs->transnoentitiesnoconv("InActivity");
3259 }
3260
3261 return dolGetStatus($this->labelStatus[$status], $this->labelStatusShort[$status], '', $statusType, $mode);
3262 }
3263
3264 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3271 public function thirdparty_and_contact_email_array($addthirdparty = 0)
3272 {
3273 // phpcs:enable
3274 global $langs;
3275
3276 $contact_emails = $this->contact_property_array('email', 1);
3277
3278 if ($this->email && $addthirdparty) {
3279 if (empty($this->name)) {
3280 $this->name = $this->nom;
3281 }
3282 $contact_emails['thirdparty'] = ($addthirdparty == 2 ? '<span class="opacitymedium">' : '').$langs->transnoentitiesnoconv("ThirdParty").($addthirdparty == 2 ? '</span>' : '').': '.dol_trunc($this->name, 16)." <".$this->email.">";
3283 }
3284
3285 //var_dump($contact_emails)
3286 return $contact_emails;
3287 }
3288
3289 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3295 public function thirdparty_and_contact_phone_array()
3296 {
3297 // phpcs:enable
3298 global $langs;
3299
3300 $contact_phone = $this->contact_property_array('mobile');
3301
3302 if (!empty($this->phone)) { // If a phone of thirdparty is defined, we add it to mobile of contacts
3303 if (empty($this->name)) {
3304 $this->name = $this->nom;
3305 }
3306 // TODO: Tester si tel non deja present dans tableau contact
3307 $contact_phone['thirdparty'] = $langs->transnoentitiesnoconv("ThirdParty").': '.dol_trunc($this->name, 16)." <".$this->phone.">";
3308 }
3309 return $contact_phone;
3310 }
3311
3312 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3320 public function contact_property_array($mode = 'email', $hidedisabled = 0)
3321 {
3322 // phpcs:enable
3323 global $langs;
3324
3325 $contact_property = array();
3326
3327
3328 $sql = "SELECT rowid, email, statut as status, phone_mobile, lastname, poste, firstname";
3329 $sql .= " FROM ".MAIN_DB_PREFIX."socpeople";
3330 $sql .= " WHERE fk_soc = ".((int) $this->id);
3331 $sql .= " AND entity IN (".getEntity($this->element).")";
3332 $sql .= " ORDER BY lastname, firstname";
3333
3334 $resql = $this->db->query($sql);
3335 if ($resql) {
3336 $nump = $this->db->num_rows($resql);
3337 if ($nump) {
3338 $sepa = "(";
3339 $sepb = ")";
3340 if ($mode == 'email') {
3341 //$sepa="&lt;"; $sepb="&gt;";
3342 $sepa = "<";
3343 $sepb = ">";
3344 }
3345 $i = 0;
3346 while ($i < $nump) {
3347 $obj = $this->db->fetch_object($resql);
3348 if ($mode == 'email') {
3349 $property = $obj->email;
3350 } elseif ($mode == 'mobile') {
3351 $property = $obj->phone_mobile;
3352 } else {
3353 $property = $obj->$mode;
3354 }
3355
3356 // Show all contact. If hidedisabled is 1, showonly contacts with status = 1
3357 if ($obj->status == 1 || empty($hidedisabled)) {
3358 if (empty($property)) {
3359 if ($mode == 'email') {
3360 $property = $langs->transnoentitiesnoconv("NoEMail");
3361 } elseif ($mode == 'mobile') {
3362 $property = $langs->transnoentitiesnoconv("NoMobilePhone");
3363 }
3364 }
3365
3366 if (!empty($obj->poste)) {
3367 $contact_property[$obj->rowid] = trim(dolGetFirstLastname($obj->firstname, $obj->lastname)).($obj->poste ? " - ".$obj->poste : "").(($mode != 'poste' && $property) ? " ".$sepa.$property.$sepb : '');
3368 } else {
3369 $contact_property[$obj->rowid] = trim(dolGetFirstLastname($obj->firstname, $obj->lastname)).(($mode != 'poste' && $property) ? " ".$sepa.$property.$sepb : '');
3370 }
3371 }
3372 $i++;
3373 }
3374 }
3375 } else {
3376 dol_print_error($this->db);
3377 }
3378 return $contact_property;
3379 }
3380
3381
3382 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3388 public function contact_array()
3389 {
3390 // phpcs:enable
3391 $contacts = array();
3392
3393 $sql = "SELECT rowid, lastname, firstname FROM ".MAIN_DB_PREFIX."socpeople WHERE fk_soc = ".((int) $this->id);
3394 $resql = $this->db->query($sql);
3395 if ($resql) {
3396 $nump = $this->db->num_rows($resql);
3397 if ($nump) {
3398 $i = 0;
3399 while ($i < $nump) {
3400 $obj = $this->db->fetch_object($resql);
3401 $contacts[$obj->rowid] = dolGetFirstLastname($obj->firstname, $obj->lastname);
3402 $i++;
3403 }
3404 }
3405 } else {
3406 dol_print_error($this->db);
3407 }
3408 return $contacts;
3409 }
3410
3411 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3417 public function contact_array_objects()
3418 {
3419 // phpcs:enable
3420 require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
3421 $contacts = array();
3422
3423 $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."socpeople WHERE fk_soc = ".((int) $this->id);
3424 $resql = $this->db->query($sql);
3425 if ($resql) {
3426 $nump = $this->db->num_rows($resql);
3427 if ($nump) {
3428 $i = 0;
3429 while ($i < $nump) {
3430 $obj = $this->db->fetch_object($resql);
3431 $contact = new Contact($this->db);
3432 $contact->fetch($obj->rowid);
3433 $contacts[] = $contact;
3434 $i++;
3435 }
3436 }
3437 } else {
3438 dol_print_error($this->db);
3439 }
3440 return $contacts;
3441 }
3442
3443 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3451 public function contact_get_property($rowid, $mode)
3452 {
3453 // phpcs:enable
3454 $contact_property = '';
3455
3456 if (empty($rowid)) {
3457 return '';
3458 }
3459
3460 $sql = "SELECT rowid, email, phone_mobile, lastname, firstname";
3461 $sql .= " FROM ".MAIN_DB_PREFIX."socpeople";
3462 $sql .= " WHERE rowid = ".((int) $rowid);
3463
3464 $resql = $this->db->query($sql);
3465 if ($resql) {
3466 $nump = $this->db->num_rows($resql);
3467
3468 if ($nump) {
3469 $obj = $this->db->fetch_object($resql);
3470
3471 if ($mode == 'email') {
3472 $contact_property = dol_string_nospecial(dolGetFirstLastname($obj->firstname, $obj->lastname), ' ', array(","))." <".$obj->email.">";
3473 } elseif ($mode == 'mobile') {
3474 $contact_property = $obj->phone_mobile;
3475 }
3476 }
3477 return $contact_property;
3478 } else {
3479 dol_print_error($this->db);
3480 }
3481
3482 return '';
3483 }
3484
3485
3486 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3493 public function display_rib($mode = 'label')
3494 {
3495 // phpcs:enable
3496 require_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
3497
3498 $bac = new CompanyBankAccount($this->db);
3499 // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
3500 $bac->fetch(0, '', $this->id);
3501
3502 if ($bac->id > 0) { // If a bank account has been found for company $this->id
3503 if ($mode == 'label') {
3504 return $bac->getRibLabel(true);
3505 } elseif ($mode == 'rum') {
3506 if (empty($bac->rum)) {
3507 require_once DOL_DOCUMENT_ROOT.'/compta/prelevement/class/bonprelevement.class.php';
3508 $prelevement = new BonPrelevement($this->db);
3509 $bac->fetch_thirdparty();
3510 $bac->rum = $prelevement->buildRumNumber($bac->thirdparty->code_client, $bac->datec, $bac->id);
3511 }
3512 return $bac->rum;
3513 } elseif ($mode == 'format') {
3514 return $bac->frstrecur;
3515 } else {
3516 return 'BadParameterToFunctionDisplayRib';
3517 }
3518 } else {
3519 return '';
3520 }
3521 }
3522
3523 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3529 public function get_all_rib()
3530 {
3531 // phpcs:enable
3532 require_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
3533 $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."societe_rib WHERE type = 'ban' AND fk_soc = ".((int) $this->id);
3534 $result = $this->db->query($sql);
3535 if (!$result) {
3536 $this->error = $this->db->lasterror();
3537 $this->errors[] = $this->db->lasterror();
3538 return 0;
3539 } else {
3540 $num_rows = $this->db->num_rows($result);
3541 $rib_array = array();
3542 if ($num_rows) {
3543 while ($obj = $this->db->fetch_object($result)) {
3544 $rib = new CompanyBankAccount($this->db);
3545 $rib->fetch($obj->rowid);
3546 $rib_array[] = $rib;
3547 }
3548 }
3549 return $rib_array;
3550 }
3551 }
3552
3556 public function getDefaultRib()
3557 {
3558 // phpcs:enable
3559 require_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
3560 $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."societe_rib WHERE type = 'ban' AND default_rib = 1 AND fk_soc = ". (int) $this->id;
3561 $resql = $this->db->query($sql);
3562 if (!$resql) {
3563 $this->error = $this->db->lasterror();
3564 $this->errors[] = $this->db->lasterror();
3565 return -1;
3566 } else {
3567 $num_rows = $this->db->num_rows($resql);
3568 $rib_array = array();
3569 if ($num_rows) {
3570 while ($obj = $this->db->fetch_object($resql)) {
3571 return $obj->rowid;
3572 }
3573 }
3574 return 0;
3575 }
3576 }
3577
3578
3579 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3588 public function get_codeclient($objsoc = null, $type = 0)
3589 {
3590 // phpcs:enable
3591 global $conf;
3592 if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
3593 $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
3594
3595 $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
3596 foreach ($dirsociete as $dirroot) {
3597 $res = dol_include_once($dirroot.$module.'.php');
3598 if ($res) {
3599 break;
3600 }
3601 }
3603 $mod = new $module($this->db);
3604 '@phan-var-force ModeleThirdPartyCode $mod';
3605
3606 $this->code_client = $mod->getNextValue($objsoc, $type);
3607 $this->prefixCustomerIsRequired = $mod->prefixIsRequired;
3608
3609 dol_syslog(get_class($this)."::get_codeclient code_client=".$this->code_client." module=".$module);
3610 }
3611 }
3612
3613 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3622 public function get_codefournisseur($objsoc = null, $type = 1)
3623 {
3624 // phpcs:enable
3625 global $conf;
3626 if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
3627 $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
3628
3629 $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
3630 foreach ($dirsociete as $dirroot) {
3631 $res = dol_include_once($dirroot.$module.'.php');
3632 if ($res) {
3633 break;
3634 }
3635 }
3637 $mod = new $module($this->db);
3638 '@phan-var-force ModeleThirdPartyCode $mod';
3639
3640 $this->code_fournisseur = $mod->getNextValue($objsoc, $type);
3641
3642 dol_syslog(get_class($this)."::get_codefournisseur code_fournisseur=".$this->code_fournisseur." module=".$module);
3643 }
3644 }
3645
3646 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3653 public function codeclient_modifiable()
3654 {
3655 // phpcs:enable
3656 global $conf;
3657 if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
3658 $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
3659
3660 $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
3661 foreach ($dirsociete as $dirroot) {
3662 $res = dol_include_once($dirroot.$module.'.php');
3663 if ($res) {
3664 break;
3665 }
3666 }
3667
3668 $mod = new $module($this->db);
3669 '@phan-var-force ModeleThirdPartyCode $mod';
3670
3671 dol_syslog(get_class($this)."::codeclient_modifiable code_client=".$this->code_client." module=".$module);
3672 if ($mod->code_modifiable_null && !$this->code_client) {
3673 return 1;
3674 }
3675 if ($mod->code_modifiable_invalide && $this->check_codeclient() < 0) {
3676 return 1;
3677 }
3678 if ($mod->code_modifiable) {
3679 return 1; // A mettre en dernier
3680 }
3681 return 0;
3682 } else {
3683 return 0;
3684 }
3685 }
3686
3687
3688 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3694 public function codefournisseur_modifiable()
3695 {
3696 // phpcs:enable
3697 global $conf;
3698 if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
3699 $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
3700
3701 $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
3702 foreach ($dirsociete as $dirroot) {
3703 $res = dol_include_once($dirroot.$module.'.php');
3704 if ($res) {
3705 break;
3706 }
3707 }
3708
3709 $mod = new $module($this->db);
3710 '@phan-var-force ModeleThirdPartyCode $mod';
3711
3712 dol_syslog(get_class($this)."::codefournisseur_modifiable code_founisseur=".$this->code_fournisseur." module=".$module);
3713 if ($mod->code_modifiable_null && !$this->code_fournisseur) {
3714 return 1;
3715 }
3716 if ($mod->code_modifiable_invalide && $this->check_codefournisseur() < 0) {
3717 return 1;
3718 }
3719 if ($mod->code_modifiable) {
3720 return 1; // A mettre en dernier
3721 }
3722 return 0;
3723 } else {
3724 return 0;
3725 }
3726 }
3727
3728
3729 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3741 public function check_codeclient()
3742 {
3743 // phpcs:enable
3744 global $conf;
3745 if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
3746 $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
3747
3748 $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
3749 foreach ($dirsociete as $dirroot) {
3750 $res = dol_include_once($dirroot.$module.'.php');
3751 if ($res) {
3752 break;
3753 }
3754 }
3755
3756 $mod = new $module($this->db);
3757 '@phan-var-force ModeleThirdPartyCode $mod';
3758
3759 dol_syslog(get_class($this)."::check_codeclient code_client=".$this->code_client." module=".$module);
3760 $result = $mod->verif($this->db, $this->code_client, $this, 0);
3761 if ($result) { // If error
3762 $this->error = $mod->error;
3763 $this->errors = $mod->errors;
3764 }
3765 return $result;
3766 } else {
3767 return 0;
3768 }
3769 }
3770
3771 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3783 public function check_codefournisseur()
3784 {
3785 // phpcs:enable
3786 global $conf;
3787 if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
3788 $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
3789
3790 $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
3791 foreach ($dirsociete as $dirroot) {
3792 $res = dol_include_once($dirroot.$module.'.php');
3793 if ($res) {
3794 break;
3795 }
3796 }
3797
3798 $mod = new $module($this->db);
3799 '@phan-var-force ModeleThirdPartyCode $mod';
3800
3801 dol_syslog(get_class($this)."::check_codefournisseur code_fournisseur=".$this->code_fournisseur." module=".$module);
3802 $result = $mod->verif($this->db, $this->code_fournisseur, $this, 1);
3803 if ($result) { // If error
3804 $this->error = $mod->error;
3805 $this->errors = $mod->errors;
3806 }
3807 return $result;
3808 } else {
3809 return 0;
3810 }
3811 }
3812
3813 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3822 public function get_codecompta($type)
3823 {
3824 // phpcs:enable
3825 global $conf;
3826
3827 if (getDolGlobalString('SOCIETE_CODECOMPTA_ADDON')) {
3828 $module = getDolGlobalString('SOCIETE_CODECOMPTA_ADDON');
3829 $res = false;
3830 $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
3831 foreach ($dirsociete as $dirroot) {
3832 $res = dol_include_once($dirroot.$module.'.php');
3833 if ($res) {
3834 break;
3835 }
3836 }
3837
3838 if ($res) {
3839 $mod = new $module();
3840 '@phan-var-force ModeleAccountancyCode $mod';
3841
3842 // Set code count in $mod->code
3843 $result = $mod->get_code($this->db, $this, $type);
3844
3845 if ($type == 'customer') {
3846 $this->code_compta_client = $mod->code;
3847 } elseif ($type == 'supplier') {
3848 $this->code_compta_fournisseur = $mod->code;
3849 }
3850
3851 return $result;
3852 } else {
3853 $this->error = 'ErrorAccountancyCodeNotDefined';
3854 return -1;
3855 }
3856 } else {
3857 if ($type == 'customer') {
3858 $this->code_compta_client = '';
3859 } elseif ($type == 'supplier') {
3860 $this->code_compta_fournisseur = '';
3861 }
3862
3863 return 0;
3864 }
3865 }
3866
3873 public function setParent($id)
3874 {
3875 dol_syslog(get_class($this).'::setParent', LOG_DEBUG);
3876
3877 if ($this->id) {
3878 // Check if the id we want to add as parent has not already one parent that is the current id we try to update
3879 if ($id > 0) {
3880 $sameparent = $this->validateFamilyTree($id, $this->id, 0);
3881 if ($sameparent < 0) {
3882 return -1;
3883 }
3884 if ($sameparent == 1) {
3885 setEventMessages('ParentCompanyToAddIsAlreadyAChildOfModifiedCompany', null, 'warnings');
3886 return -1;
3887 }
3888 }
3889
3890 $sql = 'UPDATE '.MAIN_DB_PREFIX.'societe SET parent = '.($id > 0 ? $id : 'null').' WHERE rowid = '.((int) $this->id);
3891
3892 $resql = $this->db->query($sql);
3893 if ($resql) {
3894 $this->parent = $id;
3895 return 1;
3896 } else {
3897 return -1;
3898 }
3899 }
3900
3901 return -1;
3902 }
3903
3912 public function validateFamilyTree($idparent, $idchild, $counter = 0)
3913 {
3914 if ($counter > 100) {
3915 dol_syslog("Too high level of parent - child for company. May be an infinite loop ?", LOG_WARNING);
3916 }
3917
3918 $sql = 'SELECT s.parent';
3919 $sql .= ' FROM '.MAIN_DB_PREFIX.'societe as s';
3920 $sql .= ' WHERE rowid = '.((int) $idparent);
3921 $resql = $this->db->query($sql);
3922 if ($resql) {
3923 $obj = $this->db->fetch_object($resql);
3924
3925 if ($obj->parent == '') {
3926 return 0;
3927 } elseif ($obj->parent == $idchild) {
3928 return 1;
3929 } else {
3930 $sameparent = $this->validateFamilyTree($obj->parent, $idchild, ($counter + 1));
3931 }
3932 return $sameparent;
3933 } else {
3934 return -1;
3935 }
3936 }
3937
3945 public function getParentsForCompany($company_id, $parents = array())
3946 {
3947 global $langs;
3948
3949 if ($company_id > 0) {
3950 $sql = "SELECT parent FROM " . MAIN_DB_PREFIX . "societe WHERE rowid = ".((int) $company_id);
3951 $resql = $this->db->query($sql);
3952 if ($resql) {
3953 if ($obj = $this->db->fetch_object($resql)) {
3954 $parent = $obj->parent;
3955 if ($parent > 0 && !in_array($parent, $parents)) {
3956 $parents[] = $parent;
3957 return $this->getParentsForCompany($parent, $parents);
3958 } else {
3959 return $parents;
3960 }
3961 }
3962 $this->db->free($resql);
3963 } else {
3964 setEventMessage($langs->trans('GetCompanyParentsError', $this->db->lasterror()), 'errors');
3965 }
3966 }
3967 // Return a default value when $company_id is not greater than 0
3968 return array();
3969 }
3970
3971 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
3978 public function id_prof_verifiable($idprof)
3979 {
3980 // phpcs:enable
3981 global $conf;
3982
3983 switch ($idprof) {
3984 case 1:
3985 $ret = getDolGlobalBool('SOCIETE_IDPROF1_UNIQUE');
3986 break;
3987 case 2:
3988 $ret = getDolGlobalBool('SOCIETE_IDPROF2_UNIQUE');
3989 break;
3990 case 3:
3991 $ret = getDolGlobalBool('SOCIETE_IDPROF3_UNIQUE');
3992 break;
3993 case 4:
3994 $ret = getDolGlobalBool('SOCIETE_IDPROF4_UNIQUE');
3995 break;
3996 case 5:
3997 $ret = getDolGlobalBool('SOCIETE_IDPROF5_UNIQUE');
3998 break;
3999 case 6:
4000 $ret = getDolGlobalBool('SOCIETE_IDPROF6_UNIQUE');
4001 break;
4002 default:
4003 $ret = false;
4004 }
4005
4006 return $ret;
4007 }
4008
4009 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4018 public function id_prof_exists($idprof, $value, $socid = 0)
4019 {
4020 // phpcs:enable
4021 $field = $idprof;
4022
4023 switch ($idprof) { // For backward compatibility
4024 case '1':
4025 case 'idprof1':
4026 $field = "siren";
4027 break;
4028 case '2':
4029 case 'idprof2':
4030 $field = "siret";
4031 break;
4032 case '3':
4033 case 'idprof3':
4034 $field = "ape";
4035 break;
4036 case '4':
4037 case 'idprof4':
4038 $field = "idprof4";
4039 break;
4040 case '5':
4041 $field = "idprof5";
4042 break;
4043 case '6':
4044 $field = "idprof6";
4045 break;
4046 }
4047
4048 //Verify duplicate entries
4049 $sql = "SELECT COUNT(*) as nb FROM ".MAIN_DB_PREFIX."societe WHERE ".$field." = '".$this->db->escape($value)."' AND entity IN (".getEntity('societe').")";
4050 if ($socid) {
4051 $sql .= " AND rowid <> ".$socid;
4052 }
4053 $resql = $this->db->query($sql);
4054 if ($resql) {
4055 $obj = $this->db->fetch_object($resql);
4056 $count = $obj->nb;
4057 } else {
4058 $count = 0;
4059 print $this->db->error();
4060 }
4061 $this->db->free($resql);
4062
4063 if ($count > 0) {
4064 return true;
4065 } else {
4066 return false;
4067 }
4068 }
4069
4070 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4079 public function id_prof_check($idprof, $soc)
4080 {
4081 // phpcs:enable
4082 global $conf;
4083
4084 // load the library necessary to check the professional identifiers
4085 require_once DOL_DOCUMENT_ROOT.'/core/lib/profid.lib.php';
4086
4087 $ok = 1;
4088
4089 if (getDolGlobalString('MAIN_DISABLEPROFIDRULES')) {
4090 return 1;
4091 }
4092
4093 // Check SIREN
4094 if ($idprof == 1 && $soc->country_code == 'FR' && !isValidSiren($this->idprof1)) {
4095 return -1;
4096 }
4097
4098 // Check SIRET
4099 if ($idprof == 2 && $soc->country_code == 'FR' && !isValidSiret($this->idprof2)) {
4100 return -1;
4101 }
4102
4103 //Verify CIF/NIF/NIE if pays ES
4104 if ($idprof == 1 && $soc->country_code == 'ES') {
4105 return isValidTinForES($this->idprof1);
4106 }
4107
4108 //Verify NIF if country is PT
4109 if ($idprof == 1 && $soc->country_code == 'PT' && !isValidTinForPT($this->idprof1)) {
4110 return -1;
4111 }
4112
4113 //Verify NIF if country is DZ
4114 if ($idprof == 1 && $soc->country_code == 'DZ' && !isValidTinForDZ($this->idprof1)) {
4115 return -1;
4116 }
4117
4118 //Verify ID Prof 1 if country is BE
4119 if ($idprof == 1 && $soc->country_code == 'BE' && !isValidTinForBE($this->idprof1)) {
4120 return -1;
4121 }
4122
4123 return $ok;
4124 }
4125
4126 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4135 public function id_prof_url($idprof, $thirdparty)
4136 {
4137 // phpcs:enable
4138 global $conf, $langs, $hookmanager;
4139
4140 $url = '';
4141 $action = '';
4142
4143 $hookmanager->initHooks(array('idprofurl'));
4144 $parameters = array('idprof' => $idprof, 'company' => $thirdparty);
4145 $reshook = $hookmanager->executeHooks('getIdProfUrl', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
4146 if (empty($reshook)) {
4147 if (getDolGlobalString('MAIN_DISABLEPROFIDRULES')) {
4148 return '';
4149 }
4150
4151 // TODO Move links to validate professional ID into a dictionary table "country" + "link"
4152 $strippedIdProf1 = str_replace(' ', '', $thirdparty->idprof1);
4153 if ($idprof == 1 && $thirdparty->country_code == 'FR') {
4154 $url = 'https://annuaire-entreprises.data.gouv.fr/entreprise/'.$strippedIdProf1; // See also http://avis-situation-sirene.insee.fr/
4155 }
4156 if ($idprof == 1 && ($thirdparty->country_code == 'GB' || $thirdparty->country_code == 'UK')) {
4157 $url = 'https://beta.companieshouse.gov.uk/company/'.$strippedIdProf1;
4158 }
4159 if ($idprof == 1 && $thirdparty->country_code == 'ES') {
4160 $url = 'http://www.e-informa.es/servlet/app/portal/ENTP/screen/SProducto/prod/ETIQUETA_EMPRESA/nif/'.$strippedIdProf1;
4161 }
4162 if ($idprof == 1 && $thirdparty->country_code == 'IN') {
4163 $url = 'http://www.tinxsys.com/TinxsysInternetWeb/dealerControllerServlet?tinNumber='.$strippedIdProf1.';&searchBy=TIN&backPage=searchByTin_Inter.jsp';
4164 }
4165 if ($idprof == 1 && $thirdparty->country_code == 'DZ') {
4166 $url = 'http://nif.mfdgi.gov.dz/nif.asp?Nif='.$strippedIdProf1;
4167 }
4168 if ($idprof == 1 && $thirdparty->country_code == 'PT') {
4169 $url = 'http://www.nif.pt/'.$strippedIdProf1;
4170 }
4171
4172 if ($url) {
4173 return '<a target="_blank" rel="noopener noreferrer" href="'.$url.'">'.$langs->trans("Check").'</a>';
4174 }
4175 } else {
4176 return $hookmanager->resPrint;
4177 }
4178
4179 return '';
4180 }
4181
4182 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4188 public function has_projects()
4189 {
4190 // phpcs:enable
4191 $sql = "SELECT COUNT(*) as numproj FROM ".MAIN_DB_PREFIX."projet WHERE fk_soc = ".((int) $this->id);
4192 $resql = $this->db->query($sql);
4193 if ($resql) {
4194 $obj = $this->db->fetch_object($resql);
4195 $count = $obj->numproj;
4196 } else {
4197 $count = 0;
4198 print $this->db->error();
4199 }
4200 $this->db->free($resql);
4201 return ($count > 0);
4202 }
4203
4204
4211 public function info($id)
4212 {
4213 $sql = "SELECT s.rowid, s.nom as name, s.datec, tms as datem,";
4214 $sql .= " fk_user_creat, fk_user_modif";
4215 $sql .= " FROM ".MAIN_DB_PREFIX."societe as s";
4216 $sql .= " WHERE s.rowid = ".((int) $id);
4217
4218 $result = $this->db->query($sql);
4219 if ($result) {
4220 if ($this->db->num_rows($result)) {
4221 $obj = $this->db->fetch_object($result);
4222
4223 $this->id = $obj->rowid;
4224
4225 $this->user_creation_id = $obj->fk_user_creat;
4226 $this->user_modification_id = $obj->fk_user_modif;
4227 $this->date_creation = $this->db->jdate($obj->datec);
4228 $this->date_modification = empty($obj->datem) ? '' : $this->db->jdate($obj->datem);
4229
4230 $this->ref = $obj->name;
4231 }
4232
4233 $this->db->free($result);
4234 } else {
4235 dol_print_error($this->db);
4236 }
4237 }
4238
4244 public function isACompany()
4245 {
4246 // Define if third party is treated as company (or not) when nature is unknown
4247 $isACompany = getDolGlobalInt('MAIN_UNKNOWN_CUSTOMERS_ARE_COMPANIES', 1); // default if not set is 1 because it was like this in all past versions
4248
4249 // Now try to guess using different tips
4250 if (!empty($this->tva_intra)) {
4251 $isACompany = 1;
4252 } elseif (!empty($this->idprof1) || !empty($this->idprof2) || !empty($this->idprof3) || !empty($this->idprof4) || !empty($this->idprof5) || !empty($this->idprof6)) {
4253 $isACompany = 1;
4254 } else {
4255 if (!getDolGlobalString('MAIN_CUSTOMERS_ARE_COMPANIES_EVEN_IF_SET_AS_INDIVIDUAL')) { // never or rarely set
4256 if (preg_match('/^TE_PRIVATE/', $this->typent_code)) { // TODO Add a field is_a_company into dictionary
4257 $isACompany = 0;
4258 }
4259 } else {
4260 $isACompany = 1;
4261 }
4262 }
4263
4264 return (bool) $isACompany;
4265 }
4266
4272 public function isInEEC()
4273 {
4274 require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
4275 return isInEEC($this);
4276 }
4277
4278 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4284 public function LoadSupplierCateg()
4285 {
4286 // phpcs:enable
4287 $this->SupplierCategories = array();
4288 $sql = "SELECT rowid, label";
4289 $sql .= " FROM ".MAIN_DB_PREFIX."categorie";
4290 $sql .= " WHERE type = ".Categorie::TYPE_SUPPLIER;
4291
4292 $resql = $this->db->query($sql);
4293 if ($resql) {
4294 while ($obj = $this->db->fetch_object($resql)) {
4295 $this->SupplierCategories[$obj->rowid] = $obj->label;
4296 }
4297 return 0;
4298 } else {
4299 return -1;
4300 }
4301 }
4302
4303 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4310 public function AddFournisseurInCategory($categorie_id)
4311 {
4312 // phpcs:enable
4313 if ($categorie_id > 0 && $this->id > 0) {
4314 $sql = "INSERT INTO ".MAIN_DB_PREFIX."categorie_fournisseur (fk_categorie, fk_soc) ";
4315 $sql .= " VALUES (".((int) $categorie_id).", ".((int) $this->id).")";
4316
4317 if ($resql = $this->db->query($sql)) {
4318 return 0;
4319 }
4320 } else {
4321 return 0;
4322 }
4323 return -1;
4324 }
4325
4331 public function getNbOfEMailings()
4332 {
4333 $sql = "SELECT count(mc.email) as nb";
4334 $sql .= " FROM ".MAIN_DB_PREFIX."mailing_cibles as mc, ".MAIN_DB_PREFIX."mailing as m";
4335 $sql .= " WHERE mc.fk_mailing=m.rowid AND mc.email = '".$this->db->escape($this->email)."' ";
4336 $sql .= " AND m.entity IN (".getEntity($this->element).") AND mc.statut NOT IN (-1,0)"; // -1 error, 0 not sent, 1 sent with success
4337
4338 $resql = $this->db->query($sql);
4339 if ($resql) {
4340 $obj = $this->db->fetch_object($resql);
4341 $nb = $obj->nb;
4342
4343 $this->db->free($resql);
4344 return $nb;
4345 } else {
4346 $this->error = $this->db->error();
4347 return -1;
4348 }
4349 }
4350
4357 public function setNoEmail($no_email)
4358 {
4359 $error = 0;
4360
4361 // Update mass emailing flag into table mailing_unsubscribe
4362 if ($this->email) {
4363 $this->db->begin();
4364
4365 if ($no_email) {
4366 $sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."mailing_unsubscribe WHERE entity IN (".getEntity('mailing', 0).") AND email = '".$this->db->escape($this->email)."'";
4367 $resql = $this->db->query($sql);
4368 if ($resql) {
4369 $obj = $this->db->fetch_object($resql);
4370 $noemail = $obj->nb;
4371 if (empty($noemail)) {
4372 $sql = "INSERT INTO ".MAIN_DB_PREFIX."mailing_unsubscribe(email, entity, date_creat) VALUES ('".$this->db->escape($this->email)."', ".getEntity('mailing', 0).", '".$this->db->idate(dol_now())."')";
4373 $resql = $this->db->query($sql);
4374 if (!$resql) {
4375 $error++;
4376 $this->error = $this->db->lasterror();
4377 $this->errors[] = $this->error;
4378 }
4379 }
4380 } else {
4381 $error++;
4382 $this->error = $this->db->lasterror();
4383 $this->errors[] = $this->error;
4384 }
4385 } else {
4386 $sql = "DELETE FROM ".MAIN_DB_PREFIX."mailing_unsubscribe WHERE email = '".$this->db->escape($this->email)."' AND entity IN (".getEntity('mailing', 0).")";
4387 $resql = $this->db->query($sql);
4388 if (!$resql) {
4389 $error++;
4390 $this->error = $this->db->lasterror();
4391 $this->errors[] = $this->error;
4392 }
4393 }
4394
4395 if (empty($error)) {
4396 $this->no_email = $no_email;
4397 $this->db->commit();
4398 return 1;
4399 } else {
4400 $this->db->rollback();
4401 return $error * -1;
4402 }
4403 }
4404
4405 return 0;
4406 }
4407
4414 public function getNoEmail()
4415 {
4416 if ($this->email) {
4417 $sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."mailing_unsubscribe WHERE entity IN (".getEntity('mailing').") AND email = '".$this->db->escape($this->email)."'";
4418 $resql = $this->db->query($sql);
4419 if ($resql) {
4420 $obj = $this->db->fetch_object($resql);
4421 $this->no_email = $obj->nb;
4422 return 1;
4423 } else {
4424 $this->error = $this->db->lasterror();
4425 $this->errors[] = $this->error;
4426 return -1;
4427 }
4428 }
4429 return 0;
4430 }
4431
4432 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4442 public function create_from_member(Adherent $member, $socname = '', $socalias = '', $customercode = '')
4443 {
4444 // phpcs:enable
4445 global $conf, $user, $langs;
4446
4447 dol_syslog(get_class($this)."::create_from_member", LOG_DEBUG);
4448 $fullname = $member->getFullName($langs);
4449
4450 if ($member->morphy == 'mor') {
4451 if (empty($socname)) {
4452 $socname = $member->company ? $member->company : $member->societe;
4453 }
4454 if (!empty($fullname) && empty($socalias)) {
4455 $socalias = $fullname;
4456 }
4457 } elseif (empty($socname) && $member->morphy == 'phy') {
4458 if (empty($socname)) {
4459 $socname = $fullname;
4460 }
4461 if (!empty($member->company) && empty($socalias)) {
4462 $socalias = $member->company;
4463 }
4464 }
4465
4466 $name = $socname;
4467 $alias = $socalias ? $socalias : '';
4468
4469 // Positionne parameters
4470 $this->nom = $name; // TODO deprecated
4471 $this->name = $name;
4472 $this->name_alias = $alias;
4473 $this->address = $member->address;
4474 $this->zip = $member->zip;
4475 $this->town = $member->town;
4476 $this->country_code = $member->country_code;
4477 $this->country_id = $member->country_id;
4478 $this->phone = $member->phone; // Prof phone
4479 $this->email = $member->email;
4480 $this->socialnetworks = $member->socialnetworks;
4481 $this->entity = $member->entity;
4482
4483 $this->client = 1; // A member is a customer by default
4484 $this->code_client = ($customercode ? $customercode : -1);
4485 $this->code_fournisseur = '-1';
4486 $this->typent_code = ($member->morphy == 'phy' ? 'TE_PRIVATE' : 0);
4487 $this->typent_id = $this->typent_code ? dol_getIdFromCode($this->db, $this->typent_code, 'c_typent', 'id', 'code') : 0;
4488
4489 $this->db->begin();
4490
4491 // Cree et positionne $this->id
4492 $result = $this->create($user);
4493
4494 if ($result >= 0) {
4495 // Auto-create contact on thirdparty creation
4496 if (getDolGlobalString('THIRDPARTY_DEFAULT_CREATE_CONTACT')) {
4497 // Fill fields needed by contact
4498 $this->name_bis = $member->lastname;
4499 $this->firstname = $member->firstname;
4500 $this->civility_id = $member->civility_id;
4501
4502 dol_syslog("We ask to create a contact/address too", LOG_DEBUG);
4503 $result = $this->create_individual($user);
4504
4505 if ($result < 0) {
4506 setEventMessages($this->error, $this->errors, 'errors');
4507 $this->db->rollback();
4508 return -1;
4509 }
4510 }
4511
4512 $sql = "UPDATE ".MAIN_DB_PREFIX."adherent";
4513 $sql .= " SET fk_soc = ".((int) $this->id);
4514 $sql .= " WHERE rowid = ".((int) $member->id);
4515
4516 $resql = $this->db->query($sql);
4517 if ($resql) {
4518 $this->db->commit();
4519 return $this->id;
4520 } else {
4521 $this->error = $this->db->error();
4522
4523 $this->db->rollback();
4524 return -1;
4525 }
4526 } else {
4527 // $this->error deja positionne
4528 dol_syslog(get_class($this)."::create_from_member - 2 - ".$this->error." - ".implode(',', $this->errors), LOG_ERR);
4529
4530 $this->db->rollback();
4531 return $result;
4532 }
4533 }
4534
4541 public function setMysoc(Conf $conf)
4542 {
4543 global $langs;
4544
4545 $this->id = 0;
4546 $this->entity = $conf->entity;
4547 $this->name = getDolGlobalString('MAIN_INFO_SOCIETE_NOM');
4548 $this->nom = $this->name; // deprecated
4549 $this->address = getDolGlobalString('MAIN_INFO_SOCIETE_ADDRESS');
4550 $this->zip = getDolGlobalString('MAIN_INFO_SOCIETE_ZIP');
4551 $this->town = getDolGlobalString('MAIN_INFO_SOCIETE_TOWN');
4552 $this->region_code = getDolGlobalString('MAIN_INFO_SOCIETE_REGION');
4553
4554 $this->socialobject = getDolGlobalString('MAIN_INFO_SOCIETE_OBJECT');
4555
4556 $this->note_private = getDolGlobalString('MAIN_INFO_SOCIETE_NOTE');
4557
4558 // We define country_id, country_code and country
4559 $country_id = 0;
4560 $country_code = $country_label = '';
4561 if (getDolGlobalString('MAIN_INFO_SOCIETE_COUNTRY')) {
4562 $tmp = explode(':', getDolGlobalString('MAIN_INFO_SOCIETE_COUNTRY'));
4563 $country_id = (is_numeric($tmp[0])) ? (int) $tmp[0] : 0;
4564 if (!empty($tmp[1])) { // If $conf->global->MAIN_INFO_SOCIETE_COUNTRY is "id:code:label"
4565 $country_code = $tmp[1];
4566 $country_label = $tmp[2];
4567 } else {
4568 // For backward compatibility
4569 dol_syslog("Your country setup use an old syntax. Reedit it using setup area.", LOG_WARNING);
4570 include_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
4571 $country_code = getCountry($country_id, '2', $this->db); // This need a SQL request, but it's the old feature that should not be used anymore
4572 $country_label = getCountry($country_id, '', $this->db); // This need a SQL request, but it's the old feature that should not be used anymore
4573 }
4574 }
4575 $this->country_id = $country_id;
4576 $this->country_code = $country_code;
4577 $this->country = $country_label;
4578 if (is_object($langs)) {
4579 $this->country = ($langs->trans('Country'.$country_code) != 'Country'.$country_code) ? $langs->trans('Country'.$country_code) : $country_label;
4580 }
4581
4582 //TODO This could be replicated for region but function `getRegion` didn't exist, so I didn't added it.
4583 // We define state_id, state_code and state
4584 $state_id = 0;
4585 $state_code = '';
4586 $state_label = '';
4587 if (getDolGlobalString('MAIN_INFO_SOCIETE_STATE')) {
4588 $tmp = explode(':', getDolGlobalString('MAIN_INFO_SOCIETE_STATE'));
4589 $state_id = (int) $tmp[0];
4590 if (!empty($tmp[1])) { // If $conf->global->MAIN_INFO_SOCIETE_STATE is "id:code:label"
4591 $state_code = $tmp[1];
4592 $state_label = $tmp[2];
4593 } else { // For backward compatibility
4594 dol_syslog("Your setup of State has an old syntax (entity=".$conf->entity."). Go in Home - Setup - Organization then Save should remove this error.", LOG_ERR);
4595 include_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
4596 $state_code = getState($state_id, '2', $this->db); // This need a SQL request, but it's the old feature that should not be used anymore
4597 $state_label = getState($state_id, '0', $this->db); // This need a SQL request, but it's the old feature that should not be used anymore
4598 }
4599 }
4600 $this->state_id = $state_id;
4601 $this->state_code = $state_code;
4602 $this->state = $state_label;
4603 if (is_object($langs)) {
4604 $this->state = ($langs->trans('State'.$state_code) != 'State'.$state_code) ? $langs->trans('State'.$state_code) : $state_label;
4605 }
4606
4607 $this->phone = getDolGlobalString('MAIN_INFO_SOCIETE_TEL');
4608 $this->phone_mobile = getDolGlobalString('MAIN_INFO_SOCIETE_MOBILE');
4609 $this->fax = getDolGlobalString('MAIN_INFO_SOCIETE_FAX');
4610 $this->url = getDolGlobalString('MAIN_INFO_SOCIETE_WEB');
4611
4612 // Social networks
4613 $facebook_url = getDolGlobalString('MAIN_INFO_SOCIETE_FACEBOOK_URL');
4614 $twitter_url = getDolGlobalString('MAIN_INFO_SOCIETE_TWITTER_URL');
4615 $linkedin_url = getDolGlobalString('MAIN_INFO_SOCIETE_LINKEDIN_URL');
4616 $instagram_url = getDolGlobalString('MAIN_INFO_SOCIETE_INSTAGRAM_URL');
4617 $youtube_url = getDolGlobalString('MAIN_INFO_SOCIETE_YOUTUBE_URL');
4618 $github_url = getDolGlobalString('MAIN_INFO_SOCIETE_GITHUB_URL');
4619 $this->socialnetworks = array();
4620 if (!empty($facebook_url)) {
4621 $this->socialnetworks['facebook'] = $facebook_url;
4622 }
4623 if (!empty($twitter_url)) {
4624 $this->socialnetworks['twitter'] = $twitter_url;
4625 }
4626 if (!empty($linkedin_url)) {
4627 $this->socialnetworks['linkedin'] = $linkedin_url;
4628 }
4629 if (!empty($instagram_url)) {
4630 $this->socialnetworks['instagram'] = $instagram_url;
4631 }
4632 if (!empty($youtube_url)) {
4633 $this->socialnetworks['youtube'] = $youtube_url;
4634 }
4635 if (!empty($github_url)) {
4636 $this->socialnetworks['github'] = $github_url;
4637 }
4638
4639 // Id prof generiques
4640 $this->idprof1 = getDolGlobalString('MAIN_INFO_SIREN');
4641 $this->idprof2 = getDolGlobalString('MAIN_INFO_SIRET');
4642 $this->idprof3 = getDolGlobalString('MAIN_INFO_APE');
4643 $this->idprof4 = getDolGlobalString('MAIN_INFO_RCS');
4644 $this->idprof5 = getDolGlobalString('MAIN_INFO_PROFID5');
4645 $this->idprof6 = getDolGlobalString('MAIN_INFO_PROFID6');
4646 $this->idprof7 = getDolGlobalString('MAIN_INFO_PROFID7');
4647 $this->idprof8 = getDolGlobalString('MAIN_INFO_PROFID8');
4648 $this->idprof9 = getDolGlobalString('MAIN_INFO_PROFID9');
4649 $this->idprof10 = getDolGlobalString('MAIN_INFO_PROFID10');
4650 $this->tva_intra = getDolGlobalString('MAIN_INFO_TVAINTRA'); // VAT number, not necessarily INTRA.
4651 $this->managers = getDolGlobalString('MAIN_INFO_SOCIETE_MANAGERS');
4652 $this->capital = is_numeric(getDolGlobalString('MAIN_INFO_CAPITAL')) ? (float) price2num(getDolGlobalString('MAIN_INFO_CAPITAL')) : 0;
4653 $this->forme_juridique_code = getDolGlobalInt('MAIN_INFO_SOCIETE_FORME_JURIDIQUE');
4654 $this->email = getDolGlobalString('MAIN_INFO_SOCIETE_MAIL');
4655 $this->default_lang = getDolGlobalString('MAIN_LANG_DEFAULT', 'auto');
4656 $this->logo = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO');
4657 $this->logo_small = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_SMALL');
4658 $this->logo_mini = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_MINI');
4659 $this->logo_squarred = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_SQUARRED');
4660 $this->logo_squarred_small = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_SQUARRED_SMALL');
4661 $this->logo_squarred_mini = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_SQUARRED_MINI');
4662
4663 // Define if company use vat or not
4664 $this->tva_assuj = getDolGlobalInt('FACTURE_TVAOPTION');
4665
4666 // Define if company use local taxes
4667 $this->localtax1_assuj = ((isset($conf->global->FACTURE_LOCAL_TAX1_OPTION) && (getDolGlobalString('FACTURE_LOCAL_TAX1_OPTION') == '1' || getDolGlobalString('FACTURE_LOCAL_TAX1_OPTION') == 'localtax1on')) ? 1 : 0);
4668 $this->localtax2_assuj = ((isset($conf->global->FACTURE_LOCAL_TAX2_OPTION) && (getDolGlobalString('FACTURE_LOCAL_TAX2_OPTION') == '1' || getDolGlobalString('FACTURE_LOCAL_TAX2_OPTION') == 'localtax2on')) ? 1 : 0);
4669
4670 $this->termsofsale = getDolGlobalString('MAIN_INFO_SOCIETE_TERMSOFSALE');
4671 }
4672
4680 public function initAsSpecimen()
4681 {
4682 $now = dol_now();
4683
4684 // Initialize parameters
4685 $this->id = 0;
4686 $this->entity = 1;
4687 $this->name = 'THIRDPARTY SPECIMEN '.dol_print_date($now, 'dayhourlog');
4688 $this->nom = $this->name; // For backward compatibility
4689 $this->ref_ext = 'Ref ext';
4690 $this->specimen = 1;
4691 $this->address = '21 jump street';
4692 $this->zip = '99999';
4693 $this->town = 'MyTown';
4694 $this->state_id = 1;
4695 $this->state_code = 'AA';
4696 $this->state = 'MyState';
4697 $this->country_id = 1;
4698 $this->country_code = 'FR';
4699 $this->email = 'specimen@specimen.com';
4700 $this->socialnetworks = array(
4701 'skype' => 'skypepseudo',
4702 'twitter' => 'twitterpseudo',
4703 'facebook' => 'facebookpseudo',
4704 'linkedin' => 'linkedinpseudo',
4705 );
4706 $this->url = 'http://www.specimen.com';
4707
4708 $this->phone = '0909090901';
4709 $this->phone_mobile = '0909090901';
4710 $this->fax = '0909090909';
4711
4712 $this->code_client = 'CC-'.dol_print_date($now, 'dayhourlog');
4713 $this->code_fournisseur = 'SC-'.dol_print_date($now, 'dayhourlog');
4714 $this->typent_code = 'TE_OTHER';
4715 $this->capital = 10000;
4716 $this->client = 1;
4717 $this->prospect = 1;
4718 $this->fournisseur = 1;
4719 $this->tva_assuj = 1;
4720 $this->tva_intra = 'EU1234567';
4721 $this->note_public = 'This is a comment (public)';
4722 $this->note_private = 'This is a comment (private)';
4723
4724 $this->idprof1 = 'idprof1';
4725 $this->idprof2 = 'idprof2';
4726 $this->idprof3 = 'idprof3';
4727 $this->idprof4 = 'idprof4';
4728 $this->idprof5 = 'idprof5';
4729 $this->idprof6 = 'idprof6';
4730
4731 return 1;
4732 }
4733
4740 public function useLocalTax($localTaxNum = 0)
4741 {
4742 $sql = "SELECT t.localtax1, t.localtax2";
4743 $sql .= " FROM ".MAIN_DB_PREFIX."c_tva as t, ".MAIN_DB_PREFIX."c_country as c";
4744 $sql .= " WHERE t.fk_pays = c.rowid AND c.code = '".$this->db->escape($this->country_code)."'";
4745 $sql .= " AND t.active = 1";
4746 $sql .= " AND t.entity IN (".getEntity('c_tva').")";
4747 if (empty($localTaxNum)) {
4748 $sql .= " AND (t.localtax1_type <> '0' OR t.localtax2_type <> '0')";
4749 } elseif ($localTaxNum == 1) {
4750 $sql .= " AND t.localtax1_type <> '0'";
4751 } elseif ($localTaxNum == 2) {
4752 $sql .= " AND t.localtax2_type <> '0'";
4753 }
4754
4755 $resql = $this->db->query($sql);
4756 if ($resql) {
4757 return ($this->db->num_rows($resql) > 0);
4758 } else {
4759 return false;
4760 }
4761 }
4762
4768 public function useNPR()
4769 {
4770 $sql = "SELECT t.rowid";
4771 $sql .= " FROM ".MAIN_DB_PREFIX."c_tva as t, ".MAIN_DB_PREFIX."c_country as c";
4772 $sql .= " WHERE t.fk_pays = c.rowid AND c.code = '".$this->db->escape($this->country_code)."'";
4773 $sql .= " AND t.active = 1 AND t.recuperableonly = 1";
4774 $sql .= " AND t.entity IN (".getEntity('c_tva').")";
4775
4776 dol_syslog("useNPR", LOG_DEBUG);
4777 $resql = $this->db->query($sql);
4778 if ($resql) {
4779 return ($this->db->num_rows($resql) > 0);
4780 } else {
4781 return false;
4782 }
4783 }
4784
4791 public function useRevenueStamp()
4792 {
4793 $sql = "SELECT COUNT(*) as nb";
4794 $sql .= " FROM ".MAIN_DB_PREFIX."c_revenuestamp as r, ".MAIN_DB_PREFIX."c_country as c";
4795 $sql .= " WHERE r.fk_pays = c.rowid AND c.code = '".$this->db->escape($this->country_code)."'";
4796 $sql .= " AND r.active = 1";
4797
4798 dol_syslog("useRevenueStamp", LOG_DEBUG);
4799 $resql = $this->db->query($sql);
4800 if ($resql) {
4801 $obj = $this->db->fetch_object($resql);
4802 return ($obj->nb > 0);
4803 } else {
4804 $this->error = $this->db->lasterror();
4805 return false;
4806 }
4807 }
4808
4814 public function getLibProspLevel()
4815 {
4816 return $this->LibProspLevel($this->fk_prospectlevel);
4817 }
4818
4819 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4826 public function LibProspLevel($fk_prospectlevel)
4827 {
4828 // phpcs:enable
4829 global $langs;
4830
4831 $label = '';
4832 if ($fk_prospectlevel != '') {
4833 $label = $langs->trans("ProspectLevel".$fk_prospectlevel);
4834 // If label is not found in language file, we get label from cache/database
4835 if ($label == "ProspectLevel".$fk_prospectlevel) {
4836 $label = $langs->getLabelFromKey($this->db, $fk_prospectlevel, 'c_prospectlevel', 'code', 'label');
4837 }
4838 }
4839
4840 return $label;
4841 }
4842
4850 public function getLibProspCommStatut($mode = 0, $label = '')
4851 {
4852 return $this->LibProspCommStatut($this->stcomm_id, $mode, $label, $this->stcomm_picto);
4853 }
4854
4855 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
4869 public function LibProspCommStatut($status, $mode = 0, $label = '', $picto = '')
4870 {
4871 // phpcs:enable
4872 global $langs;
4873
4874 $langs->load('customers');
4875
4876 if ($mode == 2) {
4877 if ($status == '-1' || $status == 'ST_NO') {
4878 return img_action($langs->trans("StatusProspect-1"), '-1', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect-1");
4879 } elseif ($status == '0' || $status == 'ST_NEVER') {
4880 return img_action($langs->trans("StatusProspect0"), '0', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect0");
4881 } elseif ($status == '1' || $status == 'ST_TODO') {
4882 return img_action($langs->trans("StatusProspect1"), '1', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect1");
4883 } elseif ($status == '2' || $status == 'ST_PEND') {
4884 return img_action($langs->trans("StatusProspect2"), '2', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect2");
4885 } elseif ($status == '3' || $status == 'ST_DONE') {
4886 return img_action($langs->trans("StatusProspect3"), '3', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect3");
4887 } else {
4888 return img_action(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label, '0', $picto, 'class="inline-block valignmiddle"').' '.(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label);
4889 }
4890 } elseif ($mode == 3) {
4891 if ($status == '-1' || $status == 'ST_NO') {
4892 return img_action($langs->trans("StatusProspect-1"), '-1', $picto, 'class="inline-block valignmiddle"');
4893 } elseif ($status == '0' || $status == 'ST_NEVER') {
4894 return img_action($langs->trans("StatusProspect0"), '0', $picto, 'class="inline-block valignmiddle"');
4895 } elseif ($status == '1' || $status == 'ST_TODO') {
4896 return img_action($langs->trans("StatusProspect1"), '1', $picto, 'class="inline-block valignmiddle"');
4897 } elseif ($status == '2' || $status == 'ST_PEND') {
4898 return img_action($langs->trans("StatusProspect2"), '2', $picto, 'class="inline-block valignmiddle"');
4899 } elseif ($status == '3' || $status == 'ST_DONE') {
4900 return img_action($langs->trans("StatusProspect3"), '3', $picto, 'class="inline-block valignmiddle"');
4901 } else {
4902 return img_action(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label, '0', $picto, 'class="inline-block valignmiddle"');
4903 }
4904 } elseif ($mode == 4) {
4905 if ($status == '-1' || $status == 'ST_NO') {
4906 return img_action($langs->trans("StatusProspect-1"), '-1', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect-1");
4907 } elseif ($status == '0' || $status == 'ST_NEVER') {
4908 return img_action($langs->trans("StatusProspect0"), '0', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect0");
4909 } elseif ($status == '1' || $status == 'ST_TODO') {
4910 return img_action($langs->trans("StatusProspect1"), '1', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect1");
4911 } elseif ($status == '2' || $status == 'ST_PEND') {
4912 return img_action($langs->trans("StatusProspect2"), '2', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect2");
4913 } elseif ($status == '3' || $status == 'ST_DONE') {
4914 return img_action($langs->trans("StatusProspect3"), '3', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect3");
4915 } else {
4916 return img_action(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label, '0', $picto, 'class="inline-block valignmiddle"').' '.(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label);
4917 }
4918 }
4919
4920 return "Error, mode/status not found";
4921 }
4922
4929 public function getOutstandingProposals($mode = 'customer')
4930 {
4931 $table = 'propal';
4932 if ($mode == 'supplier') {
4933 $table = 'supplier_proposal';
4934 }
4935
4936 $sql = "SELECT rowid, ref, total_ht, total_ttc, fk_statut as status FROM ".MAIN_DB_PREFIX.$table." as f";
4937 $sql .= " WHERE fk_soc = ".((int) $this->id);
4938 if ($mode == 'supplier') {
4939 $sql .= " AND entity IN (".getEntity('supplier_proposal').")";
4940 } else {
4941 $sql .= " AND entity IN (".getEntity('propal').")";
4942 }
4943
4944 dol_syslog("getOutstandingProposals for fk_soc = ".((int) $this->id), LOG_DEBUG);
4945
4946 $resql = $this->db->query($sql);
4947 if ($resql) {
4948 $outstandingOpened = 0;
4949 $outstandingTotal = 0;
4950 $outstandingTotalIncTax = 0;
4951 $arrayofref = array();
4952 while ($obj = $this->db->fetch_object($resql)) {
4953 $arrayofref[$obj->rowid] = $obj->ref;
4954 $outstandingTotal += $obj->total_ht;
4955 $outstandingTotalIncTax += $obj->total_ttc;
4956 if ($obj->status != 0) {
4957 // Not a draft
4958 $outstandingOpened += $obj->total_ttc;
4959 }
4960 }
4961 return array('opened' => $outstandingOpened, 'total_ht' => $outstandingTotal, 'total_ttc' => $outstandingTotalIncTax, 'refs' => $arrayofref); // 'opened' is 'incl taxes'
4962 } else {
4963 return array();
4964 }
4965 }
4966
4973 public function getOutstandingOrders($mode = 'customer')
4974 {
4975 $table = 'commande';
4976 if ($mode == 'supplier') {
4977 $table = 'commande_fournisseur';
4978 }
4979
4980 $sql = "SELECT rowid, ref, total_ht, total_ttc, fk_statut as status FROM ".MAIN_DB_PREFIX.$table." as f";
4981 $sql .= " WHERE fk_soc = ".((int) $this->id);
4982 if ($mode == 'supplier') {
4983 $sql .= " AND entity IN (".getEntity('supplier_order').")";
4984 } else {
4985 $sql .= " AND entity IN (".getEntity('commande').")";
4986 }
4987
4988 dol_syslog("getOutstandingOrders", LOG_DEBUG);
4989 $resql = $this->db->query($sql);
4990 if ($resql) {
4991 $outstandingOpened = 0;
4992 $outstandingTotal = 0;
4993 $outstandingTotalIncTax = 0;
4994 $arrayofref = array();
4995 while ($obj = $this->db->fetch_object($resql)) {
4996 $arrayofref[$obj->rowid] = $obj->ref;
4997 $outstandingTotal += $obj->total_ht;
4998 $outstandingTotalIncTax += $obj->total_ttc;
4999 if ($obj->status != 0) {
5000 // Not a draft
5001 $outstandingOpened += $obj->total_ttc;
5002 }
5003 }
5004 return array('opened' => $outstandingOpened, 'total_ht' => $outstandingTotal, 'total_ttc' => $outstandingTotalIncTax, 'refs' => $arrayofref); // 'opened' is 'incl taxes'
5005 } else {
5006 return array();
5007 }
5008 }
5009
5017 public function getOutstandingBills($mode = 'customer', $late = 0)
5018 {
5019 include_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
5020
5021 $table = 'facture';
5022 if ($mode == 'supplier') {
5023 $table = 'facture_fourn';
5024 }
5025
5026 /* Accurate value of remain to pay is to sum remaintopay for each invoice
5027 $paiement = $invoice->getSommePaiement();
5028 $creditnotes=$invoice->getSumCreditNotesUsed();
5029 $deposits=$invoice->getSumDepositsUsed();
5030 $alreadypayed=price2num($paiement + $creditnotes + $deposits,'MT');
5031 $remaintopay=price2num($invoice->total_ttc - $paiement - $creditnotes - $deposits,'MT');
5032 */
5033 $today = dol_get_first_hour(dol_now('tzuser')); // Returns today at 00:00 in the user's time zone
5034
5035 $sql = "SELECT rowid, ref, total_ht, total_ttc, paye, type, fk_statut as status, close_code FROM ".MAIN_DB_PREFIX.$table." as f";
5036 $sql .= " WHERE fk_soc = ".((int) $this->id);
5037 if (!empty($late)) {
5038 $sql .= " AND date_lim_reglement < '".$this->db->idate($today)."'";
5039 }
5040 if ($mode == 'supplier') {
5041 $sql .= " AND entity IN (".getEntity('facture_fourn').")";
5042 } else {
5043 $sql .= " AND entity IN (".getEntity('invoice').")";
5044 }
5045
5046 dol_syslog("getOutstandingBills", LOG_DEBUG);
5047 $resql = $this->db->query($sql);
5048 if ($resql) {
5049 $outstandingOpened = 0;
5050 $outstandingTotal = 0;
5051 $outstandingTotalIncTax = 0;
5052 $arrayofref = array();
5053 $arrayofrefopened = array();
5054 if ($mode == 'supplier') {
5055 require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php';
5056 $tmpobject = new FactureFournisseur($this->db);
5057 } else {
5058 require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
5059 $tmpobject = new Facture($this->db);
5060 }
5061 while ($obj = $this->db->fetch_object($resql)) {
5062 $arrayofref[$obj->rowid] = $obj->ref;
5063 $tmpobject->id = $obj->rowid;
5064
5065 if ($obj->status != $tmpobject::STATUS_DRAFT // Not a draft
5066 && !($obj->status == $tmpobject::STATUS_ABANDONED && $obj->close_code == 'replaced') // Not a replaced invoice
5067 ) {
5068 $outstandingTotal += $obj->total_ht;
5069 $outstandingTotalIncTax += $obj->total_ttc;
5070 }
5071
5072 $remaintopay = 0;
5073
5074 if ($obj->paye == 0
5075 && $obj->status != $tmpobject::STATUS_DRAFT // Not a draft
5076 && $obj->status != $tmpobject::STATUS_ABANDONED // Not abandoned
5077 && $obj->status != $tmpobject::STATUS_CLOSED) { // Not classified as paid
5078 //$sql .= " AND (status <> 3 OR close_code <> 'abandon')"; // Not abandoned for undefined reason
5079 $paiement = $tmpobject->getSommePaiement();
5080 $creditnotes = $tmpobject->getSumCreditNotesUsed();
5081 $deposits = $tmpobject->getSumDepositsUsed();
5082
5083 $remaintopay = ($obj->total_ttc - $paiement - $creditnotes - $deposits);
5084 $outstandingOpened += $remaintopay;
5085 }
5086
5087 //if credit note is converted but not used
5088 // TODO Do this also for customer ?
5089 if ($mode == 'supplier' && $obj->type == FactureFournisseur::TYPE_CREDIT_NOTE && $tmpobject->isCreditNoteUsed()) {
5090 $remainingcreditnote = $tmpobject->getSumFromThisCreditNotesNotUsed();
5091 $remaintopay -= $remainingcreditnote;
5092 $outstandingOpened -= $remainingcreditnote;
5093 }
5094
5095 if ($remaintopay) {
5096 $arrayofrefopened[$obj->rowid] = $obj->ref;
5097 }
5098 }
5099 return array('opened' => $outstandingOpened, 'total_ht' => $outstandingTotal, 'total_ttc' => $outstandingTotalIncTax, 'refs' => $arrayofref, 'refsopened' => $arrayofrefopened); // 'opened' is 'incl taxes'
5100 } else {
5101 dol_syslog("Sql error ".$this->db->lasterror, LOG_ERR);
5102 return array();
5103 }
5104 }
5105
5112 public function getLibCustProspStatut()
5113 {
5114 return $this->LibCustProspStatut($this->client);
5115 }
5116
5117 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
5124 public function LibCustProspStatut($status)
5125 {
5126 // phpcs:enable
5127 global $langs;
5128 $langs->load('companies');
5129
5130 if ($status == 0) {
5131 return $langs->trans("NorProspectNorCustomer");
5132 } elseif ($status == 1) {
5133 return $langs->trans("Customer");
5134 } elseif ($status == 2) {
5135 return $langs->trans("Prospect");
5136 } elseif ($status == 3) {
5137 return $langs->trans("ProspectCustomer");
5138 }
5139
5140 return '';
5141 }
5142
5143
5155 public function generateDocument($modele, $outputlangs, $hidedetails = 0, $hidedesc = 0, $hideref = 0, $moreparams = null)
5156 {
5157 global $langs;
5158
5159 if (!empty($moreparams) && !empty($moreparams['use_companybankid'])) {
5160 $modelpath = "core/modules/bank/doc/";
5161
5162 include_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
5163 $companybankaccount = new CompanyBankAccount($this->db);
5164 $result = $companybankaccount->fetch($moreparams['use_companybankid']);
5165 if (!$result) {
5166 dol_print_error($this->db, $companybankaccount->error, $companybankaccount->errors);
5167 }
5168 $result = $companybankaccount->commonGenerateDocument($modelpath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams);
5169 $this->last_main_doc = $companybankaccount->last_main_doc;
5170 } else {
5171 // Positionne le modele sur le nom du modele a utiliser
5172 if (!dol_strlen($modele)) {
5173 if (getDolGlobalString('COMPANY_ADDON_PDF')) {
5174 $modele = getDolGlobalString('COMPANY_ADDON_PDF');
5175 } else {
5176 print $langs->trans("Error")." ".$langs->trans("Error_COMPANY_ADDON_PDF_NotDefined");
5177 return 0;
5178 }
5179 }
5180
5181 if (!isset($this->bank_account)) {
5182 require_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
5183 $bac = new CompanyBankAccount($this->db);
5184 // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
5185 $result = $bac->fetch(0, '', $this->id);
5186 if ($result > 0) {
5187 $this->bank_account = $bac;
5188 } else {
5189 $this->bank_account = '';
5190 }
5191 }
5192
5193 $modelpath = "core/modules/societe/doc/";
5194
5195 $result = $this->commonGenerateDocument($modelpath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams);
5196 }
5197
5198 return $result;
5199 }
5200
5201
5213 public function setCategories($categories, $type_categ)
5214 {
5215 require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
5216
5217 // Decode type
5218 if (!in_array($type_categ, array(Categorie::TYPE_CUSTOMER, Categorie::TYPE_SUPPLIER))) {
5219 dol_syslog(__METHOD__.': Type '.$type_categ.'is an unknown company category type. Done nothing.', LOG_ERR);
5220 return -1;
5221 }
5222
5223 return parent::setCategoriesCommon($categories, $type_categ);
5224 }
5225
5233 public function setSalesRep($salesrep, $onlyAdd = false)
5234 {
5235 global $user;
5236
5237 // Handle single user
5238 if (!is_array($salesrep)) {
5239 $salesrep = array($salesrep);
5240 }
5241
5242 $to_del = array(); // Nothing to delete
5243 $to_add = $salesrep;
5244 if ($onlyAdd === false) {
5245 // Get current users
5246 $existing = $this->getSalesRepresentatives($user, 1);
5247
5248 // Diff
5249 if (is_array($existing)) {
5250 $to_del = array_diff($existing, $salesrep);
5251 $to_add = array_diff($salesrep, $existing);
5252 }
5253 }
5254
5255 $error = 0;
5256
5257 // Process
5258 foreach ($to_del as $del) {
5259 $this->del_commercial($user, $del);
5260 }
5261 foreach ($to_add as $add) {
5262 $result = $this->add_commercial($user, $add);
5263 if ($result < 0) {
5264 $error++;
5265 break;
5266 }
5267 }
5268
5269 return $error ? -1 : 1;
5270 }
5271
5278 public function setThirdpartyType($typent_id)
5279 {
5280 global $user;
5281
5282 dol_syslog(__METHOD__, LOG_DEBUG);
5283
5284 if ($this->id) {
5285 $result = $this->setValueFrom('fk_typent', $typent_id, '', null, '', '', $user, 'COMPANY_MODIFY');
5286
5287 if ($result > 0) {
5288 $this->typent_id = $typent_id;
5289 $this->typent_code = dol_getIdFromCode($this->db, $this->typent_id, 'c_typent', 'id', 'code');
5290 return 1;
5291 } else {
5292 return -1;
5293 }
5294 } else {
5295 return -1;
5296 }
5297 }
5298
5308 public static function replaceThirdparty(DoliDB $dbs, $origin_id, $dest_id)
5309 {
5310 if ($origin_id == $dest_id) {
5311 dol_syslog('Error: Try to merge a thirdparty into itself');
5312 return false;
5313 }
5314
5315 // Sales representationves cannot be twice in the same thirdparties so we look for them and remove the one that are common some to avoid duplicate.
5316 // Because this function is meant to be executed within a transaction, we won't take care of begin/commit.
5317 $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.'societe_commerciaux ';
5318 $sql .= ' WHERE fk_soc = '.(int) $dest_id.' AND fk_user IN ( ';
5319 $sql .= ' SELECT fk_user ';
5320 $sql .= ' FROM '.MAIN_DB_PREFIX.'societe_commerciaux ';
5321 $sql .= ' WHERE fk_soc = '.(int) $origin_id.') ';
5322
5323 $resql = $dbs->query($sql);
5324 while ($obj = $dbs->fetch_object($resql)) {
5325 $dbs->query('DELETE FROM '.MAIN_DB_PREFIX.'societe_commerciaux WHERE rowid = '.((int) $obj->rowid));
5326 }
5327
5328 // The table llx_societe_extrafields must NOT be in this list because we don't care about the old thirdparty extrafields that are managed directly into mergeCompany.
5329 // Do not include llx_societe because it will be replaced later.
5330 $tables = array(
5331 'societe_account',
5332 'societe_commerciaux',
5333 'societe_prices',
5334 'societe_remise',
5335 'societe_remise_except',
5336 'societe_rib'
5337 );
5338
5339 // TODO When we merge societe_account, we may get 2 lines for the stripe account. Must fix this.
5340
5341 return CommonObject::commonReplaceThirdparty($dbs, $origin_id, $dest_id, $tables);
5342 }
5343
5352 public function setAccountancyCode($type, $value)
5353 {
5354 global $user, $langs, $conf;
5355
5356 $this->db->begin();
5357
5358 if ($type == 'buy') {
5359 $field = 'accountancy_code_buy';
5360 } elseif ($type == 'sell') {
5361 $field = 'accountancy_code_sell';
5362 } else {
5363 return -1;
5364 }
5365
5366 $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element." SET ";
5367 $sql .= $field." = '".$this->db->escape($value)."'";
5368 $sql .= " WHERE rowid = ".((int) $this->id);
5369
5370 dol_syslog(get_class($this)."::".__FUNCTION__, LOG_DEBUG);
5371 $resql = $this->db->query($sql);
5372
5373 if ($resql) {
5374 // Call triggers
5375 include_once DOL_DOCUMENT_ROOT.'/core/class/interfaces.class.php';
5376 $interface = new Interfaces($this->db);
5377 $result = $interface->run_triggers('COMPANY_MODIFY', $this, $user, $langs, $conf);
5378 if ($result < 0) {
5379 $this->errors = $interface->errors;
5380 $this->db->rollback();
5381 return -1;
5382 }
5383 // End call triggers
5384
5385 $this->$field = $value;
5386
5387 $this->db->commit();
5388 return 1;
5389 } else {
5390 $this->error = $this->db->lasterror();
5391 $this->db->rollback();
5392 return -1;
5393 }
5394 }
5395
5402 public function fetchPartnerships($mode)
5403 {
5404 require_once DOL_DOCUMENT_ROOT.'/partnership/class/partnership.class.php';
5405
5406 $this->partnerships[] = array();
5407
5408 return 1;
5409 }
5410
5418 public function getKanbanView($option = '', $arraydata = array())
5419 {
5420 $selected = (empty($arraydata['selected']) ? 0 : $arraydata['selected']);
5421
5422 $return = '<div class="box-flex-item box-flex-grow-zero">';
5423 $return .= '<div class="info-box info-box-sm">';
5424 $return .= '<span class="info-box-icon bg-infobox-action">';
5425 $return .= img_picto('', $this->picto);
5426 $return .= '</span>';
5427 $return .= '<div class="info-box-content">';
5428 $return .= '<div class="info-box-ref inline-block tdoverflowmax125 valignmiddle">'.(method_exists($this, 'getNomUrl') ? $this->getNomUrl(1) : $this->ref);
5429 $return .= '</div>';
5430 if (!empty($this->phone)) {
5431 $return .= '<div class="inline-block valignmiddle">';
5432 // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
5433 $return .= dol_print_phone($this->phone, $this->country_code, 0, $this->id, 'tel', 'hidenum', 'phone', $this->phone, 0, 'paddingleft paddingright');
5434 $return .= '</div>';
5435 }
5436 if (!empty($this->email)) {
5437 $return .= '<div class="inline-block valignmiddle">';
5438 $return .= dol_print_email($this->email, 0, $this->id, 'thirdparty', -1, 1, 2, 'paddingleft paddingright');
5439 $return .= '</div>';
5440 }
5441 if ($selected >= 0) {
5442 $return .= '<input id="cb'.$this->id.'" class="flat checkforselect fright" type="checkbox" name="toselect[]" value="'.$this->id.'"'.($selected ? ' checked="checked"' : '').'>';
5443 }
5444 if (property_exists($this, 'code_client')) {
5445 $return .= '<br><span class="info-box-label opacitymedium">'.$this->code_client.'</span>';
5446 }
5447 if (method_exists($this, 'getLibStatut')) {
5448 $return .= '<br><div class="info-box-status">'.$this->getLibStatut(3).'</div>';
5449 }
5450 $return .= '</div>'; // end info-box-content
5451 $return .= '</div>';
5452 $return .= '</div>';
5453
5454 return $return;
5455 }
5456
5466 public function getContacts($list = 0, $code = '', $element = '')
5467 {
5468 // phpcs:enable
5469 global $langs;
5470
5471 $tab = array();
5472
5473 $sql = "SELECT sc.rowid, sc.fk_socpeople as id, sc.fk_c_type_contact"; // This field contains id of llx_socpeople or id of llx_user
5474 $sql .= ", t.fk_soc as socid, t.statut as statuscontact";
5475 $sql .= ", t.civility as civility, t.lastname as lastname, t.firstname, t.email";
5476 $sql .= ", tc.source, tc.element, tc.code, tc.libelle as type_label";
5477 $sql .= " FROM ".$this->db->prefix()."c_type_contact tc";
5478 $sql .= ", ".$this->db->prefix()."societe_contacts sc";
5479 $sql .= " LEFT JOIN ".$this->db->prefix()."socpeople t on sc.fk_socpeople = t.rowid";
5480 $sql .= " WHERE sc.fk_soc = ".((int) $this->id);
5481 $sql .= " AND sc.fk_c_type_contact = tc.rowid";
5482 if (!empty($element)) {
5483 $sql .= " AND tc.element = '".$this->db->escape($element)."'";
5484 }
5485 if ($code) {
5486 $sql .= " AND tc.code = '".$this->db->escape($code)."'";
5487 }
5488 $sql .= " AND sc.entity IN (".getEntity($this->element).")";
5489 $sql .= " AND tc.source = 'external'";
5490 $sql .= " AND tc.active = 1";
5491
5492 $sql .= " ORDER BY t.lastname ASC";
5493
5494 dol_syslog(get_class($this)."::getContacts", LOG_DEBUG);
5495 $resql = $this->db->query($sql);
5496 if ($resql) {
5497 $num = $this->db->num_rows($resql);
5498 $i = 0;
5499 while ($i < $num) {
5500 $obj = $this->db->fetch_object($resql);
5501
5502 if (!$list) {
5503 $transkey = "TypeContact_".$obj->element."_".$obj->source."_".$obj->code;
5504 $libelle_type = ($langs->trans($transkey) != $transkey ? $langs->trans($transkey) : $obj->type_label);
5505 $tab[$i] = array(
5506 'source' => $obj->source,
5507 'socid' => $obj->socid,
5508 'id' => $obj->id,
5509 'nom' => $obj->lastname, // For backward compatibility
5510 'civility' => $obj->civility,
5511 'lastname' => $obj->lastname,
5512 'firstname' => $obj->firstname,
5513 'email' => $obj->email,
5514 'login' => (empty($obj->login) ? '' : $obj->login),
5515 'photo' => (empty($obj->photo) ? '' : $obj->photo),
5516 'statuscontact' => $obj->statuscontact,
5517 'rowid' => $obj->rowid,
5518 'code' => $obj->code,
5519 'element' => $obj->element,
5520 'libelle' => $libelle_type,
5521 'status' => $obj->statuslink,
5522 'fk_c_type_contact' => $obj->fk_c_type_contact
5523 );
5524 } else {
5525 $tab[$i] = $obj->id;
5526 }
5527
5528 $i++;
5529 }
5530
5531 return $tab;
5532 } else {
5533 $this->error = $this->db->lasterror();
5534 dol_print_error($this->db);
5535 return -1;
5536 }
5537 }
5538
5549 public function mergeCompany($soc_origin_id)
5550 {
5551 global $conf, $langs, $hookmanager, $user, $action;
5552
5553 $error = 0;
5554 $soc_origin = new Societe($this->db); // The thirdparty that we will delete
5555
5556 dol_syslog("mergeCompany merge thirdparty id=".$soc_origin_id." (will be deleted) into the thirdparty id=".$this->id);
5557
5558 if (!$error && $soc_origin->fetch($soc_origin_id) < 1) {
5559 $this->error = $langs->trans('ErrorRecordNotFound');
5560 $error++;
5561 }
5562
5563 if (!$error) {
5564 $this->db->begin();
5565
5566 // Recopy some data
5567 $this->client |= $soc_origin->client;
5568 $this->fournisseur |= $soc_origin->fournisseur;
5569 $listofproperties = array(
5570 'address', 'zip', 'town', 'state_id', 'country_id', 'phone', 'phone_mobile', 'fax', 'email', 'socialnetworks', 'url', 'barcode',
5571 'idprof1', 'idprof2', 'idprof3', 'idprof4', 'idprof5', 'idprof6',
5572 'tva_intra', 'effectif_id', 'forme_juridique', 'remise_percent', 'remise_supplier_percent', 'mode_reglement_supplier_id', 'cond_reglement_supplier_id', 'name_bis',
5573 'stcomm_id', 'outstanding_limit', 'order_min_amount', 'supplier_order_min_amount', 'price_level', 'parent', 'default_lang', 'ref', 'ref_ext', 'import_key', 'fk_incoterms', 'fk_multicurrency',
5574 'code_client', 'code_fournisseur', 'code_compta', 'code_compta_fournisseur',
5575 'model_pdf', 'webservices_url', 'webservices_key', 'accountancy_code_sell', 'accountancy_code_buy', 'typent_id'
5576 );
5577 foreach ($listofproperties as $property) {
5578 if (empty($this->$property)) {
5579 $this->$property = $soc_origin->$property;
5580 }
5581 }
5582
5583 if ($this->typent_id == -1) {
5584 $this->typent_id = $soc_origin->typent_id;
5585 }
5586
5587 // Concat some data
5588 $listofproperties = array(
5589 'note_public', 'note_private'
5590 );
5591 foreach ($listofproperties as $property) {
5592 $this->$property = dol_concatdesc($this->$property, $soc_origin->$property);
5593 }
5594
5595 // Merge extrafields
5596 if (is_array($soc_origin->array_options)) {
5597 foreach ($soc_origin->array_options as $key => $val) {
5598 if (empty($this->array_options[$key])) {
5599 $this->array_options[$key] = $val;
5600 }
5601 }
5602 }
5603
5604 // If alias name is not defined on target thirdparty, we can store in it the old name of company.
5605 if (empty($this->name_bis) && $this->name != $soc_origin->name) {
5606 $this->name_bis = $this->name;
5607 }
5608
5609 // Merge categories
5610 include_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
5611 $static_cat = new Categorie($this->db);
5612
5613 $custcats_ori = $static_cat->containing($soc_origin->id, 'customer', 'id');
5614 $custcats = $static_cat->containing($this->id, 'customer', 'id');
5615 $custcats = array_merge($custcats, $custcats_ori);
5616 $this->setCategories($custcats, 'customer');
5617
5618 $suppcats_ori = $static_cat->containing($soc_origin->id, 'supplier', 'id');
5619 $suppcats = $static_cat->containing($this->id, 'supplier', 'id');
5620 $suppcats = array_merge($suppcats, $suppcats_ori);
5621 $this->setCategories($suppcats, 'supplier');
5622
5623 // If thirdparty has a new code that is same than origin, we clean origin code to avoid duplicate key from database unique keys.
5624 if ($soc_origin->code_client == $this->code_client
5625 || $soc_origin->code_fournisseur == $this->code_fournisseur
5626 || $soc_origin->barcode == $this->barcode) {
5627 dol_syslog("We clean customer and supplier code so we will be able to make the update of target");
5628 $soc_origin->code_client = '';
5629 $soc_origin->code_fournisseur = '';
5630 $soc_origin->barcode = '';
5631 $soc_origin->update($soc_origin->id, $user, 0, 1, 1, 'merge');
5632 }
5633
5634 // Update
5635 $result = $this->update($this->id, $user, 0, 1, 1, 'merge');
5636
5637 if ($result < 0) {
5638 $error++;
5639 }
5640
5641 // Move links
5642 if (!$error) {
5643 $objects = array(
5644 'Adherent' => '/adherents/class/adherent.class.php',
5645 //'Categorie' => '/categories/class/categorie.class.php', // Already processed previously
5646 'ActionComm' => '/comm/action/class/actioncomm.class.php',
5647 'Propal' => '/comm/propal/class/propal.class.php',
5648 'Commande' => '/commande/class/commande.class.php',
5649 'Facture' => '/compta/facture/class/facture.class.php',
5650 'FactureRec' => '/compta/facture/class/facture-rec.class.php',
5651 'LignePrelevement' => '/compta/prelevement/class/ligneprelevement.class.php',
5652 'Contact' => '/contact/class/contact.class.php',
5653 'Contrat' => '/contrat/class/contrat.class.php',
5654 'Expedition' => '/expedition/class/expedition.class.php',
5655 'CommandeFournisseur' => '/fourn/class/fournisseur.commande.class.php',
5656 'FactureFournisseur' => '/fourn/class/fournisseur.facture.class.php',
5657 'FactureFournisseurRec' => '/fourn/class/fournisseur.facture-rec.class.php',
5658 'Reception' => '/reception/class/reception.class.php',
5659 'SupplierProposal' => '/supplier_proposal/class/supplier_proposal.class.php',
5660 'ProductFournisseur' => '/fourn/class/fournisseur.product.class.php',
5661 'Product' => '/product/class/product.class.php',
5662 //'ProductThirparty' => '...', // for llx_product_thirdparty
5663 'Project' => '/projet/class/project.class.php',
5664 'User' => '/user/class/user.class.php',
5665 'Account' => '/compta/bank/class/account.class.php',
5666 'ConferenceOrBoothAttendee' => '/eventorganization/class/conferenceorboothattendee.class.php',
5667 'Societe' => '/societe/class/societe.class.php',
5668 //'SocieteAccount', 'SocietePrice', 'SocieteRib',... are processed into the replaceThirdparty of Societe.
5669 );
5670 if ($this->db->DDLListTables($conf->db->name, $this->db->prefix().'delivery')) {
5671 $objects['Delivery'] = '/delivery/class/delivery.class.php';
5672 }
5673 if ($this->db->DDLListTables($conf->db->name, $this->db->prefix().'mrp_mo')) {
5674 $objects['Mo'] = '/mrp/class/mo.class.php';
5675 }
5676 if ($this->db->DDLListTables($conf->db->name, $this->db->prefix().'don')) {
5677 $objects['Don'] = '/don/class/don.class.php';
5678 }
5679 if ($this->db->DDLListTables($conf->db->name, $this->db->prefix().'partnership')) {
5680 $objects['PartnerShip'] = '/partnership/class/partnership.class.php';
5681 }
5682 if ($this->db->DDLListTables($conf->db->name, $this->db->prefix().'fichinter')) {
5683 $objects['Fichinter'] = '/fichinter/class/fichinter.class.php';
5684 }
5685 if ($this->db->DDLListTables($conf->db->name, $this->db->prefix().'ticket')) {
5686 $objects['Ticket'] = '/ticket/class/ticket.class.php';
5687 }
5688
5689 //First, all core objects must update their tables
5690 foreach ($objects as $object_name => $object_file) {
5691 /* $object_file is never an array -> code commented
5692 if (is_array($object_file)) {
5693 if (empty($object_file['enabled'])) {
5694 continue;
5695 }
5696 $object_file = $object_file['file'];
5697 }
5698 */
5699
5700 require_once DOL_DOCUMENT_ROOT.$object_file;
5701
5702 if (!$error && !$object_name::replaceThirdparty($this->db, $soc_origin->id, $this->id)) {
5703 $error++;
5704 $this->error = $this->db->lasterror();
5705 break;
5706 }
5707 }
5708 }
5709
5710 // External modules should update their ones too
5711 if (!$error) {
5712 $parameters = array('soc_origin' => $soc_origin->id, 'soc_dest' => $this->id);
5713 $reshook = $hookmanager->executeHooks('replaceThirdparty', $parameters, $this, $action);
5714
5715 if ($reshook < 0) {
5716 $this->error = $hookmanager->error;
5717 $this->errors = $hookmanager->errors;
5718 $error++;
5719 }
5720 }
5721
5722
5723 if (!$error) {
5724 $this->context = array('merge' => 1, 'mergefromid' => $soc_origin->id, 'mergefromname' => $soc_origin->name);
5725
5726 // Call trigger
5727 $result = $this->call_trigger('COMPANY_MODIFY', $user);
5728 if ($result < 0) {
5729 $error++;
5730 }
5731 // End call triggers
5732 }
5733
5734 if (!$error) {
5735 // We finally remove the old thirdparty
5736 if ($soc_origin->delete($soc_origin->id, $user) < 1) {
5737 $this->error = $soc_origin->error;
5738 $this->errors = $soc_origin->errors;
5739 $error++;
5740 }
5741 }
5742
5743
5744 if (!$error) {
5745 // Move files from the dir of the third party to delete into the dir of the third party to keep
5746 if (!empty($conf->societe->multidir_output[$this->entity])) {
5747 $srcdir = $conf->societe->multidir_output[$this->entity]."/".$soc_origin->id;
5748 $destdir = $conf->societe->multidir_output[$this->entity]."/".$this->id;
5749
5750 if (dol_is_dir($srcdir)) {
5751 $dirlist = dol_dir_list($srcdir, 'files', 1);
5752 foreach ($dirlist as $filetomove) {
5753 $destfile = $destdir.'/'.$filetomove['relativename'];
5754 //var_dump('Move file '.$filetomove['relativename'].' into '.$destfile);
5755 dol_move($filetomove['fullname'], $destfile, '0', 0, 0, 1);
5756 }
5757 //exit;
5758 }
5759 }
5760 }
5761
5762 if (!$error) {
5763 $this->db->commit();
5764 return 0;
5765 } else {
5766 $langs->load("errors");
5767 $this->error = $langs->trans('ErrorsThirdpartyMerge');
5768 $this->db->rollback();
5769 return -1;
5770 }
5771 }
5772
5773 return -1;
5774 }
5775}
ref
$object ref
Definition info.php:89
Adherent
Class to manage members of a foundation.
Definition adherent.class.php:49
BonPrelevement
Class to manage withdrawal receipts.
Definition bonprelevement.class.php:49
Categorie
Class to manage categories.
Definition categorie.class.php:49
CommonObject
Parent class of all other business classes (invoices, contracts, proposals, orders,...
Definition commonobject.class.php:51
CommonObject\fetch_optionals
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...
Definition commonobject.class.php:6448
CommonObject\commonGenerateDocument
commonGenerateDocument($modelspath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams=null)
Common function for all objects extending CommonObject for generating documents.
Definition commonobject.class.php:5795
CommonObject\setErrorsFromObject
setErrorsFromObject($object)
setErrorsFromObject
Definition commonobject.class.php:956
CommonObject\isObjectUsed
isObjectUsed($id=0, $entity=0)
Function to check if an object is used by others (by children).
Definition commonobject.class.php:4905
CommonObject\deleteExtraFields
deleteExtraFields()
Delete all extra fields values for the current object.
Definition commonobject.class.php:6587
CommonObject\insertExtraLanguages
insertExtraLanguages($trigger='', $userused=null)
Add/Update all extra fields values for the current object.
Definition commonobject.class.php:6995
CommonObject\commonReplaceThirdparty
static commonReplaceThirdparty(DoliDB $dbs, $origin_id, $dest_id, array $tables, $ignoreerrors=0)
Function used to replace a thirdparty id with another one.
Definition commonobject.class.php:9615
CommonObject\setValueFrom
setValueFrom($field, $value, $table='', $id=null, $format='', $id_field='', $fuser=null, $trigkey='', $fk_user_field='fk_user_modif')
Setter generic.
Definition commonobject.class.php:2213
CommonObject\insertExtraFields
insertExtraFields($trigger='', $userused=null)
Add/Update all extra fields values for the current object.
Definition commonobject.class.php:6627
CommonObject\call_trigger
call_trigger($triggerName, $user)
Call trigger based on this instance.
Definition commonobject.class.php:6231
CompanyBankAccount
Class to manage bank accounts description of third parties.
Definition companybankaccount.class.php:37
Conf
Class to stock current configuration.
Definition conf.class.php:34
Contact
Class to manage contact/addresses.
Definition contact.class.php:45
DiscountAbsolute
Class to manage absolute discounts.
Definition discount.class.php:35
DoliDB
Class to manage Dolibarr database access.
Definition DoliDB.class.php:34
FactureFournisseur
Class to manage suppliers invoices.
Definition fournisseur.facture.class.php:54
FactureFournisseur\TYPE_CREDIT_NOTE
const TYPE_CREDIT_NOTE
Credit note invoice.
Definition fournisseur.facture.class.php:339
Facture
Class to manage invoices.
Definition facture.class.php:64
Form
Class to manage generation of HTML components Only common components must be here.
Definition html.form.class.php:57
Form\showphoto
static showphoto($modulepart, $object, $width=100, $height=0, $caneditfield=0, $cssclass='photowithmargin', $imagesize='', $addlinktofullsize=1, $cache=0, $forcecapture='', $noexternsourceoverwrite=0)
Return HTML code to output a photo.
Definition html.form.class.php:10429
Interfaces
Class to manage triggers.
Definition interfaces.class.php:34
MultiCurrency\getIdFromCode
static getIdFromCode($dbs, $code)
Get id of currency from code.
Definition multicurrency.class.php:504
MultiCurrency\getIdAndTxFromCode
static getIdAndTxFromCode($dbs, $code, $date_document='')
Get id and rate of currency from code.
Definition multicurrency.class.php:529
Societe
Class to manage third parties objects (customers, suppliers, prospects...)
Definition societe.class.php:55
Societe\setParent
setParent($id)
Define parent company of current company.
Definition societe.class.php:3873
Societe\getLibProspLevel
getLibProspLevel()
Return prostect level.
Definition societe.class.php:4814
Societe\thirdparty_and_contact_email_array
thirdparty_and_contact_email_array($addthirdparty=0)
Return list of contacts emails existing for third party.
Definition societe.class.php:3271
Societe\setAsCustomer
setAsCustomer()
Define third party as a customer.
Definition societe.class.php:2416
Societe\findNearest
findNearest($rowid=0, $ref='', $ref_ext='', $barcode='', $idprof1='', $idprof2='', $idprof3='', $idprof4='', $idprof5='', $idprof6='', $email='', $ref_alias='', $is_client=0, $is_supplier=0)
Search the thirdparty that match the most the provided parameters.
Definition societe.class.php:2226
Societe\codefournisseur_modifiable
codefournisseur_modifiable()
Check if a vendor code is editable in the code control module configuration.
Definition societe.class.php:3694
Societe\contact_get_property
contact_get_property($rowid, $mode)
Return property of contact from its id.
Definition societe.class.php:3451
Societe\check_codeclient
check_codeclient()
Check customer code.
Definition societe.class.php:3741
Societe\verify
verify()
Check properties of third party are ok (like name, third party codes, ...) Used before an add or upda...
Definition societe.class.php:1260
Societe\getContacts
getContacts($list=0, $code='', $element='')
Get array of all contacts for a society (stored in societe_contacts instead of element_contacts for a...
Definition societe.class.php:5466
Societe\LibProspCommStatut
LibProspCommStatut($status, $mode=0, $label='', $picto='')
Return label of a given status.
Definition societe.class.php:4869
Societe\replaceThirdparty
static replaceThirdparty(DoliDB $dbs, $origin_id, $dest_id)
Function used to replace a thirdparty id with another one.
Definition societe.class.php:5308
Societe\get_all_rib
get_all_rib()
Return Array of RIB.
Definition societe.class.php:3529
Societe\get_codecompta
get_codecompta($type)
Assigns a accounting code from the accounting code module.
Definition societe.class.php:3822
Societe\__construct
__construct($db)
Constructor.
Definition societe.class.php:941
Societe\del_commercial
del_commercial(User $user, $commid)
Add link to sales representative.
Definition societe.class.php:2839
Societe\info
info($id)
Load information for tab info.
Definition societe.class.php:4211
Societe\has_projects
has_projects()
Indicates if the company has projects.
Definition societe.class.php:4188
Societe\setThirdpartyType
setThirdpartyType($typent_id)
Define third-party type of current company.
Definition societe.class.php:5278
Societe\isACompany
isACompany()
Check if third party is a company (Business) or an end user (Consumer)
Definition societe.class.php:4244
Societe\getOutstandingBills
getOutstandingBills($mode='customer', $late=0)
Return amount of bill not yet paid and total of all invoices.
Definition societe.class.php:5017
Societe\add_commercial
add_commercial(User $user, $commid)
Add link to sales representative.
Definition societe.class.php:2779
Societe\LibStatut
LibStatut($status, $mode=0)
Return the label of a given status.
Definition societe.class.php:3243
Societe\update
update($id, User $user, $call_trigger=1, $allowmodcodeclient=0, $allowmodcodefournisseur=0, $action='update', $nosyncmember=1)
Update parameters of third party.
Definition societe.class.php:1437
Societe\PROSPECT
const PROSPECT
Third party type is a prospect.
Definition societe.class.php:903
Societe\create
create(User $user, $notrigger=0)
Create third party in database.
Definition societe.class.php:974
Societe\set_as_client
set_as_client()
Define third party as a customer.
Definition societe.class.php:2403
Societe\getOutstandingOrders
getOutstandingOrders($mode='customer')
Return amount of order not yet paid and total and list of all orders.
Definition societe.class.php:4973
Societe\id_prof_exists
id_prof_exists($idprof, $value, $socid=0)
Verify if a profid exists into database for others thirds.
Definition societe.class.php:4018
Societe\setCategories
setCategories($categories, $type_categ)
Sets object to supplied categories.
Definition societe.class.php:5213
Societe\useRevenueStamp
useRevenueStamp()
Check if we must use revenue stamps feature or not according to country (country of $mysoc in most ca...
Definition societe.class.php:4791
Societe\setNoEmail
setNoEmail($no_email)
Set "blacklist" mailing status.
Definition societe.class.php:4357
Societe\id_prof_verifiable
id_prof_verifiable($idprof)
Returns if a profid should be verified to be unique.
Definition societe.class.php:3978
Societe\create_from_member
create_from_member(Adherent $member, $socname='', $socalias='', $customercode='')
Create a third party into database from a member object.
Definition societe.class.php:4442
Societe\getParentsForCompany
getParentsForCompany($company_id, $parents=array())
Get parents for company.
Definition societe.class.php:3945
Societe\set_remise_except
set_remise_except($remise, User $user, $desc, $vatrate='', $discount_type=0, $price_base_type='HT')
Add a discount for third party.
Definition societe.class.php:2572
Societe\CUSTOMER_AND_PROSPECT
const CUSTOMER_AND_PROSPECT
Third party type is a customer and a prospect.
Definition societe.class.php:908
Societe\generateDocument
generateDocument($modele, $outputlangs, $hidedetails=0, $hidedesc=0, $hideref=0, $moreparams=null)
Create a document onto disk according to template module.
Definition societe.class.php:5155
Societe\set_remise_client
set_remise_client($remise, $note, User $user)
Defines the company as a customer.
Definition societe.class.php:2447
Societe\getOutstandingProposals
getOutstandingProposals($mode='customer')
Return amount of proposal not yet paid and total an dlist of all proposals.
Definition societe.class.php:4929
Societe\CUSTOMER
const CUSTOMER
Third party type is a customer.
Definition societe.class.php:898
Societe\fetch
fetch($rowid, $ref='', $ref_ext='', $barcode='', $idprof1='', $idprof2='', $idprof3='', $idprof4='', $idprof5='', $idprof6='', $email='', $ref_alias='', $is_client=0, $is_supplier=0)
Load a third party from database into memory.
Definition societe.class.php:1901
Societe\getSalesRepresentatives
getSalesRepresentatives(User $user, $mode=0, $sortfield=null, $sortorder=null)
Return array of sales representatives.
Definition societe.class.php:2678
Societe\LoadSupplierCateg
LoadSupplierCateg()
Load the list of provider categories.
Definition societe.class.php:4284
Societe\getAvailableDiscounts
getAvailableDiscounts($user=null, $filter='', $maxvalue=0, $discount_type=0)
Returns amount of included taxes of the current discounts/credits available from the company.
Definition societe.class.php:2655
Societe\display_rib
display_rib($mode='label')
Return bank number property of thirdparty (label or rum)
Definition societe.class.php:3493
Societe\contact_array_objects
contact_array_objects()
Return the contact list of this company.
Definition societe.class.php:3417
Societe\isInEEC
isInEEC()
Return if a company is inside the EEC (European Economic Community)
Definition societe.class.php:4272
Societe\codeclient_modifiable
codeclient_modifiable()
Check if a client code is editable based on the parameters of the code control module.
Definition societe.class.php:3653
Societe\fetchPartnerships
fetchPartnerships($mode)
Function to get partnerships array.
Definition societe.class.php:5402
Societe\validateFamilyTree
validateFamilyTree($idparent, $idchild, $counter=0)
Check if a thirdparty $idchild is or not inside the parents (or grand parents) of another thirdparty ...
Definition societe.class.php:3912
Societe\mergeCompany
mergeCompany($soc_origin_id)
Merge a company with current one, deleting the given company $soc_origin_id.
Definition societe.class.php:5549
Societe\NO_SUPPLIER
const NO_SUPPLIER
Third party supplier flag is not supplier.
Definition societe.class.php:913
Societe\getNbOfEMailings
getNbOfEMailings()
Return number of mass Emailing received by this contacts with its email.
Definition societe.class.php:4331
Societe\setAccountancyCode
setAccountancyCode($type, $value)
Sets an accountancy code for a thirdparty.
Definition societe.class.php:5352
Societe\getLibCustProspStatut
getLibCustProspStatut()
Return label of status customer is prospect/customer.
Definition societe.class.php:5112
Societe\getNomUrl
getNomUrl($withpicto=0, $option='', $maxlen=0, $notooltip=0, $save_lastsearch_value=-1, $noaliasinname=0, $target='', $morecss='')
Return a link on thirdparty (with picto)
Definition societe.class.php:3034
Societe\getLibStatut
getLibStatut($mode=0)
Return label of status (activity, closed)
Definition societe.class.php:3230
Societe\NO_CUSTOMER
const NO_CUSTOMER
Third party type is no customer.
Definition societe.class.php:893
Societe\LibProspLevel
LibProspLevel($fk_prospectlevel)
Return label of prospect level.
Definition societe.class.php:4826
Societe\set_remise_supplier
set_remise_supplier($remise, $note, User $user)
Defines the company as a customer.
Definition societe.class.php:2508
Societe\useLocalTax
useLocalTax($localTaxNum=0)
Check if we must use localtax feature or not according to country (country of $mysoc in most cases).
Definition societe.class.php:4740
Societe\create_individual
create_individual(User $user, $no_email=0, $tags=array(), $notrigger=0)
Create a contact/address from thirdparty.
Definition societe.class.php:1187
Societe\getNoEmail
getNoEmail()
get "blacklist" mailing status set no_email attribute to 1 or 0
Definition societe.class.php:4414
Societe\getLibProspCommStatut
getLibProspCommStatut($mode=0, $label='')
Return status of prospect.
Definition societe.class.php:4850
Societe\AddFournisseurInCategory
AddFournisseurInCategory($categorie_id)
Insert link supplier - category.
Definition societe.class.php:4310
Societe\contact_property_array
contact_property_array($mode='email', $hidedisabled=0)
Return list of contacts emails or mobile existing for third party.
Definition societe.class.php:3320
Societe\LibCustProspStatut
LibCustProspStatut($status)
Return the label of the customer/prospect status.
Definition societe.class.php:5124
Societe\id_prof_check
id_prof_check($idprof, $soc)
Check the validity of a professional identifier according to the country of the company (siren,...
Definition societe.class.php:4079
Societe\getTypeUrl
getTypeUrl($withpicto=0, $option='', $notooltip=0, $tag='a')
Return link(s) on type of thirdparty (with picto)
Definition societe.class.php:3193
Societe\setPriceLevel
setPriceLevel($price_level, User $user)
Set the price level.
Definition societe.class.php:2744
Societe\thirdparty_and_contact_phone_array
thirdparty_and_contact_phone_array()
Return list of contacts mobile phone existing for third party.
Definition societe.class.php:3295
Societe\deprecatedProperties
deprecatedProperties()
Provide list of deprecated properties and replacements.
Definition societe.class.php:925
Societe\getTooltipContentArray
getTooltipContentArray($params)
getTooltipContentArray
Definition societe.class.php:2874
Societe\useNPR
useNPR()
Check if we must use NPR Vat (french stupid rule) or not according to country (country of $mysoc in m...
Definition societe.class.php:4768
Societe\setSalesRep
setSalesRep($salesrep, $onlyAdd=false)
Sets sales representatives of the thirdparty.
Definition societe.class.php:5233
Societe\getKanbanView
getKanbanView($option='', $arraydata=array())
Return clickable link of object (with optional picto)
Definition societe.class.php:5418
Societe\SUPPLIER
const SUPPLIER
Third party supplier flag is a supplier.
Definition societe.class.php:918
Societe\check_codefournisseur
check_codefournisseur()
Check supplier code.
Definition societe.class.php:3783
Societe\contact_array
contact_array()
Return the contact list of this company.
Definition societe.class.php:3388
Societe\initAsSpecimen
initAsSpecimen()
Initialise an instance with random values.
Definition societe.class.php:4680
Societe\id_prof_url
id_prof_url($idprof, $thirdparty)
Return an url to check online a professional id or empty string.
Definition societe.class.php:4135
Societe\setMysoc
setMysoc(Conf $conf)
Set properties with value into $conf.
Definition societe.class.php:4541
User
Class to manage Dolibarr users.
Definition user.class.php:50
status
print $langs trans("Ref").' m titre as m m statut as status
Or an array listing all the potential status of the object: array: int of the status => translated la...
Definition index.php:171
setUpperOrLowerCase
setUpperOrLowerCase()
Set to upper or ucwords/lower if needed.
Definition commonpeople.class.php:360
CommonSocialNetworks
trait CommonSocialNetworks
Superclass for social networks.
Definition commonsocialnetworks.class.php:30
getCountry
getCountry($searchkey, $withcode='', $dbtouse=null, $outputlangs=null, $entconv=1, $searchlabel='')
Return country label, code or id from an id, code or label.
Definition company.lib.php:570
getState
getState($id, $withcode='0', $dbtouse=null, $withregion=0, $outputlangs=null, $entconv=1)
Return state translated from an id.
Definition company.lib.php:650
dol_get_first_hour
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:660
email
print $script_file $mode $langs defaultlang(is_numeric($duration_value) ? " delay=". $duration_value :"").(is_numeric($duration_value2) ? " after cd cd cd description as p label as s rowid as s nom as s email
Sender: Who sends the email ("Sender" has sent emails on behalf of "From").
Definition email_expire_services_to_customers.php:97
dol_move
dol_move($srcfile, $destfile, $newmask='0', $overwriteifexists=1, $testvirus=0, $indexdatabase=1, $moreinfo=array(), $entity=0)
Move a file into another name.
Definition files.lib.php:1036
dol_delete_dir_recursive
dol_delete_dir_recursive($dir, $count=0, $nophperrors=0, $onlysub=0, &$countdeleted=0, $indexdatabase=1, $nolog=0, $level=0)
Remove a directory $dir and its subdirectories (or only files and subdirectories)
Definition files.lib.php:1666
dol_dir_list
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
dol_is_dir
dol_is_dir($folder)
Test if filename is a directory.
Definition files.lib.php:512
clean_url
clean_url($url, $http=1)
Clean an url string.
Definition functions2.lib.php:769
dol_getIdFromCode
dol_getIdFromCode($db, $key, $tablename, $fieldkey='code', $fieldid='id', $entityfilter=0, $filters='', $useCache=true)
Return an id or code from a code or id.
Definition functions.lib.php:10629
setEventMessages
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
Definition functions.lib.php:10203
setEntity
setEntity($currentobject)
Set entity id to use when to create an object.
Definition functions.lib.php:514
img_picto
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2, $allowothertags=array())
Show picto whatever it's its name (generic function)
Definition functions.lib.php:5159
dol_format_address
dol_format_address($object, $withcountry=0, $sep="\n", $outputlangs=null, $mode=0, $extralangcode='')
Return a formatted address (part address/zip/town/state) according to country rules.
Definition functions.lib.php:3392
dol_print_phone
dol_print_phone($phone, $countrycode='', $cid=0, $socid=0, $addlink='', $separ="&nbsp;", $withpicto='', $titlealt='', $adddivfloat=0, $morecss='paddingright')
Format phone numbers according to country.
Definition functions.lib.php:4321
dol_string_nohtmltag
dol_string_nohtmltag($stringtoclean, $removelinefeed=1, $pagecodeto='UTF-8', $strip_tags=0, $removedoublespaces=1)
Clean a string from all HTML tags and entities.
Definition functions.lib.php:8205
price2num
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
Definition functions.lib.php:7054
dol_string_nospecial
dol_string_nospecial($str, $newstr='_', $badcharstoreplace='', $badcharstoremove='', $keepspaces=0)
Clean a string from all punctuation characters to use it as a ref or login.
Definition functions.lib.php:1841
img_action
img_action($titlealt, $numaction, $picto='', $moreatt='')
Show logo action.
Definition functions.lib.php:5612
img_object
img_object($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $allowothertags=array())
Show a picto called object_picto (generic function)
Definition functions.lib.php:5526
setEventMessage
setEventMessage($mesgs, $style='mesgs', $noduplicate=0, $attop=0)
Set event message in dol_events session object.
Definition functions.lib.php:10156
dol_strlen
dol_strlen($string, $stringencoding='UTF-8')
Make a strlen call.
Definition functions.lib.php:4970
dol_now
dol_now($mode='auto')
Return date for now.
Definition functions.lib.php:3904
getDolGlobalInt
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
Definition functions.lib.php:243
dol_include_once
if(!function_exists( 'dol_getprefix')) dol_include_once($relpath, $classname='')
Make an include_once using default root and alternate root if it fails.
Definition functions.lib.php:1409
dolGetFirstLastname
dolGetFirstLastname($firstname, $lastname, $nameorder=-1)
Return firstname and lastname in correct order.
Definition functions.lib.php:10108
dol_concatdesc
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...
Definition functions.lib.php:9075
dolPrintHTMLForAttribute
dolPrintHTMLForAttribute($s, $escapeonlyhtmltags=0, $allowothertags=array())
Return a string ready to be output into an HTML attribute (alt, title, data-html, ....
Definition functions.lib.php:2071
dol_print_email
dol_print_email($email, $cid=0, $socid=0, $addlink=0, $max=64, $showinvalid=1, $withpicto=0, $morecss='paddingrightonly')
Show EMail link formatted for HTML output.
Definition functions.lib.php:4030
dolGetStatus
dolGetStatus($statusLabel='', $statusLabelShort='', $html='', $statusType='status0', $displayMode=0, $url='', $params=array())
Output the badge of a status.
Definition functions.lib.php:12717
getDolGlobalBool
getDolGlobalBool($key, $default=false)
Return a Dolibarr global constant boolean value.
Definition functions.lib.php:272
dol_print_error
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
Definition functions.lib.php:6167
dol_trunc
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.
Definition functions.lib.php:5032
isValidEmail
isValidEmail($address, $acceptsupervisorkey=0, $acceptuserkey=0)
Return true if email syntax is ok.
Definition functions.lib.php:4880
getDolGlobalString
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
Definition functions.lib.php:228
dol_syslog
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
Definition functions.lib.php:2382
getEntity
getEntity($element, $shared=1, $currentobject=null)
Get list of entity id to use.
Definition functions.lib.php:448
dol_escape_htmltag
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...
Definition functions.lib.php:2144
address
div refaddress div address
Definition global.inc.php:4568
Database\query
query($query, $usesavepoint=0, $type='auto', $result_mode=0)
Execute a SQL request and return the resultset.
Database\fetch_object
fetch_object($resultset)
Returns the current line (as an object) for the resultset cursor.
$conf
global $conf
The following vars must be defined: $type2label $form $conf, $lang, The following vars may also be de...
Definition member.php:79
isValidSiren
isValidSiren($siren)
Check the syntax validity of a SIREN.
Definition profid.lib.php:59
isValidTinForPT
isValidTinForPT($str)
Check the syntax validity of a Portuguese (PT) Tax Identification Number (TIN).
Definition profid.lib.php:111
isValidSiret
isValidSiret($siret)
Check the syntax validity of a SIRET.
Definition profid.lib.php:79
isValidTinForES
isValidTinForES($str)
Check the syntax validity of a Spanish (ES) Tax Identification Number (TIN), where:
Definition profid.lib.php:177
isValidTinForBE
isValidTinForBE($str)
Check the syntax validity of a Belgium (BE) Tax Identification Number (TIN).
Definition profid.lib.php:153
isValidTinForDZ
isValidTinForDZ($str)
Check the syntax validity of an Algerian (DZ) Tax Identification Number (TIN).
Definition profid.lib.php:132
name
$conf db name
Only used if Module[ID]Name translation string is not found.
Definition repair.php:153
Generated on Thu Aug 6 2026 01:00:37 for dolibarr by Doxygen 1.11.0