alxarafe /
alixar
@@ -21,7389 +21,7389 @@ |
||
| 21 | 21 | |
| 22 | 22 | abstract class AlCommonObject |
| 23 | 23 | {
|
| 24 | - /** |
|
| 24 | + /** |
|
| 25 | 25 | * @var int The object identifier |
| 26 | 26 | */ |
| 27 | - public $id; |
|
| 28 | - |
|
| 29 | - /** |
|
| 30 | - * @var string Error string |
|
| 31 | - * @see errors |
|
| 32 | - */ |
|
| 33 | - public $error; |
|
| 34 | - |
|
| 35 | - /** |
|
| 36 | - * @var string[] Array of error strings |
|
| 37 | - */ |
|
| 38 | - public $errors=array(); |
|
| 39 | - |
|
| 40 | - /** |
|
| 41 | - * @var string ID to identify managed object |
|
| 42 | - */ |
|
| 43 | - public $element; |
|
| 44 | - |
|
| 45 | - /** |
|
| 46 | - * @var string Name of table without prefix where object is stored |
|
| 47 | - */ |
|
| 48 | - public $table_element; |
|
| 49 | - |
|
| 50 | - /** |
|
| 51 | - * @var int Name of subtable line |
|
| 52 | - */ |
|
| 53 | - public $table_element_line=''; |
|
| 54 | - |
|
| 55 | - /** |
|
| 56 | - * @var string Key value used to track if data is coming from import wizard |
|
| 57 | - */ |
|
| 58 | - public $import_key; |
|
| 59 | - |
|
| 60 | - /** |
|
| 61 | - * @var mixed Contains data to manage extrafields |
|
| 62 | - */ |
|
| 63 | - public $array_options=array(); |
|
| 64 | - |
|
| 65 | - /** |
|
| 66 | - * @var int[][] Array of linked objects ids. Loaded by ->fetchObjectLinked |
|
| 67 | - */ |
|
| 68 | - public $linkedObjectsIds; |
|
| 69 | - |
|
| 70 | - /** |
|
| 71 | - * @var mixed Array of linked objects. Loaded by ->fetchObjectLinked |
|
| 72 | - */ |
|
| 73 | - public $linkedObjects; |
|
| 74 | - |
|
| 75 | - /** |
|
| 76 | - * @var Object To store a cloned copy of object before to edit it and keep track of old properties |
|
| 77 | - */ |
|
| 78 | - public $oldcopy; |
|
| 79 | - |
|
| 80 | - /** |
|
| 81 | - * @var string Column name of the ref field. |
|
| 82 | - */ |
|
| 83 | - protected $table_ref_field = ''; |
|
| 84 | - |
|
| 85 | - |
|
| 86 | - |
|
| 87 | - // Following vars are used by some objects only. We keep this property here in CommonObject to be able to provide common method using them. |
|
| 88 | - |
|
| 89 | - /** |
|
| 90 | - * @var array<string,mixed> Can be used to pass information when only object is provided to method |
|
| 91 | - */ |
|
| 92 | - public $context=array(); |
|
| 93 | - |
|
| 94 | - /** |
|
| 95 | - * @var string Contains canvas name if record is an alternative canvas record |
|
| 96 | - */ |
|
| 97 | - public $canvas; |
|
| 98 | - |
|
| 99 | - /** |
|
| 100 | - * @var Project The related project |
|
| 101 | - * @see fetch_projet() |
|
| 102 | - */ |
|
| 103 | - public $project; |
|
| 104 | - |
|
| 105 | - /** |
|
| 106 | - * @var int The related project ID |
|
| 107 | - * @see setProject(), project |
|
| 108 | - */ |
|
| 109 | - public $fk_project; |
|
| 110 | - |
|
| 111 | - /** |
|
| 112 | - * @deprecated |
|
| 113 | - * @see project |
|
| 114 | - */ |
|
| 115 | - public $projet; |
|
| 116 | - |
|
| 117 | - /** |
|
| 118 | - * @var Contact a related contact |
|
| 119 | - * @see fetch_contact() |
|
| 120 | - */ |
|
| 121 | - public $contact; |
|
| 122 | - |
|
| 123 | - /** |
|
| 124 | - * @var int The related contact ID |
|
| 125 | - * @see fetch_contact() |
|
| 126 | - */ |
|
| 127 | - public $contact_id; |
|
| 128 | - |
|
| 129 | - /** |
|
| 130 | - * @var Societe A related thirdparty |
|
| 131 | - * @see fetch_thirdparty() |
|
| 132 | - */ |
|
| 133 | - public $thirdparty; |
|
| 134 | - |
|
| 135 | - /** |
|
| 136 | - * @var User A related user |
|
| 137 | - * @see fetch_user() |
|
| 138 | - */ |
|
| 139 | - public $user; |
|
| 140 | - |
|
| 141 | - /** |
|
| 142 | - * @var string The type of originating object ('commande', 'facture', ...)
|
|
| 143 | - * @see fetch_origin() |
|
| 144 | - */ |
|
| 145 | - public $origin; |
|
| 146 | - |
|
| 147 | - /** |
|
| 148 | - * @var int The id of originating object |
|
| 149 | - * @see fetch_origin() |
|
| 150 | - */ |
|
| 151 | - public $origin_id; |
|
| 152 | - |
|
| 153 | - /** |
|
| 154 | - * @var string The object's reference |
|
| 155 | - */ |
|
| 156 | - public $ref; |
|
| 157 | - |
|
| 158 | - /** |
|
| 159 | - * @var string The object's previous reference |
|
| 160 | - */ |
|
| 161 | - public $ref_previous; |
|
| 162 | - |
|
| 163 | - /** |
|
| 164 | - * @var string The object's next reference |
|
| 165 | - */ |
|
| 166 | - public $ref_next; |
|
| 167 | - |
|
| 168 | - /** |
|
| 169 | - * @var string An external reference for the object |
|
| 170 | - */ |
|
| 171 | - public $ref_ext; |
|
| 172 | - |
|
| 173 | - /** |
|
| 174 | - * @var int The object's status |
|
| 175 | - * @see setStatut() |
|
| 176 | - */ |
|
| 177 | - public $statut; |
|
| 178 | - |
|
| 179 | - /** |
|
| 180 | - * @var string |
|
| 181 | - * @see getFullAddress() |
|
| 182 | - */ |
|
| 183 | - public $country; |
|
| 184 | - |
|
| 185 | - /** |
|
| 186 | - * @var int |
|
| 187 | - * @see getFullAddress(), country |
|
| 188 | - */ |
|
| 189 | - public $country_id; |
|
| 190 | - |
|
| 191 | - /** |
|
| 192 | - * @var string |
|
| 193 | - * @see getFullAddress(), isInEEC(), country |
|
| 194 | - */ |
|
| 195 | - public $country_code; |
|
| 27 | + public $id; |
|
| 196 | 28 | |
| 197 | 29 | /** |
| 198 | - * @var string |
|
| 199 | - * @see getFullAddress() |
|
| 200 | - */ |
|
| 201 | - public $state; |
|
| 202 | - |
|
| 203 | - /** |
|
| 204 | - * @var int |
|
| 205 | - * @see getFullAddress(), state |
|
| 206 | - */ |
|
| 207 | - public $state_id; |
|
| 30 | + * @var string Error string |
|
| 31 | + * @see errors |
|
| 32 | + */ |
|
| 33 | + public $error; |
|
| 208 | 34 | |
| 209 | - /** |
|
| 210 | - * @var string |
|
| 211 | - * @see getFullAddress(), state |
|
| 212 | - */ |
|
| 213 | - public $state_code; |
|
| 35 | + /** |
|
| 36 | + * @var string[] Array of error strings |
|
| 37 | + */ |
|
| 38 | + public $errors=array(); |
|
| 214 | 39 | |
| 215 | 40 | /** |
| 216 | - * @var string |
|
| 217 | - * @see getFullAddress(), region |
|
| 218 | - */ |
|
| 219 | - public $region; |
|
| 41 | + * @var string ID to identify managed object |
|
| 42 | + */ |
|
| 43 | + public $element; |
|
| 220 | 44 | |
| 221 | - /** |
|
| 222 | - * @var string |
|
| 223 | - * @see getFullAddress(), region |
|
| 224 | - */ |
|
| 225 | - public $region_code; |
|
| 45 | + /** |
|
| 46 | + * @var string Name of table without prefix where object is stored |
|
| 47 | + */ |
|
| 48 | + public $table_element; |
|
| 226 | 49 | |
| 227 | - /** |
|
| 228 | - * @var int |
|
| 229 | - * @see fetch_barcode() |
|
| 230 | - */ |
|
| 231 | - public $barcode_type; |
|
| 232 | - |
|
| 233 | - /** |
|
| 234 | - * @var string |
|
| 235 | - * @see fetch_barcode(), barcode_type |
|
| 236 | - */ |
|
| 237 | - public $barcode_type_code; |
|
| 238 | - |
|
| 239 | - /** |
|
| 240 | - * @var string |
|
| 241 | - * @see fetch_barcode(), barcode_type |
|
| 242 | - */ |
|
| 243 | - public $barcode_type_label; |
|
| 244 | - |
|
| 245 | - /** |
|
| 246 | - * @var string |
|
| 247 | - * @see fetch_barcode(), barcode_type |
|
| 248 | - */ |
|
| 249 | - public $barcode_type_coder; |
|
| 250 | - |
|
| 251 | - /** |
|
| 252 | - * @var int Payment method ID (cheque, cash, ...) |
|
| 253 | - * @see setPaymentMethods() |
|
| 254 | - */ |
|
| 255 | - public $mode_reglement_id; |
|
| 256 | - |
|
| 257 | - /** |
|
| 258 | - * @var int Payment terms ID |
|
| 259 | - * @see setPaymentTerms() |
|
| 260 | - */ |
|
| 261 | - public $cond_reglement_id; |
|
| 262 | - |
|
| 263 | - /** |
|
| 264 | - * @var int Payment terms ID |
|
| 265 | - * @deprecated Kept for compatibility |
|
| 266 | - * @see cond_reglement_id; |
|
| 267 | - */ |
|
| 268 | - public $cond_reglement; |
|
| 269 | - |
|
| 270 | - /** |
|
| 271 | - * @var int Delivery address ID |
|
| 272 | - * @deprecated |
|
| 273 | - * @see setDeliveryAddress() |
|
| 274 | - */ |
|
| 275 | - public $fk_delivery_address; |
|
| 276 | - |
|
| 277 | - /** |
|
| 278 | - * @var int Shipping method ID |
|
| 279 | - * @see setShippingMethod() |
|
| 280 | - */ |
|
| 281 | - public $shipping_method_id; |
|
| 282 | - |
|
| 283 | - /** |
|
| 284 | - * @var string |
|
| 285 | - * @see SetDocModel() |
|
| 286 | - */ |
|
| 287 | - public $modelpdf; |
|
| 288 | - |
|
| 289 | - /** |
|
| 290 | - * @var int Bank account ID |
|
| 291 | - * @see SetBankAccount() |
|
| 292 | - */ |
|
| 293 | - public $fk_account; |
|
| 294 | - |
|
| 295 | - /** |
|
| 296 | - * @var string Public note |
|
| 297 | - * @see update_note() |
|
| 298 | - */ |
|
| 299 | - public $note_public; |
|
| 300 | - |
|
| 301 | - /** |
|
| 302 | - * @var string Private note |
|
| 303 | - * @see update_note() |
|
| 304 | - */ |
|
| 305 | - public $note_private; |
|
| 306 | - |
|
| 307 | - /** |
|
| 308 | - * @deprecated |
|
| 309 | - * @see note_public |
|
| 310 | - */ |
|
| 311 | - public $note; |
|
| 312 | - |
|
| 313 | - /** |
|
| 314 | - * @var float Total amount before taxes |
|
| 315 | - * @see update_price() |
|
| 316 | - */ |
|
| 317 | - public $total_ht; |
|
| 318 | - |
|
| 319 | - /** |
|
| 320 | - * @var float Total VAT amount |
|
| 321 | - * @see update_price() |
|
| 322 | - */ |
|
| 323 | - public $total_tva; |
|
| 324 | - |
|
| 325 | - /** |
|
| 326 | - * @var float Total local tax 1 amount |
|
| 327 | - * @see update_price() |
|
| 328 | - */ |
|
| 329 | - public $total_localtax1; |
|
| 330 | - |
|
| 331 | - /** |
|
| 332 | - * @var float Total local tax 2 amount |
|
| 333 | - * @see update_price() |
|
| 334 | - */ |
|
| 335 | - public $total_localtax2; |
|
| 336 | - |
|
| 337 | - /** |
|
| 338 | - * @var float Total amount with taxes |
|
| 339 | - * @see update_price() |
|
| 340 | - */ |
|
| 341 | - public $total_ttc; |
|
| 342 | - |
|
| 343 | - /** |
|
| 344 | - * @var CommonObjectLine[] |
|
| 345 | - */ |
|
| 346 | - public $lines; |
|
| 347 | - |
|
| 348 | - /** |
|
| 349 | - * @var mixed Contains comments |
|
| 350 | - * @see fetchComments() |
|
| 351 | - */ |
|
| 352 | - public $comments=array(); |
|
| 353 | - |
|
| 354 | - /** |
|
| 355 | - * @var int |
|
| 356 | - * @see setIncoterms() |
|
| 357 | - */ |
|
| 358 | - public $fk_incoterms; |
|
| 359 | - |
|
| 360 | - /** |
|
| 361 | - * @var string |
|
| 362 | - * @see SetIncoterms() |
|
| 363 | - */ |
|
| 364 | - public $libelle_incoterms; |
|
| 365 | - |
|
| 366 | - /** |
|
| 367 | - * @var string |
|
| 368 | - * @see display_incoterms() |
|
| 369 | - */ |
|
| 370 | - public $location_incoterms; |
|
| 371 | - |
|
| 372 | - public $name; |
|
| 373 | - public $lastname; |
|
| 374 | - public $firstname; |
|
| 375 | - public $civility_id; |
|
| 376 | - |
|
| 377 | - // Dates |
|
| 378 | - public $date_creation; // Date creation |
|
| 379 | - public $date_validation; // Date validation |
|
| 380 | - public $date_modification; // Date last change (tms field) |
|
| 381 | - |
|
| 382 | - |
|
| 383 | - |
|
| 384 | - // No constructor as it is an abstract class |
|
| 385 | - |
|
| 386 | - /** |
|
| 387 | - * Check an object id/ref exists |
|
| 388 | - * If you don't need/want to instantiate object and just need to know if object exists, use this method instead of fetch |
|
| 389 | - * |
|
| 390 | - * @param string $element String of element ('product', 'facture', ...)
|
|
| 391 | - * @param int $id Id of object |
|
| 392 | - * @param string $ref Ref of object to check |
|
| 393 | - * @param string $ref_ext Ref ext of object to check |
|
| 394 | - * @return int <0 if KO, 0 if OK but not found, >0 if OK and exists |
|
| 395 | - */ |
|
| 396 | - static function isExistingObject($element, $id, $ref='', $ref_ext='') |
|
| 397 | - {
|
|
| 398 | - global $db,$conf; |
|
| 399 | - |
|
| 400 | - $sql = "SELECT rowid, ref, ref_ext"; |
|
| 401 | - $sql.= " FROM ".MAIN_DB_PREFIX.$element; |
|
| 402 | - $sql.= " WHERE entity IN (".getEntity($element).")" ;
|
|
| 403 | - |
|
| 404 | - if ($id > 0) $sql.= " AND rowid = ".$db->escape($id); |
|
| 405 | - else if ($ref) $sql.= " AND ref = '".$db->escape($ref)."'"; |
|
| 406 | - else if ($ref_ext) $sql.= " AND ref_ext = '".$db->escape($ref_ext)."'"; |
|
| 407 | - else {
|
|
| 408 | - $error='ErrorWrongParameters'; |
|
| 409 | - dol_print_error(get_class()."::isExistingObject ".$error, LOG_ERR); |
|
| 410 | - return -1; |
|
| 411 | - } |
|
| 412 | - if ($ref || $ref_ext) |
|
| 413 | - $sql .= " AND entity = " . Globals::$conf->entity; |
|
| 50 | + /** |
|
| 51 | + * @var int Name of subtable line |
|
| 52 | + */ |
|
| 53 | + public $table_element_line=''; |
|
| 414 | 54 | |
| 415 | - dol_syslog(get_class()."::isExistingObject", LOG_DEBUG); |
|
| 416 | - $resql = $db->query($sql); |
|
| 417 | - if ($resql) |
|
| 418 | - {
|
|
| 419 | - $num=$db->num_rows($resql); |
|
| 420 | - if ($num > 0) return 1; |
|
| 421 | - else return 0; |
|
| 422 | - } |
|
| 423 | - return -1; |
|
| 424 | - } |
|
| 425 | - |
|
| 426 | - /** |
|
| 427 | - * Method to output saved errors |
|
| 428 | - * |
|
| 429 | - * @return string String with errors |
|
| 430 | - */ |
|
| 431 | - function errorsToString() |
|
| 432 | - {
|
|
| 433 | - return $this->error.(is_array($this->errors)?(($this->error!=''?', ':'').join(', ',$this->errors)):'');
|
|
| 434 | - } |
|
| 435 | - |
|
| 436 | - /** |
|
| 437 | - * Return full name (civility+' '+name+' '+lastname) |
|
| 438 | - * |
|
| 439 | - * @param Translate $langs Language object for translation of civility (used only if option is 1) |
|
| 440 | - * @param int $option 0=No option, 1=Add civility |
|
| 441 | - * @param int $nameorder -1=Auto, 0=Lastname+Firstname, 1=Firstname+Lastname, 2=Firstname |
|
| 442 | - * @param int $maxlen Maximum length |
|
| 443 | - * @return string String with full name |
|
| 444 | - */ |
|
| 445 | - function getFullName($langs,$option=0,$nameorder=-1,$maxlen=0) |
|
| 446 | - {
|
|
| 447 | - //print "lastname=".$this->lastname." name=".$this->name." nom=".$this->nom."<br>\n"; |
|
| 448 | - $lastname=$this->lastname; |
|
| 449 | - $firstname=$this->firstname; |
|
| 450 | - if (empty($lastname)) $lastname=(isset($this->lastname)?$this->lastname:(isset($this->name)?$this->name:(isset($this->nom)?$this->nom:(isset($this->societe)?$this->societe:(isset($this->company)?$this->company:''))))); |
|
| 451 | - |
|
| 452 | - $ret=''; |
|
| 453 | - if ($option && $this->civility_id) |
|
| 454 | - {
|
|
| 455 | - if ($langs->transnoentitiesnoconv("Civility".$this->civility_id)!="Civility".$this->civility_id) $ret.=$langs->transnoentitiesnoconv("Civility".$this->civility_id).' ';
|
|
| 456 | - else $ret.=$this->civility_id.' '; |
|
| 457 | - } |
|
| 458 | - |
|
| 459 | - $ret .= AlDolUtils::dolGetFirstLastname($firstname, $lastname, $nameorder); |
|
| 55 | + /** |
|
| 56 | + * @var string Key value used to track if data is coming from import wizard |
|
| 57 | + */ |
|
| 58 | + public $import_key; |
|
| 460 | 59 | |
| 461 | - return AlDolUtils::dol_trunc($ret, $maxlen); |
|
| 462 | - } |
|
| 60 | + /** |
|
| 61 | + * @var mixed Contains data to manage extrafields |
|
| 62 | + */ |
|
| 63 | + public $array_options=array(); |
|
| 463 | 64 | |
| 464 | - /** |
|
| 465 | - * Return full address of contact |
|
| 466 | - * |
|
| 467 | - * @param int $withcountry 1=Add country into address string |
|
| 468 | - * @param string $sep Separator to use to build string |
|
| 469 | - * @param int $withregion 1=Add region into address string |
|
| 470 | - * @return string Full address string |
|
| 471 | - */ |
|
| 472 | - function getFullAddress($withcountry=0, $sep="\n", $withregion=0) |
|
| 473 | - {
|
|
| 474 | - if ($withcountry && $this->country_id && (empty($this->country_code) || empty($this->country))) |
|
| 475 | - {
|
|
| 476 | - require_once DOL_DOCUMENT_ROOT .'/core/lib/company.lib.php'; |
|
| 477 | - $tmparray=getCountry($this->country_id,'all'); |
|
| 478 | - $this->country_code=$tmparray['code']; |
|
| 479 | - $this->country =$tmparray['label']; |
|
| 480 | - } |
|
| 65 | + /** |
|
| 66 | + * @var int[][] Array of linked objects ids. Loaded by ->fetchObjectLinked |
|
| 67 | + */ |
|
| 68 | + public $linkedObjectsIds; |
|
| 481 | 69 | |
| 482 | - if ($withregion && $this->state_id && (empty($this->state_code) || empty($this->state) || empty($this->region) || empty($this->region_cpde))) |
|
| 483 | - {
|
|
| 484 | - require_once DOL_DOCUMENT_ROOT .'/core/lib/company.lib.php'; |
|
| 485 | - $tmparray=getState($this->state_id,'all',0,1); |
|
| 486 | - $this->state_code =$tmparray['code']; |
|
| 487 | - $this->state =$tmparray['label']; |
|
| 488 | - $this->region_code =$tmparray['region_code']; |
|
| 489 | - $this->region =$tmparray['region']; |
|
| 490 | - } |
|
| 491 | - |
|
| 492 | - return dol_format_address($this, $withcountry, $sep); |
|
| 493 | - } |
|
| 494 | - |
|
| 495 | - |
|
| 496 | - /** |
|
| 497 | - * Return full address for banner |
|
| 498 | - * |
|
| 499 | - * @param string $htmlkey HTML id to make banner content unique |
|
| 500 | - * @param Object $object Object (thirdparty, thirdparty of contact for contact, null for a member) |
|
| 501 | - * @return string Full address string |
|
| 502 | - */ |
|
| 503 | - function getBannerAddress($htmlkey, $object) |
|
| 504 | - {
|
|
| 505 | - global $conf, $langs; |
|
| 506 | - |
|
| 507 | - $countriesusingstate=array('AU','US','IN','GB','ES','UK','TR'); // See also option MAIN_FORCE_STATE_INTO_ADDRESS
|
|
| 508 | - |
|
| 509 | - $contactid=0; |
|
| 510 | - $thirdpartyid=0; |
|
| 511 | - if ($this->element == 'societe') |
|
| 512 | - {
|
|
| 513 | - $thirdpartyid=$this->id; |
|
| 514 | - } |
|
| 515 | - if ($this->element == 'contact') |
|
| 516 | - {
|
|
| 517 | - $contactid=$this->id; |
|
| 518 | - $thirdpartyid=$object->fk_soc; |
|
| 519 | - } |
|
| 520 | - if ($this->element == 'user') |
|
| 521 | - {
|
|
| 522 | - $contactid=$this->contact_id; |
|
| 523 | - $thirdpartyid=$object->fk_soc; |
|
| 524 | - } |
|
| 525 | - |
|
| 526 | - $out='<!-- BEGIN part to show address block -->'; |
|
| 527 | - |
|
| 528 | - $outdone=0; |
|
| 529 | - $coords = $this->getFullAddress(1, ', ', Globals::$conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT); |
|
| 530 | - if ($coords) |
|
| 531 | - {
|
|
| 532 | - if (!empty(Globals::$conf->use_javascript_ajax)) {
|
|
| 533 | - $namecoords = $this->getFullName($langs,1).'<br>'.$coords; |
|
| 534 | - // hideonsmatphone because copyToClipboard call jquery dialog that does not work with jmobile |
|
| 535 | - $out.='<a href="#" class="hideonsmartphone" onclick="return copyToClipboard(\''.dol_escape_js($namecoords).'\',\''.dol_escape_js($langs->trans("HelpCopyToClipboard")).'\');">';
|
|
| 536 | - $out.=img_picto($langs->trans("Address"), 'object_address.png');
|
|
| 537 | - $out.='</a> '; |
|
| 538 | - } |
|
| 539 | - $out.=dol_print_address($coords, 'address_'.$htmlkey.'_'.$this->id, $this->element, $this->id, 1, ', '); $outdone++; |
|
| 540 | - $outdone++; |
|
| 541 | - } |
|
| 542 | - |
|
| 543 | - if (!in_array($this->country_code, $countriesusingstate) && empty(Globals::$conf->global->MAIN_FORCE_STATE_INTO_ADDRESS) // If MAIN_FORCE_STATE_INTO_ADDRESS is on, state is already returned previously with getFullAddress |
|
| 544 | - && empty(Globals::$conf->global->SOCIETE_DISABLE_STATE) && $this->state) {
|
|
| 545 | - if (!empty(Globals::$conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT) && Globals::$conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT == 1 && $this->region) {
|
|
| 546 | - $out.=($outdone?' - ':'').$this->region.' - '.$this->state; |
|
| 547 | - } |
|
| 548 | - else {
|
|
| 549 | - $out.=($outdone?' - ':'').$this->state; |
|
| 550 | - } |
|
| 551 | - $outdone++; |
|
| 552 | - } |
|
| 553 | - |
|
| 554 | - if (! empty($this->phone) || ! empty($this->phone_pro) || ! empty($this->phone_mobile) || ! empty($this->phone_perso) || ! empty($this->fax) || ! empty($this->office_phone) || ! empty($this->user_mobile) || ! empty($this->office_fax)) $out.=($outdone?'<br>':''); |
|
| 555 | - if (! empty($this->phone) && empty($this->phone_pro)) { // For objects that store pro phone into ->phone
|
|
| 556 | - $out.=dol_print_phone($this->phone,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','phone',$langs->trans("PhonePro")); $outdone++;
|
|
| 557 | - } |
|
| 558 | - if (! empty($this->phone_pro)) {
|
|
| 559 | - $out.=dol_print_phone($this->phone_pro,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','phone',$langs->trans("PhonePro")); $outdone++;
|
|
| 560 | - } |
|
| 561 | - if (! empty($this->phone_mobile)) {
|
|
| 562 | - $out.=dol_print_phone($this->phone_mobile,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','mobile',$langs->trans("PhoneMobile")); $outdone++;
|
|
| 563 | - } |
|
| 564 | - if (! empty($this->phone_perso)) {
|
|
| 565 | - $out.=dol_print_phone($this->phone_perso,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','phone',$langs->trans("PhonePerso")); $outdone++;
|
|
| 566 | - } |
|
| 567 | - if (! empty($this->office_phone)) {
|
|
| 568 | - $out.=dol_print_phone($this->office_phone,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','phone',$langs->trans("PhonePro")); $outdone++;
|
|
| 569 | - } |
|
| 570 | - if (! empty($this->user_mobile)) {
|
|
| 571 | - $out.=dol_print_phone($this->user_mobile,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','mobile',$langs->trans("PhoneMobile")); $outdone++;
|
|
| 572 | - } |
|
| 573 | - if (! empty($this->fax)) {
|
|
| 574 | - $out.=dol_print_phone($this->fax,$this->country_code,$contactid,$thirdpartyid,'AC_FAX',' ','fax',$langs->trans("Fax")); $outdone++;
|
|
| 575 | - } |
|
| 576 | - if (! empty($this->office_fax)) {
|
|
| 577 | - $out.=dol_print_phone($this->office_fax,$this->country_code,$contactid,$thirdpartyid,'AC_FAX',' ','fax',$langs->trans("Fax")); $outdone++;
|
|
| 578 | - } |
|
| 579 | - |
|
| 580 | - $out.='<div style="clear: both;"></div>'; |
|
| 581 | - $outdone=0; |
|
| 582 | - if (! empty($this->email)) |
|
| 583 | - {
|
|
| 584 | - $out.=dol_print_email($this->email,$this->id,$object->id,'AC_EMAIL',0,0,1); |
|
| 585 | - $outdone++; |
|
| 586 | - } |
|
| 587 | - if (! empty($this->url)) |
|
| 588 | - {
|
|
| 589 | - $out.=dol_print_url($this->url,'_goout',0,1); |
|
| 590 | - $outdone++; |
|
| 591 | - } |
|
| 592 | - $out.='<div style="clear: both;">'; |
|
| 593 | - if (!empty(Globals::$conf->socialnetworks->enabled)) {
|
|
| 594 | - if ($this->skype) $out.=dol_print_socialnetworks($this->skype,$this->id,$object->id,'skype'); |
|
| 595 | - $outdone++; |
|
| 596 | - if ($this->jabberid) $out.=dol_print_socialnetworks($this->jabberid,$this->id,$object->id,'jabber'); |
|
| 597 | - $outdone++; |
|
| 598 | - if ($this->twitter) $out.=dol_print_socialnetworks($this->twitter,$this->id,$object->id,'twitter'); |
|
| 599 | - $outdone++; |
|
| 600 | - if ($this->facebook) $out.=dol_print_socialnetworks($this->facebook,$this->id,$object->id,'facebook'); |
|
| 601 | - $outdone++; |
|
| 602 | - } |
|
| 603 | - $out.='</div>'; |
|
| 604 | - |
|
| 605 | - $out.='<!-- END Part to show address block -->'; |
|
| 606 | - |
|
| 607 | - return $out; |
|
| 608 | - } |
|
| 609 | - |
|
| 610 | - /** |
|
| 611 | - * Return the link of last main doc file for direct public download. |
|
| 612 | - * |
|
| 613 | - * @param string $modulepart Module related to document |
|
| 614 | - * @param int $initsharekey Init the share key if it was not yet defined |
|
| 615 | - * @param int $relativelink 0=Return full external link, 1=Return link relative to root of file |
|
| 616 | - * @return string Link or empty string if there is no download link |
|
| 617 | - */ |
|
| 618 | - function getLastMainDocLink($modulepart, $initsharekey=0, $relativelink=0) |
|
| 619 | - {
|
|
| 620 | - global $user, $dolibarr_main_url_root; |
|
| 621 | - |
|
| 622 | - if (empty($this->last_main_doc)) |
|
| 623 | - {
|
|
| 624 | - return ''; // No way to known which document name to use |
|
| 625 | - } |
|
| 626 | - |
|
| 627 | - include_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmfiles.class.php'; |
|
| 628 | - $ecmfile=new EcmFiles($this->db); |
|
| 629 | - $result = $ecmfile->fetch(0, '', $this->last_main_doc); |
|
| 630 | - if ($result < 0) |
|
| 631 | - {
|
|
| 632 | - $this->error = $ecmfile->error; |
|
| 633 | - $this->errors = $ecmfile->errors; |
|
| 634 | - return -1; |
|
| 635 | - } |
|
| 636 | - |
|
| 637 | - if (empty($ecmfile->id)) |
|
| 638 | - {
|
|
| 639 | - // Add entry into index |
|
| 640 | - if ($initsharekey) |
|
| 641 | - {
|
|
| 642 | - require_once DOL_DOCUMENT_ROOT.'/core/lib/security2.lib.php'; |
|
| 643 | - // TODO We can't, we dont' have full path of file, only last_main_doc adn ->element, so we must rebuild full path first |
|
| 644 | - /* |
|
| 645 | - $ecmfile->filepath = $rel_dir; |
|
| 646 | - $ecmfile->filename = $filename; |
|
| 647 | - $ecmfile->label = md5_file(dol_osencode($destfull)); // hash of file content |
|
| 648 | - $ecmfile->fullpath_orig = ''; |
|
| 649 | - $ecmfile->gen_or_uploaded = 'generated'; |
|
| 650 | - $ecmfile->description = ''; // indexed content |
|
| 651 | - $ecmfile->keyword = ''; // keyword content |
|
| 652 | - $ecmfile->share = getRandomPassword(true); |
|
| 653 | - $result = $ecmfile->create($user); |
|
| 654 | - if ($result < 0) |
|
| 655 | - {
|
|
| 656 | - $this->error = $ecmfile->error; |
|
| 657 | - $this->errors = $ecmfile->errors; |
|
| 658 | - } |
|
| 659 | - */ |
|
| 660 | - } |
|
| 661 | - else return ''; |
|
| 662 | - } |
|
| 663 | - elseif (empty($ecmfile->share)) |
|
| 664 | - {
|
|
| 665 | - // Add entry into index |
|
| 666 | - if ($initsharekey) |
|
| 667 | - {
|
|
| 668 | - require_once DOL_DOCUMENT_ROOT.'/core/lib/security2.lib.php'; |
|
| 669 | - $ecmfile->share = getRandomPassword(true); |
|
| 670 | - $ecmfile->update($user); |
|
| 671 | - } |
|
| 672 | - else return ''; |
|
| 673 | - } |
|
| 674 | - |
|
| 675 | - // Define $urlwithroot |
|
| 676 | - $urlwithouturlroot=preg_replace('/'.preg_quote(DOL_URL_ROOT,'/').'$/i','',trim($dolibarr_main_url_root));
|
|
| 677 | - $urlwithroot=$urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file |
|
| 678 | - //$urlwithroot=DOL_MAIN_URL_ROOT; // This is to use same domain name than current |
|
| 679 | - |
|
| 680 | - $forcedownload=0; |
|
| 681 | - |
|
| 682 | - $paramlink=''; |
|
| 683 | - //if (! empty($modulepart)) $paramlink.=($paramlink?'&':'').'modulepart='.$modulepart; // For sharing with hash (so public files), modulepart is not required. |
|
| 684 | - //if (! empty($ecmfile->entity)) $paramlink.='&entity='.$ecmfile->entity; // For sharing with hash (so public files), entity is not required. |
|
| 685 | - //$paramlink.=($paramlink?'&':'').'file='.urlencode($filepath); // No need of name of file for public link, we will use the hash |
|
| 686 | - if (! empty($ecmfile->share)) $paramlink.=($paramlink?'&':'').'hashp='.$ecmfile->share; // Hash for public share |
|
| 687 | - if ($forcedownload) $paramlink.=($paramlink?'&':'').'attachment=1'; |
|
| 688 | - |
|
| 689 | - if ($relativelink) |
|
| 690 | - {
|
|
| 691 | - $linktoreturn='document.php'.($paramlink?'?'.$paramlink:''); |
|
| 692 | - } |
|
| 693 | - else |
|
| 694 | - {
|
|
| 695 | - $linktoreturn=$urlwithroot.'/document.php'.($paramlink?'?'.$paramlink:''); |
|
| 696 | - } |
|
| 697 | - |
|
| 698 | - // Here $ecmfile->share is defined |
|
| 699 | - return $linktoreturn; |
|
| 700 | - } |
|
| 70 | + /** |
|
| 71 | + * @var mixed Array of linked objects. Loaded by ->fetchObjectLinked |
|
| 72 | + */ |
|
| 73 | + public $linkedObjects; |
|
| 701 | 74 | |
| 75 | + /** |
|
| 76 | + * @var Object To store a cloned copy of object before to edit it and keep track of old properties |
|
| 77 | + */ |
|
| 78 | + public $oldcopy; |
|
| 702 | 79 | |
| 703 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 704 | - /** |
|
| 705 | - * Add a link between element $this->element and a contact |
|
| 706 | - * |
|
| 707 | - * @param int $fk_socpeople Id of thirdparty contact (if source = 'external') or id of user (if souce = 'internal') to link |
|
| 708 | - * @param int $type_contact Type of contact (code or id). Must be id or code found into table llx_c_type_contact. For example: SALESREPFOLL |
|
| 709 | - * @param string $source external=Contact extern (llx_socpeople), internal=Contact intern (llx_user) |
|
| 710 | - * @param int $notrigger Disable all triggers |
|
| 711 | - * @return int <0 if KO, >0 if OK |
|
| 712 | - */ |
|
| 713 | - function add_contact($fk_socpeople, $type_contact, $source='external',$notrigger=0) |
|
| 714 | - {
|
|
| 715 | - // phpcs:enable |
|
| 716 | - global $user,$langs; |
|
| 717 | - |
|
| 718 | - |
|
| 719 | - dol_syslog(get_class($this)."::add_contact $fk_socpeople, $type_contact, $source, $notrigger"); |
|
| 720 | - |
|
| 721 | - // Check parameters |
|
| 722 | - if ($fk_socpeople <= 0) |
|
| 723 | - {
|
|
| 724 | - $langs->load("errors");
|
|
| 725 | - $this->error=$langs->trans("ErrorWrongValueForParameterX","1");
|
|
| 726 | - dol_syslog(get_class($this)."::add_contact ".$this->error,LOG_ERR); |
|
| 727 | - return -1; |
|
| 728 | - } |
|
| 729 | - if (! $type_contact) |
|
| 730 | - {
|
|
| 731 | - $langs->load("errors");
|
|
| 732 | - $this->error=$langs->trans("ErrorWrongValueForParameterX","2");
|
|
| 733 | - dol_syslog(get_class($this)."::add_contact ".$this->error,LOG_ERR); |
|
| 734 | - return -2; |
|
| 735 | - } |
|
| 736 | - |
|
| 737 | - $id_type_contact=0; |
|
| 738 | - if (is_numeric($type_contact)) |
|
| 739 | - {
|
|
| 740 | - $id_type_contact=$type_contact; |
|
| 741 | - } |
|
| 742 | - else |
|
| 743 | - {
|
|
| 744 | - // We look for id type_contact |
|
| 745 | - $sql = "SELECT tc.rowid"; |
|
| 746 | - $sql.= " FROM ".MAIN_DB_PREFIX."c_type_contact as tc"; |
|
| 747 | - $sql.= " WHERE tc.element='".$this->db->escape($this->element)."'"; |
|
| 748 | - $sql.= " AND tc.source='".$this->db->escape($source)."'"; |
|
| 749 | - $sql.= " AND tc.code='".$this->db->escape($type_contact)."' AND tc.active=1"; |
|
| 750 | - //print $sql; |
|
| 751 | - $resql=$this->db->query($sql); |
|
| 752 | - if ($resql) |
|
| 753 | - {
|
|
| 754 | - $obj = $this->db->fetch_object($resql); |
|
| 755 | - if ($obj) $id_type_contact=$obj->rowid; |
|
| 756 | - } |
|
| 757 | - } |
|
| 758 | - |
|
| 759 | - if ($id_type_contact == 0) |
|
| 760 | - {
|
|
| 761 | - $this->error='CODE_NOT_VALID_FOR_THIS_ELEMENT'; |
|
| 762 | - dol_syslog("CODE_NOT_VALID_FOR_THIS_ELEMENT: Code type of contact '".$type_contact."' does not exists or is not active for element ".$this->element.", we can ignore it");
|
|
| 763 | - return -3; |
|
| 764 | - } |
|
| 765 | - |
|
| 766 | - $datecreate = dol_now(); |
|
| 767 | - |
|
| 768 | - // Socpeople must have already been added by some trigger, then we have to check it to avoid DB_ERROR_RECORD_ALREADY_EXISTS error |
|
| 769 | - $TListeContacts=$this->liste_contact(-1, $source); |
|
| 770 | - $already_added=false; |
|
| 771 | - if(!empty($TListeContacts)) {
|
|
| 772 | - foreach($TListeContacts as $array_contact) {
|
|
| 773 | - if($array_contact['status'] == 4 && $array_contact['id'] == $fk_socpeople && $array_contact['fk_c_type_contact'] == $id_type_contact) {
|
|
| 774 | - $already_added=true; |
|
| 775 | - break; |
|
| 776 | - } |
|
| 777 | - } |
|
| 778 | - } |
|
| 80 | + /** |
|
| 81 | + * @var string Column name of the ref field. |
|
| 82 | + */ |
|
| 83 | + protected $table_ref_field = ''; |
|
| 779 | 84 | |
| 780 | - if(!$already_added) {
|
|
| 781 | 85 | |
| 782 | - $this->db->begin(); |
|
| 783 | 86 | |
| 784 | - // Insert into database |
|
| 785 | - $sql = "INSERT INTO ".MAIN_DB_PREFIX."element_contact"; |
|
| 786 | - $sql.= " (element_id, fk_socpeople, datecreate, statut, fk_c_type_contact) "; |
|
| 787 | - $sql.= " VALUES (".$this->id.", ".$fk_socpeople." , " ;
|
|
| 788 | - $sql.= "'".$this->db->idate($datecreate)."'"; |
|
| 789 | - $sql.= ", 4, ". $id_type_contact; |
|
| 790 | - $sql.= ")"; |
|
| 87 | + // Following vars are used by some objects only. We keep this property here in CommonObject to be able to provide common method using them. |
|
| 791 | 88 | |
| 792 | - $resql=$this->db->query($sql); |
|
| 793 | - if ($resql) |
|
| 794 | - {
|
|
| 795 | - if (! $notrigger) |
|
| 796 | - {
|
|
| 797 | - $result=$this->call_trigger(strtoupper($this->element).'_ADD_CONTACT', $user); |
|
| 798 | - if ($result < 0) |
|
| 799 | - {
|
|
| 800 | - $this->db->rollback(); |
|
| 801 | - return -1; |
|
| 802 | - } |
|
| 803 | - } |
|
| 89 | + /** |
|
| 90 | + * @var array<string,mixed> Can be used to pass information when only object is provided to method |
|
| 91 | + */ |
|
| 92 | + public $context=array(); |
|
| 804 | 93 | |
| 805 | - $this->db->commit(); |
|
| 806 | - return 1; |
|
| 807 | - } |
|
| 808 | - else |
|
| 809 | - {
|
|
| 810 | - if ($this->db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') |
|
| 811 | - {
|
|
| 812 | - $this->error=$this->db->errno(); |
|
| 813 | - $this->db->rollback(); |
|
| 814 | - echo 'err rollback'; |
|
| 815 | - return -2; |
|
| 816 | - } |
|
| 817 | - else |
|
| 818 | - {
|
|
| 819 | - $this->error=$this->db->error(); |
|
| 820 | - $this->db->rollback(); |
|
| 821 | - return -1; |
|
| 822 | - } |
|
| 823 | - } |
|
| 824 | - } else return 0; |
|
| 825 | - } |
|
| 94 | + /** |
|
| 95 | + * @var string Contains canvas name if record is an alternative canvas record |
|
| 96 | + */ |
|
| 97 | + public $canvas; |
|
| 826 | 98 | |
| 827 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 828 | - /** |
|
| 829 | - * Copy contact from one element to current |
|
| 830 | - * |
|
| 831 | - * @param CommonObject $objFrom Source element |
|
| 832 | - * @param string $source Nature of contact ('internal' or 'external')
|
|
| 833 | - * @return int >0 if OK, <0 if KO |
|
| 834 | - */ |
|
| 835 | - function copy_linked_contact($objFrom, $source='internal') |
|
| 836 | - {
|
|
| 837 | - // phpcs:enable |
|
| 838 | - $contacts = $objFrom->liste_contact(-1, $source); |
|
| 839 | - foreach($contacts as $contact) |
|
| 840 | - {
|
|
| 841 | - if ($this->add_contact($contact['id'], $contact['fk_c_type_contact'], $contact['source']) < 0) |
|
| 842 | - {
|
|
| 843 | - $this->error=$this->db->lasterror(); |
|
| 844 | - return -1; |
|
| 845 | - } |
|
| 846 | - } |
|
| 847 | - return 1; |
|
| 848 | - } |
|
| 99 | + /** |
|
| 100 | + * @var Project The related project |
|
| 101 | + * @see fetch_projet() |
|
| 102 | + */ |
|
| 103 | + public $project; |
|
| 849 | 104 | |
| 850 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 851 | - /** |
|
| 852 | - * Update a link to contact line |
|
| 853 | - * |
|
| 854 | - * @param int $rowid Id of line contact-element |
|
| 855 | - * @param int $statut New status of link |
|
| 856 | - * @param int $type_contact_id Id of contact type (not modified if 0) |
|
| 857 | - * @param int $fk_socpeople Id of soc_people to update (not modified if 0) |
|
| 858 | - * @return int <0 if KO, >= 0 if OK |
|
| 859 | - */ |
|
| 860 | - function update_contact($rowid, $statut, $type_contact_id=0, $fk_socpeople=0) |
|
| 861 | - {
|
|
| 862 | - // phpcs:enable |
|
| 863 | - // Insert into database |
|
| 864 | - $sql = "UPDATE ".MAIN_DB_PREFIX."element_contact set"; |
|
| 865 | - $sql.= " statut = ".$statut; |
|
| 866 | - if ($type_contact_id) $sql.= ", fk_c_type_contact = '".$type_contact_id ."'"; |
|
| 867 | - if ($fk_socpeople) $sql.= ", fk_socpeople = '".$fk_socpeople ."'"; |
|
| 868 | - $sql.= " where rowid = ".$rowid; |
|
| 869 | - $resql=$this->db->query($sql); |
|
| 870 | - if ($resql) |
|
| 871 | - {
|
|
| 872 | - return 0; |
|
| 873 | - } |
|
| 874 | - else |
|
| 875 | - {
|
|
| 876 | - $this->error=$this->db->lasterror(); |
|
| 877 | - return -1; |
|
| 878 | - } |
|
| 879 | - } |
|
| 105 | + /** |
|
| 106 | + * @var int The related project ID |
|
| 107 | + * @see setProject(), project |
|
| 108 | + */ |
|
| 109 | + public $fk_project; |
|
| 880 | 110 | |
| 881 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 882 | - /** |
|
| 883 | - * Delete a link to contact line |
|
| 884 | - * |
|
| 885 | - * @param int $rowid Id of contact link line to delete |
|
| 886 | - * @param int $notrigger Disable all triggers |
|
| 887 | - * @return int >0 if OK, <0 if KO |
|
| 888 | - */ |
|
| 889 | - function delete_contact($rowid, $notrigger=0) |
|
| 890 | - {
|
|
| 891 | - // phpcs:enable |
|
| 892 | - global $user; |
|
| 111 | + /** |
|
| 112 | + * @deprecated |
|
| 113 | + * @see project |
|
| 114 | + */ |
|
| 115 | + public $projet; |
|
| 893 | 116 | |
| 117 | + /** |
|
| 118 | + * @var Contact a related contact |
|
| 119 | + * @see fetch_contact() |
|
| 120 | + */ |
|
| 121 | + public $contact; |
|
| 894 | 122 | |
| 895 | - $this->db->begin(); |
|
| 123 | + /** |
|
| 124 | + * @var int The related contact ID |
|
| 125 | + * @see fetch_contact() |
|
| 126 | + */ |
|
| 127 | + public $contact_id; |
|
| 896 | 128 | |
| 897 | - $sql = "DELETE FROM ".MAIN_DB_PREFIX."element_contact"; |
|
| 898 | - $sql.= " WHERE rowid =".$rowid; |
|
| 129 | + /** |
|
| 130 | + * @var Societe A related thirdparty |
|
| 131 | + * @see fetch_thirdparty() |
|
| 132 | + */ |
|
| 133 | + public $thirdparty; |
|
| 899 | 134 | |
| 900 | - dol_syslog(get_class($this)."::delete_contact", LOG_DEBUG); |
|
| 901 | - if ($this->db->query($sql)) |
|
| 902 | - {
|
|
| 903 | - if (! $notrigger) |
|
| 904 | - {
|
|
| 905 | - $result=$this->call_trigger(strtoupper($this->element).'_DELETE_CONTACT', $user); |
|
| 906 | - if ($result < 0) { $this->db->rollback(); return -1; }
|
|
| 907 | - } |
|
| 908 | - |
|
| 909 | - $this->db->commit(); |
|
| 910 | - return 1; |
|
| 911 | - } |
|
| 912 | - else |
|
| 913 | - {
|
|
| 914 | - $this->error=$this->db->lasterror(); |
|
| 915 | - $this->db->rollback(); |
|
| 916 | - return -1; |
|
| 917 | - } |
|
| 918 | - } |
|
| 135 | + /** |
|
| 136 | + * @var User A related user |
|
| 137 | + * @see fetch_user() |
|
| 138 | + */ |
|
| 139 | + public $user; |
|
| 919 | 140 | |
| 920 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 921 | - /** |
|
| 922 | - * Delete all links between an object $this and all its contacts |
|
| 923 | - * |
|
| 924 | - * @param string $source '' or 'internal' or 'external' |
|
| 925 | - * @param string $code Type of contact (code or id) |
|
| 926 | - * @return int >0 if OK, <0 if KO |
|
| 927 | - */ |
|
| 928 | - function delete_linked_contact($source='',$code='') |
|
| 929 | - {
|
|
| 930 | - // phpcs:enable |
|
| 931 | - $temp = array(); |
|
| 932 | - $typeContact = $this->liste_type_contact($source,'',0,0,$code); |
|
| 933 | - |
|
| 934 | - foreach($typeContact as $key => $value) |
|
| 935 | - {
|
|
| 936 | - array_push($temp,$key); |
|
| 937 | - } |
|
| 938 | - $listId = implode(",", $temp);
|
|
| 939 | - |
|
| 940 | - $sql = "DELETE FROM ".MAIN_DB_PREFIX."element_contact"; |
|
| 941 | - $sql.= " WHERE element_id = ".$this->id; |
|
| 942 | - if ($listId) |
|
| 943 | - $sql.= " AND fk_c_type_contact IN (".$listId.")";
|
|
| 944 | - |
|
| 945 | - dol_syslog(get_class($this)."::delete_linked_contact", LOG_DEBUG); |
|
| 946 | - if ($this->db->query($sql)) |
|
| 947 | - {
|
|
| 948 | - return 1; |
|
| 949 | - } |
|
| 950 | - else |
|
| 951 | - {
|
|
| 952 | - $this->error=$this->db->lasterror(); |
|
| 953 | - return -1; |
|
| 954 | - } |
|
| 955 | - } |
|
| 141 | + /** |
|
| 142 | + * @var string The type of originating object ('commande', 'facture', ...)
|
|
| 143 | + * @see fetch_origin() |
|
| 144 | + */ |
|
| 145 | + public $origin; |
|
| 956 | 146 | |
| 957 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 958 | - /** |
|
| 959 | - * Get array of all contacts for an object |
|
| 960 | - * |
|
| 961 | - * @param int $statut Status of links to get (-1=all) |
|
| 962 | - * @param string $source Source of contact: external or thirdparty (llx_socpeople) or internal (llx_user) |
|
| 963 | - * @param int $list 0:Return array contains all properties, 1:Return array contains just id |
|
| 964 | - * @param string $code Filter on this code of contact type ('SHIPPING', 'BILLING', ...)
|
|
| 965 | - * @return array|int Array of contacts, -1 if error |
|
| 966 | - */ |
|
| 967 | - function liste_contact($statut=-1,$source='external',$list=0,$code='') |
|
| 968 | - {
|
|
| 969 | - // phpcs:enable |
|
| 970 | - global $langs; |
|
| 971 | - |
|
| 972 | - $tab=array(); |
|
| 973 | - |
|
| 974 | - $sql = "SELECT ec.rowid, ec.statut as statuslink, ec.fk_socpeople as id, ec.fk_c_type_contact"; // This field contains id of llx_socpeople or id of llx_user |
|
| 975 | - if ($source == 'internal') $sql.=", '-1' as socid, t.statut as statuscontact, t.login, t.photo"; |
|
| 976 | - if ($source == 'external' || $source == 'thirdparty') $sql.=", t.fk_soc as socid, t.statut as statuscontact"; |
|
| 977 | - $sql.= ", t.civility as civility, t.lastname as lastname, t.firstname, t.email"; |
|
| 978 | - $sql.= ", tc.source, tc.element, tc.code, tc.libelle"; |
|
| 979 | - $sql.= " FROM ".MAIN_DB_PREFIX."c_type_contact tc"; |
|
| 980 | - $sql.= ", ".MAIN_DB_PREFIX."element_contact ec"; |
|
| 981 | - if ($source == 'internal') $sql.=" LEFT JOIN ".MAIN_DB_PREFIX."user t on ec.fk_socpeople = t.rowid"; |
|
| 982 | - if ($source == 'external'|| $source == 'thirdparty') $sql.=" LEFT JOIN ".MAIN_DB_PREFIX."socpeople t on ec.fk_socpeople = t.rowid"; |
|
| 983 | - $sql.= " WHERE ec.element_id =".$this->id; |
|
| 984 | - $sql.= " AND ec.fk_c_type_contact=tc.rowid"; |
|
| 985 | - $sql.= " AND tc.element='".$this->db->escape($this->element)."'"; |
|
| 986 | - if ($code) $sql.= " AND tc.code = '".$this->db->escape($code)."'"; |
|
| 987 | - if ($source == 'internal') $sql.= " AND tc.source = 'internal'"; |
|
| 988 | - if ($source == 'external' || $source == 'thirdparty') $sql.= " AND tc.source = 'external'"; |
|
| 989 | - $sql.= " AND tc.active=1"; |
|
| 990 | - if ($statut >= 0) $sql.= " AND ec.statut = '".$statut."'"; |
|
| 991 | - $sql.=" ORDER BY t.lastname ASC"; |
|
| 992 | - |
|
| 993 | - dol_syslog(get_class($this)."::liste_contact", LOG_DEBUG); |
|
| 994 | - $resql=$this->db->query($sql); |
|
| 995 | - if ($resql) |
|
| 996 | - {
|
|
| 997 | - $num=$this->db->num_rows($resql); |
|
| 998 | - $i=0; |
|
| 999 | - while ($i < $num) |
|
| 1000 | - {
|
|
| 1001 | - $obj = $this->db->fetch_object($resql); |
|
| 147 | + /** |
|
| 148 | + * @var int The id of originating object |
|
| 149 | + * @see fetch_origin() |
|
| 150 | + */ |
|
| 151 | + public $origin_id; |
|
| 1002 | 152 | |
| 1003 | - if (! $list) |
|
| 1004 | - {
|
|
| 1005 | - $transkey="TypeContact_".$obj->element."_".$obj->source."_".$obj->code; |
|
| 1006 | - $libelle_type=($langs->trans($transkey)!=$transkey ? $langs->trans($transkey) : $obj->libelle); |
|
| 1007 | - $tab[$i]=array('source'=>$obj->source,'socid'=>$obj->socid,'id'=>$obj->id,
|
|
| 1008 | - 'nom'=>$obj->lastname, // For backward compatibility |
|
| 1009 | - 'civility'=>$obj->civility, 'lastname'=>$obj->lastname, 'firstname'=>$obj->firstname, 'email'=>$obj->email, 'login'=>$obj->login, 'photo'=>$obj->photo, 'statuscontact'=>$obj->statuscontact, |
|
| 1010 | - 'rowid'=>$obj->rowid, 'code'=>$obj->code, 'libelle'=>$libelle_type, 'status'=>$obj->statuslink, 'fk_c_type_contact'=>$obj->fk_c_type_contact); |
|
| 1011 | - } |
|
| 1012 | - else |
|
| 1013 | - {
|
|
| 1014 | - $tab[$i]=$obj->id; |
|
| 1015 | - } |
|
| 153 | + /** |
|
| 154 | + * @var string The object's reference |
|
| 155 | + */ |
|
| 156 | + public $ref; |
|
| 1016 | 157 | |
| 1017 | - $i++; |
|
| 1018 | - } |
|
| 1019 | - |
|
| 1020 | - return $tab; |
|
| 1021 | - } |
|
| 1022 | - else |
|
| 1023 | - {
|
|
| 1024 | - $this->error=$this->db->lasterror(); |
|
| 1025 | - dol_print_error($this->db); |
|
| 1026 | - return -1; |
|
| 1027 | - } |
|
| 1028 | - } |
|
| 1029 | - |
|
| 1030 | - |
|
| 1031 | - /** |
|
| 1032 | - * Update status of a contact linked to object |
|
| 1033 | - * |
|
| 1034 | - * @param int $rowid Id of link between object and contact |
|
| 1035 | - * @return int <0 if KO, >=0 if OK |
|
| 1036 | - */ |
|
| 1037 | - function swapContactStatus($rowid) |
|
| 1038 | - {
|
|
| 1039 | - $sql = "SELECT ec.datecreate, ec.statut, ec.fk_socpeople, ec.fk_c_type_contact,"; |
|
| 1040 | - $sql.= " tc.code, tc.libelle"; |
|
| 1041 | - //$sql.= ", s.fk_soc"; |
|
| 1042 | - $sql.= " FROM (".MAIN_DB_PREFIX."element_contact as ec, ".MAIN_DB_PREFIX."c_type_contact as tc)";
|
|
| 1043 | - //$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."socpeople as s ON ec.fk_socpeople=s.rowid"; // Si contact de type external, alors il est lie a une societe |
|
| 1044 | - $sql.= " WHERE ec.rowid =".$rowid; |
|
| 1045 | - $sql.= " AND ec.fk_c_type_contact=tc.rowid"; |
|
| 1046 | - $sql.= " AND tc.element = '".$this->db->escape($this->element)."'"; |
|
| 1047 | - |
|
| 1048 | - dol_syslog(get_class($this)."::swapContactStatus", LOG_DEBUG); |
|
| 1049 | - $resql=$this->db->query($sql); |
|
| 1050 | - if ($resql) |
|
| 1051 | - {
|
|
| 1052 | - $obj = $this->db->fetch_object($resql); |
|
| 1053 | - $newstatut = ($obj->statut == 4) ? 5 : 4; |
|
| 1054 | - $result = $this->update_contact($rowid, $newstatut); |
|
| 1055 | - $this->db->free($resql); |
|
| 1056 | - return $result; |
|
| 1057 | - } |
|
| 1058 | - else |
|
| 1059 | - {
|
|
| 1060 | - $this->error=$this->db->error(); |
|
| 1061 | - dol_print_error($this->db); |
|
| 1062 | - return -1; |
|
| 1063 | - } |
|
| 1064 | - } |
|
| 158 | + /** |
|
| 159 | + * @var string The object's previous reference |
|
| 160 | + */ |
|
| 161 | + public $ref_previous; |
|
| 1065 | 162 | |
| 1066 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1067 | - /** |
|
| 1068 | - * Return array with list of possible values for type of contacts |
|
| 1069 | - * |
|
| 1070 | - * @param string $source 'internal', 'external' or 'all' |
|
| 1071 | - * @param string $order Sort order by : 'position', 'code', 'rowid'... |
|
| 1072 | - * @param int $option 0=Return array id->label, 1=Return array code->label |
|
| 1073 | - * @param int $activeonly 0=all status of contact, 1=only the active |
|
| 1074 | - * @param string $code Type of contact (Example: 'CUSTOMER', 'SERVICE') |
|
| 1075 | - * @return array Array list of type of contacts (id->label if option=0, code->label if option=1) |
|
| 1076 | - */ |
|
| 1077 | - function liste_type_contact($source='internal', $order='position', $option=0, $activeonly=0, $code='') |
|
| 1078 | - {
|
|
| 1079 | - // phpcs:enable |
|
| 1080 | - global $langs; |
|
| 1081 | - |
|
| 1082 | - if (empty($order)) $order='position'; |
|
| 1083 | - if ($order == 'position') $order.=',code'; |
|
| 1084 | - |
|
| 1085 | - $tab = array(); |
|
| 1086 | - $sql = "SELECT DISTINCT tc.rowid, tc.code, tc.libelle, tc.position"; |
|
| 1087 | - $sql.= " FROM ".MAIN_DB_PREFIX."c_type_contact as tc"; |
|
| 1088 | - $sql.= " WHERE tc.element='".$this->db->escape($this->element)."'"; |
|
| 1089 | - if ($activeonly == 1) $sql.= " AND tc.active=1"; // only the active types |
|
| 1090 | - if (! empty($source) && $source != 'all') $sql.= " AND tc.source='".$this->db->escape($source)."'"; |
|
| 1091 | - if (! empty($code)) $sql.= " AND tc.code='".$this->db->escape($code)."'"; |
|
| 1092 | - $sql.= $this->db->order($order,'ASC'); |
|
| 1093 | - |
|
| 1094 | - //print "sql=".$sql; |
|
| 1095 | - $resql=$this->db->query($sql); |
|
| 1096 | - if ($resql) |
|
| 1097 | - {
|
|
| 1098 | - $num=$this->db->num_rows($resql); |
|
| 1099 | - $i=0; |
|
| 1100 | - while ($i < $num) |
|
| 1101 | - {
|
|
| 1102 | - $obj = $this->db->fetch_object($resql); |
|
| 1103 | - |
|
| 1104 | - $transkey="TypeContact_".$this->element."_".$source."_".$obj->code; |
|
| 1105 | - $libelle_type=($langs->trans($transkey)!=$transkey ? $langs->trans($transkey) : $obj->libelle); |
|
| 1106 | - if (empty($option)) $tab[$obj->rowid]=$libelle_type; |
|
| 1107 | - else $tab[$obj->code]=$libelle_type; |
|
| 1108 | - $i++; |
|
| 1109 | - } |
|
| 1110 | - return $tab; |
|
| 1111 | - } |
|
| 1112 | - else |
|
| 1113 | - {
|
|
| 1114 | - $this->error=$this->db->lasterror(); |
|
| 1115 | - //dol_print_error($this->db); |
|
| 1116 | - return null; |
|
| 1117 | - } |
|
| 1118 | - } |
|
| 1119 | - |
|
| 1120 | - /** |
|
| 1121 | - * Return id of contacts for a source and a contact code. |
|
| 1122 | - * Example: contact client de facturation ('external', 'BILLING')
|
|
| 1123 | - * Example: contact client de livraison ('external', 'SHIPPING')
|
|
| 1124 | - * Example: contact interne suivi paiement ('internal', 'SALESREPFOLL')
|
|
| 1125 | - * |
|
| 1126 | - * @param string $source 'external' or 'internal' |
|
| 1127 | - * @param string $code 'BILLING', 'SHIPPING', 'SALESREPFOLL', ... |
|
| 1128 | - * @param int $status limited to a certain status |
|
| 1129 | - * @return array List of id for such contacts |
|
| 1130 | - */ |
|
| 1131 | - function getIdContact($source,$code,$status=0) |
|
| 1132 | - {
|
|
| 1133 | - global $conf; |
|
| 1134 | - |
|
| 1135 | - $result=array(); |
|
| 1136 | - $i=0; |
|
| 1137 | - //cas particulier pour les expeditions |
|
| 1138 | - if($this->element=='shipping' && $this->origin_id != 0) {
|
|
| 1139 | - $id=$this->origin_id; |
|
| 1140 | - $element='commande'; |
|
| 1141 | - } else if($this->element=='reception' && $this->origin_id != 0) {
|
|
| 1142 | - $id=$this->origin_id; |
|
| 1143 | - $element='order_supplier'; |
|
| 1144 | - } else {
|
|
| 1145 | - $id=$this->id; |
|
| 1146 | - $element=$this->element; |
|
| 1147 | - } |
|
| 1148 | - |
|
| 1149 | - $sql = "SELECT ec.fk_socpeople"; |
|
| 1150 | - $sql.= " FROM ".MAIN_DB_PREFIX."element_contact as ec,"; |
|
| 1151 | - if ($source == 'internal') $sql.= " ".MAIN_DB_PREFIX."user as c,"; |
|
| 1152 | - if ($source == 'external') $sql.= " ".MAIN_DB_PREFIX."socpeople as c,"; |
|
| 1153 | - $sql.= " ".MAIN_DB_PREFIX."c_type_contact as tc"; |
|
| 1154 | - $sql.= " WHERE ec.element_id = ".$id; |
|
| 1155 | - $sql.= " AND ec.fk_socpeople = c.rowid"; |
|
| 1156 | - if ($source == 'internal') $sql.= " AND c.entity IN (".getEntity('user').")";
|
|
| 1157 | - if ($source == 'external') $sql.= " AND c.entity IN (".getEntity('societe').")";
|
|
| 1158 | - $sql.= " AND ec.fk_c_type_contact = tc.rowid"; |
|
| 1159 | - $sql.= " AND tc.element = '".$element."'"; |
|
| 1160 | - $sql.= " AND tc.source = '".$source."'"; |
|
| 1161 | - $sql.= " AND tc.code = '".$code."'"; |
|
| 1162 | - $sql.= " AND tc.active = 1"; |
|
| 1163 | - if ($status) $sql.= " AND ec.statut = ".$status; |
|
| 1164 | - |
|
| 1165 | - dol_syslog(get_class($this)."::getIdContact", LOG_DEBUG); |
|
| 1166 | - $resql=$this->db->query($sql); |
|
| 1167 | - if ($resql) |
|
| 1168 | - {
|
|
| 1169 | - while ($obj = $this->db->fetch_object($resql)) |
|
| 1170 | - {
|
|
| 1171 | - $result[$i]=$obj->fk_socpeople; |
|
| 1172 | - $i++; |
|
| 1173 | - } |
|
| 1174 | - } |
|
| 1175 | - else |
|
| 1176 | - {
|
|
| 1177 | - $this->error=$this->db->error(); |
|
| 1178 | - return null; |
|
| 1179 | - } |
|
| 1180 | - |
|
| 1181 | - return $result; |
|
| 1182 | - } |
|
| 163 | + /** |
|
| 164 | + * @var string The object's next reference |
|
| 165 | + */ |
|
| 166 | + public $ref_next; |
|
| 1183 | 167 | |
| 1184 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1185 | - /** |
|
| 1186 | - * Load object contact with id=$this->contactid into $this->contact |
|
| 1187 | - * |
|
| 1188 | - * @param int $contactid Id du contact. Use this->contactid if empty. |
|
| 1189 | - * @return int <0 if KO, >0 if OK |
|
| 1190 | - */ |
|
| 1191 | - function fetch_contact($contactid=null) |
|
| 1192 | - {
|
|
| 1193 | - // phpcs:enable |
|
| 1194 | - if (empty($contactid)) $contactid=$this->contactid; |
|
| 168 | + /** |
|
| 169 | + * @var string An external reference for the object |
|
| 170 | + */ |
|
| 171 | + public $ref_ext; |
|
| 1195 | 172 | |
| 1196 | - if (empty($contactid)) return 0; |
|
| 173 | + /** |
|
| 174 | + * @var int The object's status |
|
| 175 | + * @see setStatut() |
|
| 176 | + */ |
|
| 177 | + public $statut; |
|
| 1197 | 178 | |
| 1198 | - require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php'; |
|
| 1199 | - $contact = new Contact($this->db); |
|
| 1200 | - $result=$contact->fetch($contactid); |
|
| 1201 | - $this->contact = $contact; |
|
| 1202 | - return $result; |
|
| 1203 | - } |
|
| 179 | + /** |
|
| 180 | + * @var string |
|
| 181 | + * @see getFullAddress() |
|
| 182 | + */ |
|
| 183 | + public $country; |
|
| 1204 | 184 | |
| 1205 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1206 | - /** |
|
| 1207 | - * Load the third party of object, from id $this->socid or $this->fk_soc, into this->thirdparty |
|
| 1208 | - * |
|
| 1209 | - * @param int $force_thirdparty_id Force thirdparty id |
|
| 1210 | - * @return int <0 if KO, >0 if OK |
|
| 1211 | - */ |
|
| 1212 | - function fetch_thirdparty($force_thirdparty_id=0) |
|
| 1213 | - {
|
|
| 1214 | - // phpcs:enable |
|
| 1215 | - global $conf; |
|
| 185 | + /** |
|
| 186 | + * @var int |
|
| 187 | + * @see getFullAddress(), country |
|
| 188 | + */ |
|
| 189 | + public $country_id; |
|
| 1216 | 190 | |
| 1217 | - if (empty($this->socid) && empty($this->fk_soc) && empty($this->fk_thirdparty) && empty($force_thirdparty_id)) |
|
| 1218 | - return 0; |
|
| 191 | + /** |
|
| 192 | + * @var string |
|
| 193 | + * @see getFullAddress(), isInEEC(), country |
|
| 194 | + */ |
|
| 195 | + public $country_code; |
|
| 1219 | 196 | |
| 1220 | - require_once DOL_DOCUMENT_ROOT . '/societe/class/societe.class.php'; |
|
| 197 | + /** |
|
| 198 | + * @var string |
|
| 199 | + * @see getFullAddress() |
|
| 200 | + */ |
|
| 201 | + public $state; |
|
| 1221 | 202 | |
| 1222 | - $idtofetch = isset($this->socid) ? $this->socid : (isset($this->fk_soc) ? $this->fk_soc : $this->fk_thirdparty); |
|
| 1223 | - if ($force_thirdparty_id) |
|
| 1224 | - $idtofetch = $force_thirdparty_id; |
|
| 203 | + /** |
|
| 204 | + * @var int |
|
| 205 | + * @see getFullAddress(), state |
|
| 206 | + */ |
|
| 207 | + public $state_id; |
|
| 1225 | 208 | |
| 1226 | - if ($idtofetch) {
|
|
| 1227 | - $thirdparty = new Societe($this->db); |
|
| 1228 | - $result = $thirdparty->fetch($idtofetch); |
|
| 1229 | - $this->thirdparty = $thirdparty; |
|
| 209 | + /** |
|
| 210 | + * @var string |
|
| 211 | + * @see getFullAddress(), state |
|
| 212 | + */ |
|
| 213 | + public $state_code; |
|
| 1230 | 214 | |
| 1231 | - // Use first price level if level not defined for third party |
|
| 1232 | - if (!empty(Globals::$conf->global->PRODUIT_MULTIPRICES) && empty($this->thirdparty->price_level)) {
|
|
| 1233 | - $this->thirdparty->price_level = 1; |
|
| 1234 | - } |
|
| 215 | + /** |
|
| 216 | + * @var string |
|
| 217 | + * @see getFullAddress(), region |
|
| 218 | + */ |
|
| 219 | + public $region; |
|
| 1235 | 220 | |
| 1236 | - return $result; |
|
| 1237 | - } else |
|
| 1238 | - return -1; |
|
| 1239 | - } |
|
| 221 | + /** |
|
| 222 | + * @var string |
|
| 223 | + * @see getFullAddress(), region |
|
| 224 | + */ |
|
| 225 | + public $region_code; |
|
| 1240 | 226 | |
| 227 | + /** |
|
| 228 | + * @var int |
|
| 229 | + * @see fetch_barcode() |
|
| 230 | + */ |
|
| 231 | + public $barcode_type; |
|
| 1241 | 232 | |
| 1242 | - /** |
|
| 1243 | - * Looks for an object with ref matching the wildcard provided |
|
| 1244 | - * It does only work when $this->table_ref_field is set |
|
| 1245 | - * |
|
| 1246 | - * @param string $ref Wildcard |
|
| 1247 | - * @return int >1 = OK, 0 = Not found or table_ref_field not defined, <0 = KO |
|
| 1248 | - */ |
|
| 1249 | - public function fetchOneLike($ref) |
|
| 1250 | - {
|
|
| 1251 | - if (!$this->table_ref_field) {
|
|
| 1252 | - return 0; |
|
| 1253 | - } |
|
| 233 | + /** |
|
| 234 | + * @var string |
|
| 235 | + * @see fetch_barcode(), barcode_type |
|
| 236 | + */ |
|
| 237 | + public $barcode_type_code; |
|
| 1254 | 238 | |
| 1255 | - $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.$this->table_element.' WHERE '.$this->table_ref_field.' LIKE "'.$this->db->escape($ref).'" LIMIT 1'; |
|
| 239 | + /** |
|
| 240 | + * @var string |
|
| 241 | + * @see fetch_barcode(), barcode_type |
|
| 242 | + */ |
|
| 243 | + public $barcode_type_label; |
|
| 1256 | 244 | |
| 1257 | - $query = $this->db->query($sql); |
|
| 245 | + /** |
|
| 246 | + * @var string |
|
| 247 | + * @see fetch_barcode(), barcode_type |
|
| 248 | + */ |
|
| 249 | + public $barcode_type_coder; |
|
| 1258 | 250 | |
| 1259 | - if (!$this->db->num_rows($query)) {
|
|
| 1260 | - return 0; |
|
| 1261 | - } |
|
| 251 | + /** |
|
| 252 | + * @var int Payment method ID (cheque, cash, ...) |
|
| 253 | + * @see setPaymentMethods() |
|
| 254 | + */ |
|
| 255 | + public $mode_reglement_id; |
|
| 1262 | 256 | |
| 1263 | - $result = $this->db->fetch_object($query); |
|
| 257 | + /** |
|
| 258 | + * @var int Payment terms ID |
|
| 259 | + * @see setPaymentTerms() |
|
| 260 | + */ |
|
| 261 | + public $cond_reglement_id; |
|
| 1264 | 262 | |
| 1265 | - return $this->fetch($result->rowid); |
|
| 1266 | - } |
|
| 263 | + /** |
|
| 264 | + * @var int Payment terms ID |
|
| 265 | + * @deprecated Kept for compatibility |
|
| 266 | + * @see cond_reglement_id; |
|
| 267 | + */ |
|
| 268 | + public $cond_reglement; |
|
| 1267 | 269 | |
| 1268 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1269 | - /** |
|
| 1270 | - * Load data for barcode into properties ->barcode_type* |
|
| 1271 | - * Properties ->barcode_type that is id of barcode. Type is used to find other properties, but |
|
| 1272 | - * if it is not defined, ->element must be defined to know default barcode type. |
|
| 1273 | - * |
|
| 1274 | - * @return int <0 if KO, 0 if can't guess type of barcode (ISBN, EAN13...), >0 if OK (all barcode properties loaded) |
|
| 1275 | - */ |
|
| 1276 | - function fetch_barcode() |
|
| 1277 | - {
|
|
| 1278 | - // phpcs:enable |
|
| 1279 | - global $conf; |
|
| 270 | + /** |
|
| 271 | + * @var int Delivery address ID |
|
| 272 | + * @deprecated |
|
| 273 | + * @see setDeliveryAddress() |
|
| 274 | + */ |
|
| 275 | + public $fk_delivery_address; |
|
| 1280 | 276 | |
| 1281 | - dol_syslog(get_class($this).'::fetch_barcode this->element='.$this->element.' this->barcode_type='.$this->barcode_type); |
|
| 277 | + /** |
|
| 278 | + * @var int Shipping method ID |
|
| 279 | + * @see setShippingMethod() |
|
| 280 | + */ |
|
| 281 | + public $shipping_method_id; |
|
| 1282 | 282 | |
| 1283 | - $idtype=$this->barcode_type; |
|
| 1284 | - if (empty($idtype) && $idtype != '0') // If type of barcode no set, we try to guess. If set to '0' it means we forced to have type remain not defined |
|
| 1285 | - {
|
|
| 1286 | - if ($this->element == 'product') |
|
| 1287 | - $idtype = Globals::$conf->global->PRODUIT_DEFAULT_BARCODE_TYPE; |
|
| 1288 | - else if ($this->element == 'societe') |
|
| 1289 | - $idtype = Globals::$conf->global->GENBARCODE_BARCODETYPE_THIRDPARTY; |
|
| 1290 | - else dol_syslog('Call fetch_barcode with barcode_type not defined and cant be guessed', LOG_WARNING);
|
|
| 1291 | - } |
|
| 283 | + /** |
|
| 284 | + * @var string |
|
| 285 | + * @see SetDocModel() |
|
| 286 | + */ |
|
| 287 | + public $modelpdf; |
|
| 1292 | 288 | |
| 1293 | - if ($idtype > 0) |
|
| 1294 | - {
|
|
| 1295 | - if (empty($this->barcode_type) || empty($this->barcode_type_code) || empty($this->barcode_type_label) || empty($this->barcode_type_coder)) // If data not already loaded |
|
| 1296 | - {
|
|
| 1297 | - $sql = "SELECT rowid, code, libelle as label, coder"; |
|
| 1298 | - $sql.= " FROM ".MAIN_DB_PREFIX."c_barcode_type"; |
|
| 1299 | - $sql.= " WHERE rowid = ".$idtype; |
|
| 1300 | - dol_syslog(get_class($this).'::fetch_barcode', LOG_DEBUG); |
|
| 1301 | - $resql = $this->db->query($sql); |
|
| 1302 | - if ($resql) |
|
| 1303 | - {
|
|
| 1304 | - $obj = $this->db->fetch_object($resql); |
|
| 1305 | - $this->barcode_type = $obj->rowid; |
|
| 1306 | - $this->barcode_type_code = $obj->code; |
|
| 1307 | - $this->barcode_type_label = $obj->label; |
|
| 1308 | - $this->barcode_type_coder = $obj->coder; |
|
| 1309 | - return 1; |
|
| 1310 | - } |
|
| 1311 | - else |
|
| 1312 | - {
|
|
| 1313 | - dol_print_error($this->db); |
|
| 1314 | - return -1; |
|
| 1315 | - } |
|
| 1316 | - } |
|
| 1317 | - } |
|
| 1318 | - return 0; |
|
| 1319 | - } |
|
| 289 | + /** |
|
| 290 | + * @var int Bank account ID |
|
| 291 | + * @see SetBankAccount() |
|
| 292 | + */ |
|
| 293 | + public $fk_account; |
|
| 1320 | 294 | |
| 1321 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1322 | - /** |
|
| 1323 | - * Load the project with id $this->fk_project into this->project |
|
| 1324 | - * |
|
| 1325 | - * @return int <0 if KO, >=0 if OK |
|
| 1326 | - */ |
|
| 1327 | - function fetch_projet() |
|
| 1328 | - {
|
|
| 1329 | - // phpcs:enable |
|
| 1330 | - include_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php'; |
|
| 295 | + /** |
|
| 296 | + * @var string Public note |
|
| 297 | + * @see update_note() |
|
| 298 | + */ |
|
| 299 | + public $note_public; |
|
| 1331 | 300 | |
| 1332 | - if (empty($this->fk_project) && ! empty($this->fk_projet)) $this->fk_project = $this->fk_projet; // For backward compatibility |
|
| 1333 | - if (empty($this->fk_project)) return 0; |
|
| 301 | + /** |
|
| 302 | + * @var string Private note |
|
| 303 | + * @see update_note() |
|
| 304 | + */ |
|
| 305 | + public $note_private; |
|
| 1334 | 306 | |
| 1335 | - $project = new Project($this->db); |
|
| 1336 | - $result = $project->fetch($this->fk_project); |
|
| 307 | + /** |
|
| 308 | + * @deprecated |
|
| 309 | + * @see note_public |
|
| 310 | + */ |
|
| 311 | + public $note; |
|
| 1337 | 312 | |
| 1338 | - $this->projet = $project; // deprecated |
|
| 1339 | - $this->project = $project; |
|
| 1340 | - return $result; |
|
| 1341 | - } |
|
| 313 | + /** |
|
| 314 | + * @var float Total amount before taxes |
|
| 315 | + * @see update_price() |
|
| 316 | + */ |
|
| 317 | + public $total_ht; |
|
| 1342 | 318 | |
| 1343 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1344 | - /** |
|
| 1345 | - * Load the product with id $this->fk_product into this->product |
|
| 1346 | - * |
|
| 1347 | - * @return int <0 if KO, >=0 if OK |
|
| 1348 | - */ |
|
| 1349 | - function fetch_product() |
|
| 1350 | - {
|
|
| 1351 | - // phpcs:enable |
|
| 1352 | - include_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php'; |
|
| 319 | + /** |
|
| 320 | + * @var float Total VAT amount |
|
| 321 | + * @see update_price() |
|
| 322 | + */ |
|
| 323 | + public $total_tva; |
|
| 1353 | 324 | |
| 1354 | - if (empty($this->fk_product)) return 0; |
|
| 325 | + /** |
|
| 326 | + * @var float Total local tax 1 amount |
|
| 327 | + * @see update_price() |
|
| 328 | + */ |
|
| 329 | + public $total_localtax1; |
|
| 1355 | 330 | |
| 1356 | - $product = new Product($this->db); |
|
| 1357 | - $result = $product->fetch($this->fk_product); |
|
| 331 | + /** |
|
| 332 | + * @var float Total local tax 2 amount |
|
| 333 | + * @see update_price() |
|
| 334 | + */ |
|
| 335 | + public $total_localtax2; |
|
| 1358 | 336 | |
| 1359 | - $this->product = $product; |
|
| 1360 | - return $result; |
|
| 1361 | - } |
|
| 337 | + /** |
|
| 338 | + * @var float Total amount with taxes |
|
| 339 | + * @see update_price() |
|
| 340 | + */ |
|
| 341 | + public $total_ttc; |
|
| 1362 | 342 | |
| 1363 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1364 | - /** |
|
| 1365 | - * Load the user with id $userid into this->user |
|
| 1366 | - * |
|
| 1367 | - * @param int $userid Id du contact |
|
| 1368 | - * @return int <0 if KO, >0 if OK |
|
| 1369 | - */ |
|
| 1370 | - function fetch_user($userid) |
|
| 1371 | - {
|
|
| 1372 | - // phpcs:enable |
|
| 1373 | - $user = new User($this->db); |
|
| 1374 | - $result=$user->fetch($userid); |
|
| 1375 | - $this->user = $user; |
|
| 1376 | - return $result; |
|
| 1377 | - } |
|
| 343 | + /** |
|
| 344 | + * @var CommonObjectLine[] |
|
| 345 | + */ |
|
| 346 | + public $lines; |
|
| 1378 | 347 | |
| 1379 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1380 | - /** |
|
| 1381 | - * Read linked origin object |
|
| 1382 | - * |
|
| 1383 | - * @return void |
|
| 1384 | - */ |
|
| 1385 | - function fetch_origin() |
|
| 1386 | - {
|
|
| 1387 | - // phpcs:enable |
|
| 1388 | - if ($this->origin == 'shipping') $this->origin = 'expedition'; |
|
| 1389 | - if ($this->origin == 'delivery') $this->origin = 'livraison'; |
|
| 1390 | - if ($this->origin == 'order_supplier') $this->origin = 'commandeFournisseur'; |
|
| 348 | + /** |
|
| 349 | + * @var mixed Contains comments |
|
| 350 | + * @see fetchComments() |
|
| 351 | + */ |
|
| 352 | + public $comments=array(); |
|
| 1391 | 353 | |
| 1392 | - $origin = $this->origin; |
|
| 354 | + /** |
|
| 355 | + * @var int |
|
| 356 | + * @see setIncoterms() |
|
| 357 | + */ |
|
| 358 | + public $fk_incoterms; |
|
| 1393 | 359 | |
| 1394 | - $classname = ucfirst($origin); |
|
| 1395 | - $this->$origin = new $classname($this->db); |
|
| 1396 | - $this->$origin->fetch($this->origin_id); |
|
| 1397 | - } |
|
| 360 | + /** |
|
| 361 | + * @var string |
|
| 362 | + * @see SetIncoterms() |
|
| 363 | + */ |
|
| 364 | + public $libelle_incoterms; |
|
| 1398 | 365 | |
| 1399 | - /** |
|
| 1400 | - * Load object from specific field |
|
| 1401 | - * |
|
| 1402 | - * @param string $table Table element or element line |
|
| 1403 | - * @param string $field Field selected |
|
| 1404 | - * @param string $key Import key |
|
| 1405 | - * @param string $element Element name |
|
| 1406 | - * @return int <0 if KO, >0 if OK |
|
| 366 | + /** |
|
| 367 | + * @var string |
|
| 368 | + * @see display_incoterms() |
|
| 1407 | 369 | */ |
| 1408 | - function fetchObjectFrom($table, $field, $key, $element = null) |
|
| 1409 | - {
|
|
| 1410 | - global $conf; |
|
| 1411 | - |
|
| 1412 | - $result=false; |
|
| 1413 | - |
|
| 1414 | - $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX.$table; |
|
| 1415 | - $sql.= " WHERE ".$field." = '".$key."'"; |
|
| 1416 | - if (! empty($element)) {
|
|
| 1417 | - $sql.= " AND entity IN (".getEntity($element).")";
|
|
| 1418 | - } else {
|
|
| 1419 | - $sql .= " AND entity = " . Globals::$conf->entity; |
|
| 1420 | - } |
|
| 1421 | - |
|
| 1422 | - dol_syslog(get_class($this).'::fetchObjectFrom', LOG_DEBUG); |
|
| 1423 | - $resql = $this->db->query($sql); |
|
| 1424 | - if ($resql) |
|
| 1425 | - {
|
|
| 1426 | - $row = $this->db->fetch_row($resql); |
|
| 1427 | - // Test for avoid error -1 |
|
| 1428 | - if ($row[0] > 0) {
|
|
| 1429 | - $result = $this->fetch($row[0]); |
|
| 1430 | - } |
|
| 1431 | - } |
|
| 1432 | - |
|
| 1433 | - return $result; |
|
| 1434 | - } |
|
| 1435 | - |
|
| 1436 | - /** |
|
| 1437 | - * Getter generic. Load value from a specific field |
|
| 1438 | - * |
|
| 1439 | - * @param string $table Table of element or element line |
|
| 1440 | - * @param int $id Element id |
|
| 1441 | - * @param string $field Field selected |
|
| 1442 | - * @return int <0 if KO, >0 if OK |
|
| 1443 | - */ |
|
| 1444 | - function getValueFrom($table, $id, $field) |
|
| 1445 | - {
|
|
| 1446 | - $result=false; |
|
| 1447 | - if (!empty($id) && !empty($field) && !empty($table)) {
|
|
| 1448 | - $sql = "SELECT ".$field." FROM ".MAIN_DB_PREFIX.$table; |
|
| 1449 | - $sql.= " WHERE rowid = ".$id; |
|
| 1450 | - |
|
| 1451 | - dol_syslog(get_class($this).'::getValueFrom', LOG_DEBUG); |
|
| 1452 | - $resql = $this->db->query($sql); |
|
| 1453 | - if ($resql) |
|
| 1454 | - {
|
|
| 1455 | - $row = $this->db->fetch_row($resql); |
|
| 1456 | - $result = $row[0]; |
|
| 1457 | - } |
|
| 1458 | - } |
|
| 1459 | - return $result; |
|
| 1460 | - } |
|
| 1461 | - |
|
| 1462 | - /** |
|
| 1463 | - * Setter generic. Update a specific field into database. |
|
| 1464 | - * Warning: Trigger is run only if param trigkey is provided. |
|
| 1465 | - * |
|
| 1466 | - * @param string $field Field to update |
|
| 1467 | - * @param mixed $value New value |
|
| 1468 | - * @param string $table To force other table element or element line (should not be used) |
|
| 1469 | - * @param int $id To force other object id (should not be used) |
|
| 1470 | - * @param string $format Data format ('text', 'date'). 'text' is used if not defined
|
|
| 1471 | - * @param string $id_field To force rowid field name. 'rowid' is used if not defined |
|
| 1472 | - * @param User|string $fuser Update the user of last update field with this user. If not provided, current user is used except if value is 'none' |
|
| 1473 | - * @param string $trigkey Trigger key to run (in most cases something like 'XXX_MODIFY') |
|
| 1474 | - * @param string $fk_user_field Name of field to save user id making change |
|
| 1475 | - * @return int <0 if KO, >0 if OK |
|
| 1476 | - * @see updateExtraField |
|
| 1477 | - */ |
|
| 1478 | - function setValueFrom($field, $value, $table='', $id=null, $format='', $id_field='', $fuser=null, $trigkey='', $fk_user_field='fk_user_modif') |
|
| 1479 | - {
|
|
| 1480 | - global $user,$langs,$conf; |
|
| 1481 | - |
|
| 1482 | - if (empty($table)) $table=$this->table_element; |
|
| 1483 | - if (empty($id)) $id=$this->id; |
|
| 1484 | - if (empty($format)) $format='text'; |
|
| 1485 | - if (empty($id_field)) $id_field='rowid'; |
|
| 1486 | - |
|
| 1487 | - $error=0; |
|
| 1488 | - |
|
| 1489 | - $this->db->begin(); |
|
| 1490 | - |
|
| 1491 | - // Special case |
|
| 1492 | - if ($table == 'product' && $field == 'note_private') $field='note'; |
|
| 1493 | - if (in_array($table, array('actioncomm', 'adherent', 'advtargetemailing', 'cronjob', 'establishment'))) $fk_user_field = 'fk_user_mod';
|
|
| 1494 | - |
|
| 1495 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$table." SET "; |
|
| 1496 | - |
|
| 1497 | - if ($format == 'text') $sql.= $field." = '".$this->db->escape($value)."'"; |
|
| 1498 | - else if ($format == 'int') $sql.= $field." = ".$this->db->escape($value); |
|
| 1499 | - else if ($format == 'date') $sql.= $field." = ".($value ? "'".$this->db->idate($value)."'" : "null"); |
|
| 1500 | - |
|
| 1501 | - if ($fk_user_field) |
|
| 1502 | - {
|
|
| 1503 | - if (! empty($fuser) && is_object($fuser)) $sql.=", ".$fk_user_field." = ".$fuser->id; |
|
| 1504 | - elseif (empty($fuser) || $fuser != 'none') $sql.=", ".$fk_user_field." = ".$user->id; |
|
| 1505 | - } |
|
| 1506 | - |
|
| 1507 | - $sql.= " WHERE ".$id_field." = ".$id; |
|
| 1508 | - |
|
| 1509 | - dol_syslog(get_class($this)."::".__FUNCTION__."", LOG_DEBUG); |
|
| 1510 | - $resql = $this->db->query($sql); |
|
| 1511 | - if ($resql) |
|
| 1512 | - {
|
|
| 1513 | - if ($trigkey) |
|
| 1514 | - {
|
|
| 1515 | - // call trigger with updated object values |
|
| 1516 | - if (empty($this->fields) && method_exists($this, 'fetch')) |
|
| 1517 | - {
|
|
| 1518 | - $result = $this->fetch($id); |
|
| 1519 | - } |
|
| 1520 | - else |
|
| 1521 | - {
|
|
| 1522 | - $result = $this->fetchCommon($id); |
|
| 1523 | - } |
|
| 1524 | - if ($result >= 0) $result=$this->call_trigger($trigkey, (! empty($fuser) && is_object($fuser)) ? $fuser : $user); // This may set this->errors |
|
| 1525 | - if ($result < 0) $error++; |
|
| 1526 | - } |
|
| 370 | + public $location_incoterms; |
|
| 1527 | 371 | |
| 1528 | - if (! $error) |
|
| 1529 | - {
|
|
| 1530 | - if (property_exists($this, $field)) $this->$field = $value; |
|
| 1531 | - $this->db->commit(); |
|
| 1532 | - return 1; |
|
| 1533 | - } |
|
| 1534 | - else |
|
| 1535 | - {
|
|
| 1536 | - $this->db->rollback(); |
|
| 1537 | - return -2; |
|
| 1538 | - } |
|
| 1539 | - } |
|
| 1540 | - else |
|
| 1541 | - {
|
|
| 1542 | - $this->error=$this->db->lasterror(); |
|
| 1543 | - $this->db->rollback(); |
|
| 1544 | - return -1; |
|
| 1545 | - } |
|
| 1546 | - } |
|
| 372 | + public $name; |
|
| 373 | + public $lastname; |
|
| 374 | + public $firstname; |
|
| 375 | + public $civility_id; |
|
| 1547 | 376 | |
| 1548 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1549 | - /** |
|
| 1550 | - * Load properties id_previous and id_next by comparing $fieldid with $this->ref |
|
| 1551 | - * |
|
| 1552 | - * @param string $filter Optional filter. Example: " AND (t.field1 = 'aa' OR t.field2 = 'bb')" |
|
| 1553 | - * @param string $fieldid Name of field to use for the select MAX and MIN |
|
| 1554 | - * @param int $nodbprefix Do not include DB prefix to forge table name |
|
| 1555 | - * @return int <0 if KO, >0 if OK |
|
| 1556 | - */ |
|
| 1557 | - function load_previous_next_ref($filter, $fieldid, $nodbprefix=0) |
|
| 1558 | - {
|
|
| 1559 | - // phpcs:enable |
|
| 1560 | - global $conf, $user; |
|
| 1561 | - |
|
| 1562 | - if (! $this->table_element) |
|
| 1563 | - {
|
|
| 1564 | - dol_print_error('',get_class($this)."::load_previous_next_ref was called on objet with property table_element not defined");
|
|
| 1565 | - return -1; |
|
| 1566 | - } |
|
| 1567 | - if ($fieldid == 'none') return 1; |
|
| 1568 | - |
|
| 1569 | - // Security on socid |
|
| 1570 | - $socid = 0; |
|
| 1571 | - if ($user->societe_id > 0) $socid = $user->societe_id; |
|
| 1572 | - |
|
| 1573 | - // this->ismultientitymanaged contains |
|
| 1574 | - // 0=No test on entity, 1=Test with field entity, 2=Test with link by societe |
|
| 1575 | - $alias = 's'; |
|
| 1576 | - if ($this->element == 'societe') $alias = 'te'; |
|
| 1577 | - |
|
| 1578 | - $sql = "SELECT MAX(te.".$fieldid.")"; |
|
| 1579 | - $sql.= " FROM ".(empty($nodbprefix)?MAIN_DB_PREFIX:'').$this->table_element." as te"; |
|
| 1580 | - if ($this->element == 'user' && !empty(Globals::$conf->global->MULTICOMPANY_TRANSVERSE_MODE)) {
|
|
| 1581 | - $sql.= ",".MAIN_DB_PREFIX."usergroup_user as ug"; |
|
| 1582 | - } |
|
| 1583 | - if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 2) $sql.= ", ".MAIN_DB_PREFIX."societe as s"; // If we need to link to societe to limit select to entity |
|
| 1584 | - else if ($this->restrictiononfksoc == 1 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe as s"; // If we need to link to societe to limit select to socid |
|
| 1585 | - else if ($this->restrictiononfksoc == 2 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON te.fk_soc = s.rowid"; // If we need to link to societe to limit select to socid |
|
| 1586 | - if ($this->restrictiononfksoc && !$user->rights->societe->client->voir && !$socid) $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON ".$alias.".rowid = sc.fk_soc"; |
|
| 1587 | - $sql.= " WHERE te.".$fieldid." < '".$this->db->escape($this->ref)."'"; // ->ref must always be defined (set to id if field does not exists) |
|
| 1588 | - if ($this->restrictiononfksoc == 1 && !$user->rights->societe->client->voir && !$socid) $sql.= " AND sc.fk_user = " .$user->id; |
|
| 1589 | - if ($this->restrictiononfksoc == 2 && !$user->rights->societe->client->voir && !$socid) $sql.= " AND (sc.fk_user = " .$user->id.' OR te.fk_soc IS NULL)'; |
|
| 1590 | - if (! empty($filter)) |
|
| 1591 | - {
|
|
| 1592 | - if (! preg_match('/^\s*AND/i', $filter)) $sql.=" AND "; // For backward compatibility
|
|
| 1593 | - $sql.=$filter; |
|
| 1594 | - } |
|
| 1595 | - if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 2) $sql.= ' AND te.fk_soc = s.rowid'; // If we need to link to societe to limit select to entity |
|
| 1596 | - else if ($this->restrictiononfksoc == 1 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= ' AND te.fk_soc = s.rowid'; // If we need to link to societe to limit select to socid |
|
| 1597 | - if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 1) {
|
|
| 1598 | - if ($this->element == 'user' && !empty(Globals::$conf->global->MULTICOMPANY_TRANSVERSE_MODE)) {
|
|
| 1599 | - if (!empty($user->admin) && empty($user->entity) && Globals::$conf->entity == 1) {
|
|
| 1600 | - $sql.= " AND te.entity IS NOT NULL"; // Show all users |
|
| 1601 | - } else {
|
|
| 1602 | - $sql.= " AND ug.fk_user = te.rowid"; |
|
| 1603 | - $sql.= " AND ug.entity IN (".getEntity($this->element).")";
|
|
| 1604 | - } |
|
| 1605 | - } else {
|
|
| 1606 | - $sql.= ' AND te.entity IN ('.getEntity($this->element).')';
|
|
| 1607 | - } |
|
| 1608 | - } |
|
| 1609 | - if ($this->restrictiononfksoc == 1 && $socid && $this->element != 'societe') $sql.= ' AND te.fk_soc = ' . $socid; |
|
| 1610 | - if ($this->restrictiononfksoc == 2 && $socid && $this->element != 'societe') $sql.= ' AND (te.fk_soc = ' . $socid.' OR te.fk_soc IS NULL)'; |
|
| 1611 | - if ($this->restrictiononfksoc && $socid && $this->element == 'societe') $sql.= ' AND te.rowid = ' . $socid; |
|
| 1612 | - //print 'socid='.$socid.' restrictiononfksoc='.$this->restrictiononfksoc.' ismultientitymanaged = '.$this->ismultientitymanaged.' filter = '.$filter.' -> '.$sql."<br>"; |
|
| 1613 | - |
|
| 1614 | - $result = $this->db->query($sql); |
|
| 1615 | - if (! $result) |
|
| 1616 | - {
|
|
| 1617 | - $this->error=$this->db->lasterror(); |
|
| 1618 | - return -1; |
|
| 1619 | - } |
|
| 1620 | - $row = $this->db->fetch_row($result); |
|
| 1621 | - $this->ref_previous = $row[0]; |
|
| 1622 | - |
|
| 1623 | - |
|
| 1624 | - $sql = "SELECT MIN(te.".$fieldid.")"; |
|
| 1625 | - $sql.= " FROM ".(empty($nodbprefix)?MAIN_DB_PREFIX:'').$this->table_element." as te"; |
|
| 1626 | - if ($this->element == 'user' && !empty(Globals::$conf->global->MULTICOMPANY_TRANSVERSE_MODE)) {
|
|
| 1627 | - $sql.= ",".MAIN_DB_PREFIX."usergroup_user as ug"; |
|
| 1628 | - } |
|
| 1629 | - if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 2) $sql.= ", ".MAIN_DB_PREFIX."societe as s"; // If we need to link to societe to limit select to entity |
|
| 1630 | - else if ($this->restrictiononfksoc == 1 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe as s"; // If we need to link to societe to limit select to socid |
|
| 1631 | - else if ($this->restrictiononfksoc == 2 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON te.fk_soc = s.rowid"; // If we need to link to societe to limit select to socid |
|
| 1632 | - if ($this->restrictiononfksoc && !$user->rights->societe->client->voir && !$socid) $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON ".$alias.".rowid = sc.fk_soc"; |
|
| 1633 | - $sql.= " WHERE te.".$fieldid." > '".$this->db->escape($this->ref)."'"; // ->ref must always be defined (set to id if field does not exists) |
|
| 1634 | - if ($this->restrictiononfksoc == 1 && !$user->rights->societe->client->voir && !$socid) $sql.= " AND sc.fk_user = " .$user->id; |
|
| 1635 | - if ($this->restrictiononfksoc == 2 && !$user->rights->societe->client->voir && !$socid) $sql.= " AND (sc.fk_user = " .$user->id.' OR te.fk_soc IS NULL)'; |
|
| 1636 | - if (! empty($filter)) |
|
| 1637 | - {
|
|
| 1638 | - if (! preg_match('/^\s*AND/i', $filter)) $sql.=" AND "; // For backward compatibility
|
|
| 1639 | - $sql.=$filter; |
|
| 1640 | - } |
|
| 1641 | - if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 2) $sql.= ' AND te.fk_soc = s.rowid'; // If we need to link to societe to limit select to entity |
|
| 1642 | - else if ($this->restrictiononfksoc == 1 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= ' AND te.fk_soc = s.rowid'; // If we need to link to societe to limit select to socid |
|
| 1643 | - if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 1) {
|
|
| 1644 | - if ($this->element == 'user' && !empty(Globals::$conf->global->MULTICOMPANY_TRANSVERSE_MODE)) {
|
|
| 1645 | - if (!empty($user->admin) && empty($user->entity) && Globals::$conf->entity == 1) {
|
|
| 1646 | - $sql.= " AND te.entity IS NOT NULL"; // Show all users |
|
| 1647 | - } else {
|
|
| 1648 | - $sql.= " AND ug.fk_user = te.rowid"; |
|
| 1649 | - $sql.= " AND ug.entity IN (".getEntity($this->element).")";
|
|
| 1650 | - } |
|
| 1651 | - } else {
|
|
| 1652 | - $sql.= ' AND te.entity IN ('.getEntity($this->element).')';
|
|
| 1653 | - } |
|
| 1654 | - } |
|
| 1655 | - if ($this->restrictiononfksoc == 1 && $socid && $this->element != 'societe') $sql.= ' AND te.fk_soc = ' . $socid; |
|
| 1656 | - if ($this->restrictiononfksoc == 2 && $socid && $this->element != 'societe') $sql.= ' AND (te.fk_soc = ' . $socid.' OR te.fk_soc IS NULL)'; |
|
| 1657 | - if ($this->restrictiononfksoc && $socid && $this->element == 'societe') $sql.= ' AND te.rowid = ' . $socid; |
|
| 1658 | - //print 'socid='.$socid.' restrictiononfksoc='.$this->restrictiononfksoc.' ismultientitymanaged = '.$this->ismultientitymanaged.' filter = '.$filter.' -> '.$sql."<br>"; |
|
| 1659 | - // Rem: Bug in some mysql version: SELECT MIN(rowid) FROM llx_socpeople WHERE rowid > 1 when one row in database with rowid=1, returns 1 instead of null |
|
| 1660 | - |
|
| 1661 | - $result = $this->db->query($sql); |
|
| 1662 | - if (! $result) |
|
| 1663 | - {
|
|
| 1664 | - $this->error=$this->db->lasterror(); |
|
| 1665 | - return -2; |
|
| 1666 | - } |
|
| 1667 | - $row = $this->db->fetch_row($result); |
|
| 1668 | - $this->ref_next = $row[0]; |
|
| 1669 | - |
|
| 1670 | - return 1; |
|
| 1671 | - } |
|
| 1672 | - |
|
| 1673 | - |
|
| 1674 | - /** |
|
| 1675 | - * Return list of id of contacts of object |
|
| 1676 | - * |
|
| 1677 | - * @param string $source Source of contact: external (llx_socpeople) or internal (llx_user) or thirdparty (llx_societe) |
|
| 1678 | - * @return array Array of id of contacts (if source=external or internal) |
|
| 1679 | - * Array of id of third parties with at least one contact on object (if source=thirdparty) |
|
| 1680 | - */ |
|
| 1681 | - function getListContactId($source='external') |
|
| 1682 | - {
|
|
| 1683 | - $contactAlreadySelected = array(); |
|
| 1684 | - $tab = $this->liste_contact(-1,$source); |
|
| 1685 | - $num=count($tab); |
|
| 1686 | - $i = 0; |
|
| 1687 | - while ($i < $num) |
|
| 1688 | - {
|
|
| 1689 | - if ($source == 'thirdparty') $contactAlreadySelected[$i] = $tab[$i]['socid']; |
|
| 1690 | - else $contactAlreadySelected[$i] = $tab[$i]['id']; |
|
| 1691 | - $i++; |
|
| 1692 | - } |
|
| 1693 | - return $contactAlreadySelected; |
|
| 1694 | - } |
|
| 1695 | - |
|
| 1696 | - |
|
| 1697 | - /** |
|
| 1698 | - * Link element with a project |
|
| 1699 | - * |
|
| 1700 | - * @param int $projectid Project id to link element to |
|
| 1701 | - * @return int <0 if KO, >0 if OK |
|
| 1702 | - */ |
|
| 1703 | - function setProject($projectid) |
|
| 1704 | - {
|
|
| 1705 | - if (! $this->table_element) |
|
| 1706 | - {
|
|
| 1707 | - dol_syslog(get_class($this)."::setProject was called on objet with property table_element not defined",LOG_ERR); |
|
| 1708 | - return -1; |
|
| 1709 | - } |
|
| 1710 | - |
|
| 1711 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1712 | - if ($this->table_element == 'actioncomm') |
|
| 1713 | - {
|
|
| 1714 | - if ($projectid) $sql.= ' SET fk_project = '.$projectid; |
|
| 1715 | - else $sql.= ' SET fk_project = NULL'; |
|
| 1716 | - $sql.= ' WHERE id = '.$this->id; |
|
| 1717 | - } |
|
| 1718 | - else |
|
| 1719 | - {
|
|
| 1720 | - if ($projectid) $sql.= ' SET fk_projet = '.$projectid; |
|
| 1721 | - else $sql.= ' SET fk_projet = NULL'; |
|
| 1722 | - $sql.= ' WHERE rowid = '.$this->id; |
|
| 1723 | - } |
|
| 1724 | - |
|
| 1725 | - dol_syslog(get_class($this)."::setProject", LOG_DEBUG); |
|
| 1726 | - if ($this->db->query($sql)) |
|
| 1727 | - {
|
|
| 1728 | - $this->fk_project = $projectid; |
|
| 1729 | - return 1; |
|
| 1730 | - } |
|
| 1731 | - else |
|
| 1732 | - {
|
|
| 1733 | - dol_print_error($this->db); |
|
| 1734 | - return -1; |
|
| 1735 | - } |
|
| 1736 | - } |
|
| 1737 | - |
|
| 1738 | - /** |
|
| 1739 | - * Change the payments methods |
|
| 1740 | - * |
|
| 1741 | - * @param int $id Id of new payment method |
|
| 1742 | - * @return int >0 if OK, <0 if KO |
|
| 1743 | - */ |
|
| 1744 | - function setPaymentMethods($id) |
|
| 1745 | - {
|
|
| 1746 | - dol_syslog(get_class($this).'::setPaymentMethods('.$id.')');
|
|
| 1747 | - if ($this->statut >= 0 || $this->element == 'societe') |
|
| 1748 | - {
|
|
| 1749 | - // TODO uniformize field name |
|
| 1750 | - $fieldname = 'fk_mode_reglement'; |
|
| 1751 | - if ($this->element == 'societe') $fieldname = 'mode_reglement'; |
|
| 1752 | - if (get_class($this) == 'Fournisseur') $fieldname = 'mode_reglement_supplier'; |
|
| 1753 | - |
|
| 1754 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1755 | - $sql .= ' SET '.$fieldname.' = '.$id; |
|
| 1756 | - $sql .= ' WHERE rowid='.$this->id; |
|
| 1757 | - |
|
| 1758 | - if ($this->db->query($sql)) |
|
| 1759 | - {
|
|
| 1760 | - $this->mode_reglement_id = $id; |
|
| 1761 | - // for supplier |
|
| 1762 | - if (get_class($this) == 'Fournisseur') $this->mode_reglement_supplier_id = $id; |
|
| 1763 | - return 1; |
|
| 1764 | - } |
|
| 1765 | - else |
|
| 1766 | - {
|
|
| 1767 | - dol_syslog(get_class($this).'::setPaymentMethods Erreur '.$sql.' - '.$this->db->error()); |
|
| 1768 | - $this->error=$this->db->error(); |
|
| 1769 | - return -1; |
|
| 1770 | - } |
|
| 1771 | - } |
|
| 1772 | - else |
|
| 1773 | - {
|
|
| 1774 | - dol_syslog(get_class($this).'::setPaymentMethods, status of the object is incompatible'); |
|
| 1775 | - $this->error='Status of the object is incompatible '.$this->statut; |
|
| 1776 | - return -2; |
|
| 1777 | - } |
|
| 1778 | - } |
|
| 1779 | - |
|
| 1780 | - /** |
|
| 1781 | - * Change the multicurrency code |
|
| 1782 | - * |
|
| 1783 | - * @param string $code multicurrency code |
|
| 1784 | - * @return int >0 if OK, <0 if KO |
|
| 1785 | - */ |
|
| 1786 | - function setMulticurrencyCode($code) |
|
| 1787 | - {
|
|
| 1788 | - dol_syslog(get_class($this).'::setMulticurrencyCode('.$id.')');
|
|
| 1789 | - if ($this->statut >= 0 || $this->element == 'societe') |
|
| 1790 | - {
|
|
| 1791 | - $fieldname = 'multicurrency_code'; |
|
| 1792 | - |
|
| 1793 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1794 | - $sql .= ' SET '.$fieldname." = '".$this->db->escape($code)."'"; |
|
| 1795 | - $sql .= ' WHERE rowid='.$this->id; |
|
| 1796 | - |
|
| 1797 | - if ($this->db->query($sql)) |
|
| 1798 | - {
|
|
| 1799 | - $this->multicurrency_code = $code; |
|
| 377 | + // Dates |
|
| 378 | + public $date_creation; // Date creation |
|
| 379 | + public $date_validation; // Date validation |
|
| 380 | + public $date_modification; // Date last change (tms field) |
|
| 1800 | 381 | |
| 1801 | - list($fk_multicurrency, $rate) = MultiCurrency::getIdAndTxFromCode($this->db, $code); |
|
| 1802 | - if ($rate) $this->setMulticurrencyRate($rate,2); |
|
| 1803 | 382 | |
| 1804 | - return 1; |
|
| 1805 | - } |
|
| 1806 | - else |
|
| 1807 | - {
|
|
| 1808 | - dol_syslog(get_class($this).'::setMulticurrencyCode Erreur '.$sql.' - '.$this->db->error()); |
|
| 1809 | - $this->error=$this->db->error(); |
|
| 1810 | - return -1; |
|
| 1811 | - } |
|
| 1812 | - } |
|
| 1813 | - else |
|
| 1814 | - {
|
|
| 1815 | - dol_syslog(get_class($this).'::setMulticurrencyCode, status of the object is incompatible'); |
|
| 1816 | - $this->error='Status of the object is incompatible '.$this->statut; |
|
| 1817 | - return -2; |
|
| 1818 | - } |
|
| 1819 | - } |
|
| 1820 | - |
|
| 1821 | - /** |
|
| 1822 | - * Change the multicurrency rate |
|
| 1823 | - * |
|
| 1824 | - * @param double $rate multicurrency rate |
|
| 1825 | - * @param int $mode mode 1 : amounts in company currency will be recalculated, mode 2 : amounts in foreign currency |
|
| 1826 | - * @return int >0 if OK, <0 if KO |
|
| 1827 | - */ |
|
| 1828 | - function setMulticurrencyRate($rate, $mode=1) |
|
| 1829 | - {
|
|
| 1830 | - dol_syslog(get_class($this).'::setMulticurrencyRate('.$id.')');
|
|
| 1831 | - if ($this->statut >= 0 || $this->element == 'societe') |
|
| 1832 | - {
|
|
| 1833 | - $fieldname = 'multicurrency_tx'; |
|
| 1834 | - |
|
| 1835 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1836 | - $sql .= ' SET '.$fieldname.' = '.$rate; |
|
| 1837 | - $sql .= ' WHERE rowid='.$this->id; |
|
| 1838 | - |
|
| 1839 | - if ($this->db->query($sql)) |
|
| 1840 | - {
|
|
| 1841 | - $this->multicurrency_tx = $rate; |
|
| 1842 | 383 | |
| 1843 | - // Update line price |
|
| 1844 | - if (!empty($this->lines)) |
|
| 1845 | - {
|
|
| 1846 | - foreach ($this->lines as &$line) |
|
| 1847 | - {
|
|
| 1848 | - if($mode == 1) {
|
|
| 1849 | - $line->subprice = 0; |
|
| 1850 | - } |
|
| 384 | + // No constructor as it is an abstract class |
|
| 1851 | 385 | |
| 1852 | - switch ($this->element) {
|
|
| 1853 | - case 'propal': |
|
| 1854 | - $this->updateline( |
|
| 1855 | - $line->id, $line->subprice, $line->qty, $line->remise_percent, $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, |
|
| 1856 | - ($line->description?$line->description:$line->desc), 'HT', $line->info_bits, $line->special_code, $line->fk_parent_line, |
|
| 1857 | - $line->skip_update_total, $line->fk_fournprice, $line->pa_ht, $line->label, $line->product_type, $line->date_start, |
|
| 1858 | - $line->date_end, $line->array_options, $line->fk_unit, $line->multicurrency_subprice |
|
| 1859 | - ); |
|
| 1860 | - break; |
|
| 1861 | - case 'commande': |
|
| 1862 | - $this->updateline( |
|
| 1863 | - $line->id, ($line->description?$line->description:$line->desc), $line->subprice, $line->qty, $line->remise_percent, |
|
| 1864 | - $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, 'HT', $line->info_bits, $line->date_start, $line->date_end, |
|
| 1865 | - $line->product_type, $line->fk_parent_line, $line->skip_update_total, $line->fk_fournprice, $line->pa_ht, $line->label, |
|
| 1866 | - $line->special_code, $line->array_options, $line->fk_unit, $line->multicurrency_subprice |
|
| 1867 | - ); |
|
| 1868 | - break; |
|
| 1869 | - case 'facture': |
|
| 1870 | - $this->updateline( |
|
| 1871 | - $line->id, ($line->description?$line->description:$line->desc), $line->subprice, $line->qty, $line->remise_percent, |
|
| 1872 | - $line->date_start, $line->date_end, $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, 'HT', $line->info_bits, |
|
| 1873 | - $line->product_type, $line->fk_parent_line, $line->skip_update_total, $line->fk_fournprice, $line->pa_ht, $line->label, |
|
| 1874 | - $line->special_code, $line->array_options, $line->situation_percent, $line->fk_unit, $line->multicurrency_subprice |
|
| 1875 | - ); |
|
| 1876 | - break; |
|
| 1877 | - case 'supplier_proposal': |
|
| 1878 | - $this->updateline( |
|
| 1879 | - $line->id, $line->subprice, $line->qty, $line->remise_percent, $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, |
|
| 1880 | - ($line->description?$line->description:$line->desc), 'HT', $line->info_bits, $line->special_code, $line->fk_parent_line, |
|
| 1881 | - $line->skip_update_total, $line->fk_fournprice, $line->pa_ht, $line->label, $line->product_type, $line->array_options, |
|
| 1882 | - $line->ref_fourn, $line->multicurrency_subprice |
|
| 1883 | - ); |
|
| 1884 | - break; |
|
| 1885 | - case 'order_supplier': |
|
| 1886 | - $this->updateline( |
|
| 1887 | - $line->id, ($line->description?$line->description:$line->desc), $line->subprice, $line->qty, $line->remise_percent, |
|
| 1888 | - $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, 'HT', $line->info_bits, $line->product_type, false, |
|
| 1889 | - $line->date_start, $line->date_end, $line->array_options, $line->fk_unit, $line->multicurrency_subprice |
|
| 1890 | - ); |
|
| 1891 | - break; |
|
| 1892 | - case 'invoice_supplier': |
|
| 1893 | - $this->updateline( |
|
| 1894 | - $line->id, ($line->description?$line->description:$line->desc), $line->subprice, $line->tva_tx, $line->localtax1_tx, |
|
| 1895 | - $line->localtax2_tx, $line->qty, 0, 'HT', $line->info_bits, $line->product_type, $line->remise_percent, false, |
|
| 1896 | - $line->date_start, $line->date_end, $line->array_options, $line->fk_unit, $line->multicurrency_subprice |
|
| 1897 | - ); |
|
| 1898 | - break; |
|
| 1899 | - default: |
|
| 1900 | - dol_syslog(get_class($this).'::setMulticurrencyRate no updateline defined', LOG_DEBUG); |
|
| 1901 | - break; |
|
| 1902 | - } |
|
| 1903 | - } |
|
| 1904 | - } |
|
| 386 | + /** |
|
| 387 | + * Check an object id/ref exists |
|
| 388 | + * If you don't need/want to instantiate object and just need to know if object exists, use this method instead of fetch |
|
| 389 | + * |
|
| 390 | + * @param string $element String of element ('product', 'facture', ...)
|
|
| 391 | + * @param int $id Id of object |
|
| 392 | + * @param string $ref Ref of object to check |
|
| 393 | + * @param string $ref_ext Ref ext of object to check |
|
| 394 | + * @return int <0 if KO, 0 if OK but not found, >0 if OK and exists |
|
| 395 | + */ |
|
| 396 | + static function isExistingObject($element, $id, $ref='', $ref_ext='') |
|
| 397 | + {
|
|
| 398 | + global $db,$conf; |
|
| 399 | + |
|
| 400 | + $sql = "SELECT rowid, ref, ref_ext"; |
|
| 401 | + $sql.= " FROM ".MAIN_DB_PREFIX.$element; |
|
| 402 | + $sql.= " WHERE entity IN (".getEntity($element).")" ;
|
|
| 403 | + |
|
| 404 | + if ($id > 0) $sql.= " AND rowid = ".$db->escape($id); |
|
| 405 | + else if ($ref) $sql.= " AND ref = '".$db->escape($ref)."'"; |
|
| 406 | + else if ($ref_ext) $sql.= " AND ref_ext = '".$db->escape($ref_ext)."'"; |
|
| 407 | + else {
|
|
| 408 | + $error='ErrorWrongParameters'; |
|
| 409 | + dol_print_error(get_class()."::isExistingObject ".$error, LOG_ERR); |
|
| 410 | + return -1; |
|
| 411 | + } |
|
| 412 | + if ($ref || $ref_ext) |
|
| 413 | + $sql .= " AND entity = " . Globals::$conf->entity; |
|
| 1905 | 414 | |
| 1906 | - return 1; |
|
| 1907 | - } |
|
| 1908 | - else |
|
| 1909 | - {
|
|
| 1910 | - dol_syslog(get_class($this).'::setMulticurrencyRate Erreur '.$sql.' - '.$this->db->error()); |
|
| 1911 | - $this->error=$this->db->error(); |
|
| 1912 | - return -1; |
|
| 1913 | - } |
|
| 1914 | - } |
|
| 1915 | - else |
|
| 1916 | - {
|
|
| 1917 | - dol_syslog(get_class($this).'::setMulticurrencyRate, status of the object is incompatible'); |
|
| 1918 | - $this->error='Status of the object is incompatible '.$this->statut; |
|
| 1919 | - return -2; |
|
| 1920 | - } |
|
| 1921 | - } |
|
| 1922 | - |
|
| 1923 | - /** |
|
| 1924 | - * Change the payments terms |
|
| 1925 | - * |
|
| 1926 | - * @param int $id Id of new payment terms |
|
| 1927 | - * @return int >0 if OK, <0 if KO |
|
| 1928 | - */ |
|
| 1929 | - function setPaymentTerms($id) |
|
| 1930 | - {
|
|
| 1931 | - dol_syslog(get_class($this).'::setPaymentTerms('.$id.')');
|
|
| 1932 | - if ($this->statut >= 0 || $this->element == 'societe') |
|
| 1933 | - {
|
|
| 1934 | - // TODO uniformize field name |
|
| 1935 | - $fieldname = 'fk_cond_reglement'; |
|
| 1936 | - if ($this->element == 'societe') $fieldname = 'cond_reglement'; |
|
| 1937 | - if (get_class($this) == 'Fournisseur') $fieldname = 'cond_reglement_supplier'; |
|
| 1938 | - |
|
| 1939 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1940 | - $sql .= ' SET '.$fieldname.' = '.$id; |
|
| 1941 | - $sql .= ' WHERE rowid='.$this->id; |
|
| 1942 | - |
|
| 1943 | - if ($this->db->query($sql)) |
|
| 1944 | - {
|
|
| 1945 | - $this->cond_reglement_id = $id; |
|
| 1946 | - // for supplier |
|
| 1947 | - if (get_class($this) == 'Fournisseur') $this->cond_reglement_supplier_id = $id; |
|
| 1948 | - $this->cond_reglement = $id; // for compatibility |
|
| 1949 | - return 1; |
|
| 1950 | - } |
|
| 1951 | - else |
|
| 1952 | - {
|
|
| 1953 | - dol_syslog(get_class($this).'::setPaymentTerms Erreur '.$sql.' - '.$this->db->error()); |
|
| 1954 | - $this->error=$this->db->error(); |
|
| 1955 | - return -1; |
|
| 1956 | - } |
|
| 1957 | - } |
|
| 1958 | - else |
|
| 1959 | - {
|
|
| 1960 | - dol_syslog(get_class($this).'::setPaymentTerms, status of the object is incompatible'); |
|
| 1961 | - $this->error='Status of the object is incompatible '.$this->statut; |
|
| 1962 | - return -2; |
|
| 1963 | - } |
|
| 1964 | - } |
|
| 1965 | - |
|
| 1966 | - /** |
|
| 1967 | - * Define delivery address |
|
| 1968 | - * @deprecated |
|
| 1969 | - * |
|
| 1970 | - * @param int $id Address id |
|
| 1971 | - * @return int <0 si ko, >0 si ok |
|
| 1972 | - */ |
|
| 1973 | - function setDeliveryAddress($id) |
|
| 1974 | - {
|
|
| 1975 | - $fieldname = 'fk_delivery_address'; |
|
| 1976 | - if ($this->element == 'delivery' || $this->element == 'shipping') $fieldname = 'fk_address'; |
|
| 1977 | - |
|
| 1978 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element." SET ".$fieldname." = ".$id; |
|
| 1979 | - $sql.= " WHERE rowid = ".$this->id." AND fk_statut = 0"; |
|
| 1980 | - |
|
| 1981 | - if ($this->db->query($sql)) |
|
| 1982 | - {
|
|
| 1983 | - $this->fk_delivery_address = $id; |
|
| 1984 | - return 1; |
|
| 1985 | - } |
|
| 1986 | - else |
|
| 1987 | - {
|
|
| 1988 | - $this->error=$this->db->error(); |
|
| 1989 | - dol_syslog(get_class($this).'::setDeliveryAddress Erreur '.$sql.' - '.$this->error); |
|
| 1990 | - return -1; |
|
| 1991 | - } |
|
| 1992 | - } |
|
| 1993 | - |
|
| 1994 | - |
|
| 1995 | - /** |
|
| 1996 | - * Change the shipping method |
|
| 1997 | - * |
|
| 1998 | - * @param int $shipping_method_id Id of shipping method |
|
| 1999 | - * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 2000 | - * @param User $userused Object user |
|
| 2001 | - * |
|
| 2002 | - * @return int 1 if OK, 0 if KO |
|
| 2003 | - */ |
|
| 2004 | - function setShippingMethod($shipping_method_id, $notrigger=false, $userused=null) |
|
| 2005 | - {
|
|
| 2006 | - global $user; |
|
| 415 | + dol_syslog(get_class()."::isExistingObject", LOG_DEBUG); |
|
| 416 | + $resql = $db->query($sql); |
|
| 417 | + if ($resql) |
|
| 418 | + {
|
|
| 419 | + $num=$db->num_rows($resql); |
|
| 420 | + if ($num > 0) return 1; |
|
| 421 | + else return 0; |
|
| 422 | + } |
|
| 423 | + return -1; |
|
| 424 | + } |
|
| 2007 | 425 | |
| 2008 | - if (empty($userused)) $userused=$user; |
|
| 426 | + /** |
|
| 427 | + * Method to output saved errors |
|
| 428 | + * |
|
| 429 | + * @return string String with errors |
|
| 430 | + */ |
|
| 431 | + function errorsToString() |
|
| 432 | + {
|
|
| 433 | + return $this->error.(is_array($this->errors)?(($this->error!=''?', ':'').join(', ',$this->errors)):'');
|
|
| 434 | + } |
|
| 2009 | 435 | |
| 2010 | - $error = 0; |
|
| 436 | + /** |
|
| 437 | + * Return full name (civility+' '+name+' '+lastname) |
|
| 438 | + * |
|
| 439 | + * @param Translate $langs Language object for translation of civility (used only if option is 1) |
|
| 440 | + * @param int $option 0=No option, 1=Add civility |
|
| 441 | + * @param int $nameorder -1=Auto, 0=Lastname+Firstname, 1=Firstname+Lastname, 2=Firstname |
|
| 442 | + * @param int $maxlen Maximum length |
|
| 443 | + * @return string String with full name |
|
| 444 | + */ |
|
| 445 | + function getFullName($langs,$option=0,$nameorder=-1,$maxlen=0) |
|
| 446 | + {
|
|
| 447 | + //print "lastname=".$this->lastname." name=".$this->name." nom=".$this->nom."<br>\n"; |
|
| 448 | + $lastname=$this->lastname; |
|
| 449 | + $firstname=$this->firstname; |
|
| 450 | + if (empty($lastname)) $lastname=(isset($this->lastname)?$this->lastname:(isset($this->name)?$this->name:(isset($this->nom)?$this->nom:(isset($this->societe)?$this->societe:(isset($this->company)?$this->company:''))))); |
|
| 2011 | 451 | |
| 2012 | - if (! $this->table_element) {
|
|
| 2013 | - dol_syslog(get_class($this)."::setShippingMethod was called on objet with property table_element not defined",LOG_ERR); |
|
| 2014 | - return -1; |
|
| 2015 | - } |
|
| 452 | + $ret=''; |
|
| 453 | + if ($option && $this->civility_id) |
|
| 454 | + {
|
|
| 455 | + if ($langs->transnoentitiesnoconv("Civility".$this->civility_id)!="Civility".$this->civility_id) $ret.=$langs->transnoentitiesnoconv("Civility".$this->civility_id).' ';
|
|
| 456 | + else $ret.=$this->civility_id.' '; |
|
| 457 | + } |
|
| 2016 | 458 | |
| 2017 | - $this->db->begin(); |
|
| 459 | + $ret .= AlDolUtils::dolGetFirstLastname($firstname, $lastname, $nameorder); |
|
| 2018 | 460 | |
| 2019 | - if ($shipping_method_id<0) $shipping_method_id='NULL'; |
|
| 2020 | - dol_syslog(get_class($this).'::setShippingMethod('.$shipping_method_id.')');
|
|
| 461 | + return AlDolUtils::dol_trunc($ret, $maxlen); |
|
| 462 | + } |
|
| 2021 | 463 | |
| 2022 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 2023 | - $sql.= " SET fk_shipping_method = ".$shipping_method_id; |
|
| 2024 | - $sql.= " WHERE rowid=".$this->id; |
|
| 2025 | - $resql = $this->db->query($sql); |
|
| 2026 | - if (! $resql) {
|
|
| 2027 | - dol_syslog(get_class($this).'::setShippingMethod Error ', LOG_DEBUG); |
|
| 2028 | - $this->error = $this->db->lasterror(); |
|
| 2029 | - $error++; |
|
| 2030 | - } else {
|
|
| 2031 | - if (!$notrigger) |
|
| 2032 | - {
|
|
| 2033 | - // Call trigger |
|
| 2034 | - $this->context=array('shippingmethodupdate'=>1);
|
|
| 2035 | - $result = $this->call_trigger(strtoupper(get_class($this)) . '_MODIFY', $userused); |
|
| 2036 | - if ($result < 0) $error++; |
|
| 2037 | - // End call trigger |
|
| 2038 | - } |
|
| 2039 | - } |
|
| 2040 | - if ($error) |
|
| 464 | + /** |
|
| 465 | + * Return full address of contact |
|
| 466 | + * |
|
| 467 | + * @param int $withcountry 1=Add country into address string |
|
| 468 | + * @param string $sep Separator to use to build string |
|
| 469 | + * @param int $withregion 1=Add region into address string |
|
| 470 | + * @return string Full address string |
|
| 471 | + */ |
|
| 472 | + function getFullAddress($withcountry=0, $sep="\n", $withregion=0) |
|
| 473 | + {
|
|
| 474 | + if ($withcountry && $this->country_id && (empty($this->country_code) || empty($this->country))) |
|
| 2041 | 475 | {
|
| 2042 | - $this->db->rollback(); |
|
| 2043 | - return -1; |
|
| 2044 | - } else {
|
|
| 2045 | - $this->shipping_method_id = ($shipping_method_id=='NULL')?null:$shipping_method_id; |
|
| 2046 | - $this->db->commit(); |
|
| 2047 | - return 1; |
|
| 476 | + require_once DOL_DOCUMENT_ROOT .'/core/lib/company.lib.php'; |
|
| 477 | + $tmparray=getCountry($this->country_id,'all'); |
|
| 478 | + $this->country_code=$tmparray['code']; |
|
| 479 | + $this->country =$tmparray['label']; |
|
| 2048 | 480 | } |
| 2049 | - } |
|
| 2050 | - |
|
| 2051 | - |
|
| 2052 | - /** |
|
| 2053 | - * Change the warehouse |
|
| 2054 | - * |
|
| 2055 | - * @param int $warehouse_id Id of warehouse |
|
| 2056 | - * @return int 1 if OK, 0 if KO |
|
| 2057 | - */ |
|
| 2058 | - function setWarehouse($warehouse_id) |
|
| 2059 | - {
|
|
| 2060 | - if (! $this->table_element) {
|
|
| 2061 | - dol_syslog(get_class($this)."::setWarehouse was called on objet with property table_element not defined",LOG_ERR); |
|
| 2062 | - return -1; |
|
| 2063 | - } |
|
| 2064 | - if ($warehouse_id<0) $warehouse_id='NULL'; |
|
| 2065 | - dol_syslog(get_class($this).'::setWarehouse('.$warehouse_id.')');
|
|
| 2066 | - |
|
| 2067 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 2068 | - $sql.= " SET fk_warehouse = ".$warehouse_id; |
|
| 2069 | - $sql.= " WHERE rowid=".$this->id; |
|
| 2070 | - |
|
| 2071 | - if ($this->db->query($sql)) {
|
|
| 2072 | - $this->warehouse_id = ($warehouse_id=='NULL')?null:$warehouse_id; |
|
| 2073 | - return 1; |
|
| 2074 | - } else {
|
|
| 2075 | - dol_syslog(get_class($this).'::setWarehouse Error ', LOG_DEBUG); |
|
| 2076 | - $this->error=$this->db->error(); |
|
| 2077 | - return 0; |
|
| 2078 | - } |
|
| 2079 | - } |
|
| 2080 | - |
|
| 2081 | - |
|
| 2082 | - /** |
|
| 2083 | - * Set last model used by doc generator |
|
| 2084 | - * |
|
| 2085 | - * @param User $user User object that make change |
|
| 2086 | - * @param string $modelpdf Modele name |
|
| 2087 | - * @return int <0 if KO, >0 if OK |
|
| 2088 | - */ |
|
| 2089 | - function setDocModel($user, $modelpdf) |
|
| 2090 | - {
|
|
| 2091 | - if (! $this->table_element) |
|
| 2092 | - {
|
|
| 2093 | - dol_syslog(get_class($this)."::setDocModel was called on objet with property table_element not defined",LOG_ERR); |
|
| 2094 | - return -1; |
|
| 2095 | - } |
|
| 2096 | - |
|
| 2097 | - $newmodelpdf=dol_trunc($modelpdf,255); |
|
| 2098 | - |
|
| 2099 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 2100 | - $sql.= " SET model_pdf = '".$this->db->escape($newmodelpdf)."'"; |
|
| 2101 | - $sql.= " WHERE rowid = ".$this->id; |
|
| 2102 | - // if ($this->element == 'facture') $sql.= " AND fk_statut < 2"; |
|
| 2103 | - // if ($this->element == 'propal') $sql.= " AND fk_statut = 0"; |
|
| 2104 | - |
|
| 2105 | - dol_syslog(get_class($this)."::setDocModel", LOG_DEBUG); |
|
| 2106 | - $resql=$this->db->query($sql); |
|
| 2107 | - if ($resql) |
|
| 2108 | - {
|
|
| 2109 | - $this->modelpdf=$modelpdf; |
|
| 2110 | - return 1; |
|
| 2111 | - } |
|
| 2112 | - else |
|
| 2113 | - {
|
|
| 2114 | - dol_print_error($this->db); |
|
| 2115 | - return 0; |
|
| 2116 | - } |
|
| 2117 | - } |
|
| 2118 | - |
|
| 2119 | - |
|
| 2120 | - /** |
|
| 2121 | - * Change the bank account |
|
| 2122 | - * |
|
| 2123 | - * @param int $fk_account Id of bank account |
|
| 2124 | - * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 2125 | - * @param User $userused Object user |
|
| 2126 | - * @return int 1 if OK, 0 if KO |
|
| 2127 | - */ |
|
| 2128 | - function setBankAccount($fk_account, $notrigger=false, $userused=null) |
|
| 2129 | - {
|
|
| 2130 | - global $user; |
|
| 2131 | 481 | |
| 2132 | - if (empty($userused)) $userused=$user; |
|
| 482 | + if ($withregion && $this->state_id && (empty($this->state_code) || empty($this->state) || empty($this->region) || empty($this->region_cpde))) |
|
| 483 | + {
|
|
| 484 | + require_once DOL_DOCUMENT_ROOT .'/core/lib/company.lib.php'; |
|
| 485 | + $tmparray=getState($this->state_id,'all',0,1); |
|
| 486 | + $this->state_code =$tmparray['code']; |
|
| 487 | + $this->state =$tmparray['label']; |
|
| 488 | + $this->region_code =$tmparray['region_code']; |
|
| 489 | + $this->region =$tmparray['region']; |
|
| 490 | + } |
|
| 2133 | 491 | |
| 2134 | - $error = 0; |
|
| 492 | + return dol_format_address($this, $withcountry, $sep); |
|
| 493 | + } |
|
| 2135 | 494 | |
| 2136 | - if (! $this->table_element) {
|
|
| 2137 | - dol_syslog(get_class($this)."::setBankAccount was called on objet with property table_element not defined",LOG_ERR); |
|
| 2138 | - return -1; |
|
| 2139 | - } |
|
| 2140 | - $this->db->begin(); |
|
| 2141 | 495 | |
| 2142 | - if ($fk_account<0) $fk_account='NULL'; |
|
| 2143 | - dol_syslog(get_class($this).'::setBankAccount('.$fk_account.')');
|
|
| 496 | + /** |
|
| 497 | + * Return full address for banner |
|
| 498 | + * |
|
| 499 | + * @param string $htmlkey HTML id to make banner content unique |
|
| 500 | + * @param Object $object Object (thirdparty, thirdparty of contact for contact, null for a member) |
|
| 501 | + * @return string Full address string |
|
| 502 | + */ |
|
| 503 | + function getBannerAddress($htmlkey, $object) |
|
| 504 | + {
|
|
| 505 | + global $conf, $langs; |
|
| 2144 | 506 | |
| 2145 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 2146 | - $sql.= " SET fk_account = ".$fk_account; |
|
| 2147 | - $sql.= " WHERE rowid=".$this->id; |
|
| 507 | + $countriesusingstate=array('AU','US','IN','GB','ES','UK','TR'); // See also option MAIN_FORCE_STATE_INTO_ADDRESS
|
|
| 2148 | 508 | |
| 2149 | - $resql = $this->db->query($sql); |
|
| 2150 | - if (! $resql) |
|
| 509 | + $contactid=0; |
|
| 510 | + $thirdpartyid=0; |
|
| 511 | + if ($this->element == 'societe') |
|
| 2151 | 512 | {
|
| 2152 | - dol_syslog(get_class($this).'::setBankAccount Error '.$sql.' - '.$this->db->error()); |
|
| 2153 | - $this->error = $this->db->lasterror(); |
|
| 2154 | - $error++; |
|
| 513 | + $thirdpartyid=$this->id; |
|
| 2155 | 514 | } |
| 2156 | - else |
|
| 515 | + if ($this->element == 'contact') |
|
| 2157 | 516 | {
|
| 2158 | - if (!$notrigger) |
|
| 2159 | - {
|
|
| 2160 | - // Call trigger |
|
| 2161 | - $this->context=array('bankaccountupdate'=>1);
|
|
| 2162 | - $result = $this->call_trigger(strtoupper(get_class($this)) . '_MODIFY', $userused); |
|
| 2163 | - if ($result < 0) $error++; |
|
| 2164 | - // End call trigger |
|
| 2165 | - } |
|
| 517 | + $contactid=$this->id; |
|
| 518 | + $thirdpartyid=$object->fk_soc; |
|
| 2166 | 519 | } |
| 2167 | - if ($error) |
|
| 520 | + if ($this->element == 'user') |
|
| 2168 | 521 | {
|
| 2169 | - $this->db->rollback(); |
|
| 2170 | - return -1; |
|
| 522 | + $contactid=$this->contact_id; |
|
| 523 | + $thirdpartyid=$object->fk_soc; |
|
| 2171 | 524 | } |
| 2172 | - else |
|
| 525 | + |
|
| 526 | + $out='<!-- BEGIN part to show address block -->'; |
|
| 527 | + |
|
| 528 | + $outdone=0; |
|
| 529 | + $coords = $this->getFullAddress(1, ', ', Globals::$conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT); |
|
| 530 | + if ($coords) |
|
| 2173 | 531 | {
|
| 2174 | - $this->fk_account = ($fk_account=='NULL')?null:$fk_account; |
|
| 2175 | - $this->db->commit(); |
|
| 2176 | - return 1; |
|
| 532 | + if (!empty(Globals::$conf->use_javascript_ajax)) {
|
|
| 533 | + $namecoords = $this->getFullName($langs,1).'<br>'.$coords; |
|
| 534 | + // hideonsmatphone because copyToClipboard call jquery dialog that does not work with jmobile |
|
| 535 | + $out.='<a href="#" class="hideonsmartphone" onclick="return copyToClipboard(\''.dol_escape_js($namecoords).'\',\''.dol_escape_js($langs->trans("HelpCopyToClipboard")).'\');">';
|
|
| 536 | + $out.=img_picto($langs->trans("Address"), 'object_address.png');
|
|
| 537 | + $out.='</a> '; |
|
| 538 | + } |
|
| 539 | + $out.=dol_print_address($coords, 'address_'.$htmlkey.'_'.$this->id, $this->element, $this->id, 1, ', '); $outdone++; |
|
| 540 | + $outdone++; |
|
| 2177 | 541 | } |
| 2178 | - } |
|
| 2179 | 542 | |
| 543 | + if (!in_array($this->country_code, $countriesusingstate) && empty(Globals::$conf->global->MAIN_FORCE_STATE_INTO_ADDRESS) // If MAIN_FORCE_STATE_INTO_ADDRESS is on, state is already returned previously with getFullAddress |
|
| 544 | + && empty(Globals::$conf->global->SOCIETE_DISABLE_STATE) && $this->state) {
|
|
| 545 | + if (!empty(Globals::$conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT) && Globals::$conf->global->MAIN_SHOW_REGION_IN_STATE_SELECT == 1 && $this->region) {
|
|
| 546 | + $out.=($outdone?' - ':'').$this->region.' - '.$this->state; |
|
| 547 | + } |
|
| 548 | + else {
|
|
| 549 | + $out.=($outdone?' - ':'').$this->state; |
|
| 550 | + } |
|
| 551 | + $outdone++; |
|
| 552 | + } |
|
| 2180 | 553 | |
| 2181 | - // TODO: Move line related operations to CommonObjectLine? |
|
| 2182 | - |
|
| 2183 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2184 | - /** |
|
| 2185 | - * Save a new position (field rang) for details lines. |
|
| 2186 | - * You can choose to set position for lines with already a position or lines without any position defined. |
|
| 2187 | - * |
|
| 2188 | - * @param boolean $renum True to renum all already ordered lines, false to renum only not already ordered lines. |
|
| 2189 | - * @param string $rowidorder ASC or DESC |
|
| 2190 | - * @param boolean $fk_parent_line Table with fk_parent_line field or not |
|
| 2191 | - * @return int <0 if KO, >0 if OK |
|
| 2192 | - */ |
|
| 2193 | - function line_order($renum=false, $rowidorder='ASC', $fk_parent_line=true) |
|
| 2194 | - {
|
|
| 2195 | - // phpcs:enable |
|
| 2196 | - if (! $this->table_element_line) |
|
| 2197 | - {
|
|
| 2198 | - dol_syslog(get_class($this)."::line_order was called on objet with property table_element_line not defined",LOG_ERR); |
|
| 2199 | - return -1; |
|
| 2200 | - } |
|
| 2201 | - if (! $this->fk_element) |
|
| 2202 | - {
|
|
| 2203 | - dol_syslog(get_class($this)."::line_order was called on objet with property fk_element not defined",LOG_ERR); |
|
| 2204 | - return -1; |
|
| 2205 | - } |
|
| 2206 | - |
|
| 2207 | - // Count number of lines to reorder (according to choice $renum) |
|
| 2208 | - $nl=0; |
|
| 2209 | - $sql = 'SELECT count(rowid) FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2210 | - $sql.= ' WHERE '.$this->fk_element.'='.$this->id; |
|
| 2211 | - if (! $renum) $sql.= ' AND rang = 0'; |
|
| 2212 | - if ($renum) $sql.= ' AND rang <> 0'; |
|
| 2213 | - |
|
| 2214 | - dol_syslog(get_class($this)."::line_order", LOG_DEBUG); |
|
| 2215 | - $resql = $this->db->query($sql); |
|
| 2216 | - if ($resql) |
|
| 2217 | - {
|
|
| 2218 | - $row = $this->db->fetch_row($resql); |
|
| 2219 | - $nl = $row[0]; |
|
| 2220 | - } |
|
| 2221 | - else dol_print_error($this->db); |
|
| 2222 | - if ($nl > 0) |
|
| 2223 | - {
|
|
| 2224 | - // The goal of this part is to reorder all lines, with all children lines sharing the same |
|
| 2225 | - // counter that parents. |
|
| 2226 | - $rows=array(); |
|
| 2227 | - |
|
| 2228 | - // We first search all lines that are parent lines (for multilevel details lines) |
|
| 2229 | - $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2230 | - $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2231 | - if ($fk_parent_line) $sql.= ' AND fk_parent_line IS NULL'; |
|
| 2232 | - $sql.= ' ORDER BY rang ASC, rowid '.$rowidorder; |
|
| 2233 | - |
|
| 2234 | - dol_syslog(get_class($this)."::line_order search all parent lines", LOG_DEBUG); |
|
| 2235 | - $resql = $this->db->query($sql); |
|
| 2236 | - if ($resql) |
|
| 2237 | - {
|
|
| 2238 | - $i=0; |
|
| 2239 | - $num = $this->db->num_rows($resql); |
|
| 2240 | - while ($i < $num) |
|
| 2241 | - {
|
|
| 2242 | - $row = $this->db->fetch_row($resql); |
|
| 2243 | - $rows[] = $row[0]; // Add parent line into array rows |
|
| 2244 | - $childrens = $this->getChildrenOfLine($row[0]); |
|
| 2245 | - if (! empty($childrens)) |
|
| 2246 | - {
|
|
| 2247 | - foreach($childrens as $child) |
|
| 2248 | - {
|
|
| 2249 | - array_push($rows, $child); |
|
| 2250 | - } |
|
| 2251 | - } |
|
| 2252 | - $i++; |
|
| 2253 | - } |
|
| 554 | + if (! empty($this->phone) || ! empty($this->phone_pro) || ! empty($this->phone_mobile) || ! empty($this->phone_perso) || ! empty($this->fax) || ! empty($this->office_phone) || ! empty($this->user_mobile) || ! empty($this->office_fax)) $out.=($outdone?'<br>':''); |
|
| 555 | + if (! empty($this->phone) && empty($this->phone_pro)) { // For objects that store pro phone into ->phone
|
|
| 556 | + $out.=dol_print_phone($this->phone,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','phone',$langs->trans("PhonePro")); $outdone++;
|
|
| 557 | + } |
|
| 558 | + if (! empty($this->phone_pro)) {
|
|
| 559 | + $out.=dol_print_phone($this->phone_pro,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','phone',$langs->trans("PhonePro")); $outdone++;
|
|
| 560 | + } |
|
| 561 | + if (! empty($this->phone_mobile)) {
|
|
| 562 | + $out.=dol_print_phone($this->phone_mobile,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','mobile',$langs->trans("PhoneMobile")); $outdone++;
|
|
| 563 | + } |
|
| 564 | + if (! empty($this->phone_perso)) {
|
|
| 565 | + $out.=dol_print_phone($this->phone_perso,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','phone',$langs->trans("PhonePerso")); $outdone++;
|
|
| 566 | + } |
|
| 567 | + if (! empty($this->office_phone)) {
|
|
| 568 | + $out.=dol_print_phone($this->office_phone,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','phone',$langs->trans("PhonePro")); $outdone++;
|
|
| 569 | + } |
|
| 570 | + if (! empty($this->user_mobile)) {
|
|
| 571 | + $out.=dol_print_phone($this->user_mobile,$this->country_code,$contactid,$thirdpartyid,'AC_TEL',' ','mobile',$langs->trans("PhoneMobile")); $outdone++;
|
|
| 572 | + } |
|
| 573 | + if (! empty($this->fax)) {
|
|
| 574 | + $out.=dol_print_phone($this->fax,$this->country_code,$contactid,$thirdpartyid,'AC_FAX',' ','fax',$langs->trans("Fax")); $outdone++;
|
|
| 575 | + } |
|
| 576 | + if (! empty($this->office_fax)) {
|
|
| 577 | + $out.=dol_print_phone($this->office_fax,$this->country_code,$contactid,$thirdpartyid,'AC_FAX',' ','fax',$langs->trans("Fax")); $outdone++;
|
|
| 578 | + } |
|
| 2254 | 579 | |
| 2255 | - // Now we set a new number for each lines (parent and children with children included into parent tree) |
|
| 2256 | - if (! empty($rows)) |
|
| 2257 | - {
|
|
| 2258 | - foreach($rows as $key => $row) |
|
| 2259 | - {
|
|
| 2260 | - $this->updateRangOfLine($row, ($key+1)); |
|
| 2261 | - } |
|
| 2262 | - } |
|
| 2263 | - } |
|
| 2264 | - else |
|
| 2265 | - {
|
|
| 2266 | - dol_print_error($this->db); |
|
| 2267 | - } |
|
| 2268 | - } |
|
| 2269 | - return 1; |
|
| 2270 | - } |
|
| 2271 | - |
|
| 2272 | - /** |
|
| 2273 | - * Get children of line |
|
| 2274 | - * |
|
| 2275 | - * @param int $id Id of parent line |
|
| 2276 | - * @return array Array with list of children lines id |
|
| 2277 | - */ |
|
| 2278 | - function getChildrenOfLine($id) |
|
| 2279 | - {
|
|
| 2280 | - $rows=array(); |
|
| 2281 | - |
|
| 2282 | - $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2283 | - $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2284 | - $sql.= ' AND fk_parent_line = '.$id; |
|
| 2285 | - $sql.= ' ORDER BY rang ASC'; |
|
| 2286 | - |
|
| 2287 | - dol_syslog(get_class($this)."::getChildrenOfLine search children lines for line ".$id."", LOG_DEBUG); |
|
| 2288 | - $resql = $this->db->query($sql); |
|
| 2289 | - if ($resql) |
|
| 2290 | - {
|
|
| 2291 | - $i=0; |
|
| 2292 | - $num = $this->db->num_rows($resql); |
|
| 2293 | - while ($i < $num) |
|
| 2294 | - {
|
|
| 2295 | - $row = $this->db->fetch_row($resql); |
|
| 2296 | - $rows[$i] = $row[0]; |
|
| 2297 | - $i++; |
|
| 2298 | - } |
|
| 2299 | - } |
|
| 580 | + $out.='<div style="clear: both;"></div>'; |
|
| 581 | + $outdone=0; |
|
| 582 | + if (! empty($this->email)) |
|
| 583 | + {
|
|
| 584 | + $out.=dol_print_email($this->email,$this->id,$object->id,'AC_EMAIL',0,0,1); |
|
| 585 | + $outdone++; |
|
| 586 | + } |
|
| 587 | + if (! empty($this->url)) |
|
| 588 | + {
|
|
| 589 | + $out.=dol_print_url($this->url,'_goout',0,1); |
|
| 590 | + $outdone++; |
|
| 591 | + } |
|
| 592 | + $out.='<div style="clear: both;">'; |
|
| 593 | + if (!empty(Globals::$conf->socialnetworks->enabled)) {
|
|
| 594 | + if ($this->skype) $out.=dol_print_socialnetworks($this->skype,$this->id,$object->id,'skype'); |
|
| 595 | + $outdone++; |
|
| 596 | + if ($this->jabberid) $out.=dol_print_socialnetworks($this->jabberid,$this->id,$object->id,'jabber'); |
|
| 597 | + $outdone++; |
|
| 598 | + if ($this->twitter) $out.=dol_print_socialnetworks($this->twitter,$this->id,$object->id,'twitter'); |
|
| 599 | + $outdone++; |
|
| 600 | + if ($this->facebook) $out.=dol_print_socialnetworks($this->facebook,$this->id,$object->id,'facebook'); |
|
| 601 | + $outdone++; |
|
| 602 | + } |
|
| 603 | + $out.='</div>'; |
|
| 2300 | 604 | |
| 2301 | - return $rows; |
|
| 2302 | - } |
|
| 605 | + $out.='<!-- END Part to show address block -->'; |
|
| 2303 | 606 | |
| 2304 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2305 | - /** |
|
| 2306 | - * Update a line to have a lower rank |
|
| 2307 | - * |
|
| 2308 | - * @param int $rowid Id of line |
|
| 2309 | - * @param boolean $fk_parent_line Table with fk_parent_line field or not |
|
| 2310 | - * @return void |
|
| 2311 | - */ |
|
| 2312 | - function line_up($rowid, $fk_parent_line=true) |
|
| 2313 | - {
|
|
| 2314 | - // phpcs:enable |
|
| 2315 | - $this->line_order(false, 'ASC', $fk_parent_line); |
|
| 607 | + return $out; |
|
| 608 | + } |
|
| 2316 | 609 | |
| 2317 | - // Get rang of line |
|
| 2318 | - $rang = $this->getRangOfLine($rowid); |
|
| 610 | + /** |
|
| 611 | + * Return the link of last main doc file for direct public download. |
|
| 612 | + * |
|
| 613 | + * @param string $modulepart Module related to document |
|
| 614 | + * @param int $initsharekey Init the share key if it was not yet defined |
|
| 615 | + * @param int $relativelink 0=Return full external link, 1=Return link relative to root of file |
|
| 616 | + * @return string Link or empty string if there is no download link |
|
| 617 | + */ |
|
| 618 | + function getLastMainDocLink($modulepart, $initsharekey=0, $relativelink=0) |
|
| 619 | + {
|
|
| 620 | + global $user, $dolibarr_main_url_root; |
|
| 2319 | 621 | |
| 2320 | - // Update position of line |
|
| 2321 | - $this->updateLineUp($rowid, $rang); |
|
| 2322 | - } |
|
| 622 | + if (empty($this->last_main_doc)) |
|
| 623 | + {
|
|
| 624 | + return ''; // No way to known which document name to use |
|
| 625 | + } |
|
| 2323 | 626 | |
| 2324 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2325 | - /** |
|
| 2326 | - * Update a line to have a higher rank |
|
| 2327 | - * |
|
| 2328 | - * @param int $rowid Id of line |
|
| 2329 | - * @param boolean $fk_parent_line Table with fk_parent_line field or not |
|
| 2330 | - * @return void |
|
| 2331 | - */ |
|
| 2332 | - function line_down($rowid, $fk_parent_line=true) |
|
| 2333 | - {
|
|
| 2334 | - // phpcs:enable |
|
| 2335 | - $this->line_order(false, 'ASC', $fk_parent_line); |
|
| 2336 | - |
|
| 2337 | - // Get rang of line |
|
| 2338 | - $rang = $this->getRangOfLine($rowid); |
|
| 2339 | - |
|
| 2340 | - // Get max value for rang |
|
| 2341 | - $max = $this->line_max(); |
|
| 2342 | - |
|
| 2343 | - // Update position of line |
|
| 2344 | - $this->updateLineDown($rowid, $rang, $max); |
|
| 2345 | - } |
|
| 2346 | - |
|
| 2347 | - /** |
|
| 2348 | - * Update position of line (rang) |
|
| 2349 | - * |
|
| 2350 | - * @param int $rowid Id of line |
|
| 2351 | - * @param int $rang Position |
|
| 2352 | - * @return void |
|
| 2353 | - */ |
|
| 2354 | - function updateRangOfLine($rowid,$rang) |
|
| 2355 | - {
|
|
| 2356 | - $fieldposition = 'rang'; |
|
| 2357 | - if (in_array($this->table_element_line, array('ecm_files', 'emailcollector_emailcollectoraction'))) $fieldposition = 'position';
|
|
| 2358 | - |
|
| 2359 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.$rang; |
|
| 2360 | - $sql.= ' WHERE rowid = '.$rowid; |
|
| 2361 | - |
|
| 2362 | - dol_syslog(get_class($this)."::updateRangOfLine", LOG_DEBUG); |
|
| 2363 | - if (! $this->db->query($sql)) |
|
| 2364 | - {
|
|
| 2365 | - dol_print_error($this->db); |
|
| 2366 | - } |
|
| 2367 | - } |
|
| 627 | + include_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmfiles.class.php'; |
|
| 628 | + $ecmfile=new EcmFiles($this->db); |
|
| 629 | + $result = $ecmfile->fetch(0, '', $this->last_main_doc); |
|
| 630 | + if ($result < 0) |
|
| 631 | + {
|
|
| 632 | + $this->error = $ecmfile->error; |
|
| 633 | + $this->errors = $ecmfile->errors; |
|
| 634 | + return -1; |
|
| 635 | + } |
|
| 2368 | 636 | |
| 2369 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2370 | - /** |
|
| 2371 | - * Update position of line with ajax (rang) |
|
| 2372 | - * |
|
| 2373 | - * @param array $rows Array of rows |
|
| 2374 | - * @return void |
|
| 2375 | - */ |
|
| 2376 | - function line_ajaxorder($rows) |
|
| 2377 | - {
|
|
| 2378 | - // phpcs:enable |
|
| 2379 | - $num = count($rows); |
|
| 2380 | - for ($i = 0 ; $i < $num ; $i++) |
|
| 2381 | - {
|
|
| 2382 | - $this->updateRangOfLine($rows[$i], ($i+1)); |
|
| 2383 | - } |
|
| 2384 | - } |
|
| 2385 | - |
|
| 2386 | - /** |
|
| 2387 | - * Update position of line up (rang) |
|
| 2388 | - * |
|
| 2389 | - * @param int $rowid Id of line |
|
| 2390 | - * @param int $rang Position |
|
| 2391 | - * @return void |
|
| 2392 | - */ |
|
| 2393 | - function updateLineUp($rowid,$rang) |
|
| 2394 | - {
|
|
| 2395 | - if ($rang > 1) |
|
| 2396 | - {
|
|
| 2397 | - $fieldposition = 'rang'; |
|
| 2398 | - if (in_array($this->table_element_line, array('ecm_files', 'emailcollector_emailcollectoraction'))) $fieldposition = 'position';
|
|
| 2399 | - |
|
| 2400 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.$rang ; |
|
| 2401 | - $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2402 | - $sql.= ' AND rang = '.($rang - 1); |
|
| 2403 | - if ($this->db->query($sql) ) |
|
| 2404 | - {
|
|
| 2405 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.($rang - 1); |
|
| 2406 | - $sql.= ' WHERE rowid = '.$rowid; |
|
| 2407 | - if (! $this->db->query($sql) ) |
|
| 2408 | - {
|
|
| 2409 | - dol_print_error($this->db); |
|
| 2410 | - } |
|
| 2411 | - } |
|
| 2412 | - else |
|
| 2413 | - {
|
|
| 2414 | - dol_print_error($this->db); |
|
| 2415 | - } |
|
| 2416 | - } |
|
| 2417 | - } |
|
| 2418 | - |
|
| 2419 | - /** |
|
| 2420 | - * Update position of line down (rang) |
|
| 2421 | - * |
|
| 2422 | - * @param int $rowid Id of line |
|
| 2423 | - * @param int $rang Position |
|
| 2424 | - * @param int $max Max |
|
| 2425 | - * @return void |
|
| 2426 | - */ |
|
| 2427 | - function updateLineDown($rowid,$rang,$max) |
|
| 2428 | - {
|
|
| 2429 | - if ($rang < $max) |
|
| 2430 | - {
|
|
| 2431 | - $fieldposition = 'rang'; |
|
| 2432 | - if (in_array($this->table_element_line, array('ecm_files', 'emailcollector_emailcollectoraction'))) $fieldposition = 'position';
|
|
| 2433 | - |
|
| 2434 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.$rang; |
|
| 2435 | - $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2436 | - $sql.= ' AND rang = '.($rang+1); |
|
| 2437 | - if ($this->db->query($sql) ) |
|
| 2438 | - {
|
|
| 2439 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.($rang+1); |
|
| 2440 | - $sql.= ' WHERE rowid = '.$rowid; |
|
| 2441 | - if (! $this->db->query($sql) ) |
|
| 637 | + if (empty($ecmfile->id)) |
|
| 638 | + {
|
|
| 639 | + // Add entry into index |
|
| 640 | + if ($initsharekey) |
|
| 641 | + {
|
|
| 642 | + require_once DOL_DOCUMENT_ROOT.'/core/lib/security2.lib.php'; |
|
| 643 | + // TODO We can't, we dont' have full path of file, only last_main_doc adn ->element, so we must rebuild full path first |
|
| 644 | + /* |
|
| 645 | + $ecmfile->filepath = $rel_dir; |
|
| 646 | + $ecmfile->filename = $filename; |
|
| 647 | + $ecmfile->label = md5_file(dol_osencode($destfull)); // hash of file content |
|
| 648 | + $ecmfile->fullpath_orig = ''; |
|
| 649 | + $ecmfile->gen_or_uploaded = 'generated'; |
|
| 650 | + $ecmfile->description = ''; // indexed content |
|
| 651 | + $ecmfile->keyword = ''; // keyword content |
|
| 652 | + $ecmfile->share = getRandomPassword(true); |
|
| 653 | + $result = $ecmfile->create($user); |
|
| 654 | + if ($result < 0) |
|
| 2442 | 655 | {
|
| 2443 | - dol_print_error($this->db); |
|
| 656 | + $this->error = $ecmfile->error; |
|
| 657 | + $this->errors = $ecmfile->errors; |
|
| 2444 | 658 | } |
| 2445 | - } |
|
| 2446 | - else |
|
| 2447 | - {
|
|
| 2448 | - dol_print_error($this->db); |
|
| 2449 | - } |
|
| 2450 | - } |
|
| 2451 | - } |
|
| 2452 | - |
|
| 2453 | - /** |
|
| 2454 | - * Get position of line (rang) |
|
| 2455 | - * |
|
| 2456 | - * @param int $rowid Id of line |
|
| 2457 | - * @return int Value of rang in table of lines |
|
| 2458 | - */ |
|
| 2459 | - function getRangOfLine($rowid) |
|
| 2460 | - {
|
|
| 2461 | - $sql = 'SELECT rang FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2462 | - $sql.= ' WHERE rowid ='.$rowid; |
|
| 2463 | - |
|
| 2464 | - dol_syslog(get_class($this)."::getRangOfLine", LOG_DEBUG); |
|
| 2465 | - $resql = $this->db->query($sql); |
|
| 2466 | - if ($resql) |
|
| 2467 | - {
|
|
| 2468 | - $row = $this->db->fetch_row($resql); |
|
| 2469 | - return $row[0]; |
|
| 2470 | - } |
|
| 2471 | - } |
|
| 2472 | - |
|
| 2473 | - /** |
|
| 2474 | - * Get rowid of the line relative to its position |
|
| 2475 | - * |
|
| 2476 | - * @param int $rang Rang value |
|
| 2477 | - * @return int Rowid of the line |
|
| 2478 | - */ |
|
| 2479 | - function getIdOfLine($rang) |
|
| 2480 | - {
|
|
| 2481 | - $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2482 | - $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2483 | - $sql.= ' AND rang = '.$rang; |
|
| 2484 | - $resql = $this->db->query($sql); |
|
| 2485 | - if ($resql) |
|
| 2486 | - {
|
|
| 2487 | - $row = $this->db->fetch_row($resql); |
|
| 2488 | - return $row[0]; |
|
| 2489 | - } |
|
| 2490 | - } |
|
| 659 | + */ |
|
| 660 | + } |
|
| 661 | + else return ''; |
|
| 662 | + } |
|
| 663 | + elseif (empty($ecmfile->share)) |
|
| 664 | + {
|
|
| 665 | + // Add entry into index |
|
| 666 | + if ($initsharekey) |
|
| 667 | + {
|
|
| 668 | + require_once DOL_DOCUMENT_ROOT.'/core/lib/security2.lib.php'; |
|
| 669 | + $ecmfile->share = getRandomPassword(true); |
|
| 670 | + $ecmfile->update($user); |
|
| 671 | + } |
|
| 672 | + else return ''; |
|
| 673 | + } |
|
| 2491 | 674 | |
| 2492 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2493 | - /** |
|
| 2494 | - * Get max value used for position of line (rang) |
|
| 2495 | - * |
|
| 2496 | - * @param int $fk_parent_line Parent line id |
|
| 2497 | - * @return int Max value of rang in table of lines |
|
| 2498 | - */ |
|
| 2499 | - function line_max($fk_parent_line=0) |
|
| 2500 | - {
|
|
| 2501 | - // phpcs:enable |
|
| 2502 | - // Search the last rang with fk_parent_line |
|
| 2503 | - if ($fk_parent_line) |
|
| 2504 | - {
|
|
| 2505 | - $sql = 'SELECT max(rang) FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2506 | - $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2507 | - $sql.= ' AND fk_parent_line = '.$fk_parent_line; |
|
| 2508 | - |
|
| 2509 | - dol_syslog(get_class($this)."::line_max", LOG_DEBUG); |
|
| 2510 | - $resql = $this->db->query($sql); |
|
| 2511 | - if ($resql) |
|
| 2512 | - {
|
|
| 2513 | - $row = $this->db->fetch_row($resql); |
|
| 2514 | - if (! empty($row[0])) |
|
| 2515 | - {
|
|
| 2516 | - return $row[0]; |
|
| 2517 | - } |
|
| 2518 | - else |
|
| 2519 | - {
|
|
| 2520 | - return $this->getRangOfLine($fk_parent_line); |
|
| 2521 | - } |
|
| 2522 | - } |
|
| 2523 | - } |
|
| 2524 | - // If not, search the last rang of element |
|
| 2525 | - else |
|
| 2526 | - {
|
|
| 2527 | - $sql = 'SELECT max(rang) FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2528 | - $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2529 | - |
|
| 2530 | - dol_syslog(get_class($this)."::line_max", LOG_DEBUG); |
|
| 2531 | - $resql = $this->db->query($sql); |
|
| 2532 | - if ($resql) |
|
| 2533 | - {
|
|
| 2534 | - $row = $this->db->fetch_row($resql); |
|
| 2535 | - return $row[0]; |
|
| 2536 | - } |
|
| 2537 | - } |
|
| 2538 | - } |
|
| 675 | + // Define $urlwithroot |
|
| 676 | + $urlwithouturlroot=preg_replace('/'.preg_quote(DOL_URL_ROOT,'/').'$/i','',trim($dolibarr_main_url_root));
|
|
| 677 | + $urlwithroot=$urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file |
|
| 678 | + //$urlwithroot=DOL_MAIN_URL_ROOT; // This is to use same domain name than current |
|
| 2539 | 679 | |
| 2540 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2541 | - /** |
|
| 2542 | - * Update external ref of element |
|
| 2543 | - * |
|
| 2544 | - * @param string $ref_ext Update field ref_ext |
|
| 2545 | - * @return int <0 if KO, >0 if OK |
|
| 2546 | - */ |
|
| 2547 | - function update_ref_ext($ref_ext) |
|
| 2548 | - {
|
|
| 2549 | - // phpcs:enable |
|
| 2550 | - if (! $this->table_element) |
|
| 2551 | - {
|
|
| 2552 | - dol_syslog(get_class($this)."::update_ref_ext was called on objet with property table_element not defined", LOG_ERR); |
|
| 2553 | - return -1; |
|
| 2554 | - } |
|
| 2555 | - |
|
| 2556 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 2557 | - $sql.= " SET ref_ext = '".$this->db->escape($ref_ext)."'"; |
|
| 2558 | - $sql.= " WHERE ".(isset($this->table_rowid)?$this->table_rowid:'rowid')." = ". $this->id; |
|
| 2559 | - |
|
| 2560 | - dol_syslog(get_class($this)."::update_ref_ext", LOG_DEBUG); |
|
| 2561 | - if ($this->db->query($sql)) |
|
| 2562 | - {
|
|
| 2563 | - $this->ref_ext = $ref_ext; |
|
| 2564 | - return 1; |
|
| 2565 | - } |
|
| 2566 | - else |
|
| 2567 | - {
|
|
| 2568 | - $this->error=$this->db->error(); |
|
| 2569 | - return -1; |
|
| 2570 | - } |
|
| 2571 | - } |
|
| 680 | + $forcedownload=0; |
|
| 2572 | 681 | |
| 2573 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2574 | - /** |
|
| 2575 | - * Update note of element |
|
| 2576 | - * |
|
| 2577 | - * @param string $note New value for note |
|
| 2578 | - * @param string $suffix '', '_public' or '_private' |
|
| 2579 | - * @return int <0 if KO, >0 if OK |
|
| 2580 | - */ |
|
| 2581 | - function update_note($note, $suffix='') |
|
| 2582 | - {
|
|
| 2583 | - // phpcs:enable |
|
| 2584 | - global $user; |
|
| 2585 | - |
|
| 2586 | - if (! $this->table_element) |
|
| 2587 | - {
|
|
| 2588 | - $this->error='update_note was called on objet with property table_element not defined'; |
|
| 2589 | - dol_syslog(get_class($this)."::update_note was called on objet with property table_element not defined", LOG_ERR); |
|
| 2590 | - return -1; |
|
| 2591 | - } |
|
| 2592 | - if (! in_array($suffix,array('','_public','_private')))
|
|
| 2593 | - {
|
|
| 2594 | - $this->error='update_note Parameter suffix must be empty, \'_private\' or \'_public\''; |
|
| 2595 | - dol_syslog(get_class($this)."::update_note Parameter suffix must be empty, '_private' or '_public'", LOG_ERR); |
|
| 2596 | - return -2; |
|
| 2597 | - } |
|
| 2598 | - // Special cas |
|
| 2599 | - //var_dump($this->table_element);exit; |
|
| 2600 | - if ($this->table_element == 'product') $suffix=''; |
|
| 2601 | - |
|
| 2602 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 2603 | - $sql.= " SET note".$suffix." = ".(!empty($note)?("'".$this->db->escape($note)."'"):"NULL");
|
|
| 2604 | - $sql.= " ,".(in_array($this->table_element, array('actioncomm', 'adherent', 'advtargetemailing', 'cronjob', 'establishment'))?"fk_user_mod":"fk_user_modif")." = ".$user->id;
|
|
| 2605 | - $sql.= " WHERE rowid =". $this->id; |
|
| 2606 | - |
|
| 2607 | - dol_syslog(get_class($this)."::update_note", LOG_DEBUG); |
|
| 2608 | - if ($this->db->query($sql)) |
|
| 2609 | - {
|
|
| 2610 | - if ($suffix == '_public') $this->note_public = $note; |
|
| 2611 | - else if ($suffix == '_private') $this->note_private = $note; |
|
| 2612 | - else |
|
| 2613 | - {
|
|
| 2614 | - $this->note = $note; // deprecated |
|
| 2615 | - $this->note_private = $note; |
|
| 2616 | - } |
|
| 2617 | - return 1; |
|
| 2618 | - } |
|
| 2619 | - else |
|
| 2620 | - {
|
|
| 2621 | - $this->error=$this->db->lasterror(); |
|
| 2622 | - return -1; |
|
| 2623 | - } |
|
| 2624 | - } |
|
| 682 | + $paramlink=''; |
|
| 683 | + //if (! empty($modulepart)) $paramlink.=($paramlink?'&':'').'modulepart='.$modulepart; // For sharing with hash (so public files), modulepart is not required. |
|
| 684 | + //if (! empty($ecmfile->entity)) $paramlink.='&entity='.$ecmfile->entity; // For sharing with hash (so public files), entity is not required. |
|
| 685 | + //$paramlink.=($paramlink?'&':'').'file='.urlencode($filepath); // No need of name of file for public link, we will use the hash |
|
| 686 | + if (! empty($ecmfile->share)) $paramlink.=($paramlink?'&':'').'hashp='.$ecmfile->share; // Hash for public share |
|
| 687 | + if ($forcedownload) $paramlink.=($paramlink?'&':'').'attachment=1'; |
|
| 688 | + |
|
| 689 | + if ($relativelink) |
|
| 690 | + {
|
|
| 691 | + $linktoreturn='document.php'.($paramlink?'?'.$paramlink:''); |
|
| 692 | + } |
|
| 693 | + else |
|
| 694 | + {
|
|
| 695 | + $linktoreturn=$urlwithroot.'/document.php'.($paramlink?'?'.$paramlink:''); |
|
| 696 | + } |
|
| 697 | + |
|
| 698 | + // Here $ecmfile->share is defined |
|
| 699 | + return $linktoreturn; |
|
| 700 | + } |
|
| 2625 | 701 | |
| 2626 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2627 | - /** |
|
| 2628 | - * Update public note (kept for backward compatibility) |
|
| 2629 | - * |
|
| 2630 | - * @param string $note New value for note |
|
| 2631 | - * @return int <0 if KO, >0 if OK |
|
| 2632 | - * @deprecated |
|
| 2633 | - * @see update_note() |
|
| 2634 | - */ |
|
| 2635 | - function update_note_public($note) |
|
| 2636 | - {
|
|
| 2637 | - // phpcs:enable |
|
| 2638 | - return $this->update_note($note,'_public'); |
|
| 2639 | - } |
|
| 2640 | 702 | |
| 2641 | 703 | // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
| 2642 | - /** |
|
| 2643 | - * Update total_ht, total_ttc, total_vat, total_localtax1, total_localtax2 for an object (sum of lines). |
|
| 2644 | - * Must be called at end of methods addline or updateline. |
|
| 2645 | - * |
|
| 2646 | - * @param int $exclspec >0 = Exclude special product (product_type=9) |
|
| 2647 | - * @param string $roundingadjust 'none'=Do nothing, 'auto'=Use default method (MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND if defined, or '0'), '0'=Force mode total of rounding, '1'=Force mode rounding of total |
|
| 2648 | - * @param int $nodatabaseupdate 1=Do not update database. Update only properties of object. |
|
| 2649 | - * @param Societe $seller If roundingadjust is '0' or '1' or maybe 'auto', it means we recalculate total for lines before calculating total for object and for this, we need seller object. |
|
| 2650 | - * @return int <0 if KO, >0 if OK |
|
| 2651 | - */ |
|
| 2652 | - function update_price($exclspec=0,$roundingadjust='none',$nodatabaseupdate=0,$seller=null) |
|
| 2653 | - {
|
|
| 704 | + /** |
|
| 705 | + * Add a link between element $this->element and a contact |
|
| 706 | + * |
|
| 707 | + * @param int $fk_socpeople Id of thirdparty contact (if source = 'external') or id of user (if souce = 'internal') to link |
|
| 708 | + * @param int $type_contact Type of contact (code or id). Must be id or code found into table llx_c_type_contact. For example: SALESREPFOLL |
|
| 709 | + * @param string $source external=Contact extern (llx_socpeople), internal=Contact intern (llx_user) |
|
| 710 | + * @param int $notrigger Disable all triggers |
|
| 711 | + * @return int <0 if KO, >0 if OK |
|
| 712 | + */ |
|
| 713 | + function add_contact($fk_socpeople, $type_contact, $source='external',$notrigger=0) |
|
| 714 | + {
|
|
| 2654 | 715 | // phpcs:enable |
| 2655 | - global $conf, $hookmanager, $action; |
|
| 2656 | - |
|
| 2657 | - // Some external module want no update price after a trigger because they have another method to calculate the total (ex: with an extrafield) |
|
| 2658 | - $MODULE = ""; |
|
| 2659 | - if ($this->element == 'propal') |
|
| 2660 | - $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_PROPOSAL"; |
|
| 2661 | - elseif ($this->element == 'order') |
|
| 2662 | - $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_ORDER"; |
|
| 2663 | - elseif ($this->element == 'facture') |
|
| 2664 | - $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_INVOICE"; |
|
| 2665 | - elseif ($this->element == 'facture_fourn') |
|
| 2666 | - $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_SUPPLIER_INVOICE"; |
|
| 2667 | - elseif ($this->element == 'order_supplier') |
|
| 2668 | - $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_SUPPLIER_ORDER"; |
|
| 2669 | - elseif ($this->element == 'supplier_proposal') |
|
| 2670 | - $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_SUPPLIER_PROPOSAL"; |
|
| 2671 | - |
|
| 2672 | - if (! empty($MODULE)) {
|
|
| 2673 | - if (!empty(Globals::$conf->global->$MODULE)) {
|
|
| 2674 | - $modsactivated = explode(',', Globals::$conf->global->$MODULE);
|
|
| 2675 | - foreach ($modsactivated as $mod) {
|
|
| 2676 | - if (Globals::$conf->$mod->enabled) |
|
| 2677 | - return 1; // update was disabled by specific setup |
|
| 2678 | - } |
|
| 2679 | - } |
|
| 2680 | - } |
|
| 716 | + global $user,$langs; |
|
| 2681 | 717 | |
| 2682 | - include_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php'; |
|
| 2683 | 718 | |
| 2684 | - if ($roundingadjust == '-1') $roundingadjust='auto'; // For backward compatibility |
|
| 719 | + dol_syslog(get_class($this)."::add_contact $fk_socpeople, $type_contact, $source, $notrigger"); |
|
| 2685 | 720 | |
| 2686 | - $forcedroundingmode=$roundingadjust; |
|
| 2687 | - if ($forcedroundingmode == 'auto' && isset(Globals::$conf->global->MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND)) |
|
| 2688 | - $forcedroundingmode = Globals::$conf->global->MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND; |
|
| 2689 | - elseif ($forcedroundingmode == 'auto') $forcedroundingmode='0'; |
|
| 721 | + // Check parameters |
|
| 722 | + if ($fk_socpeople <= 0) |
|
| 723 | + {
|
|
| 724 | + $langs->load("errors");
|
|
| 725 | + $this->error=$langs->trans("ErrorWrongValueForParameterX","1");
|
|
| 726 | + dol_syslog(get_class($this)."::add_contact ".$this->error,LOG_ERR); |
|
| 727 | + return -1; |
|
| 728 | + } |
|
| 729 | + if (! $type_contact) |
|
| 730 | + {
|
|
| 731 | + $langs->load("errors");
|
|
| 732 | + $this->error=$langs->trans("ErrorWrongValueForParameterX","2");
|
|
| 733 | + dol_syslog(get_class($this)."::add_contact ".$this->error,LOG_ERR); |
|
| 734 | + return -2; |
|
| 735 | + } |
|
| 2690 | 736 | |
| 2691 | - $error=0; |
|
| 2692 | - |
|
| 2693 | - $multicurrency_tx = !empty($this->multicurrency_tx) ? $this->multicurrency_tx : 1; |
|
| 2694 | - |
|
| 2695 | - // Define constants to find lines to sum |
|
| 2696 | - $fieldtva='total_tva'; |
|
| 2697 | - $fieldlocaltax1='total_localtax1'; |
|
| 2698 | - $fieldlocaltax2='total_localtax2'; |
|
| 2699 | - $fieldup='subprice'; |
|
| 2700 | - if ($this->element == 'facture_fourn' || $this->element == 'invoice_supplier') |
|
| 2701 | - {
|
|
| 2702 | - $fieldtva='tva'; |
|
| 2703 | - $fieldup='pu_ht'; |
|
| 2704 | - } |
|
| 2705 | - if ($this->element == 'expensereport') |
|
| 2706 | - {
|
|
| 2707 | - $fieldup='value_unit'; |
|
| 2708 | - } |
|
| 2709 | - |
|
| 2710 | - $sql = 'SELECT rowid, qty, '.$fieldup.' as up, remise_percent, total_ht, '.$fieldtva.' as total_tva, total_ttc, '.$fieldlocaltax1.' as total_localtax1, '.$fieldlocaltax2.' as total_localtax2,'; |
|
| 2711 | - $sql.= ' tva_tx as vatrate, localtax1_tx, localtax2_tx, localtax1_type, localtax2_type, info_bits, product_type'; |
|
| 2712 | - if ($this->table_element_line == 'facturedet') $sql.= ', situation_percent'; |
|
| 2713 | - $sql.= ', multicurrency_total_ht, multicurrency_total_tva, multicurrency_total_ttc'; |
|
| 2714 | - $sql.= ' FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2715 | - $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2716 | - if ($exclspec) |
|
| 2717 | - {
|
|
| 2718 | - $product_field='product_type'; |
|
| 2719 | - if ($this->table_element_line == 'contratdet') $product_field=''; // contratdet table has no product_type field |
|
| 2720 | - if ($product_field) $sql.= ' AND '.$product_field.' <> 9'; |
|
| 2721 | - } |
|
| 2722 | - $sql.= ' ORDER by rowid'; // We want to be sure to always use same order of line to not change lines differently when option MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND is used |
|
| 2723 | - |
|
| 2724 | - dol_syslog(get_class($this)."::update_price", LOG_DEBUG); |
|
| 2725 | - $resql = $this->db->query($sql); |
|
| 2726 | - if ($resql) |
|
| 2727 | - {
|
|
| 2728 | - $this->total_ht = 0; |
|
| 2729 | - $this->total_tva = 0; |
|
| 2730 | - $this->total_localtax1 = 0; |
|
| 2731 | - $this->total_localtax2 = 0; |
|
| 2732 | - $this->total_ttc = 0; |
|
| 2733 | - $total_ht_by_vats = array(); |
|
| 2734 | - $total_tva_by_vats = array(); |
|
| 2735 | - $total_ttc_by_vats = array(); |
|
| 2736 | - $this->multicurrency_total_ht = 0; |
|
| 2737 | - $this->multicurrency_total_tva = 0; |
|
| 2738 | - $this->multicurrency_total_ttc = 0; |
|
| 2739 | - |
|
| 2740 | - $num = $this->db->num_rows($resql); |
|
| 2741 | - $i = 0; |
|
| 2742 | - while ($i < $num) |
|
| 2743 | - {
|
|
| 2744 | - $obj = $this->db->fetch_object($resql); |
|
| 737 | + $id_type_contact=0; |
|
| 738 | + if (is_numeric($type_contact)) |
|
| 739 | + {
|
|
| 740 | + $id_type_contact=$type_contact; |
|
| 741 | + } |
|
| 742 | + else |
|
| 743 | + {
|
|
| 744 | + // We look for id type_contact |
|
| 745 | + $sql = "SELECT tc.rowid"; |
|
| 746 | + $sql.= " FROM ".MAIN_DB_PREFIX."c_type_contact as tc"; |
|
| 747 | + $sql.= " WHERE tc.element='".$this->db->escape($this->element)."'"; |
|
| 748 | + $sql.= " AND tc.source='".$this->db->escape($source)."'"; |
|
| 749 | + $sql.= " AND tc.code='".$this->db->escape($type_contact)."' AND tc.active=1"; |
|
| 750 | + //print $sql; |
|
| 751 | + $resql=$this->db->query($sql); |
|
| 752 | + if ($resql) |
|
| 753 | + {
|
|
| 754 | + $obj = $this->db->fetch_object($resql); |
|
| 755 | + if ($obj) $id_type_contact=$obj->rowid; |
|
| 756 | + } |
|
| 757 | + } |
|
| 2745 | 758 | |
| 2746 | - // Note: There is no check on detail line and no check on total, if $forcedroundingmode = 'none' |
|
| 2747 | - $parameters=array('fk_element' => $obj->rowid);
|
|
| 2748 | - $reshook = $hookmanager->executeHooks('changeRoundingMode', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
|
|
| 759 | + if ($id_type_contact == 0) |
|
| 760 | + {
|
|
| 761 | + $this->error='CODE_NOT_VALID_FOR_THIS_ELEMENT'; |
|
| 762 | + dol_syslog("CODE_NOT_VALID_FOR_THIS_ELEMENT: Code type of contact '".$type_contact."' does not exists or is not active for element ".$this->element.", we can ignore it");
|
|
| 763 | + return -3; |
|
| 764 | + } |
|
| 2749 | 765 | |
| 2750 | - if (empty($reshook) && $forcedroundingmode == '0') // Check if data on line are consistent. This may solve lines that were not consistent because set with $forcedroundingmode='auto' |
|
| 2751 | - {
|
|
| 2752 | - $localtax_array=array($obj->localtax1_type,$obj->localtax1_tx,$obj->localtax2_type,$obj->localtax2_tx); |
|
| 2753 | - $tmpcal=calcul_price_total($obj->qty, $obj->up, $obj->remise_percent, $obj->vatrate, $obj->localtax1_tx, $obj->localtax2_tx, 0, 'HT', $obj->info_bits, $obj->product_type, $seller, $localtax_array, (isset($obj->situation_percent) ? $obj->situation_percent : 100), $multicurrency_tx); |
|
| 2754 | - $diff=price2num($tmpcal[1] - $obj->total_tva, 'MT', 1); |
|
| 2755 | - if ($diff) |
|
| 2756 | - {
|
|
| 2757 | - $sqlfix="UPDATE ".MAIN_DB_PREFIX.$this->table_element_line." SET ".$fieldtva." = ".$tmpcal[1].", total_ttc = ".$tmpcal[2]." WHERE rowid = ".$obj->rowid; |
|
| 2758 | - dol_syslog('We found unconsistent data into detailed line (difference of '.$diff.') for line rowid = '.$obj->rowid." (total vat of line calculated=".$tmpcal[1].", database=".$obj->total_tva."). We fix the total_vat and total_ttc of line by running sqlfix = ".$sqlfix);
|
|
| 2759 | - $resqlfix=$this->db->query($sqlfix); |
|
| 2760 | - if (! $resqlfix) dol_print_error($this->db,'Failed to update line'); |
|
| 2761 | - $obj->total_tva = $tmpcal[1]; |
|
| 2762 | - $obj->total_ttc = $tmpcal[2]; |
|
| 2763 | - // |
|
| 2764 | - } |
|
| 2765 | - } |
|
| 766 | + $datecreate = dol_now(); |
|
| 2766 | 767 | |
| 2767 | - $this->total_ht += $obj->total_ht; // The field visible at end of line detail |
|
| 2768 | - $this->total_tva += $obj->total_tva; |
|
| 2769 | - $this->total_localtax1 += $obj->total_localtax1; |
|
| 2770 | - $this->total_localtax2 += $obj->total_localtax2; |
|
| 2771 | - $this->total_ttc += $obj->total_ttc; |
|
| 2772 | - $this->multicurrency_total_ht += $obj->multicurrency_total_ht; // The field visible at end of line detail |
|
| 2773 | - $this->multicurrency_total_tva += $obj->multicurrency_total_tva; |
|
| 2774 | - $this->multicurrency_total_ttc += $obj->multicurrency_total_ttc; |
|
| 2775 | - |
|
| 2776 | - if (! isset($total_ht_by_vats[$obj->vatrate])) $total_ht_by_vats[$obj->vatrate]=0; |
|
| 2777 | - if (! isset($total_tva_by_vats[$obj->vatrate])) $total_tva_by_vats[$obj->vatrate]=0; |
|
| 2778 | - if (! isset($total_ttc_by_vats[$obj->vatrate])) $total_ttc_by_vats[$obj->vatrate]=0; |
|
| 2779 | - $total_ht_by_vats[$obj->vatrate] += $obj->total_ht; |
|
| 2780 | - $total_tva_by_vats[$obj->vatrate] += $obj->total_tva; |
|
| 2781 | - $total_ttc_by_vats[$obj->vatrate] += $obj->total_ttc; |
|
| 2782 | - |
|
| 2783 | - if ($forcedroundingmode == '1') // Check if we need adjustement onto line for vat. TODO This works on the company currency but not on multicurrency |
|
| 2784 | - {
|
|
| 2785 | - $tmpvat=price2num($total_ht_by_vats[$obj->vatrate] * $obj->vatrate / 100, 'MT', 1); |
|
| 2786 | - $diff=price2num($total_tva_by_vats[$obj->vatrate]-$tmpvat, 'MT', 1); |
|
| 2787 | - //print 'Line '.$i.' rowid='.$obj->rowid.' vat_rate='.$obj->vatrate.' total_ht='.$obj->total_ht.' total_tva='.$obj->total_tva.' total_ttc='.$obj->total_ttc.' total_ht_by_vats='.$total_ht_by_vats[$obj->vatrate].' total_tva_by_vats='.$total_tva_by_vats[$obj->vatrate].' (new calculation = '.$tmpvat.') total_ttc_by_vats='.$total_ttc_by_vats[$obj->vatrate].($diff?" => DIFF":"")."<br>\n"; |
|
| 2788 | - if ($diff) |
|
| 2789 | - {
|
|
| 2790 | - if (abs($diff) > 0.1) { dol_syslog('A rounding difference was detected into TOTAL but is too high to be corrected', LOG_WARNING); exit; }
|
|
| 2791 | - $sqlfix="UPDATE ".MAIN_DB_PREFIX.$this->table_element_line." SET ".$fieldtva." = ".($obj->total_tva - $diff).", total_ttc = ".($obj->total_ttc - $diff)." WHERE rowid = ".$obj->rowid; |
|
| 2792 | - dol_syslog('We found a difference of '.$diff.' for line rowid = '.$obj->rowid.". We fix the total_vat and total_ttc of line by running sqlfix = ".$sqlfix);
|
|
| 2793 | - $resqlfix=$this->db->query($sqlfix); |
|
| 2794 | - if (! $resqlfix) dol_print_error($this->db,'Failed to update line'); |
|
| 2795 | - $this->total_tva -= $diff; |
|
| 2796 | - $this->total_ttc -= $diff; |
|
| 2797 | - $total_tva_by_vats[$obj->vatrate] -= $diff; |
|
| 2798 | - $total_ttc_by_vats[$obj->vatrate] -= $diff; |
|
| 2799 | - } |
|
| 2800 | - } |
|
| 768 | + // Socpeople must have already been added by some trigger, then we have to check it to avoid DB_ERROR_RECORD_ALREADY_EXISTS error |
|
| 769 | + $TListeContacts=$this->liste_contact(-1, $source); |
|
| 770 | + $already_added=false; |
|
| 771 | + if(!empty($TListeContacts)) {
|
|
| 772 | + foreach($TListeContacts as $array_contact) {
|
|
| 773 | + if($array_contact['status'] == 4 && $array_contact['id'] == $fk_socpeople && $array_contact['fk_c_type_contact'] == $id_type_contact) {
|
|
| 774 | + $already_added=true; |
|
| 775 | + break; |
|
| 776 | + } |
|
| 777 | + } |
|
| 778 | + } |
|
| 2801 | 779 | |
| 2802 | - $i++; |
|
| 2803 | - } |
|
| 780 | + if(!$already_added) {
|
|
| 2804 | 781 | |
| 2805 | - // Add revenue stamp to total |
|
| 2806 | - $this->total_ttc += isset($this->revenuestamp)?$this->revenuestamp:0; |
|
| 2807 | - $this->multicurrency_total_ttc += isset($this->revenuestamp)?($this->revenuestamp * $multicurrency_tx):0; |
|
| 782 | + $this->db->begin(); |
|
| 2808 | 783 | |
| 2809 | - // Situations totals |
|
| 2810 | - if ($this->situation_cycle_ref && $this->situation_counter > 1 && method_exists($this, 'get_prev_sits') && $this->type != $this::TYPE_CREDIT_NOTE ) |
|
| 2811 | - {
|
|
| 2812 | - $prev_sits = $this->get_prev_sits(); |
|
| 2813 | - |
|
| 2814 | - foreach ($prev_sits as $sit) { // $sit is an object Facture loaded with a fetch.
|
|
| 2815 | - $this->total_ht -= $sit->total_ht; |
|
| 2816 | - $this->total_tva -= $sit->total_tva; |
|
| 2817 | - $this->total_localtax1 -= $sit->total_localtax1; |
|
| 2818 | - $this->total_localtax2 -= $sit->total_localtax2; |
|
| 2819 | - $this->total_ttc -= $sit->total_ttc; |
|
| 2820 | - $this->multicurrency_total_ht -= $sit->multicurrency_total_ht; |
|
| 2821 | - $this->multicurrency_total_tva -= $sit->multicurrency_total_tva; |
|
| 2822 | - $this->multicurrency_total_ttc -= $sit->multicurrency_total_ttc; |
|
| 2823 | - } |
|
| 2824 | - } |
|
| 2825 | - |
|
| 2826 | - $this->db->free($resql); |
|
| 2827 | - |
|
| 2828 | - // Now update global field total_ht, total_ttc and tva |
|
| 2829 | - $fieldht='total_ht'; |
|
| 2830 | - $fieldtva='tva'; |
|
| 2831 | - $fieldlocaltax1='localtax1'; |
|
| 2832 | - $fieldlocaltax2='localtax2'; |
|
| 2833 | - $fieldttc='total_ttc'; |
|
| 2834 | - // Specific code for backward compatibility with old field names |
|
| 2835 | - if ($this->element == 'facture' || $this->element == 'facturerec') $fieldht='total'; |
|
| 2836 | - if ($this->element == 'facture_fourn' || $this->element == 'invoice_supplier') $fieldtva='total_tva'; |
|
| 2837 | - if ($this->element == 'propal') $fieldttc='total'; |
|
| 2838 | - if ($this->element == 'expensereport') $fieldtva='total_tva'; |
|
| 2839 | - if ($this->element == 'supplier_proposal') $fieldttc='total'; |
|
| 2840 | - |
|
| 2841 | - if (empty($nodatabaseupdate)) |
|
| 2842 | - {
|
|
| 2843 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element.' SET'; |
|
| 2844 | - $sql .= " ".$fieldht."='".price2num($this->total_ht)."',"; |
|
| 2845 | - $sql .= " ".$fieldtva."='".price2num($this->total_tva)."',"; |
|
| 2846 | - $sql .= " ".$fieldlocaltax1."='".price2num($this->total_localtax1)."',"; |
|
| 2847 | - $sql .= " ".$fieldlocaltax2."='".price2num($this->total_localtax2)."',"; |
|
| 2848 | - $sql .= " ".$fieldttc."='".price2num($this->total_ttc)."'"; |
|
| 2849 | - $sql .= ", multicurrency_total_ht='".price2num($this->multicurrency_total_ht, 'MT', 1)."'"; |
|
| 2850 | - $sql .= ", multicurrency_total_tva='".price2num($this->multicurrency_total_tva, 'MT', 1)."'"; |
|
| 2851 | - $sql .= ", multicurrency_total_ttc='".price2num($this->multicurrency_total_ttc, 'MT', 1)."'"; |
|
| 2852 | - $sql .= ' WHERE rowid = '.$this->id; |
|
| 2853 | - |
|
| 2854 | - |
|
| 2855 | - dol_syslog(get_class($this)."::update_price", LOG_DEBUG); |
|
| 2856 | - $resql=$this->db->query($sql); |
|
| 2857 | - if (! $resql) |
|
| 2858 | - {
|
|
| 2859 | - $error++; |
|
| 2860 | - $this->error=$this->db->lasterror(); |
|
| 2861 | - $this->errors[]=$this->db->lasterror(); |
|
| 2862 | - } |
|
| 2863 | - } |
|
| 784 | + // Insert into database |
|
| 785 | + $sql = "INSERT INTO ".MAIN_DB_PREFIX."element_contact"; |
|
| 786 | + $sql.= " (element_id, fk_socpeople, datecreate, statut, fk_c_type_contact) "; |
|
| 787 | + $sql.= " VALUES (".$this->id.", ".$fk_socpeople." , " ;
|
|
| 788 | + $sql.= "'".$this->db->idate($datecreate)."'"; |
|
| 789 | + $sql.= ", 4, ". $id_type_contact; |
|
| 790 | + $sql.= ")"; |
|
| 2864 | 791 | |
| 2865 | - if (! $error) |
|
| 2866 | - {
|
|
| 2867 | - return 1; |
|
| 2868 | - } |
|
| 2869 | - else |
|
| 2870 | - {
|
|
| 2871 | - return -1; |
|
| 2872 | - } |
|
| 2873 | - } |
|
| 2874 | - else |
|
| 2875 | - {
|
|
| 2876 | - dol_print_error($this->db,'Bad request in update_price'); |
|
| 2877 | - return -1; |
|
| 2878 | - } |
|
| 2879 | - } |
|
| 792 | + $resql=$this->db->query($sql); |
|
| 793 | + if ($resql) |
|
| 794 | + {
|
|
| 795 | + if (! $notrigger) |
|
| 796 | + {
|
|
| 797 | + $result=$this->call_trigger(strtoupper($this->element).'_ADD_CONTACT', $user); |
|
| 798 | + if ($result < 0) |
|
| 799 | + {
|
|
| 800 | + $this->db->rollback(); |
|
| 801 | + return -1; |
|
| 802 | + } |
|
| 803 | + } |
|
| 804 | + |
|
| 805 | + $this->db->commit(); |
|
| 806 | + return 1; |
|
| 807 | + } |
|
| 808 | + else |
|
| 809 | + {
|
|
| 810 | + if ($this->db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') |
|
| 811 | + {
|
|
| 812 | + $this->error=$this->db->errno(); |
|
| 813 | + $this->db->rollback(); |
|
| 814 | + echo 'err rollback'; |
|
| 815 | + return -2; |
|
| 816 | + } |
|
| 817 | + else |
|
| 818 | + {
|
|
| 819 | + $this->error=$this->db->error(); |
|
| 820 | + $this->db->rollback(); |
|
| 821 | + return -1; |
|
| 822 | + } |
|
| 823 | + } |
|
| 824 | + } else return 0; |
|
| 825 | + } |
|
| 2880 | 826 | |
| 2881 | 827 | // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
| 2882 | - /** |
|
| 2883 | - * Add objects linked in llx_element_element. |
|
| 2884 | - * |
|
| 2885 | - * @param string $origin Linked element type |
|
| 2886 | - * @param int $origin_id Linked element id |
|
| 2887 | - * @return int <=0 if KO, >0 if OK |
|
| 2888 | - * @see fetchObjectLinked, updateObjectLinked, deleteObjectLinked |
|
| 2889 | - */ |
|
| 2890 | - function add_object_linked($origin=null, $origin_id=null) |
|
| 2891 | - {
|
|
| 828 | + /** |
|
| 829 | + * Copy contact from one element to current |
|
| 830 | + * |
|
| 831 | + * @param CommonObject $objFrom Source element |
|
| 832 | + * @param string $source Nature of contact ('internal' or 'external')
|
|
| 833 | + * @return int >0 if OK, <0 if KO |
|
| 834 | + */ |
|
| 835 | + function copy_linked_contact($objFrom, $source='internal') |
|
| 836 | + {
|
|
| 2892 | 837 | // phpcs:enable |
| 2893 | - $origin = (! empty($origin) ? $origin : $this->origin); |
|
| 2894 | - $origin_id = (! empty($origin_id) ? $origin_id : $this->origin_id); |
|
| 2895 | - |
|
| 2896 | - // Special case |
|
| 2897 | - if ($origin == 'order') $origin='commande'; |
|
| 2898 | - if ($origin == 'invoice') $origin='facture'; |
|
| 2899 | - if ($origin == 'invoice_template') $origin='facturerec'; |
|
| 2900 | - if ($origin == 'supplierorder') $origin='order_supplier'; |
|
| 2901 | - $this->db->begin(); |
|
| 2902 | - |
|
| 2903 | - $sql = "INSERT INTO ".MAIN_DB_PREFIX."element_element (";
|
|
| 2904 | - $sql.= "fk_source"; |
|
| 2905 | - $sql.= ", sourcetype"; |
|
| 2906 | - $sql.= ", fk_target"; |
|
| 2907 | - $sql.= ", targettype"; |
|
| 2908 | - $sql.= ") VALUES (";
|
|
| 2909 | - $sql.= $origin_id; |
|
| 2910 | - $sql.= ", '".$this->db->escape($origin)."'"; |
|
| 2911 | - $sql.= ", ".$this->id; |
|
| 2912 | - $sql.= ", '".$this->db->escape($this->element)."'"; |
|
| 2913 | - $sql.= ")"; |
|
| 2914 | - |
|
| 2915 | - dol_syslog(get_class($this)."::add_object_linked", LOG_DEBUG); |
|
| 2916 | - if ($this->db->query($sql)) |
|
| 2917 | - {
|
|
| 2918 | - $this->db->commit(); |
|
| 2919 | - return 1; |
|
| 2920 | - } |
|
| 2921 | - else |
|
| 2922 | - {
|
|
| 2923 | - $this->error=$this->db->lasterror(); |
|
| 2924 | - $this->db->rollback(); |
|
| 2925 | - return 0; |
|
| 2926 | - } |
|
| 2927 | - } |
|
| 2928 | - |
|
| 2929 | - /** |
|
| 2930 | - * Fetch array of objects linked to current object (object of enabled modules only). Links are loaded into |
|
| 2931 | - * this->linkedObjectsIds array and |
|
| 2932 | - * this->linkedObjects array if $loadalsoobjects = 1 |
|
| 2933 | - * Possible usage for parameters: |
|
| 2934 | - * - all parameters empty -> we look all link to current object (current object can be source or target) |
|
| 2935 | - * - source id+type -> will get target list linked to source |
|
| 2936 | - * - target id+type -> will get source list linked to target |
|
| 2937 | - * - source id+type + target type -> will get target list of the type |
|
| 2938 | - * - target id+type + target source -> will get source list of the type |
|
| 2939 | - * |
|
| 2940 | - * @param int $sourceid Object source id (if not defined, id of object) |
|
| 2941 | - * @param string $sourcetype Object source type (if not defined, element name of object) |
|
| 2942 | - * @param int $targetid Object target id (if not defined, id of object) |
|
| 2943 | - * @param string $targettype Object target type (if not defined, elemennt name of object) |
|
| 2944 | - * @param string $clause 'OR' or 'AND' clause used when both source id and target id are provided |
|
| 2945 | - * @param int $alsosametype 0=Return only links to object that differs from source type. 1=Include also link to objects of same type. |
|
| 2946 | - * @param string $orderby SQL 'ORDER BY' clause |
|
| 2947 | - * @param int $loadalsoobjects Load also array this->linkedObjects (Use 0 to increase performances) |
|
| 2948 | - * @return int <0 if KO, >0 if OK |
|
| 2949 | - * @see add_object_linked, updateObjectLinked, deleteObjectLinked |
|
| 2950 | - */ |
|
| 2951 | - function fetchObjectLinked($sourceid=null,$sourcetype='',$targetid=null,$targettype='',$clause='OR',$alsosametype=1,$orderby='sourcetype',$loadalsoobjects=1) |
|
| 2952 | - {
|
|
| 2953 | - global $conf; |
|
| 2954 | - |
|
| 2955 | - $this->linkedObjectsIds=array(); |
|
| 2956 | - $this->linkedObjects=array(); |
|
| 2957 | - |
|
| 2958 | - $justsource=false; |
|
| 2959 | - $justtarget=false; |
|
| 2960 | - $withtargettype=false; |
|
| 2961 | - $withsourcetype=false; |
|
| 2962 | - |
|
| 2963 | - if (! empty($sourceid) && ! empty($sourcetype) && empty($targetid)) |
|
| 2964 | - {
|
|
| 2965 | - $justsource=true; // the source (id and type) is a search criteria |
|
| 2966 | - if (! empty($targettype)) $withtargettype=true; |
|
| 2967 | - } |
|
| 2968 | - if (! empty($targetid) && ! empty($targettype) && empty($sourceid)) |
|
| 2969 | - {
|
|
| 2970 | - $justtarget=true; // the target (id and type) is a search criteria |
|
| 2971 | - if (! empty($sourcetype)) $withsourcetype=true; |
|
| 2972 | - } |
|
| 2973 | - |
|
| 2974 | - $sourceid = (! empty($sourceid) ? $sourceid : $this->id); |
|
| 2975 | - $targetid = (! empty($targetid) ? $targetid : $this->id); |
|
| 2976 | - $sourcetype = (! empty($sourcetype) ? $sourcetype : $this->element); |
|
| 2977 | - $targettype = (! empty($targettype) ? $targettype : $this->element); |
|
| 2978 | - |
|
| 2979 | - /*if (empty($sourceid) && empty($targetid)) |
|
| 2980 | - {
|
|
| 2981 | - dol_syslog('Bad usage of function. No source nor target id defined (nor as parameter nor as object id)', LOG_ERR);
|
|
| 2982 | - return -1; |
|
| 2983 | - }*/ |
|
| 2984 | - |
|
| 2985 | - // Links between objects are stored in table element_element |
|
| 2986 | - $sql = 'SELECT rowid, fk_source, sourcetype, fk_target, targettype'; |
|
| 2987 | - $sql.= ' FROM '.MAIN_DB_PREFIX.'element_element'; |
|
| 2988 | - $sql.= " WHERE "; |
|
| 2989 | - if ($justsource || $justtarget) |
|
| 2990 | - {
|
|
| 2991 | - if ($justsource) |
|
| 2992 | - {
|
|
| 2993 | - $sql.= "fk_source = ".$sourceid." AND sourcetype = '".$sourcetype."'"; |
|
| 2994 | - if ($withtargettype) $sql.= " AND targettype = '".$targettype."'"; |
|
| 2995 | - } |
|
| 2996 | - else if ($justtarget) |
|
| 2997 | - {
|
|
| 2998 | - $sql.= "fk_target = ".$targetid." AND targettype = '".$targettype."'"; |
|
| 2999 | - if ($withsourcetype) $sql.= " AND sourcetype = '".$sourcetype."'"; |
|
| 3000 | - } |
|
| 3001 | - } |
|
| 3002 | - else |
|
| 3003 | - {
|
|
| 3004 | - $sql.= "(fk_source = ".$sourceid." AND sourcetype = '".$sourcetype."')"; |
|
| 3005 | - $sql.= " ".$clause." (fk_target = ".$targetid." AND targettype = '".$targettype."')"; |
|
| 3006 | - } |
|
| 3007 | - $sql .= ' ORDER BY '.$orderby; |
|
| 3008 | - |
|
| 3009 | - dol_syslog(get_class($this)."::fetchObjectLink", LOG_DEBUG); |
|
| 3010 | - $resql = $this->db->query($sql); |
|
| 3011 | - if ($resql) |
|
| 3012 | - {
|
|
| 3013 | - $num = $this->db->num_rows($resql); |
|
| 3014 | - $i = 0; |
|
| 3015 | - while ($i < $num) |
|
| 3016 | - {
|
|
| 3017 | - $obj = $this->db->fetch_object($resql); |
|
| 3018 | - if ($justsource || $justtarget) |
|
| 3019 | - {
|
|
| 3020 | - if ($justsource) |
|
| 3021 | - {
|
|
| 3022 | - $this->linkedObjectsIds[$obj->targettype][$obj->rowid]=$obj->fk_target; |
|
| 3023 | - } |
|
| 3024 | - else if ($justtarget) |
|
| 3025 | - {
|
|
| 3026 | - $this->linkedObjectsIds[$obj->sourcetype][$obj->rowid]=$obj->fk_source; |
|
| 3027 | - } |
|
| 3028 | - } |
|
| 3029 | - else |
|
| 3030 | - {
|
|
| 3031 | - if ($obj->fk_source == $sourceid && $obj->sourcetype == $sourcetype) |
|
| 3032 | - {
|
|
| 3033 | - $this->linkedObjectsIds[$obj->targettype][$obj->rowid]=$obj->fk_target; |
|
| 3034 | - } |
|
| 3035 | - if ($obj->fk_target == $targetid && $obj->targettype == $targettype) |
|
| 3036 | - {
|
|
| 3037 | - $this->linkedObjectsIds[$obj->sourcetype][$obj->rowid]=$obj->fk_source; |
|
| 3038 | - } |
|
| 3039 | - } |
|
| 3040 | - $i++; |
|
| 3041 | - } |
|
| 838 | + $contacts = $objFrom->liste_contact(-1, $source); |
|
| 839 | + foreach($contacts as $contact) |
|
| 840 | + {
|
|
| 841 | + if ($this->add_contact($contact['id'], $contact['fk_c_type_contact'], $contact['source']) < 0) |
|
| 842 | + {
|
|
| 843 | + $this->error=$this->db->lasterror(); |
|
| 844 | + return -1; |
|
| 845 | + } |
|
| 846 | + } |
|
| 847 | + return 1; |
|
| 848 | + } |
|
| 3042 | 849 | |
| 3043 | - if (! empty($this->linkedObjectsIds)) |
|
| 3044 | - {
|
|
| 3045 | - $tmparray = $this->linkedObjectsIds; |
|
| 3046 | - foreach($tmparray as $objecttype => $objectids) // $objecttype is a module name ('facture', 'mymodule', ...) or a module name with a suffix ('project_task', 'mymodule_myobj', ...)
|
|
| 3047 | - {
|
|
| 3048 | - // Parse element/subelement (ex: project_task, cabinetmed_consultation, ...) |
|
| 3049 | - $module = $element = $subelement = $objecttype; |
|
| 3050 | - if ($objecttype != 'supplier_proposal' && $objecttype != 'order_supplier' && $objecttype != 'invoice_supplier' |
|
| 3051 | - && preg_match('/^([^_]+)_([^_]+)/i',$objecttype,$regs))
|
|
| 3052 | - {
|
|
| 3053 | - $module = $element = $regs[1]; |
|
| 3054 | - $subelement = $regs[2]; |
|
| 3055 | - } |
|
| 3056 | - |
|
| 3057 | - $classpath = $element.'/class'; |
|
| 3058 | - // To work with non standard classpath or module name |
|
| 3059 | - if ($objecttype == 'facture') {
|
|
| 3060 | - $classpath = 'compta/facture/class'; |
|
| 3061 | - } |
|
| 3062 | - else if ($objecttype == 'facturerec') {
|
|
| 3063 | - $classpath = 'compta/facture/class'; $module = 'facture'; |
|
| 3064 | - } |
|
| 3065 | - else if ($objecttype == 'propal') {
|
|
| 3066 | - $classpath = 'comm/propal/class'; |
|
| 3067 | - } |
|
| 3068 | - else if ($objecttype == 'supplier_proposal') {
|
|
| 3069 | - $classpath = 'supplier_proposal/class'; |
|
| 3070 | - } |
|
| 3071 | - else if ($objecttype == 'shipping') {
|
|
| 3072 | - $classpath = 'expedition/class'; $subelement = 'expedition'; $module = 'expedition_bon'; |
|
| 3073 | - } |
|
| 3074 | - else if ($objecttype == 'delivery') {
|
|
| 3075 | - $classpath = 'livraison/class'; $subelement = 'livraison'; $module = 'livraison_bon'; |
|
| 3076 | - } |
|
| 3077 | - else if ($objecttype == 'invoice_supplier' || $objecttype == 'order_supplier') {
|
|
| 3078 | - $classpath = 'fourn/class'; $module = 'fournisseur'; |
|
| 3079 | - } |
|
| 3080 | - else if ($objecttype == 'fichinter') {
|
|
| 3081 | - $classpath = 'fichinter/class'; $subelement = 'fichinter'; $module = 'ficheinter'; |
|
| 3082 | - } |
|
| 3083 | - else if ($objecttype == 'subscription') {
|
|
| 3084 | - $classpath = 'adherents/class'; $module = 'adherent'; |
|
| 3085 | - } |
|
| 3086 | - |
|
| 3087 | - // Set classfile |
|
| 3088 | - $classfile = strtolower($subelement); $classname = ucfirst($subelement); |
|
| 3089 | - |
|
| 3090 | - if ($objecttype == 'order') {
|
|
| 3091 | - $classfile = 'commande'; $classname = 'Commande'; |
|
| 3092 | - } |
|
| 3093 | - else if ($objecttype == 'invoice_supplier') {
|
|
| 3094 | - $classfile = 'fournisseur.facture'; $classname = 'FactureFournisseur'; |
|
| 3095 | - } |
|
| 3096 | - else if ($objecttype == 'order_supplier') {
|
|
| 3097 | - $classfile = 'fournisseur.commande'; $classname = 'CommandeFournisseur'; |
|
| 3098 | - } |
|
| 3099 | - else if ($objecttype == 'supplier_proposal') {
|
|
| 3100 | - $classfile = 'supplier_proposal'; $classname = 'SupplierProposal'; |
|
| 3101 | - } |
|
| 3102 | - else if ($objecttype == 'facturerec') {
|
|
| 3103 | - $classfile = 'facture-rec'; $classname = 'FactureRec'; |
|
| 3104 | - } |
|
| 3105 | - else if ($objecttype == 'subscription') {
|
|
| 3106 | - $classfile = 'subscription'; $classname = 'Subscription'; |
|
| 3107 | - } |
|
| 3108 | - |
|
| 3109 | - // Here $module, $classfile and $classname are set |
|
| 3110 | - if (Globals::$conf->$module->enabled && (($element != $this->element) || $alsosametype)) {
|
|
| 3111 | - if ($loadalsoobjects) |
|
| 3112 | - {
|
|
| 3113 | - dol_include_once('/'.$classpath.'/'.$classfile.'.class.php');
|
|
| 3114 | - //print '/'.$classpath.'/'.$classfile.'.class.php '.class_exists($classname); |
|
| 3115 | - if (class_exists($classname)) |
|
| 3116 | - {
|
|
| 3117 | - foreach($objectids as $i => $objectid) // $i is rowid into llx_element_element |
|
| 3118 | - {
|
|
| 3119 | - $object = new $classname($this->db); |
|
| 3120 | - $ret = $object->fetch($objectid); |
|
| 3121 | - if ($ret >= 0) |
|
| 3122 | - {
|
|
| 3123 | - $this->linkedObjects[$objecttype][$i] = $object; |
|
| 3124 | - } |
|
| 3125 | - } |
|
| 3126 | - } |
|
| 3127 | - } |
|
| 3128 | - } |
|
| 3129 | - else |
|
| 3130 | - {
|
|
| 3131 | - unset($this->linkedObjectsIds[$objecttype]); |
|
| 3132 | - } |
|
| 3133 | - } |
|
| 3134 | - } |
|
| 3135 | - return 1; |
|
| 3136 | - } |
|
| 3137 | - else |
|
| 3138 | - {
|
|
| 3139 | - dol_print_error($this->db); |
|
| 3140 | - return -1; |
|
| 3141 | - } |
|
| 3142 | - } |
|
| 3143 | - |
|
| 3144 | - /** |
|
| 3145 | - * Update object linked of a current object |
|
| 3146 | - * |
|
| 3147 | - * @param int $sourceid Object source id |
|
| 3148 | - * @param string $sourcetype Object source type |
|
| 3149 | - * @param int $targetid Object target id |
|
| 3150 | - * @param string $targettype Object target type |
|
| 3151 | - * @return int >0 if OK, <0 if KO |
|
| 3152 | - * @see add_object_linked, fetObjectLinked, deleteObjectLinked |
|
| 3153 | - */ |
|
| 3154 | - function updateObjectLinked($sourceid=null, $sourcetype='', $targetid=null, $targettype='') |
|
| 3155 | - {
|
|
| 3156 | - $updatesource=false; |
|
| 3157 | - $updatetarget=false; |
|
| 3158 | - |
|
| 3159 | - if (! empty($sourceid) && ! empty($sourcetype) && empty($targetid) && empty($targettype)) $updatesource=true; |
|
| 3160 | - else if (empty($sourceid) && empty($sourcetype) && ! empty($targetid) && ! empty($targettype)) $updatetarget=true; |
|
| 3161 | - |
|
| 3162 | - $sql = "UPDATE ".MAIN_DB_PREFIX."element_element SET "; |
|
| 3163 | - if ($updatesource) |
|
| 3164 | - {
|
|
| 3165 | - $sql.= "fk_source = ".$sourceid; |
|
| 3166 | - $sql.= ", sourcetype = '".$this->db->escape($sourcetype)."'"; |
|
| 3167 | - $sql.= " WHERE fk_target = ".$this->id; |
|
| 3168 | - $sql.= " AND targettype = '".$this->db->escape($this->element)."'"; |
|
| 3169 | - } |
|
| 3170 | - else if ($updatetarget) |
|
| 3171 | - {
|
|
| 3172 | - $sql.= "fk_target = ".$targetid; |
|
| 3173 | - $sql.= ", targettype = '".$this->db->escape($targettype)."'"; |
|
| 3174 | - $sql.= " WHERE fk_source = ".$this->id; |
|
| 3175 | - $sql.= " AND sourcetype = '".$this->db->escape($this->element)."'"; |
|
| 3176 | - } |
|
| 3177 | - |
|
| 3178 | - dol_syslog(get_class($this)."::updateObjectLinked", LOG_DEBUG); |
|
| 3179 | - if ($this->db->query($sql)) |
|
| 3180 | - {
|
|
| 3181 | - return 1; |
|
| 3182 | - } |
|
| 3183 | - else |
|
| 3184 | - {
|
|
| 3185 | - $this->error=$this->db->lasterror(); |
|
| 3186 | - return -1; |
|
| 3187 | - } |
|
| 3188 | - } |
|
| 3189 | - |
|
| 3190 | - /** |
|
| 3191 | - * Delete all links between an object $this |
|
| 3192 | - * |
|
| 3193 | - * @param int $sourceid Object source id |
|
| 3194 | - * @param string $sourcetype Object source type |
|
| 3195 | - * @param int $targetid Object target id |
|
| 3196 | - * @param string $targettype Object target type |
|
| 3197 | - * @param int $rowid Row id of line to delete. If defined, other parameters are not used. |
|
| 3198 | - * @return int >0 if OK, <0 if KO |
|
| 3199 | - * @see add_object_linked, updateObjectLinked, fetchObjectLinked |
|
| 3200 | - */ |
|
| 3201 | - function deleteObjectLinked($sourceid=null, $sourcetype='', $targetid=null, $targettype='', $rowid='') |
|
| 3202 | - {
|
|
| 3203 | - $deletesource=false; |
|
| 3204 | - $deletetarget=false; |
|
| 3205 | - |
|
| 3206 | - if (! empty($sourceid) && ! empty($sourcetype) && empty($targetid) && empty($targettype)) $deletesource=true; |
|
| 3207 | - else if (empty($sourceid) && empty($sourcetype) && ! empty($targetid) && ! empty($targettype)) $deletetarget=true; |
|
| 3208 | - |
|
| 3209 | - $sourceid = (! empty($sourceid) ? $sourceid : $this->id); |
|
| 3210 | - $sourcetype = (! empty($sourcetype) ? $sourcetype : $this->element); |
|
| 3211 | - $targetid = (! empty($targetid) ? $targetid : $this->id); |
|
| 3212 | - $targettype = (! empty($targettype) ? $targettype : $this->element); |
|
| 3213 | - |
|
| 3214 | - $sql = "DELETE FROM ".MAIN_DB_PREFIX."element_element"; |
|
| 3215 | - $sql.= " WHERE"; |
|
| 3216 | - if ($rowid > 0) |
|
| 3217 | - {
|
|
| 3218 | - $sql.=" rowid = ".$rowid; |
|
| 3219 | - } |
|
| 3220 | - else |
|
| 3221 | - {
|
|
| 3222 | - if ($deletesource) |
|
| 3223 | - {
|
|
| 3224 | - $sql.= " fk_source = ".$sourceid." AND sourcetype = '".$this->db->escape($sourcetype)."'"; |
|
| 3225 | - $sql.= " AND fk_target = ".$this->id." AND targettype = '".$this->db->escape($this->element)."'"; |
|
| 3226 | - } |
|
| 3227 | - else if ($deletetarget) |
|
| 3228 | - {
|
|
| 3229 | - $sql.= " fk_target = ".$targetid." AND targettype = '".$this->db->escape($targettype)."'"; |
|
| 3230 | - $sql.= " AND fk_source = ".$this->id." AND sourcetype = '".$this->db->escape($this->element)."'"; |
|
| 3231 | - } |
|
| 3232 | - else |
|
| 3233 | - {
|
|
| 3234 | - $sql.= " (fk_source = ".$this->id." AND sourcetype = '".$this->db->escape($this->element)."')"; |
|
| 3235 | - $sql.= " OR"; |
|
| 3236 | - $sql.= " (fk_target = ".$this->id." AND targettype = '".$this->db->escape($this->element)."')"; |
|
| 3237 | - } |
|
| 3238 | - } |
|
| 3239 | - |
|
| 3240 | - dol_syslog(get_class($this)."::deleteObjectLinked", LOG_DEBUG); |
|
| 3241 | - if ($this->db->query($sql)) |
|
| 3242 | - {
|
|
| 3243 | - return 1; |
|
| 3244 | - } |
|
| 3245 | - else |
|
| 3246 | - {
|
|
| 3247 | - $this->error=$this->db->lasterror(); |
|
| 3248 | - $this->errors[]=$this->error; |
|
| 3249 | - return -1; |
|
| 3250 | - } |
|
| 3251 | - } |
|
| 3252 | - |
|
| 3253 | - /** |
|
| 3254 | - * Set status of an object |
|
| 3255 | - * |
|
| 3256 | - * @param int $status Status to set |
|
| 3257 | - * @param int $elementId Id of element to force (use this->id by default) |
|
| 3258 | - * @param string $elementType Type of element to force (use this->table_element by default) |
|
| 3259 | - * @param string $trigkey Trigger key to use for trigger |
|
| 3260 | - * @return int <0 if KO, >0 if OK |
|
| 3261 | - */ |
|
| 3262 | - function setStatut($status, $elementId=null, $elementType='', $trigkey='') |
|
| 3263 | - {
|
|
| 3264 | - global $user,$langs,$conf; |
|
| 3265 | - |
|
| 3266 | - $savElementId=$elementId; // To be used later to know if we were using the method using the id of this or not. |
|
| 3267 | - |
|
| 3268 | - $elementId = (!empty($elementId)?$elementId:$this->id); |
|
| 3269 | - $elementTable = (!empty($elementType)?$elementType:$this->table_element); |
|
| 3270 | - |
|
| 3271 | - $this->db->begin(); |
|
| 3272 | - |
|
| 3273 | - $fieldstatus="fk_statut"; |
|
| 3274 | - if ($elementTable == 'facture_rec') $fieldstatus="suspended"; |
|
| 3275 | - if ($elementTable == 'mailing') $fieldstatus="statut"; |
|
| 3276 | - if ($elementTable == 'cronjob') $fieldstatus="status"; |
|
| 3277 | - if ($elementTable == 'user') $fieldstatus="statut"; |
|
| 3278 | - if ($elementTable == 'expensereport') $fieldstatus="fk_statut"; |
|
| 3279 | - if ($elementTable == 'commande_fournisseur_dispatch') $fieldstatus="status"; |
|
| 3280 | - |
|
| 3281 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$elementTable; |
|
| 3282 | - $sql.= " SET ".$fieldstatus." = ".$status; |
|
| 3283 | - // If status = 1 = validated, update also fk_user_valid |
|
| 3284 | - if ($status == 1 && $elementTable == 'expensereport') $sql.=", fk_user_valid = ".$user->id; |
|
| 3285 | - $sql.= " WHERE rowid=".$elementId; |
|
| 3286 | - |
|
| 3287 | - dol_syslog(get_class($this)."::setStatut", LOG_DEBUG); |
|
| 3288 | - if ($this->db->query($sql)) |
|
| 3289 | - {
|
|
| 3290 | - $error = 0; |
|
| 3291 | - |
|
| 3292 | - // Try autoset of trigkey |
|
| 3293 | - if (empty($trigkey)) |
|
| 3294 | - {
|
|
| 3295 | - if ($this->element == 'supplier_proposal' && $status == 2) $trigkey='SUPPLIER_PROPOSAL_SIGN'; // 2 = SupplierProposal::STATUS_SIGNED. Can't use constant into this generic class |
|
| 3296 | - if ($this->element == 'supplier_proposal' && $status == 3) $trigkey='SUPPLIER_PROPOSAL_REFUSE'; // 3 = SupplierProposal::STATUS_REFUSED. Can't use constant into this generic class |
|
| 3297 | - if ($this->element == 'supplier_proposal' && $status == 4) $trigkey='SUPPLIER_PROPOSAL_CLOSE'; // 4 = SupplierProposal::STATUS_CLOSED. Can't use constant into this generic class |
|
| 3298 | - if ($this->element == 'fichinter' && $status == 3) $trigkey='FICHINTER_CLASSIFY_DONE'; |
|
| 3299 | - if ($this->element == 'fichinter' && $status == 2) $trigkey='FICHINTER_CLASSIFY_BILLED'; |
|
| 3300 | - if ($this->element == 'fichinter' && $status == 1) $trigkey='FICHINTER_CLASSIFY_UNBILLED'; |
|
| 3301 | - } |
|
| 3302 | - |
|
| 3303 | - if ($trigkey) |
|
| 3304 | - {
|
|
| 3305 | - // Appel des triggers |
|
| 3306 | - include_once DOL_DOCUMENT_ROOT . '/core/class/interfaces.class.php'; |
|
| 3307 | - $interface=new Interfaces($this->db); |
|
| 3308 | - $result=$interface->run_triggers($trigkey,$this,$user,$langs,$conf); |
|
| 3309 | - if ($result < 0) {
|
|
| 3310 | - $error++; $this->errors=$interface->errors; |
|
| 3311 | - } |
|
| 3312 | - // Fin appel triggers |
|
| 3313 | - } |
|
| 850 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 851 | + /** |
|
| 852 | + * Update a link to contact line |
|
| 853 | + * |
|
| 854 | + * @param int $rowid Id of line contact-element |
|
| 855 | + * @param int $statut New status of link |
|
| 856 | + * @param int $type_contact_id Id of contact type (not modified if 0) |
|
| 857 | + * @param int $fk_socpeople Id of soc_people to update (not modified if 0) |
|
| 858 | + * @return int <0 if KO, >= 0 if OK |
|
| 859 | + */ |
|
| 860 | + function update_contact($rowid, $statut, $type_contact_id=0, $fk_socpeople=0) |
|
| 861 | + {
|
|
| 862 | + // phpcs:enable |
|
| 863 | + // Insert into database |
|
| 864 | + $sql = "UPDATE ".MAIN_DB_PREFIX."element_contact set"; |
|
| 865 | + $sql.= " statut = ".$statut; |
|
| 866 | + if ($type_contact_id) $sql.= ", fk_c_type_contact = '".$type_contact_id ."'"; |
|
| 867 | + if ($fk_socpeople) $sql.= ", fk_socpeople = '".$fk_socpeople ."'"; |
|
| 868 | + $sql.= " where rowid = ".$rowid; |
|
| 869 | + $resql=$this->db->query($sql); |
|
| 870 | + if ($resql) |
|
| 871 | + {
|
|
| 872 | + return 0; |
|
| 873 | + } |
|
| 874 | + else |
|
| 875 | + {
|
|
| 876 | + $this->error=$this->db->lasterror(); |
|
| 877 | + return -1; |
|
| 878 | + } |
|
| 879 | + } |
|
| 3314 | 880 | |
| 3315 | - if (! $error) |
|
| 3316 | - {
|
|
| 3317 | - $this->db->commit(); |
|
| 881 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 882 | + /** |
|
| 883 | + * Delete a link to contact line |
|
| 884 | + * |
|
| 885 | + * @param int $rowid Id of contact link line to delete |
|
| 886 | + * @param int $notrigger Disable all triggers |
|
| 887 | + * @return int >0 if OK, <0 if KO |
|
| 888 | + */ |
|
| 889 | + function delete_contact($rowid, $notrigger=0) |
|
| 890 | + {
|
|
| 891 | + // phpcs:enable |
|
| 892 | + global $user; |
|
| 3318 | 893 | |
| 3319 | - if (empty($savElementId)) // If the element we update was $this (so $elementId is null) |
|
| 3320 | - {
|
|
| 3321 | - $this->statut = $status; |
|
| 3322 | - $this->status = $status; |
|
| 3323 | - } |
|
| 3324 | 894 | |
| 3325 | - return 1; |
|
| 3326 | - } |
|
| 3327 | - else |
|
| 3328 | - {
|
|
| 3329 | - $this->db->rollback(); |
|
| 3330 | - dol_syslog(get_class($this)."::setStatus ".$this->error,LOG_ERR); |
|
| 3331 | - return -1; |
|
| 3332 | - } |
|
| 3333 | - } |
|
| 3334 | - else |
|
| 3335 | - {
|
|
| 3336 | - $this->error=$this->db->lasterror(); |
|
| 3337 | - $this->db->rollback(); |
|
| 3338 | - return -1; |
|
| 3339 | - } |
|
| 3340 | - } |
|
| 3341 | - |
|
| 3342 | - |
|
| 3343 | - /** |
|
| 3344 | - * Load type of canvas of an object if it exists |
|
| 3345 | - * |
|
| 3346 | - * @param int $id Record id |
|
| 3347 | - * @param string $ref Record ref |
|
| 3348 | - * @return int <0 if KO, 0 if nothing done, >0 if OK |
|
| 3349 | - */ |
|
| 3350 | - function getCanvas($id=0,$ref='') |
|
| 3351 | - {
|
|
| 3352 | - global $conf; |
|
| 3353 | - |
|
| 3354 | - if (empty($id) && empty($ref)) return 0; |
|
| 3355 | - if (!empty(Globals::$conf->global->MAIN_DISABLE_CANVAS)) |
|
| 3356 | - return 0; // To increase speed. Not enabled by default. |
|
| 895 | + $this->db->begin(); |
|
| 3357 | 896 | |
| 3358 | - // Clean parameters |
|
| 3359 | - $ref = trim($ref); |
|
| 3360 | - |
|
| 3361 | - $sql = "SELECT rowid, canvas"; |
|
| 3362 | - $sql.= " FROM ".MAIN_DB_PREFIX.$this->table_element; |
|
| 3363 | - $sql.= " WHERE entity IN (".getEntity($this->element).")";
|
|
| 3364 | - if (! empty($id)) $sql.= " AND rowid = ".$id; |
|
| 3365 | - if (! empty($ref)) $sql.= " AND ref = '".$this->db->escape($ref)."'"; |
|
| 3366 | - |
|
| 3367 | - $resql = $this->db->query($sql); |
|
| 3368 | - if ($resql) |
|
| 3369 | - {
|
|
| 3370 | - $obj = $this->db->fetch_object($resql); |
|
| 3371 | - if ($obj) |
|
| 3372 | - {
|
|
| 3373 | - $this->canvas = $obj->canvas; |
|
| 3374 | - return 1; |
|
| 3375 | - } |
|
| 3376 | - else return 0; |
|
| 3377 | - } |
|
| 3378 | - else |
|
| 3379 | - {
|
|
| 3380 | - dol_print_error($this->db); |
|
| 3381 | - return -1; |
|
| 3382 | - } |
|
| 3383 | - } |
|
| 3384 | - |
|
| 3385 | - |
|
| 3386 | - /** |
|
| 3387 | - * Get special code of a line |
|
| 3388 | - * |
|
| 3389 | - * @param int $lineid Id of line |
|
| 3390 | - * @return int Special code |
|
| 3391 | - */ |
|
| 3392 | - function getSpecialCode($lineid) |
|
| 3393 | - {
|
|
| 3394 | - $sql = 'SELECT special_code FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 3395 | - $sql.= ' WHERE rowid = '.$lineid; |
|
| 3396 | - $resql = $this->db->query($sql); |
|
| 3397 | - if ($resql) |
|
| 3398 | - {
|
|
| 3399 | - $row = $this->db->fetch_row($resql); |
|
| 3400 | - return $row[0]; |
|
| 3401 | - } |
|
| 3402 | - } |
|
| 3403 | - |
|
| 3404 | - /** |
|
| 3405 | - * Function to check if an object is used by others. |
|
| 3406 | - * Check is done into this->childtables. There is no check into llx_element_element. |
|
| 3407 | - * |
|
| 3408 | - * @param int $id Force id of object |
|
| 3409 | - * @return int <0 if KO, 0 if not used, >0 if already used |
|
| 3410 | - */ |
|
| 3411 | - function isObjectUsed($id=0) |
|
| 3412 | - {
|
|
| 3413 | - global $langs; |
|
| 3414 | - |
|
| 3415 | - if (empty($id)) $id=$this->id; |
|
| 3416 | - |
|
| 3417 | - // Check parameters |
|
| 3418 | - if (! isset($this->childtables) || ! is_array($this->childtables) || count($this->childtables) == 0) |
|
| 3419 | - {
|
|
| 3420 | - dol_print_error('Called isObjectUsed on a class with property this->childtables not defined');
|
|
| 3421 | - return -1; |
|
| 3422 | - } |
|
| 3423 | - |
|
| 3424 | - $arraytoscan = $this->childtables; |
|
| 3425 | - // For backward compatibility, we check if array is old format array('table1', 'table2', ...)
|
|
| 3426 | - $tmparray=array_keys($this->childtables); |
|
| 3427 | - if (is_numeric($tmparray[0])) |
|
| 3428 | - {
|
|
| 3429 | - $arraytoscan = array_flip($this->childtables); |
|
| 3430 | - } |
|
| 3431 | - |
|
| 3432 | - // Test if child exists |
|
| 3433 | - $haschild=0; |
|
| 3434 | - foreach($arraytoscan as $table => $elementname) |
|
| 3435 | - {
|
|
| 3436 | - //print $id.'-'.$table.'-'.$elementname.'<br>'; |
|
| 3437 | - // Check if third party can be deleted |
|
| 3438 | - $sql = "SELECT COUNT(*) as nb from ".MAIN_DB_PREFIX.$table; |
|
| 3439 | - $sql.= " WHERE ".$this->fk_element." = ".$id; |
|
| 3440 | - $resql=$this->db->query($sql); |
|
| 3441 | - if ($resql) |
|
| 3442 | - {
|
|
| 3443 | - $obj=$this->db->fetch_object($resql); |
|
| 3444 | - if ($obj->nb > 0) |
|
| 3445 | - {
|
|
| 3446 | - $langs->load("errors");
|
|
| 3447 | - //print 'Found into table '.$table.', type '.$langs->transnoentitiesnoconv($elementname).', haschild='.$haschild; |
|
| 3448 | - $haschild += $obj->nb; |
|
| 3449 | - if (is_numeric($elementname)) // old usage |
|
| 3450 | - {
|
|
| 3451 | - $this->errors[]=$langs->trans("ErrorRecordHasAtLeastOneChildOfType", $table);
|
|
| 3452 | - } |
|
| 3453 | - else // new usage: $elementname=Translation key |
|
| 3454 | - {
|
|
| 3455 | - $this->errors[]=$langs->trans("ErrorRecordHasAtLeastOneChildOfType", $langs->transnoentitiesnoconv($elementname));
|
|
| 3456 | - } |
|
| 3457 | - break; // We found at least one, we stop here |
|
| 3458 | - } |
|
| 3459 | - } |
|
| 3460 | - else |
|
| 3461 | - {
|
|
| 3462 | - $this->errors[]=$this->db->lasterror(); |
|
| 3463 | - return -1; |
|
| 3464 | - } |
|
| 3465 | - } |
|
| 3466 | - if ($haschild > 0) |
|
| 3467 | - {
|
|
| 3468 | - $this->errors[]="ErrorRecordHasChildren"; |
|
| 3469 | - return $haschild; |
|
| 3470 | - } |
|
| 3471 | - else return 0; |
|
| 3472 | - } |
|
| 3473 | - |
|
| 3474 | - /** |
|
| 3475 | - * Function to say how many lines object contains |
|
| 3476 | - * |
|
| 3477 | - * @param int $predefined -1=All, 0=Count free product/service only, 1=Count predefined product/service only, 2=Count predefined product, 3=Count predefined service |
|
| 3478 | - * @return int <0 if KO, 0 if no predefined products, nb of lines with predefined products if found |
|
| 3479 | - */ |
|
| 3480 | - function hasProductsOrServices($predefined=-1) |
|
| 3481 | - {
|
|
| 3482 | - $nb=0; |
|
| 3483 | - |
|
| 3484 | - foreach($this->lines as $key => $val) |
|
| 3485 | - {
|
|
| 3486 | - $qualified=0; |
|
| 3487 | - if ($predefined == -1) $qualified=1; |
|
| 3488 | - if ($predefined == 1 && $val->fk_product > 0) $qualified=1; |
|
| 3489 | - if ($predefined == 0 && $val->fk_product <= 0) $qualified=1; |
|
| 3490 | - if ($predefined == 2 && $val->fk_product > 0 && $val->product_type==0) $qualified=1; |
|
| 3491 | - if ($predefined == 3 && $val->fk_product > 0 && $val->product_type==1) $qualified=1; |
|
| 3492 | - if ($qualified) $nb++; |
|
| 3493 | - } |
|
| 3494 | - dol_syslog(get_class($this).'::hasProductsOrServices we found '.$nb.' qualified lines of products/servcies'); |
|
| 3495 | - return $nb; |
|
| 3496 | - } |
|
| 3497 | - |
|
| 3498 | - /** |
|
| 3499 | - * Function that returns the total amount HT of discounts applied for all lines. |
|
| 3500 | - * |
|
| 3501 | - * @return float |
|
| 3502 | - */ |
|
| 3503 | - function getTotalDiscount() |
|
| 3504 | - {
|
|
| 3505 | - $total_discount=0.00; |
|
| 3506 | - |
|
| 3507 | - $sql = "SELECT subprice as pu_ht, qty, remise_percent, total_ht"; |
|
| 3508 | - $sql.= " FROM ".MAIN_DB_PREFIX.$this->table_element."det"; |
|
| 3509 | - $sql.= " WHERE ".$this->fk_element." = ".$this->id; |
|
| 3510 | - |
|
| 3511 | - dol_syslog(get_class($this).'::getTotalDiscount', LOG_DEBUG); |
|
| 3512 | - $resql = $this->db->query($sql); |
|
| 3513 | - if ($resql) |
|
| 3514 | - {
|
|
| 3515 | - $num=$this->db->num_rows($resql); |
|
| 3516 | - $i=0; |
|
| 3517 | - while ($i < $num) |
|
| 3518 | - {
|
|
| 3519 | - $obj = $this->db->fetch_object($resql); |
|
| 3520 | - |
|
| 3521 | - $pu_ht = $obj->pu_ht; |
|
| 3522 | - $qty= $obj->qty; |
|
| 3523 | - $total_ht = $obj->total_ht; |
|
| 3524 | - |
|
| 3525 | - $total_discount_line = floatval(price2num(($pu_ht * $qty) - $total_ht, 'MT')); |
|
| 3526 | - $total_discount += $total_discount_line; |
|
| 3527 | - |
|
| 3528 | - $i++; |
|
| 3529 | - } |
|
| 3530 | - } |
|
| 3531 | - |
|
| 3532 | - //print $total_discount; exit; |
|
| 3533 | - return price2num($total_discount); |
|
| 3534 | - } |
|
| 3535 | - |
|
| 3536 | - |
|
| 3537 | - /** |
|
| 3538 | - * Return into unit=0, the calculated total of weight and volume of all lines * qty |
|
| 3539 | - * Calculate by adding weight and volume of each product line, so properties ->volume/volume_units/weight/weight_units must be loaded on line. |
|
| 3540 | - * |
|
| 3541 | - * @return array array('weight'=>...,'volume'=>...)
|
|
| 3542 | - */ |
|
| 3543 | - function getTotalWeightVolume() |
|
| 3544 | - {
|
|
| 3545 | - $totalWeight = 0; |
|
| 3546 | - $totalVolume = 0; |
|
| 3547 | - // defined for shipment only |
|
| 3548 | - $totalOrdered = ''; |
|
| 3549 | - // defined for shipment only |
|
| 3550 | - $totalToShip = ''; |
|
| 3551 | - |
|
| 3552 | - foreach ($this->lines as $line) |
|
| 3553 | - {
|
|
| 3554 | - if (isset($line->qty_asked)) |
|
| 3555 | - {
|
|
| 3556 | - if (empty($totalOrdered)) $totalOrdered=0; // Avoid warning because $totalOrdered is '' |
|
| 3557 | - $totalOrdered+=$line->qty_asked; // defined for shipment only |
|
| 3558 | - } |
|
| 3559 | - if (isset($line->qty_shipped)) |
|
| 3560 | - {
|
|
| 3561 | - if (empty($totalToShip)) $totalToShip=0; // Avoid warning because $totalToShip is '' |
|
| 3562 | - $totalToShip+=$line->qty_shipped; // defined for shipment only |
|
| 3563 | - }else if ($line->element == 'commandefournisseurdispatch' && isset($line->qty)) |
|
| 897 | + $sql = "DELETE FROM ".MAIN_DB_PREFIX."element_contact"; |
|
| 898 | + $sql.= " WHERE rowid =".$rowid; |
|
| 899 | + |
|
| 900 | + dol_syslog(get_class($this)."::delete_contact", LOG_DEBUG); |
|
| 901 | + if ($this->db->query($sql)) |
|
| 902 | + {
|
|
| 903 | + if (! $notrigger) |
|
| 3564 | 904 | {
|
| 3565 | - if (empty($totalToShip)) $totalToShip=0; |
|
| 3566 | - $totalToShip+=$line->qty; // defined for reception only |
|
| 3567 | - } |
|
| 3568 | - |
|
| 3569 | - // Define qty, weight, volume, weight_units, volume_units |
|
| 3570 | - if ($this->element == 'shipping') {
|
|
| 3571 | - // for shipments |
|
| 3572 | - $qty = $line->qty_shipped ? $line->qty_shipped : 0; |
|
| 3573 | - } |
|
| 3574 | - else {
|
|
| 3575 | - $qty = $line->qty ? $line->qty : 0; |
|
| 3576 | - } |
|
| 3577 | - |
|
| 3578 | - $weight = $line->weight ? $line->weight : 0; |
|
| 3579 | - ($weight==0 && !empty($line->product->weight))? $weight=$line->product->weight: 0; |
|
| 3580 | - $volume = $line->volume ? $line->volume : 0; |
|
| 3581 | - ($volume==0 && !empty($line->product->volume))? $volume=$line->product->volume: 0; |
|
| 905 | + $result=$this->call_trigger(strtoupper($this->element).'_DELETE_CONTACT', $user); |
|
| 906 | + if ($result < 0) { $this->db->rollback(); return -1; }
|
|
| 907 | + } |
|
| 3582 | 908 | |
| 3583 | - $weight_units=$line->weight_units; |
|
| 3584 | - ($weight_units==0 && !empty($line->product->weight_units))? $weight_units=$line->product->weight_units: 0; |
|
| 3585 | - $volume_units=$line->volume_units; |
|
| 3586 | - ($volume_units==0 && !empty($line->product->volume_units))? $volume_units=$line->product->volume_units: 0; |
|
| 909 | + $this->db->commit(); |
|
| 910 | + return 1; |
|
| 911 | + } |
|
| 912 | + else |
|
| 913 | + {
|
|
| 914 | + $this->error=$this->db->lasterror(); |
|
| 915 | + $this->db->rollback(); |
|
| 916 | + return -1; |
|
| 917 | + } |
|
| 918 | + } |
|
| 3587 | 919 | |
| 3588 | - $weightUnit=0; |
|
| 3589 | - $volumeUnit=0; |
|
| 3590 | - if (! empty($weight_units)) $weightUnit = $weight_units; |
|
| 3591 | - if (! empty($volume_units)) $volumeUnit = $volume_units; |
|
| 920 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 921 | + /** |
|
| 922 | + * Delete all links between an object $this and all its contacts |
|
| 923 | + * |
|
| 924 | + * @param string $source '' or 'internal' or 'external' |
|
| 925 | + * @param string $code Type of contact (code or id) |
|
| 926 | + * @return int >0 if OK, <0 if KO |
|
| 927 | + */ |
|
| 928 | + function delete_linked_contact($source='',$code='') |
|
| 929 | + {
|
|
| 930 | + // phpcs:enable |
|
| 931 | + $temp = array(); |
|
| 932 | + $typeContact = $this->liste_type_contact($source,'',0,0,$code); |
|
| 3592 | 933 | |
| 3593 | - if (empty($totalWeight)) $totalWeight=0; // Avoid warning because $totalWeight is '' |
|
| 3594 | - if (empty($totalVolume)) $totalVolume=0; // Avoid warning because $totalVolume is '' |
|
| 934 | + foreach($typeContact as $key => $value) |
|
| 935 | + {
|
|
| 936 | + array_push($temp,$key); |
|
| 937 | + } |
|
| 938 | + $listId = implode(",", $temp);
|
|
| 3595 | 939 | |
| 3596 | - //var_dump($line->volume_units); |
|
| 3597 | - if ($weight_units < 50) // >50 means a standard unit (power of 10 of official unit), > 50 means an exotic unit (like inch) |
|
| 3598 | - {
|
|
| 3599 | - $trueWeightUnit=pow(10, $weightUnit); |
|
| 3600 | - $totalWeight += $weight * $qty * $trueWeightUnit; |
|
| 3601 | - } |
|
| 3602 | - else {
|
|
| 3603 | - if ($weight_units == 99) {
|
|
| 3604 | - // conversion 1 Pound = 0.45359237 KG |
|
| 3605 | - $trueWeightUnit = 0.45359237; |
|
| 3606 | - $totalWeight += $weight * $qty * $trueWeightUnit; |
|
| 3607 | - } elseif ($weight_units == 98) {
|
|
| 3608 | - // conversion 1 Ounce = 0.0283495 KG |
|
| 3609 | - $trueWeightUnit = 0.0283495; |
|
| 3610 | - $totalWeight += $weight * $qty * $trueWeightUnit; |
|
| 3611 | - } |
|
| 3612 | - else |
|
| 3613 | - $totalWeight += $weight * $qty; // This may be wrong if we mix different units |
|
| 3614 | - } |
|
| 3615 | - if ($volume_units < 50) // >50 means a standard unit (power of 10 of official unit), > 50 means an exotic unit (like inch) |
|
| 3616 | - {
|
|
| 3617 | - //print $line->volume."x".$line->volume_units."x".($line->volume_units < 50)."x".$volumeUnit; |
|
| 3618 | - $trueVolumeUnit=pow(10, $volumeUnit); |
|
| 3619 | - //print $line->volume; |
|
| 3620 | - $totalVolume += $volume * $qty * $trueVolumeUnit; |
|
| 3621 | - } |
|
| 3622 | - else |
|
| 3623 | - {
|
|
| 3624 | - $totalVolume += $volume * $qty; // This may be wrong if we mix different units |
|
| 3625 | - } |
|
| 3626 | - } |
|
| 3627 | - |
|
| 3628 | - return array('weight'=>$totalWeight, 'volume'=>$totalVolume, 'ordered'=>$totalOrdered, 'toship'=>$totalToShip);
|
|
| 3629 | - } |
|
| 3630 | - |
|
| 3631 | - |
|
| 3632 | - /** |
|
| 3633 | - * Set extra parameters |
|
| 3634 | - * |
|
| 3635 | - * @return int <0 if KO, >0 if OK |
|
| 3636 | - */ |
|
| 3637 | - function setExtraParameters() |
|
| 3638 | - {
|
|
| 3639 | - $this->db->begin(); |
|
| 3640 | - |
|
| 3641 | - $extraparams = (! empty($this->extraparams) ? json_encode($this->extraparams) : null); |
|
| 3642 | - |
|
| 3643 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 3644 | - $sql.= " SET extraparams = ".(! empty($extraparams) ? "'".$this->db->escape($extraparams)."'" : "null"); |
|
| 3645 | - $sql.= " WHERE rowid = ".$this->id; |
|
| 3646 | - |
|
| 3647 | - dol_syslog(get_class($this)."::setExtraParameters", LOG_DEBUG); |
|
| 3648 | - $resql = $this->db->query($sql); |
|
| 3649 | - if (! $resql) |
|
| 3650 | - {
|
|
| 3651 | - $this->error=$this->db->lasterror(); |
|
| 3652 | - $this->db->rollback(); |
|
| 3653 | - return -1; |
|
| 3654 | - } |
|
| 3655 | - else |
|
| 3656 | - {
|
|
| 3657 | - $this->db->commit(); |
|
| 3658 | - return 1; |
|
| 3659 | - } |
|
| 3660 | - } |
|
| 940 | + $sql = "DELETE FROM ".MAIN_DB_PREFIX."element_contact"; |
|
| 941 | + $sql.= " WHERE element_id = ".$this->id; |
|
| 942 | + if ($listId) |
|
| 943 | + $sql.= " AND fk_c_type_contact IN (".$listId.")";
|
|
| 3661 | 944 | |
| 945 | + dol_syslog(get_class($this)."::delete_linked_contact", LOG_DEBUG); |
|
| 946 | + if ($this->db->query($sql)) |
|
| 947 | + {
|
|
| 948 | + return 1; |
|
| 949 | + } |
|
| 950 | + else |
|
| 951 | + {
|
|
| 952 | + $this->error=$this->db->lasterror(); |
|
| 953 | + return -1; |
|
| 954 | + } |
|
| 955 | + } |
|
| 3662 | 956 | |
| 3663 | 957 | // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
| 3664 | - /** |
|
| 3665 | - * Return incoterms informations |
|
| 3666 | - * TODO Use a cache for label get |
|
| 3667 | - * |
|
| 3668 | - * @return string incoterms info |
|
| 3669 | - */ |
|
| 3670 | - function display_incoterms() |
|
| 3671 | - {
|
|
| 958 | + /** |
|
| 959 | + * Get array of all contacts for an object |
|
| 960 | + * |
|
| 961 | + * @param int $statut Status of links to get (-1=all) |
|
| 962 | + * @param string $source Source of contact: external or thirdparty (llx_socpeople) or internal (llx_user) |
|
| 963 | + * @param int $list 0:Return array contains all properties, 1:Return array contains just id |
|
| 964 | + * @param string $code Filter on this code of contact type ('SHIPPING', 'BILLING', ...)
|
|
| 965 | + * @return array|int Array of contacts, -1 if error |
|
| 966 | + */ |
|
| 967 | + function liste_contact($statut=-1,$source='external',$list=0,$code='') |
|
| 968 | + {
|
|
| 3672 | 969 | // phpcs:enable |
| 3673 | - $out = ''; |
|
| 3674 | - $this->libelle_incoterms = ''; |
|
| 3675 | - if (!empty($this->fk_incoterms)) |
|
| 3676 | - {
|
|
| 3677 | - $sql = 'SELECT code FROM '.MAIN_DB_PREFIX.'c_incoterms WHERE rowid = '.(int) $this->fk_incoterms; |
|
| 3678 | - $result = $this->db->query($sql); |
|
| 3679 | - if ($result) |
|
| 3680 | - {
|
|
| 3681 | - $res = $this->db->fetch_object($result); |
|
| 3682 | - $out .= $res->code; |
|
| 3683 | - } |
|
| 3684 | - } |
|
| 3685 | - |
|
| 3686 | - $out .= (($res->code && $this->location_incoterms)?' - ':'').$this->location_incoterms; |
|
| 3687 | - |
|
| 3688 | - return $out; |
|
| 3689 | - } |
|
| 3690 | - |
|
| 3691 | - /** |
|
| 3692 | - * Return incoterms informations for pdf display |
|
| 3693 | - * |
|
| 3694 | - * @return string incoterms info |
|
| 3695 | - */ |
|
| 3696 | - function getIncotermsForPDF() |
|
| 3697 | - {
|
|
| 3698 | - $sql = 'SELECT code FROM '.MAIN_DB_PREFIX.'c_incoterms WHERE rowid = '.(int) $this->fk_incoterms; |
|
| 3699 | - $resql = $this->db->query($sql); |
|
| 3700 | - if ($resql) |
|
| 3701 | - {
|
|
| 3702 | - $num = $this->db->num_rows($resql); |
|
| 3703 | - if ($num > 0) |
|
| 3704 | - {
|
|
| 3705 | - $res = $this->db->fetch_object($resql); |
|
| 3706 | - return 'Incoterm : '.$res->code.' - '.$this->location_incoterms; |
|
| 3707 | - } |
|
| 3708 | - else |
|
| 3709 | - {
|
|
| 3710 | - return ''; |
|
| 3711 | - } |
|
| 3712 | - } |
|
| 3713 | - else |
|
| 3714 | - {
|
|
| 3715 | - $this->errors[] = $this->db->lasterror(); |
|
| 3716 | - return false; |
|
| 3717 | - } |
|
| 3718 | - } |
|
| 3719 | - |
|
| 3720 | - /** |
|
| 3721 | - * Define incoterms values of current object |
|
| 3722 | - * |
|
| 3723 | - * @param int $id_incoterm Id of incoterm to set or '' to remove |
|
| 3724 | - * @param string $location location of incoterm |
|
| 3725 | - * @return int <0 if KO, >0 if OK |
|
| 3726 | - */ |
|
| 3727 | - function setIncoterms($id_incoterm, $location) |
|
| 3728 | - {
|
|
| 3729 | - if ($this->id && $this->table_element) |
|
| 3730 | - {
|
|
| 3731 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 3732 | - $sql.= " SET fk_incoterms = ".($id_incoterm > 0 ? $id_incoterm : "null"); |
|
| 3733 | - $sql.= ", location_incoterms = ".($id_incoterm > 0 ? "'".$this->db->escape($location)."'" : "null"); |
|
| 3734 | - $sql.= " WHERE rowid = " . $this->id; |
|
| 3735 | - dol_syslog(get_class($this).'::setIncoterms', LOG_DEBUG); |
|
| 3736 | - $resql=$this->db->query($sql); |
|
| 3737 | - if ($resql) |
|
| 3738 | - {
|
|
| 3739 | - $this->fk_incoterms = $id_incoterm; |
|
| 3740 | - $this->location_incoterms = $location; |
|
| 970 | + global $langs; |
|
| 971 | + |
|
| 972 | + $tab=array(); |
|
| 973 | + |
|
| 974 | + $sql = "SELECT ec.rowid, ec.statut as statuslink, ec.fk_socpeople as id, ec.fk_c_type_contact"; // This field contains id of llx_socpeople or id of llx_user |
|
| 975 | + if ($source == 'internal') $sql.=", '-1' as socid, t.statut as statuscontact, t.login, t.photo"; |
|
| 976 | + if ($source == 'external' || $source == 'thirdparty') $sql.=", t.fk_soc as socid, t.statut as statuscontact"; |
|
| 977 | + $sql.= ", t.civility as civility, t.lastname as lastname, t.firstname, t.email"; |
|
| 978 | + $sql.= ", tc.source, tc.element, tc.code, tc.libelle"; |
|
| 979 | + $sql.= " FROM ".MAIN_DB_PREFIX."c_type_contact tc"; |
|
| 980 | + $sql.= ", ".MAIN_DB_PREFIX."element_contact ec"; |
|
| 981 | + if ($source == 'internal') $sql.=" LEFT JOIN ".MAIN_DB_PREFIX."user t on ec.fk_socpeople = t.rowid"; |
|
| 982 | + if ($source == 'external'|| $source == 'thirdparty') $sql.=" LEFT JOIN ".MAIN_DB_PREFIX."socpeople t on ec.fk_socpeople = t.rowid"; |
|
| 983 | + $sql.= " WHERE ec.element_id =".$this->id; |
|
| 984 | + $sql.= " AND ec.fk_c_type_contact=tc.rowid"; |
|
| 985 | + $sql.= " AND tc.element='".$this->db->escape($this->element)."'"; |
|
| 986 | + if ($code) $sql.= " AND tc.code = '".$this->db->escape($code)."'"; |
|
| 987 | + if ($source == 'internal') $sql.= " AND tc.source = 'internal'"; |
|
| 988 | + if ($source == 'external' || $source == 'thirdparty') $sql.= " AND tc.source = 'external'"; |
|
| 989 | + $sql.= " AND tc.active=1"; |
|
| 990 | + if ($statut >= 0) $sql.= " AND ec.statut = '".$statut."'"; |
|
| 991 | + $sql.=" ORDER BY t.lastname ASC"; |
|
| 992 | + |
|
| 993 | + dol_syslog(get_class($this)."::liste_contact", LOG_DEBUG); |
|
| 994 | + $resql=$this->db->query($sql); |
|
| 995 | + if ($resql) |
|
| 996 | + {
|
|
| 997 | + $num=$this->db->num_rows($resql); |
|
| 998 | + $i=0; |
|
| 999 | + while ($i < $num) |
|
| 1000 | + {
|
|
| 1001 | + $obj = $this->db->fetch_object($resql); |
|
| 1002 | + |
|
| 1003 | + if (! $list) |
|
| 1004 | + {
|
|
| 1005 | + $transkey="TypeContact_".$obj->element."_".$obj->source."_".$obj->code; |
|
| 1006 | + $libelle_type=($langs->trans($transkey)!=$transkey ? $langs->trans($transkey) : $obj->libelle); |
|
| 1007 | + $tab[$i]=array('source'=>$obj->source,'socid'=>$obj->socid,'id'=>$obj->id,
|
|
| 1008 | + 'nom'=>$obj->lastname, // For backward compatibility |
|
| 1009 | + 'civility'=>$obj->civility, 'lastname'=>$obj->lastname, 'firstname'=>$obj->firstname, 'email'=>$obj->email, 'login'=>$obj->login, 'photo'=>$obj->photo, 'statuscontact'=>$obj->statuscontact, |
|
| 1010 | + 'rowid'=>$obj->rowid, 'code'=>$obj->code, 'libelle'=>$libelle_type, 'status'=>$obj->statuslink, 'fk_c_type_contact'=>$obj->fk_c_type_contact); |
|
| 1011 | + } |
|
| 1012 | + else |
|
| 1013 | + {
|
|
| 1014 | + $tab[$i]=$obj->id; |
|
| 1015 | + } |
|
| 3741 | 1016 | |
| 3742 | - $sql = 'SELECT libelle FROM '.MAIN_DB_PREFIX.'c_incoterms WHERE rowid = '.(int) $this->fk_incoterms; |
|
| 3743 | - $res = $this->db->query($sql); |
|
| 3744 | - if ($res) |
|
| 3745 | - {
|
|
| 3746 | - $obj = $this->db->fetch_object($res); |
|
| 3747 | - $this->libelle_incoterms = $obj->libelle; |
|
| 3748 | - } |
|
| 3749 | - return 1; |
|
| 3750 | - } |
|
| 3751 | - else |
|
| 3752 | - {
|
|
| 3753 | - $this->errors[] = $this->db->lasterror(); |
|
| 3754 | - return -1; |
|
| 3755 | - } |
|
| 3756 | - } |
|
| 3757 | - else return -1; |
|
| 3758 | - } |
|
| 3759 | - |
|
| 3760 | - |
|
| 3761 | - // -------------------- |
|
| 3762 | - // TODO: All functions here must be redesigned and moved as they are not business functions but output functions |
|
| 3763 | - // -------------------- |
|
| 3764 | - |
|
| 3765 | - /* This is to show add lines */ |
|
| 3766 | - |
|
| 3767 | - /** |
|
| 3768 | - * Show add free and predefined products/services form |
|
| 3769 | - * |
|
| 3770 | - * @param int $dateSelector 1=Show also date range input fields |
|
| 3771 | - * @param Societe $seller Object thirdparty who sell |
|
| 3772 | - * @param Societe $buyer Object thirdparty who buy |
|
| 3773 | - * @return void |
|
| 3774 | - */ |
|
| 3775 | - function formAddObjectLine($dateSelector, $seller, $buyer) |
|
| 3776 | - {
|
|
| 3777 | - global $conf,$user,$langs,$object,$hookmanager; |
|
| 3778 | - global $form,$bcnd,$var; |
|
| 3779 | - |
|
| 3780 | - // Line extrafield |
|
| 3781 | - require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 3782 | - $extrafieldsline = new AlExtraFields($this->db); |
|
| 3783 | - $extralabelslines=$extrafieldsline->fetch_name_optionals_label($this->table_element_line); |
|
| 1017 | + $i++; |
|
| 1018 | + } |
|
| 3784 | 1019 | |
| 3785 | - // Output template part (modules that overwrite templates must declare this into descriptor) |
|
| 3786 | - // Use global variables + $dateSelector + $seller and $buyer |
|
| 3787 | - $dirtpls = array_merge(Globals::$conf->modules_parts['tpl'], array('/core/tpl'));
|
|
| 3788 | - foreach($dirtpls as $reldir) |
|
| 3789 | - {
|
|
| 3790 | - $tpl = dol_buildpath($reldir.'/objectline_create.tpl.php'); |
|
| 3791 | - if (empty(Globals::$conf->file->strict_mode)) {
|
|
| 3792 | - $res=@include $tpl; |
|
| 3793 | - } else {
|
|
| 3794 | - $res=include $tpl; // for debug |
|
| 3795 | - } |
|
| 3796 | - if ($res) break; |
|
| 3797 | - } |
|
| 3798 | - } |
|
| 3799 | - |
|
| 3800 | - |
|
| 3801 | - |
|
| 3802 | - /* This is to show array of line of details */ |
|
| 3803 | - |
|
| 3804 | - |
|
| 3805 | - /** |
|
| 3806 | - * Return HTML table for object lines |
|
| 3807 | - * TODO Move this into an output class file (htmlline.class.php) |
|
| 3808 | - * If lines are into a template, title must also be into a template |
|
| 3809 | - * But for the moment we don't know if it's possible as we keep a method available on overloaded objects. |
|
| 3810 | - * |
|
| 3811 | - * @param string $action Action code |
|
| 3812 | - * @param string $seller Object of seller third party |
|
| 3813 | - * @param string $buyer Object of buyer third party |
|
| 3814 | - * @param int $selected Object line selected |
|
| 3815 | - * @param int $dateSelector 1=Show also date range input fields |
|
| 3816 | - * @return void |
|
| 3817 | - */ |
|
| 3818 | - function printObjectLines($action, $seller, $buyer, $selected=0, $dateSelector=0) |
|
| 3819 | - {
|
|
| 3820 | - global $conf, $hookmanager, $langs, $user; |
|
| 3821 | - // TODO We should not use global var for this ! |
|
| 3822 | - global $inputalsopricewithtax, $usemargins, $disableedit, $disablemove, $disableremove, $outputalsopricetotalwithtax; |
|
| 3823 | - |
|
| 3824 | - // Define usemargins |
|
| 3825 | - $usemargins=0; |
|
| 3826 | - if (!empty(Globals::$conf->margin->enabled) && !empty($this->element) && in_array($this->element, array('facture', 'propal', 'commande')))
|
|
| 3827 | - $usemargins = 1; |
|
| 1020 | + return $tab; |
|
| 1021 | + } |
|
| 1022 | + else |
|
| 1023 | + {
|
|
| 1024 | + $this->error=$this->db->lasterror(); |
|
| 1025 | + dol_print_error($this->db); |
|
| 1026 | + return -1; |
|
| 1027 | + } |
|
| 1028 | + } |
|
| 3828 | 1029 | |
| 3829 | - $num = count($this->lines); |
|
| 3830 | 1030 | |
| 3831 | - // Line extrafield |
|
| 3832 | - require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 3833 | - $extrafieldsline = new AlExtraFields($this->db); |
|
| 3834 | - $extralabelslines=$extrafieldsline->fetch_name_optionals_label($this->table_element_line); |
|
| 1031 | + /** |
|
| 1032 | + * Update status of a contact linked to object |
|
| 1033 | + * |
|
| 1034 | + * @param int $rowid Id of link between object and contact |
|
| 1035 | + * @return int <0 if KO, >=0 if OK |
|
| 1036 | + */ |
|
| 1037 | + function swapContactStatus($rowid) |
|
| 1038 | + {
|
|
| 1039 | + $sql = "SELECT ec.datecreate, ec.statut, ec.fk_socpeople, ec.fk_c_type_contact,"; |
|
| 1040 | + $sql.= " tc.code, tc.libelle"; |
|
| 1041 | + //$sql.= ", s.fk_soc"; |
|
| 1042 | + $sql.= " FROM (".MAIN_DB_PREFIX."element_contact as ec, ".MAIN_DB_PREFIX."c_type_contact as tc)";
|
|
| 1043 | + //$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."socpeople as s ON ec.fk_socpeople=s.rowid"; // Si contact de type external, alors il est lie a une societe |
|
| 1044 | + $sql.= " WHERE ec.rowid =".$rowid; |
|
| 1045 | + $sql.= " AND ec.fk_c_type_contact=tc.rowid"; |
|
| 1046 | + $sql.= " AND tc.element = '".$this->db->escape($this->element)."'"; |
|
| 1047 | + |
|
| 1048 | + dol_syslog(get_class($this)."::swapContactStatus", LOG_DEBUG); |
|
| 1049 | + $resql=$this->db->query($sql); |
|
| 1050 | + if ($resql) |
|
| 1051 | + {
|
|
| 1052 | + $obj = $this->db->fetch_object($resql); |
|
| 1053 | + $newstatut = ($obj->statut == 4) ? 5 : 4; |
|
| 1054 | + $result = $this->update_contact($rowid, $newstatut); |
|
| 1055 | + $this->db->free($resql); |
|
| 1056 | + return $result; |
|
| 1057 | + } |
|
| 1058 | + else |
|
| 1059 | + {
|
|
| 1060 | + $this->error=$this->db->error(); |
|
| 1061 | + dol_print_error($this->db); |
|
| 1062 | + return -1; |
|
| 1063 | + } |
|
| 1064 | + } |
|
| 3835 | 1065 | |
| 3836 | - $parameters = array('num'=>$num,'i'=>$i,'dateSelector'=>$dateSelector,'seller'=>$seller,'buyer'=>$buyer,'selected'=>$selected, 'extrafieldsline'=>$extrafieldsline);
|
|
| 3837 | - $reshook = $hookmanager->executeHooks('printObjectLineTitle', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
|
|
| 3838 | - if (empty($reshook)) |
|
| 3839 | - {
|
|
| 3840 | - // Title line |
|
| 3841 | - print "<thead>\n"; |
|
| 1066 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1067 | + /** |
|
| 1068 | + * Return array with list of possible values for type of contacts |
|
| 1069 | + * |
|
| 1070 | + * @param string $source 'internal', 'external' or 'all' |
|
| 1071 | + * @param string $order Sort order by : 'position', 'code', 'rowid'... |
|
| 1072 | + * @param int $option 0=Return array id->label, 1=Return array code->label |
|
| 1073 | + * @param int $activeonly 0=all status of contact, 1=only the active |
|
| 1074 | + * @param string $code Type of contact (Example: 'CUSTOMER', 'SERVICE') |
|
| 1075 | + * @return array Array list of type of contacts (id->label if option=0, code->label if option=1) |
|
| 1076 | + */ |
|
| 1077 | + function liste_type_contact($source='internal', $order='position', $option=0, $activeonly=0, $code='') |
|
| 1078 | + {
|
|
| 1079 | + // phpcs:enable |
|
| 1080 | + global $langs; |
|
| 1081 | + |
|
| 1082 | + if (empty($order)) $order='position'; |
|
| 1083 | + if ($order == 'position') $order.=',code'; |
|
| 1084 | + |
|
| 1085 | + $tab = array(); |
|
| 1086 | + $sql = "SELECT DISTINCT tc.rowid, tc.code, tc.libelle, tc.position"; |
|
| 1087 | + $sql.= " FROM ".MAIN_DB_PREFIX."c_type_contact as tc"; |
|
| 1088 | + $sql.= " WHERE tc.element='".$this->db->escape($this->element)."'"; |
|
| 1089 | + if ($activeonly == 1) $sql.= " AND tc.active=1"; // only the active types |
|
| 1090 | + if (! empty($source) && $source != 'all') $sql.= " AND tc.source='".$this->db->escape($source)."'"; |
|
| 1091 | + if (! empty($code)) $sql.= " AND tc.code='".$this->db->escape($code)."'"; |
|
| 1092 | + $sql.= $this->db->order($order,'ASC'); |
|
| 1093 | + |
|
| 1094 | + //print "sql=".$sql; |
|
| 1095 | + $resql=$this->db->query($sql); |
|
| 1096 | + if ($resql) |
|
| 1097 | + {
|
|
| 1098 | + $num=$this->db->num_rows($resql); |
|
| 1099 | + $i=0; |
|
| 1100 | + while ($i < $num) |
|
| 1101 | + {
|
|
| 1102 | + $obj = $this->db->fetch_object($resql); |
|
| 3842 | 1103 | |
| 3843 | - print '<tr class="liste_titre nodrag nodrop">'; |
|
| 1104 | + $transkey="TypeContact_".$this->element."_".$source."_".$obj->code; |
|
| 1105 | + $libelle_type=($langs->trans($transkey)!=$transkey ? $langs->trans($transkey) : $obj->libelle); |
|
| 1106 | + if (empty($option)) $tab[$obj->rowid]=$libelle_type; |
|
| 1107 | + else $tab[$obj->code]=$libelle_type; |
|
| 1108 | + $i++; |
|
| 1109 | + } |
|
| 1110 | + return $tab; |
|
| 1111 | + } |
|
| 1112 | + else |
|
| 1113 | + {
|
|
| 1114 | + $this->error=$this->db->lasterror(); |
|
| 1115 | + //dol_print_error($this->db); |
|
| 1116 | + return null; |
|
| 1117 | + } |
|
| 1118 | + } |
|
| 3844 | 1119 | |
| 3845 | - // Adds a line numbering column |
|
| 3846 | - if (!empty(Globals::$conf->global->MAIN_VIEW_LINE_NUMBER)) |
|
| 3847 | - print '<td class="linecolnum" align="center" width="5"> </td>'; |
|
| 1120 | + /** |
|
| 1121 | + * Return id of contacts for a source and a contact code. |
|
| 1122 | + * Example: contact client de facturation ('external', 'BILLING')
|
|
| 1123 | + * Example: contact client de livraison ('external', 'SHIPPING')
|
|
| 1124 | + * Example: contact interne suivi paiement ('internal', 'SALESREPFOLL')
|
|
| 1125 | + * |
|
| 1126 | + * @param string $source 'external' or 'internal' |
|
| 1127 | + * @param string $code 'BILLING', 'SHIPPING', 'SALESREPFOLL', ... |
|
| 1128 | + * @param int $status limited to a certain status |
|
| 1129 | + * @return array List of id for such contacts |
|
| 1130 | + */ |
|
| 1131 | + function getIdContact($source,$code,$status=0) |
|
| 1132 | + {
|
|
| 1133 | + global $conf; |
|
| 3848 | 1134 | |
| 3849 | - // Description |
|
| 3850 | - print '<td class="linecoldescription">'.$langs->trans('Description').'</td>';
|
|
| 1135 | + $result=array(); |
|
| 1136 | + $i=0; |
|
| 1137 | + //cas particulier pour les expeditions |
|
| 1138 | + if($this->element=='shipping' && $this->origin_id != 0) {
|
|
| 1139 | + $id=$this->origin_id; |
|
| 1140 | + $element='commande'; |
|
| 1141 | + } else if($this->element=='reception' && $this->origin_id != 0) {
|
|
| 1142 | + $id=$this->origin_id; |
|
| 1143 | + $element='order_supplier'; |
|
| 1144 | + } else {
|
|
| 1145 | + $id=$this->id; |
|
| 1146 | + $element=$this->element; |
|
| 1147 | + } |
|
| 3851 | 1148 | |
| 3852 | - if ($this->element == 'supplier_proposal' || $this->element == 'order_supplier' || $this->element == 'invoice_supplier') |
|
| 3853 | - {
|
|
| 3854 | - print '<td class="linerefsupplier"><span id="title_fourn_ref">'.$langs->trans("SupplierRef").'</span></td>';
|
|
| 3855 | - } |
|
| 1149 | + $sql = "SELECT ec.fk_socpeople"; |
|
| 1150 | + $sql.= " FROM ".MAIN_DB_PREFIX."element_contact as ec,"; |
|
| 1151 | + if ($source == 'internal') $sql.= " ".MAIN_DB_PREFIX."user as c,"; |
|
| 1152 | + if ($source == 'external') $sql.= " ".MAIN_DB_PREFIX."socpeople as c,"; |
|
| 1153 | + $sql.= " ".MAIN_DB_PREFIX."c_type_contact as tc"; |
|
| 1154 | + $sql.= " WHERE ec.element_id = ".$id; |
|
| 1155 | + $sql.= " AND ec.fk_socpeople = c.rowid"; |
|
| 1156 | + if ($source == 'internal') $sql.= " AND c.entity IN (".getEntity('user').")";
|
|
| 1157 | + if ($source == 'external') $sql.= " AND c.entity IN (".getEntity('societe').")";
|
|
| 1158 | + $sql.= " AND ec.fk_c_type_contact = tc.rowid"; |
|
| 1159 | + $sql.= " AND tc.element = '".$element."'"; |
|
| 1160 | + $sql.= " AND tc.source = '".$source."'"; |
|
| 1161 | + $sql.= " AND tc.code = '".$code."'"; |
|
| 1162 | + $sql.= " AND tc.active = 1"; |
|
| 1163 | + if ($status) $sql.= " AND ec.statut = ".$status; |
|
| 1164 | + |
|
| 1165 | + dol_syslog(get_class($this)."::getIdContact", LOG_DEBUG); |
|
| 1166 | + $resql=$this->db->query($sql); |
|
| 1167 | + if ($resql) |
|
| 1168 | + {
|
|
| 1169 | + while ($obj = $this->db->fetch_object($resql)) |
|
| 1170 | + {
|
|
| 1171 | + $result[$i]=$obj->fk_socpeople; |
|
| 1172 | + $i++; |
|
| 1173 | + } |
|
| 1174 | + } |
|
| 1175 | + else |
|
| 1176 | + {
|
|
| 1177 | + $this->error=$this->db->error(); |
|
| 1178 | + return null; |
|
| 1179 | + } |
|
| 3856 | 1180 | |
| 3857 | - // VAT |
|
| 3858 | - print '<td class="linecolvat" align="right" width="80">'.$langs->trans('VAT').'</td>';
|
|
| 1181 | + return $result; |
|
| 1182 | + } |
|
| 3859 | 1183 | |
| 3860 | - // Price HT |
|
| 3861 | - print '<td class="linecoluht" align="right" width="80">'.$langs->trans('PriceUHT').'</td>';
|
|
| 1184 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1185 | + /** |
|
| 1186 | + * Load object contact with id=$this->contactid into $this->contact |
|
| 1187 | + * |
|
| 1188 | + * @param int $contactid Id du contact. Use this->contactid if empty. |
|
| 1189 | + * @return int <0 if KO, >0 if OK |
|
| 1190 | + */ |
|
| 1191 | + function fetch_contact($contactid=null) |
|
| 1192 | + {
|
|
| 1193 | + // phpcs:enable |
|
| 1194 | + if (empty($contactid)) $contactid=$this->contactid; |
|
| 3862 | 1195 | |
| 3863 | - // Multicurrency |
|
| 3864 | - if (!empty(Globals::$conf->multicurrency->enabled) && $this->multicurrency_code != Globals::$conf->currency) |
|
| 3865 | - print '<td class="linecoluht_currency" align="right" width="80">' . $langs->trans('PriceUHTCurrency', $this->multicurrency_code) . '</td>';
|
|
| 1196 | + if (empty($contactid)) return 0; |
|
| 3866 | 1197 | |
| 3867 | - if ($inputalsopricewithtax) print '<td align="right" width="80">'.$langs->trans('PriceUTTC').'</td>';
|
|
| 1198 | + require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php'; |
|
| 1199 | + $contact = new Contact($this->db); |
|
| 1200 | + $result=$contact->fetch($contactid); |
|
| 1201 | + $this->contact = $contact; |
|
| 1202 | + return $result; |
|
| 1203 | + } |
|
| 3868 | 1204 | |
| 3869 | - // Qty |
|
| 3870 | - print '<td class="linecolqty" align="right">'.$langs->trans('Qty').'</td>';
|
|
| 1205 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1206 | + /** |
|
| 1207 | + * Load the third party of object, from id $this->socid or $this->fk_soc, into this->thirdparty |
|
| 1208 | + * |
|
| 1209 | + * @param int $force_thirdparty_id Force thirdparty id |
|
| 1210 | + * @return int <0 if KO, >0 if OK |
|
| 1211 | + */ |
|
| 1212 | + function fetch_thirdparty($force_thirdparty_id=0) |
|
| 1213 | + {
|
|
| 1214 | + // phpcs:enable |
|
| 1215 | + global $conf; |
|
| 3871 | 1216 | |
| 3872 | - if (Globals::$conf->global->PRODUCT_USE_UNITS) {
|
|
| 3873 | - print '<td class="linecoluseunit" align="left">'.$langs->trans('Unit').'</td>';
|
|
| 3874 | - } |
|
| 1217 | + if (empty($this->socid) && empty($this->fk_soc) && empty($this->fk_thirdparty) && empty($force_thirdparty_id)) |
|
| 1218 | + return 0; |
|
| 3875 | 1219 | |
| 3876 | - // Reduction short |
|
| 3877 | - print '<td class="linecoldiscount" align="right">'.$langs->trans('ReductionShort').'</td>';
|
|
| 1220 | + require_once DOL_DOCUMENT_ROOT . '/societe/class/societe.class.php'; |
|
| 3878 | 1221 | |
| 3879 | - if ($this->situation_cycle_ref) {
|
|
| 3880 | - print '<td class="linecolcycleref" align="right">' . $langs->trans('Progress') . '</td>';
|
|
| 3881 | - } |
|
| 1222 | + $idtofetch = isset($this->socid) ? $this->socid : (isset($this->fk_soc) ? $this->fk_soc : $this->fk_thirdparty); |
|
| 1223 | + if ($force_thirdparty_id) |
|
| 1224 | + $idtofetch = $force_thirdparty_id; |
|
| 3882 | 1225 | |
| 3883 | - if ($usemargins && !empty(Globals::$conf->margin->enabled) && empty($user->societe_id)) {
|
|
| 3884 | - if (!empty($user->rights->margins->creer)) |
|
| 3885 | - {
|
|
| 3886 | - if (Globals::$conf->global->MARGIN_TYPE == "1") |
|
| 3887 | - print '<td class="linecolmargin1 margininfos" align="right" width="80">'.$langs->trans('BuyingPrice').'</td>';
|
|
| 3888 | - else |
|
| 3889 | - print '<td class="linecolmargin1 margininfos" align="right" width="80">'.$langs->trans('CostPrice').'</td>';
|
|
| 3890 | - } |
|
| 1226 | + if ($idtofetch) {
|
|
| 1227 | + $thirdparty = new Societe($this->db); |
|
| 1228 | + $result = $thirdparty->fetch($idtofetch); |
|
| 1229 | + $this->thirdparty = $thirdparty; |
|
| 3891 | 1230 | |
| 3892 | - if (!empty(Globals::$conf->global->DISPLAY_MARGIN_RATES) && $user->rights->margins->liretous) |
|
| 3893 | - print '<td class="linecolmargin2 margininfos" align="right" width="50">'.$langs->trans('MarginRate').'</td>';
|
|
| 3894 | - if (!empty(Globals::$conf->global->DISPLAY_MARK_RATES) && $user->rights->margins->liretous) |
|
| 3895 | - print '<td class="linecolmargin2 margininfos" align="right" width="50">'.$langs->trans('MarkRate').'</td>';
|
|
| 3896 | - } |
|
| 1231 | + // Use first price level if level not defined for third party |
|
| 1232 | + if (!empty(Globals::$conf->global->PRODUIT_MULTIPRICES) && empty($this->thirdparty->price_level)) {
|
|
| 1233 | + $this->thirdparty->price_level = 1; |
|
| 1234 | + } |
|
| 3897 | 1235 | |
| 3898 | - // Total HT |
|
| 3899 | - print '<td class="linecolht" align="right">'.$langs->trans('TotalHTShort').'</td>';
|
|
| 1236 | + return $result; |
|
| 1237 | + } else |
|
| 1238 | + return -1; |
|
| 1239 | + } |
|
| 3900 | 1240 | |
| 3901 | - // Multicurrency |
|
| 3902 | - if (!empty(Globals::$conf->multicurrency->enabled) && $this->multicurrency_code != Globals::$conf->currency) |
|
| 3903 | - print '<td class="linecoltotalht_currency" align="right">' . $langs->trans('TotalHTShortCurrency', $this->multicurrency_code) . '</td>';
|
|
| 3904 | 1241 | |
| 3905 | - if ($outputalsopricetotalwithtax) print '<td align="right" width="80">'.$langs->trans('TotalTTCShort').'</td>';
|
|
| 1242 | + /** |
|
| 1243 | + * Looks for an object with ref matching the wildcard provided |
|
| 1244 | + * It does only work when $this->table_ref_field is set |
|
| 1245 | + * |
|
| 1246 | + * @param string $ref Wildcard |
|
| 1247 | + * @return int >1 = OK, 0 = Not found or table_ref_field not defined, <0 = KO |
|
| 1248 | + */ |
|
| 1249 | + public function fetchOneLike($ref) |
|
| 1250 | + {
|
|
| 1251 | + if (!$this->table_ref_field) {
|
|
| 1252 | + return 0; |
|
| 1253 | + } |
|
| 3906 | 1254 | |
| 3907 | - print '<td class="linecoledit"></td>'; // No width to allow autodim |
|
| 1255 | + $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.$this->table_element.' WHERE '.$this->table_ref_field.' LIKE "'.$this->db->escape($ref).'" LIMIT 1'; |
|
| 3908 | 1256 | |
| 3909 | - print '<td class="linecoldelete" width="10"></td>'; |
|
| 1257 | + $query = $this->db->query($sql); |
|
| 3910 | 1258 | |
| 3911 | - print '<td class="linecolmove" width="10"></td>'; |
|
| 1259 | + if (!$this->db->num_rows($query)) {
|
|
| 1260 | + return 0; |
|
| 1261 | + } |
|
| 3912 | 1262 | |
| 3913 | - if($action == 'selectlines') |
|
| 3914 | - {
|
|
| 3915 | - print '<td class="linecolcheckall" align="center">'; |
|
| 3916 | - print '<input type="checkbox" class="linecheckboxtoggle" />'; |
|
| 3917 | - print '<script type="text/javascript">$(document).ready(function() {$(".linecheckboxtoggle").click(function() {var checkBoxes = $(".linecheckbox");checkBoxes.prop("checked", this.checked);})});</script>';
|
|
| 3918 | - print '</td>'; |
|
| 3919 | - } |
|
| 3920 | - |
|
| 3921 | - print "</tr>\n"; |
|
| 3922 | - print "</thead>\n"; |
|
| 3923 | - } |
|
| 3924 | - |
|
| 3925 | - $var = true; |
|
| 3926 | - $i = 0; |
|
| 3927 | - |
|
| 3928 | - print "<tbody>\n"; |
|
| 3929 | - foreach ($this->lines as $line) |
|
| 3930 | - {
|
|
| 3931 | - //Line extrafield |
|
| 3932 | - $line->fetch_optionals(); |
|
| 3933 | - |
|
| 3934 | - //if (is_object($hookmanager) && (($line->product_type == 9 && ! empty($line->special_code)) || ! empty($line->fk_parent_line))) |
|
| 3935 | - if (is_object($hookmanager)) // Old code is commented on preceding line. |
|
| 3936 | - {
|
|
| 3937 | - if (empty($line->fk_parent_line)) |
|
| 3938 | - {
|
|
| 3939 | - $parameters = array('line'=>$line,'var'=>$var,'num'=>$num,'i'=>$i,'dateSelector'=>$dateSelector,'seller'=>$seller,'buyer'=>$buyer,'selected'=>$selected, 'extrafieldsline'=>$extrafieldsline);
|
|
| 3940 | - $reshook = $hookmanager->executeHooks('printObjectLine', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
|
|
| 3941 | - } |
|
| 3942 | - else |
|
| 3943 | - {
|
|
| 3944 | - $parameters = array('line'=>$line,'var'=>$var,'num'=>$num,'i'=>$i,'dateSelector'=>$dateSelector,'seller'=>$seller,'buyer'=>$buyer,'selected'=>$selected, 'extrafieldsline'=>$extrafieldsline, 'fk_parent_line'=>$line->fk_parent_line);
|
|
| 3945 | - $reshook = $hookmanager->executeHooks('printObjectSubLine', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
|
|
| 3946 | - } |
|
| 3947 | - } |
|
| 3948 | - if (empty($reshook)) |
|
| 3949 | - {
|
|
| 3950 | - $this->printObjectLine($action,$line,$var,$num,$i,$dateSelector,$seller,$buyer,$selected,$extrafieldsline); |
|
| 3951 | - } |
|
| 3952 | - |
|
| 3953 | - $i++; |
|
| 3954 | - } |
|
| 3955 | - print "</tbody>\n"; |
|
| 3956 | - } |
|
| 3957 | - |
|
| 3958 | - /** |
|
| 3959 | - * Return HTML content of a detail line |
|
| 3960 | - * TODO Move this into an output class file (htmlline.class.php) |
|
| 3961 | - * |
|
| 3962 | - * @param string $action GET/POST action |
|
| 3963 | - * @param CommonObjectLine $line Selected object line to output |
|
| 3964 | - * @param string $var Is it a an odd line (true) |
|
| 3965 | - * @param int $num Number of line (0) |
|
| 3966 | - * @param int $i I |
|
| 3967 | - * @param int $dateSelector 1=Show also date range input fields |
|
| 3968 | - * @param string $seller Object of seller third party |
|
| 3969 | - * @param string $buyer Object of buyer third party |
|
| 3970 | - * @param int $selected Object line selected |
|
| 3971 | - * @param int $extrafieldsline Object of extrafield line attribute |
|
| 3972 | - * @return void |
|
| 3973 | - */ |
|
| 3974 | - function printObjectLine($action,$line,$var,$num,$i,$dateSelector,$seller,$buyer,$selected=0,$extrafieldsline=0) |
|
| 3975 | - {
|
|
| 3976 | - global $conf,$langs,$user,$object,$hookmanager; |
|
| 3977 | - global $form,$bc,$bcdd; |
|
| 3978 | - global $object_rights, $disableedit, $disablemove, $disableremove; // TODO We should not use global var for this ! |
|
| 3979 | - |
|
| 3980 | - $object_rights = $this->getRights(); |
|
| 3981 | - |
|
| 3982 | - $element=$this->element; |
|
| 3983 | - |
|
| 3984 | - $text=''; $description=''; $type=0; |
|
| 3985 | - |
|
| 3986 | - // Show product and description |
|
| 3987 | - $type=(! empty($line->product_type)?$line->product_type:$line->fk_product_type); |
|
| 3988 | - // Try to enhance type detection using date_start and date_end for free lines where type was not saved. |
|
| 3989 | - if (! empty($line->date_start)) $type=1; // deprecated |
|
| 3990 | - if (! empty($line->date_end)) $type=1; // deprecated |
|
| 3991 | - |
|
| 3992 | - // Ligne en mode visu |
|
| 3993 | - if ($action != 'editline' || $selected != $line->id) |
|
| 3994 | - {
|
|
| 3995 | - // Product |
|
| 3996 | - if ($line->fk_product > 0) |
|
| 3997 | - {
|
|
| 3998 | - $product_static = new Product($this->db); |
|
| 3999 | - $product_static->fetch($line->fk_product); |
|
| 4000 | - |
|
| 4001 | - $product_static->ref = $line->ref; //can change ref in hook |
|
| 4002 | - $product_static->label = $line->label; //can change label in hook |
|
| 4003 | - $text=$product_static->getNomUrl(1); |
|
| 4004 | - |
|
| 4005 | - // Define output language and label |
|
| 4006 | - if (!empty(Globals::$conf->global->MAIN_MULTILANGS)) {
|
|
| 4007 | - if (! is_object($this->thirdparty)) |
|
| 4008 | - {
|
|
| 4009 | - dol_print_error('','Error: Method printObjectLine was called on an object and object->fetch_thirdparty was not done before');
|
|
| 4010 | - return; |
|
| 4011 | - } |
|
| 4012 | - |
|
| 4013 | - $prod = new Product($this->db); |
|
| 4014 | - $prod->fetch($line->fk_product); |
|
| 4015 | - |
|
| 4016 | - $outputlangs = $langs; |
|
| 4017 | - $newlang=''; |
|
| 4018 | - if (empty($newlang) && GETPOST('lang_id','aZ09')) $newlang=GETPOST('lang_id','aZ09');
|
|
| 4019 | - if (!empty(Globals::$conf->global->PRODUIT_TEXTS_IN_THIRDPARTY_LANGUAGE) && empty($newlang)) |
|
| 4020 | - $newlang = $this->thirdparty->default_lang; // For language to language of customer |
|
| 4021 | - if (! empty($newlang)) |
|
| 4022 | - {
|
|
| 4023 | - $outputlangs = new Translate("",$conf);
|
|
| 4024 | - $outputlangs->setDefaultLang($newlang); |
|
| 4025 | - } |
|
| 1263 | + $result = $this->db->fetch_object($query); |
|
| 4026 | 1264 | |
| 4027 | - $label = (! empty($prod->multilangs[$outputlangs->defaultlang]["label"])) ? $prod->multilangs[$outputlangs->defaultlang]["label"] : $line->product_label; |
|
| 4028 | - } |
|
| 4029 | - else |
|
| 4030 | - {
|
|
| 4031 | - $label = $line->product_label; |
|
| 4032 | - } |
|
| 1265 | + return $this->fetch($result->rowid); |
|
| 1266 | + } |
|
| 4033 | 1267 | |
| 4034 | - $text.= ' - '.(! empty($line->label)?$line->label:$label); |
|
| 4035 | - $description .= (!empty(Globals::$conf->global->PRODUIT_DESC_IN_FORM) ? '' : dol_htmlentitiesbr($line->description)); // Description is what to show on popup. We shown nothing if already into desc. |
|
| 4036 | - } |
|
| 1268 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1269 | + /** |
|
| 1270 | + * Load data for barcode into properties ->barcode_type* |
|
| 1271 | + * Properties ->barcode_type that is id of barcode. Type is used to find other properties, but |
|
| 1272 | + * if it is not defined, ->element must be defined to know default barcode type. |
|
| 1273 | + * |
|
| 1274 | + * @return int <0 if KO, 0 if can't guess type of barcode (ISBN, EAN13...), >0 if OK (all barcode properties loaded) |
|
| 1275 | + */ |
|
| 1276 | + function fetch_barcode() |
|
| 1277 | + {
|
|
| 1278 | + // phpcs:enable |
|
| 1279 | + global $conf; |
|
| 4037 | 1280 | |
| 4038 | - $line->pu_ttc = price2num($line->subprice * (1 + ($line->tva_tx/100)), 'MU'); |
|
| 1281 | + dol_syslog(get_class($this).'::fetch_barcode this->element='.$this->element.' this->barcode_type='.$this->barcode_type); |
|
| 4039 | 1282 | |
| 4040 | - // Output template part (modules that overwrite templates must declare this into descriptor) |
|
| 4041 | - // Use global variables + $dateSelector + $seller and $buyer |
|
| 4042 | - $dirtpls = array_merge(Globals::$conf->modules_parts['tpl'], array('/core/tpl'));
|
|
| 4043 | - foreach($dirtpls as $reldir) |
|
| 4044 | - {
|
|
| 4045 | - $tpl = dol_buildpath($reldir.'/objectline_view.tpl.php'); |
|
| 4046 | - if (empty(Globals::$conf->file->strict_mode)) {
|
|
| 4047 | - $res=@include $tpl; |
|
| 4048 | - } else {
|
|
| 4049 | - $res=include $tpl; // for debug |
|
| 4050 | - } |
|
| 4051 | - if ($res) break; |
|
| 4052 | - } |
|
| 4053 | - } |
|
| 1283 | + $idtype=$this->barcode_type; |
|
| 1284 | + if (empty($idtype) && $idtype != '0') // If type of barcode no set, we try to guess. If set to '0' it means we forced to have type remain not defined |
|
| 1285 | + {
|
|
| 1286 | + if ($this->element == 'product') |
|
| 1287 | + $idtype = Globals::$conf->global->PRODUIT_DEFAULT_BARCODE_TYPE; |
|
| 1288 | + else if ($this->element == 'societe') |
|
| 1289 | + $idtype = Globals::$conf->global->GENBARCODE_BARCODETYPE_THIRDPARTY; |
|
| 1290 | + else dol_syslog('Call fetch_barcode with barcode_type not defined and cant be guessed', LOG_WARNING);
|
|
| 1291 | + } |
|
| 4054 | 1292 | |
| 4055 | - // Ligne en mode update |
|
| 4056 | - if ($this->statut == 0 && $action == 'editline' && $selected == $line->id) |
|
| 4057 | - {
|
|
| 4058 | - $label = (! empty($line->label) ? $line->label : (($line->fk_product > 0) ? $line->product_label : '')); |
|
| 4059 | - $placeholder=' placeholder="'.$langs->trans("Label").'"';
|
|
| 1293 | + if ($idtype > 0) |
|
| 1294 | + {
|
|
| 1295 | + if (empty($this->barcode_type) || empty($this->barcode_type_code) || empty($this->barcode_type_label) || empty($this->barcode_type_coder)) // If data not already loaded |
|
| 1296 | + {
|
|
| 1297 | + $sql = "SELECT rowid, code, libelle as label, coder"; |
|
| 1298 | + $sql.= " FROM ".MAIN_DB_PREFIX."c_barcode_type"; |
|
| 1299 | + $sql.= " WHERE rowid = ".$idtype; |
|
| 1300 | + dol_syslog(get_class($this).'::fetch_barcode', LOG_DEBUG); |
|
| 1301 | + $resql = $this->db->query($sql); |
|
| 1302 | + if ($resql) |
|
| 1303 | + {
|
|
| 1304 | + $obj = $this->db->fetch_object($resql); |
|
| 1305 | + $this->barcode_type = $obj->rowid; |
|
| 1306 | + $this->barcode_type_code = $obj->code; |
|
| 1307 | + $this->barcode_type_label = $obj->label; |
|
| 1308 | + $this->barcode_type_coder = $obj->coder; |
|
| 1309 | + return 1; |
|
| 1310 | + } |
|
| 1311 | + else |
|
| 1312 | + {
|
|
| 1313 | + dol_print_error($this->db); |
|
| 1314 | + return -1; |
|
| 1315 | + } |
|
| 1316 | + } |
|
| 1317 | + } |
|
| 1318 | + return 0; |
|
| 1319 | + } |
|
| 4060 | 1320 | |
| 4061 | - $line->pu_ttc = price2num($line->subprice * (1 + ($line->tva_tx/100)), 'MU'); |
|
| 1321 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1322 | + /** |
|
| 1323 | + * Load the project with id $this->fk_project into this->project |
|
| 1324 | + * |
|
| 1325 | + * @return int <0 if KO, >=0 if OK |
|
| 1326 | + */ |
|
| 1327 | + function fetch_projet() |
|
| 1328 | + {
|
|
| 1329 | + // phpcs:enable |
|
| 1330 | + include_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php'; |
|
| 4062 | 1331 | |
| 4063 | - // Output template part (modules that overwrite templates must declare this into descriptor) |
|
| 4064 | - // Use global variables + $dateSelector + $seller and $buyer |
|
| 4065 | - $dirtpls = array_merge(Globals::$conf->modules_parts['tpl'], array('/core/tpl'));
|
|
| 4066 | - foreach($dirtpls as $reldir) |
|
| 4067 | - {
|
|
| 4068 | - $tpl = dol_buildpath($reldir.'/objectline_edit.tpl.php'); |
|
| 4069 | - if (empty(Globals::$conf->file->strict_mode)) {
|
|
| 4070 | - $res=@include $tpl; |
|
| 4071 | - } else {
|
|
| 4072 | - $res=include $tpl; // for debug |
|
| 4073 | - } |
|
| 4074 | - if ($res) break; |
|
| 4075 | - } |
|
| 4076 | - } |
|
| 4077 | - } |
|
| 4078 | - |
|
| 4079 | - |
|
| 4080 | - /* This is to show array of line of details of source object */ |
|
| 4081 | - |
|
| 4082 | - |
|
| 4083 | - /** |
|
| 4084 | - * Return HTML table table of source object lines |
|
| 4085 | - * TODO Move this and previous function into output html class file (htmlline.class.php). |
|
| 4086 | - * If lines are into a template, title must also be into a template |
|
| 4087 | - * But for the moment we don't know if it's possible, so we keep the method available on overloaded objects. |
|
| 4088 | - * |
|
| 4089 | - * @param string $restrictlist ''=All lines, 'services'=Restrict to services only |
|
| 4090 | - * @return void |
|
| 4091 | - */ |
|
| 4092 | - function printOriginLinesList($restrictlist='') |
|
| 4093 | - {
|
|
| 4094 | - global $langs, $hookmanager, $conf; |
|
| 4095 | - |
|
| 4096 | - print '<tr class="liste_titre">'; |
|
| 4097 | - print '<td>'.$langs->trans('Ref').'</td>';
|
|
| 4098 | - print '<td>'.$langs->trans('Description').'</td>';
|
|
| 4099 | - print '<td align="right">'.$langs->trans('VATRate').'</td>';
|
|
| 4100 | - print '<td align="right">'.$langs->trans('PriceUHT').'</td>';
|
|
| 4101 | - if (!empty(Globals::$conf->multicurrency->enabled)) |
|
| 4102 | - print '<td align="right">' . $langs->trans('PriceUHTCurrency') . '</td>';
|
|
| 4103 | - print '<td align="right">'.$langs->trans('Qty').'</td>';
|
|
| 4104 | - if (Globals::$conf->global->PRODUCT_USE_UNITS) {
|
|
| 4105 | - print '<td align="left">'.$langs->trans('Unit').'</td>';
|
|
| 4106 | - } |
|
| 4107 | - print '<td align="right">'.$langs->trans('ReductionShort').'</td></tr>';
|
|
| 1332 | + if (empty($this->fk_project) && ! empty($this->fk_projet)) $this->fk_project = $this->fk_projet; // For backward compatibility |
|
| 1333 | + if (empty($this->fk_project)) return 0; |
|
| 4108 | 1334 | |
| 4109 | - $var = true; |
|
| 4110 | - $i = 0; |
|
| 1335 | + $project = new Project($this->db); |
|
| 1336 | + $result = $project->fetch($this->fk_project); |
|
| 4111 | 1337 | |
| 4112 | - if (! empty($this->lines)) |
|
| 4113 | - {
|
|
| 4114 | - foreach ($this->lines as $line) |
|
| 4115 | - {
|
|
| 4116 | - if (is_object($hookmanager) && (($line->product_type == 9 && ! empty($line->special_code)) || ! empty($line->fk_parent_line))) |
|
| 4117 | - {
|
|
| 4118 | - if (empty($line->fk_parent_line)) |
|
| 4119 | - {
|
|
| 4120 | - $parameters=array('line'=>$line,'var'=>$var,'i'=>$i);
|
|
| 4121 | - $action=''; |
|
| 4122 | - $hookmanager->executeHooks('printOriginObjectLine',$parameters,$this,$action); // Note that $action and $object may have been modified by some hooks
|
|
| 4123 | - } |
|
| 4124 | - } |
|
| 4125 | - else |
|
| 4126 | - {
|
|
| 4127 | - $this->printOriginLine($line, $var, $restrictlist); |
|
| 4128 | - } |
|
| 1338 | + $this->projet = $project; // deprecated |
|
| 1339 | + $this->project = $project; |
|
| 1340 | + return $result; |
|
| 1341 | + } |
|
| 4129 | 1342 | |
| 4130 | - $i++; |
|
| 4131 | - } |
|
| 4132 | - } |
|
| 4133 | - } |
|
| 4134 | - |
|
| 4135 | - /** |
|
| 4136 | - * Return HTML with a line of table array of source object lines |
|
| 4137 | - * TODO Move this and previous function into output html class file (htmlline.class.php). |
|
| 4138 | - * If lines are into a template, title must also be into a template |
|
| 4139 | - * But for the moment we don't know if it's possible as we keep a method available on overloaded objects. |
|
| 4140 | - * |
|
| 4141 | - * @param CommonObjectLine $line Line |
|
| 4142 | - * @param string $var Var |
|
| 4143 | - * @param string $restrictlist ''=All lines, 'services'=Restrict to services only (strike line if not) |
|
| 4144 | - * @return void |
|
| 4145 | - */ |
|
| 4146 | - function printOriginLine($line, $var, $restrictlist='') |
|
| 4147 | - {
|
|
| 4148 | - global $langs, $conf; |
|
| 4149 | - |
|
| 4150 | - //var_dump($line); |
|
| 4151 | - if (!empty($line->date_start)) |
|
| 4152 | - {
|
|
| 4153 | - $date_start=$line->date_start; |
|
| 4154 | - } |
|
| 4155 | - else |
|
| 4156 | - {
|
|
| 4157 | - $date_start=$line->date_debut_prevue; |
|
| 4158 | - if ($line->date_debut_reel) $date_start=$line->date_debut_reel; |
|
| 4159 | - } |
|
| 4160 | - if (!empty($line->date_end)) |
|
| 4161 | - {
|
|
| 4162 | - $date_end=$line->date_end; |
|
| 4163 | - } |
|
| 4164 | - else |
|
| 4165 | - {
|
|
| 4166 | - $date_end=$line->date_fin_prevue; |
|
| 4167 | - if ($line->date_fin_reel) $date_end=$line->date_fin_reel; |
|
| 4168 | - } |
|
| 4169 | - |
|
| 4170 | - $this->tpl['label'] = ''; |
|
| 4171 | - if (! empty($line->fk_parent_line)) $this->tpl['label'].= img_picto('', 'rightarrow');
|
|
| 4172 | - |
|
| 4173 | - if (($line->info_bits & 2) == 2) // TODO Not sure this is used for source object |
|
| 4174 | - {
|
|
| 4175 | - $discount=new DiscountAbsolute($this->db); |
|
| 4176 | - $discount->fk_soc = $this->socid; |
|
| 4177 | - $this->tpl['label'].= $discount->getNomUrl(0,'discount'); |
|
| 4178 | - } |
|
| 4179 | - else if (! empty($line->fk_product)) |
|
| 4180 | - {
|
|
| 4181 | - $productstatic = new Product($this->db); |
|
| 4182 | - $productstatic->id = $line->fk_product; |
|
| 4183 | - $productstatic->ref = $line->ref; |
|
| 4184 | - $productstatic->type = $line->fk_product_type; |
|
| 4185 | - if(empty($productstatic->ref)){
|
|
| 4186 | - $line->fetch_product(); |
|
| 4187 | - $productstatic = $line->product; |
|
| 4188 | - } |
|
| 4189 | - |
|
| 4190 | - $this->tpl['label'].= $productstatic->getNomUrl(1); |
|
| 4191 | - $this->tpl['label'].= ' - '.(! empty($line->label)?$line->label:$line->product_label); |
|
| 4192 | - // Dates |
|
| 4193 | - if ($line->product_type == 1 && ($date_start || $date_end)) |
|
| 4194 | - {
|
|
| 4195 | - $this->tpl['label'].= get_date_range($date_start,$date_end); |
|
| 4196 | - } |
|
| 4197 | - } |
|
| 4198 | - else |
|
| 4199 | - {
|
|
| 4200 | - $this->tpl['label'].= ($line->product_type == -1 ? ' ' : ($line->product_type == 1 ? img_object($langs->trans(''),'service') : img_object($langs->trans(''),'product')));
|
|
| 4201 | - if (!empty($line->desc)) {
|
|
| 4202 | - $this->tpl['label'].=$line->desc; |
|
| 4203 | - }else {
|
|
| 4204 | - $this->tpl['label'].= ($line->label ? ' '.$line->label : ''); |
|
| 4205 | - } |
|
| 4206 | - |
|
| 4207 | - // Dates |
|
| 4208 | - if ($line->product_type == 1 && ($date_start || $date_end)) |
|
| 4209 | - {
|
|
| 4210 | - $this->tpl['label'].= get_date_range($date_start,$date_end); |
|
| 4211 | - } |
|
| 4212 | - } |
|
| 1343 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1344 | + /** |
|
| 1345 | + * Load the product with id $this->fk_product into this->product |
|
| 1346 | + * |
|
| 1347 | + * @return int <0 if KO, >=0 if OK |
|
| 1348 | + */ |
|
| 1349 | + function fetch_product() |
|
| 1350 | + {
|
|
| 1351 | + // phpcs:enable |
|
| 1352 | + include_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php'; |
|
| 4213 | 1353 | |
| 4214 | - if (! empty($line->desc)) |
|
| 4215 | - {
|
|
| 4216 | - if ($line->desc == '(CREDIT_NOTE)') // TODO Not sure this is used for source object |
|
| 4217 | - {
|
|
| 4218 | - $discount=new DiscountAbsolute($this->db); |
|
| 4219 | - $discount->fetch($line->fk_remise_except); |
|
| 4220 | - $this->tpl['description'] = $langs->transnoentities("DiscountFromCreditNote",$discount->getNomUrl(0));
|
|
| 4221 | - } |
|
| 4222 | - elseif ($line->desc == '(DEPOSIT)') // TODO Not sure this is used for source object |
|
| 4223 | - {
|
|
| 4224 | - $discount=new DiscountAbsolute($this->db); |
|
| 4225 | - $discount->fetch($line->fk_remise_except); |
|
| 4226 | - $this->tpl['description'] = $langs->transnoentities("DiscountFromDeposit",$discount->getNomUrl(0));
|
|
| 4227 | - } |
|
| 4228 | - elseif ($line->desc == '(EXCESS RECEIVED)') |
|
| 4229 | - {
|
|
| 4230 | - $discount=new DiscountAbsolute($this->db); |
|
| 4231 | - $discount->fetch($line->fk_remise_except); |
|
| 4232 | - $this->tpl['description'] = $langs->transnoentities("DiscountFromExcessReceived",$discount->getNomUrl(0));
|
|
| 4233 | - } |
|
| 4234 | - elseif ($line->desc == '(EXCESS PAID)') |
|
| 4235 | - {
|
|
| 4236 | - $discount=new DiscountAbsolute($this->db); |
|
| 4237 | - $discount->fetch($line->fk_remise_except); |
|
| 4238 | - $this->tpl['description'] = $langs->transnoentities("DiscountFromExcessPaid",$discount->getNomUrl(0));
|
|
| 4239 | - } |
|
| 4240 | - else |
|
| 4241 | - {
|
|
| 4242 | - $this->tpl['description'] = dol_trunc($line->desc,60); |
|
| 4243 | - } |
|
| 4244 | - } |
|
| 4245 | - else |
|
| 4246 | - {
|
|
| 4247 | - $this->tpl['description'] = ' '; |
|
| 4248 | - } |
|
| 4249 | - |
|
| 4250 | - // VAT Rate |
|
| 4251 | - $this->tpl['vat_rate'] = vatrate($line->tva_tx, true); |
|
| 4252 | - $this->tpl['vat_rate'] .= (($line->info_bits & 1) == 1) ? '*' : ''; |
|
| 4253 | - if (! empty($line->vat_src_code) && ! preg_match('/\(/', $this->tpl['vat_rate'])) $this->tpl['vat_rate'].=' ('.$line->vat_src_code.')';
|
|
| 4254 | - |
|
| 4255 | - $this->tpl['price'] = price($line->subprice); |
|
| 4256 | - $this->tpl['multicurrency_price'] = price($line->multicurrency_subprice); |
|
| 4257 | - $this->tpl['qty'] = (($line->info_bits & 2) != 2) ? $line->qty : ' '; |
|
| 4258 | - if (Globals::$conf->global->PRODUCT_USE_UNITS) |
|
| 4259 | - $this->tpl['unit'] = $langs->transnoentities($line->getLabelOfUnit('long'));
|
|
| 4260 | - $this->tpl['remise_percent'] = (($line->info_bits & 2) != 2) ? vatrate($line->remise_percent, true) : ' '; |
|
| 1354 | + if (empty($this->fk_product)) return 0; |
|
| 4261 | 1355 | |
| 4262 | - // Is the line strike or not |
|
| 4263 | - $this->tpl['strike']=0; |
|
| 4264 | - if ($restrictlist == 'services' && $line->product_type != Product::TYPE_SERVICE) $this->tpl['strike']=1; |
|
| 4265 | - |
|
| 4266 | - // Output template part (modules that overwrite templates must declare this into descriptor) |
|
| 4267 | - // Use global variables + $dateSelector + $seller and $buyer |
|
| 4268 | - $dirtpls = array_merge(Globals::$conf->modules_parts['tpl'], array('/core/tpl'));
|
|
| 4269 | - foreach($dirtpls as $reldir) |
|
| 4270 | - {
|
|
| 4271 | - $tpl = dol_buildpath($reldir.'/originproductline.tpl.php'); |
|
| 4272 | - if (empty(Globals::$conf->file->strict_mode)) {
|
|
| 4273 | - $res=@include $tpl; |
|
| 4274 | - } else {
|
|
| 4275 | - $res=include $tpl; // for debug |
|
| 4276 | - } |
|
| 4277 | - if ($res) break; |
|
| 4278 | - } |
|
| 4279 | - } |
|
| 1356 | + $product = new Product($this->db); |
|
| 1357 | + $result = $product->fetch($this->fk_product); |
|
| 4280 | 1358 | |
| 1359 | + $this->product = $product; |
|
| 1360 | + return $result; |
|
| 1361 | + } |
|
| 4281 | 1362 | |
| 4282 | 1363 | // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
| 4283 | - /** |
|
| 4284 | - * Add resources to the current object : add entry into llx_element_resources |
|
| 4285 | - * Need $this->element & $this->id |
|
| 4286 | - * |
|
| 4287 | - * @param int $resource_id Resource id |
|
| 4288 | - * @param string $resource_type 'resource' |
|
| 4289 | - * @param int $busy Busy or not |
|
| 4290 | - * @param int $mandatory Mandatory or not |
|
| 4291 | - * @return int <=0 if KO, >0 if OK |
|
| 4292 | - */ |
|
| 4293 | - function add_element_resource($resource_id, $resource_type, $busy=0, $mandatory=0) |
|
| 4294 | - {
|
|
| 1364 | + /** |
|
| 1365 | + * Load the user with id $userid into this->user |
|
| 1366 | + * |
|
| 1367 | + * @param int $userid Id du contact |
|
| 1368 | + * @return int <0 if KO, >0 if OK |
|
| 1369 | + */ |
|
| 1370 | + function fetch_user($userid) |
|
| 1371 | + {
|
|
| 4295 | 1372 | // phpcs:enable |
| 4296 | - $this->db->begin(); |
|
| 4297 | - |
|
| 4298 | - $sql = "INSERT INTO ".MAIN_DB_PREFIX."element_resources (";
|
|
| 4299 | - $sql.= "resource_id"; |
|
| 4300 | - $sql.= ", resource_type"; |
|
| 4301 | - $sql.= ", element_id"; |
|
| 4302 | - $sql.= ", element_type"; |
|
| 4303 | - $sql.= ", busy"; |
|
| 4304 | - $sql.= ", mandatory"; |
|
| 4305 | - $sql.= ") VALUES (";
|
|
| 4306 | - $sql.= $resource_id; |
|
| 4307 | - $sql.= ", '".$this->db->escape($resource_type)."'"; |
|
| 4308 | - $sql.= ", '".$this->db->escape($this->id)."'"; |
|
| 4309 | - $sql.= ", '".$this->db->escape($this->element)."'"; |
|
| 4310 | - $sql.= ", '".$this->db->escape($busy)."'"; |
|
| 4311 | - $sql.= ", '".$this->db->escape($mandatory)."'"; |
|
| 4312 | - $sql.= ")"; |
|
| 4313 | - |
|
| 4314 | - dol_syslog(get_class($this)."::add_element_resource", LOG_DEBUG); |
|
| 4315 | - if ($this->db->query($sql)) |
|
| 4316 | - {
|
|
| 4317 | - $this->db->commit(); |
|
| 4318 | - return 1; |
|
| 4319 | - } |
|
| 4320 | - else |
|
| 4321 | - {
|
|
| 4322 | - $this->error=$this->db->lasterror(); |
|
| 4323 | - $this->db->rollback(); |
|
| 4324 | - return 0; |
|
| 4325 | - } |
|
| 4326 | - } |
|
| 1373 | + $user = new User($this->db); |
|
| 1374 | + $result=$user->fetch($userid); |
|
| 1375 | + $this->user = $user; |
|
| 1376 | + return $result; |
|
| 1377 | + } |
|
| 4327 | 1378 | |
| 4328 | 1379 | // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
| 4329 | - /** |
|
| 4330 | - * Delete a link to resource line |
|
| 4331 | - * |
|
| 4332 | - * @param int $rowid Id of resource line to delete |
|
| 4333 | - * @param int $element element name (for trigger) TODO: use $this->element into commonobject class |
|
| 4334 | - * @param int $notrigger Disable all triggers |
|
| 4335 | - * @return int >0 if OK, <0 if KO |
|
| 4336 | - */ |
|
| 4337 | - function delete_resource($rowid, $element, $notrigger=0) |
|
| 4338 | - {
|
|
| 1380 | + /** |
|
| 1381 | + * Read linked origin object |
|
| 1382 | + * |
|
| 1383 | + * @return void |
|
| 1384 | + */ |
|
| 1385 | + function fetch_origin() |
|
| 1386 | + {
|
|
| 4339 | 1387 | // phpcs:enable |
| 4340 | - global $user; |
|
| 1388 | + if ($this->origin == 'shipping') $this->origin = 'expedition'; |
|
| 1389 | + if ($this->origin == 'delivery') $this->origin = 'livraison'; |
|
| 1390 | + if ($this->origin == 'order_supplier') $this->origin = 'commandeFournisseur'; |
|
| 4341 | 1391 | |
| 4342 | - $this->db->begin(); |
|
| 1392 | + $origin = $this->origin; |
|
| 4343 | 1393 | |
| 4344 | - $sql = "DELETE FROM ".MAIN_DB_PREFIX."element_resources"; |
|
| 4345 | - $sql.= " WHERE rowid=".$rowid; |
|
| 1394 | + $classname = ucfirst($origin); |
|
| 1395 | + $this->$origin = new $classname($this->db); |
|
| 1396 | + $this->$origin->fetch($this->origin_id); |
|
| 1397 | + } |
|
| 4346 | 1398 | |
| 4347 | - dol_syslog(get_class($this)."::delete_resource", LOG_DEBUG); |
|
| 1399 | + /** |
|
| 1400 | + * Load object from specific field |
|
| 1401 | + * |
|
| 1402 | + * @param string $table Table element or element line |
|
| 1403 | + * @param string $field Field selected |
|
| 1404 | + * @param string $key Import key |
|
| 1405 | + * @param string $element Element name |
|
| 1406 | + * @return int <0 if KO, >0 if OK |
|
| 1407 | + */ |
|
| 1408 | + function fetchObjectFrom($table, $field, $key, $element = null) |
|
| 1409 | + {
|
|
| 1410 | + global $conf; |
|
| 4348 | 1411 | |
| 4349 | - $resql=$this->db->query($sql); |
|
| 4350 | - if (! $resql) |
|
| 4351 | - {
|
|
| 4352 | - $this->error=$this->db->lasterror(); |
|
| 4353 | - $this->db->rollback(); |
|
| 4354 | - return -1; |
|
| 4355 | - } |
|
| 4356 | - else |
|
| 4357 | - {
|
|
| 4358 | - if (! $notrigger) |
|
| 4359 | - {
|
|
| 4360 | - $result=$this->call_trigger(strtoupper($element).'_DELETE_RESOURCE', $user); |
|
| 4361 | - if ($result < 0) { $this->db->rollback(); return -1; }
|
|
| 4362 | - } |
|
| 4363 | - $this->db->commit(); |
|
| 4364 | - return 1; |
|
| 4365 | - } |
|
| 4366 | - } |
|
| 4367 | - |
|
| 4368 | - |
|
| 4369 | - /** |
|
| 4370 | - * Overwrite magic function to solve problem of cloning object that are kept as references |
|
| 4371 | - * |
|
| 4372 | - * @return void |
|
| 4373 | - */ |
|
| 4374 | - function __clone() |
|
| 4375 | - {
|
|
| 4376 | - // Force a copy of this->lines, otherwise it will point to same object. |
|
| 4377 | - if (isset($this->lines) && is_array($this->lines)) |
|
| 4378 | - {
|
|
| 4379 | - $nboflines=count($this->lines); |
|
| 4380 | - for($i=0; $i < $nboflines; $i++) |
|
| 4381 | - {
|
|
| 4382 | - $this->lines[$i] = clone $this->lines[$i]; |
|
| 4383 | - } |
|
| 4384 | - } |
|
| 4385 | - } |
|
| 4386 | - |
|
| 4387 | - /** |
|
| 4388 | - * Common function for all objects extending CommonObject for generating documents |
|
| 4389 | - * |
|
| 4390 | - * @param string $modelspath Relative folder where generators are placed |
|
| 4391 | - * @param string $modele Generator to use. Caller must set it to obj->modelpdf or GETPOST('modelpdf') for example.
|
|
| 4392 | - * @param Translate $outputlangs Output language to use |
|
| 4393 | - * @param int $hidedetails 1 to hide details. 0 by default |
|
| 4394 | - * @param int $hidedesc 1 to hide product description. 0 by default |
|
| 4395 | - * @param int $hideref 1 to hide product reference. 0 by default |
|
| 4396 | - * @param null|array $moreparams Array to provide more information |
|
| 4397 | - * @return int >0 if OK, <0 if KO |
|
| 4398 | - * @see addFileIntoDatabaseIndex |
|
| 4399 | - */ |
|
| 4400 | - protected function commonGenerateDocument($modelspath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams=null) |
|
| 4401 | - {
|
|
| 4402 | - global $conf, $langs, $user; |
|
| 4403 | - |
|
| 4404 | - $srctemplatepath=''; |
|
| 4405 | - |
|
| 4406 | - // Increase limit for PDF build |
|
| 4407 | - $err=error_reporting(); |
|
| 4408 | - error_reporting(0); |
|
| 4409 | - @set_time_limit(120); |
|
| 4410 | - error_reporting($err); |
|
| 4411 | - |
|
| 4412 | - // If selected model is a filename template (then $modele="modelname" or "modelname:filename") |
|
| 4413 | - $tmp=explode(':',$modele,2);
|
|
| 4414 | - if (! empty($tmp[1])) |
|
| 4415 | - {
|
|
| 4416 | - $modele=$tmp[0]; |
|
| 4417 | - $srctemplatepath=$tmp[1]; |
|
| 4418 | - } |
|
| 4419 | - |
|
| 4420 | - // Search template files |
|
| 4421 | - $file=''; $classname=''; $filefound=0; |
|
| 4422 | - $dirmodels=array('/');
|
|
| 4423 | - if (is_array(Globals::$conf->modules_parts['models'])) |
|
| 4424 | - $dirmodels = array_merge($dirmodels, Globals::$conf->modules_parts['models']); |
|
| 4425 | - foreach($dirmodels as $reldir) |
|
| 4426 | - {
|
|
| 4427 | - foreach(array('doc','pdf') as $prefix)
|
|
| 4428 | - {
|
|
| 4429 | - if (in_array(get_class($this), array('Adherent'))) $file = $prefix."_".$modele.".class.php"; // Member module use prefix_module.class.php
|
|
| 4430 | - else $file = $prefix."_".$modele.".modules.php"; |
|
| 1412 | + $result=false; |
|
| 4431 | 1413 | |
| 4432 | - // On verifie l'emplacement du modele |
|
| 4433 | - $file=dol_buildpath($reldir.$modelspath.$file,0); |
|
| 4434 | - if (file_exists($file)) |
|
| 4435 | - {
|
|
| 4436 | - $filefound=1; |
|
| 4437 | - $classname=$prefix.'_'.$modele; |
|
| 4438 | - break; |
|
| 4439 | - } |
|
| 4440 | - } |
|
| 4441 | - if ($filefound) break; |
|
| 4442 | - } |
|
| 1414 | + $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX.$table; |
|
| 1415 | + $sql.= " WHERE ".$field." = '".$key."'"; |
|
| 1416 | + if (! empty($element)) {
|
|
| 1417 | + $sql.= " AND entity IN (".getEntity($element).")";
|
|
| 1418 | + } else {
|
|
| 1419 | + $sql .= " AND entity = " . Globals::$conf->entity; |
|
| 1420 | + } |
|
| 4443 | 1421 | |
| 4444 | - // If generator was found |
|
| 4445 | - if ($filefound) |
|
| 4446 | - {
|
|
| 4447 | - global $db; // Required to solve a conception default in commonstickergenerator.class.php making an include of code using $db |
|
| 1422 | + dol_syslog(get_class($this).'::fetchObjectFrom', LOG_DEBUG); |
|
| 1423 | + $resql = $this->db->query($sql); |
|
| 1424 | + if ($resql) |
|
| 1425 | + {
|
|
| 1426 | + $row = $this->db->fetch_row($resql); |
|
| 1427 | + // Test for avoid error -1 |
|
| 1428 | + if ($row[0] > 0) {
|
|
| 1429 | + $result = $this->fetch($row[0]); |
|
| 1430 | + } |
|
| 1431 | + } |
|
| 4448 | 1432 | |
| 4449 | - require_once $file; |
|
| 1433 | + return $result; |
|
| 1434 | + } |
|
| 4450 | 1435 | |
| 4451 | - $obj = new $classname($this->db); |
|
| 1436 | + /** |
|
| 1437 | + * Getter generic. Load value from a specific field |
|
| 1438 | + * |
|
| 1439 | + * @param string $table Table of element or element line |
|
| 1440 | + * @param int $id Element id |
|
| 1441 | + * @param string $field Field selected |
|
| 1442 | + * @return int <0 if KO, >0 if OK |
|
| 1443 | + */ |
|
| 1444 | + function getValueFrom($table, $id, $field) |
|
| 1445 | + {
|
|
| 1446 | + $result=false; |
|
| 1447 | + if (!empty($id) && !empty($field) && !empty($table)) {
|
|
| 1448 | + $sql = "SELECT ".$field." FROM ".MAIN_DB_PREFIX.$table; |
|
| 1449 | + $sql.= " WHERE rowid = ".$id; |
|
| 1450 | + |
|
| 1451 | + dol_syslog(get_class($this).'::getValueFrom', LOG_DEBUG); |
|
| 1452 | + $resql = $this->db->query($sql); |
|
| 1453 | + if ($resql) |
|
| 1454 | + {
|
|
| 1455 | + $row = $this->db->fetch_row($resql); |
|
| 1456 | + $result = $row[0]; |
|
| 1457 | + } |
|
| 1458 | + } |
|
| 1459 | + return $result; |
|
| 1460 | + } |
|
| 4452 | 1461 | |
| 4453 | - // If generator is ODT, we must have srctemplatepath defined, if not we set it. |
|
| 4454 | - if ($obj->type == 'odt' && empty($srctemplatepath)) |
|
| 4455 | - {
|
|
| 4456 | - $varfortemplatedir=$obj->scandir; |
|
| 4457 | - if ($varfortemplatedir && !empty(Globals::$conf->global->$varfortemplatedir)) {
|
|
| 4458 | - $dirtoscan = Globals::$conf->global->$varfortemplatedir; |
|
| 1462 | + /** |
|
| 1463 | + * Setter generic. Update a specific field into database. |
|
| 1464 | + * Warning: Trigger is run only if param trigkey is provided. |
|
| 1465 | + * |
|
| 1466 | + * @param string $field Field to update |
|
| 1467 | + * @param mixed $value New value |
|
| 1468 | + * @param string $table To force other table element or element line (should not be used) |
|
| 1469 | + * @param int $id To force other object id (should not be used) |
|
| 1470 | + * @param string $format Data format ('text', 'date'). 'text' is used if not defined
|
|
| 1471 | + * @param string $id_field To force rowid field name. 'rowid' is used if not defined |
|
| 1472 | + * @param User|string $fuser Update the user of last update field with this user. If not provided, current user is used except if value is 'none' |
|
| 1473 | + * @param string $trigkey Trigger key to run (in most cases something like 'XXX_MODIFY') |
|
| 1474 | + * @param string $fk_user_field Name of field to save user id making change |
|
| 1475 | + * @return int <0 if KO, >0 if OK |
|
| 1476 | + * @see updateExtraField |
|
| 1477 | + */ |
|
| 1478 | + function setValueFrom($field, $value, $table='', $id=null, $format='', $id_field='', $fuser=null, $trigkey='', $fk_user_field='fk_user_modif') |
|
| 1479 | + {
|
|
| 1480 | + global $user,$langs,$conf; |
|
| 4459 | 1481 | |
| 4460 | - $listoffiles=array(); |
|
| 1482 | + if (empty($table)) $table=$this->table_element; |
|
| 1483 | + if (empty($id)) $id=$this->id; |
|
| 1484 | + if (empty($format)) $format='text'; |
|
| 1485 | + if (empty($id_field)) $id_field='rowid'; |
|
| 4461 | 1486 | |
| 4462 | - // Now we add first model found in directories scanned |
|
| 4463 | - $listofdir=explode(',',$dirtoscan);
|
|
| 4464 | - foreach($listofdir as $key => $tmpdir) |
|
| 4465 | - {
|
|
| 4466 | - $tmpdir=trim($tmpdir); |
|
| 4467 | - $tmpdir=preg_replace('/DOL_DATA_ROOT/',DOL_DATA_ROOT,$tmpdir);
|
|
| 4468 | - if (! $tmpdir) { unset($listofdir[$key]); continue; }
|
|
| 4469 | - if (is_dir($tmpdir)) |
|
| 4470 | - {
|
|
| 4471 | - $tmpfiles=dol_dir_list($tmpdir,'files',0,'\.od(s|t)$','','name',SORT_ASC,0); |
|
| 4472 | - if (count($tmpfiles)) $listoffiles=array_merge($listoffiles,$tmpfiles); |
|
| 4473 | - } |
|
| 4474 | - } |
|
| 4475 | - |
|
| 4476 | - if (count($listoffiles)) |
|
| 4477 | - {
|
|
| 4478 | - foreach($listoffiles as $record) |
|
| 4479 | - {
|
|
| 4480 | - $srctemplatepath=$record['fullname']; |
|
| 4481 | - break; |
|
| 4482 | - } |
|
| 4483 | - } |
|
| 4484 | - } |
|
| 1487 | + $error=0; |
|
| 4485 | 1488 | |
| 4486 | - if (empty($srctemplatepath)) |
|
| 4487 | - {
|
|
| 4488 | - $this->error='ErrorGenerationAskedForOdtTemplateWithSrcFileNotDefined'; |
|
| 4489 | - return -1; |
|
| 4490 | - } |
|
| 4491 | - } |
|
| 1489 | + $this->db->begin(); |
|
| 4492 | 1490 | |
| 4493 | - if ($obj->type == 'odt' && ! empty($srctemplatepath)) |
|
| 4494 | - {
|
|
| 4495 | - if (! dol_is_file($srctemplatepath)) |
|
| 4496 | - {
|
|
| 4497 | - $this->error='ErrorGenerationAskedForOdtTemplateWithSrcFileNotFound'; |
|
| 4498 | - return -1; |
|
| 4499 | - } |
|
| 4500 | - } |
|
| 1491 | + // Special case |
|
| 1492 | + if ($table == 'product' && $field == 'note_private') $field='note'; |
|
| 1493 | + if (in_array($table, array('actioncomm', 'adherent', 'advtargetemailing', 'cronjob', 'establishment'))) $fk_user_field = 'fk_user_mod';
|
|
| 4501 | 1494 | |
| 4502 | - // We save charset_output to restore it because write_file can change it if needed for |
|
| 4503 | - // output format that does not support UTF8. |
|
| 4504 | - $sav_charset_output=$outputlangs->charset_output; |
|
| 1495 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$table." SET "; |
|
| 4505 | 1496 | |
| 4506 | - if (in_array(get_class($this), array('Adherent')))
|
|
| 4507 | - {
|
|
| 4508 | - $arrayofrecords = array(); // The write_file of templates of adherent class need this var |
|
| 4509 | - $resultwritefile = $obj->write_file($this, $outputlangs, $srctemplatepath, 'member', 1, $moreparams); |
|
| 4510 | - } |
|
| 4511 | - else |
|
| 4512 | - {
|
|
| 4513 | - $resultwritefile = $obj->write_file($this, $outputlangs, $srctemplatepath, $hidedetails, $hidedesc, $hideref, $moreparams); |
|
| 4514 | - } |
|
| 4515 | - // After call of write_file $obj->result['fullpath'] is set with generated file. It will be used to update the ECM database index. |
|
| 1497 | + if ($format == 'text') $sql.= $field." = '".$this->db->escape($value)."'"; |
|
| 1498 | + else if ($format == 'int') $sql.= $field." = ".$this->db->escape($value); |
|
| 1499 | + else if ($format == 'date') $sql.= $field." = ".($value ? "'".$this->db->idate($value)."'" : "null"); |
|
| 4516 | 1500 | |
| 4517 | - if ($resultwritefile > 0) |
|
| 4518 | - {
|
|
| 4519 | - $outputlangs->charset_output=$sav_charset_output; |
|
| 1501 | + if ($fk_user_field) |
|
| 1502 | + {
|
|
| 1503 | + if (! empty($fuser) && is_object($fuser)) $sql.=", ".$fk_user_field." = ".$fuser->id; |
|
| 1504 | + elseif (empty($fuser) || $fuser != 'none') $sql.=", ".$fk_user_field." = ".$user->id; |
|
| 1505 | + } |
|
| 4520 | 1506 | |
| 4521 | - // We delete old preview |
|
| 4522 | - require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php'; |
|
| 4523 | - dol_delete_preview($this); |
|
| 1507 | + $sql.= " WHERE ".$id_field." = ".$id; |
|
| 4524 | 1508 | |
| 4525 | - // Index file in database |
|
| 4526 | - if (! empty($obj->result['fullpath'])) |
|
| 4527 | - {
|
|
| 4528 | - $destfull = $obj->result['fullpath']; |
|
| 4529 | - $upload_dir = dirname($destfull); |
|
| 4530 | - $destfile = basename($destfull); |
|
| 4531 | - $rel_dir = preg_replace('/^'.preg_quote(DOL_DATA_ROOT,'/').'/', '', $upload_dir);
|
|
| 4532 | - |
|
| 4533 | - if (! preg_match('/[\\/]temp[\\/]|[\\/]thumbs|\.meta$/', $rel_dir)) // If not a tmp dir
|
|
| 4534 | - {
|
|
| 4535 | - $filename = basename($destfile); |
|
| 4536 | - $rel_dir = preg_replace('/[\\/]$/', '', $rel_dir);
|
|
| 4537 | - $rel_dir = preg_replace('/^[\\/]/', '', $rel_dir);
|
|
| 4538 | - |
|
| 4539 | - include_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmfiles.class.php'; |
|
| 4540 | - $ecmfile=new EcmFiles($this->db); |
|
| 4541 | - $result = $ecmfile->fetch(0, '', ($rel_dir?$rel_dir.'/':'').$filename); |
|
| 4542 | - |
|
| 4543 | - // Set the public "share" key |
|
| 4544 | - $setsharekey = false; |
|
| 4545 | - if ($this->element == 'propal') |
|
| 4546 | - {
|
|
| 4547 | - $useonlinesignature = Globals::$conf->global->MAIN_FEATURES_LEVEL; // Replace this with 1 when feature to make online signature is ok |
|
| 4548 | - if ($useonlinesignature) $setsharekey=true; |
|
| 4549 | - if (!empty(Globals::$conf->global->PROPOSAL_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 4550 | - $setsharekey = true; |
|
| 4551 | - } |
|
| 4552 | - if ($this->element == 'commande' && !empty(Globals::$conf->global->ORDER_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 4553 | - $setsharekey = true; |
|
| 4554 | - if ($this->element == 'facture' && !empty(Globals::$conf->global->INVOICE_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 4555 | - $setsharekey = true; |
|
| 4556 | - if ($this->element == 'bank_account' && !empty(Globals::$conf->global->BANK_ACCOUNT_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 4557 | - $setsharekey = true; |
|
| 1509 | + dol_syslog(get_class($this)."::".__FUNCTION__."", LOG_DEBUG); |
|
| 1510 | + $resql = $this->db->query($sql); |
|
| 1511 | + if ($resql) |
|
| 1512 | + {
|
|
| 1513 | + if ($trigkey) |
|
| 1514 | + {
|
|
| 1515 | + // call trigger with updated object values |
|
| 1516 | + if (empty($this->fields) && method_exists($this, 'fetch')) |
|
| 1517 | + {
|
|
| 1518 | + $result = $this->fetch($id); |
|
| 1519 | + } |
|
| 1520 | + else |
|
| 1521 | + {
|
|
| 1522 | + $result = $this->fetchCommon($id); |
|
| 1523 | + } |
|
| 1524 | + if ($result >= 0) $result=$this->call_trigger($trigkey, (! empty($fuser) && is_object($fuser)) ? $fuser : $user); // This may set this->errors |
|
| 1525 | + if ($result < 0) $error++; |
|
| 1526 | + } |
|
| 4558 | 1527 | |
| 4559 | - if ($setsharekey) |
|
| 4560 | - {
|
|
| 4561 | - if (empty($ecmfile->share)) // Because object not found or share not set yet |
|
| 4562 | - {
|
|
| 4563 | - require_once DOL_DOCUMENT_ROOT.'/core/lib/security2.lib.php'; |
|
| 4564 | - $ecmfile->share = getRandomPassword(true); |
|
| 4565 | - } |
|
| 4566 | - } |
|
| 1528 | + if (! $error) |
|
| 1529 | + {
|
|
| 1530 | + if (property_exists($this, $field)) $this->$field = $value; |
|
| 1531 | + $this->db->commit(); |
|
| 1532 | + return 1; |
|
| 1533 | + } |
|
| 1534 | + else |
|
| 1535 | + {
|
|
| 1536 | + $this->db->rollback(); |
|
| 1537 | + return -2; |
|
| 1538 | + } |
|
| 1539 | + } |
|
| 1540 | + else |
|
| 1541 | + {
|
|
| 1542 | + $this->error=$this->db->lasterror(); |
|
| 1543 | + $this->db->rollback(); |
|
| 1544 | + return -1; |
|
| 1545 | + } |
|
| 1546 | + } |
|
| 4567 | 1547 | |
| 4568 | - if ($result > 0) |
|
| 4569 | - {
|
|
| 4570 | - $ecmfile->label = md5_file(dol_osencode($destfull)); // hash of file content |
|
| 4571 | - $ecmfile->fullpath_orig = ''; |
|
| 4572 | - $ecmfile->gen_or_uploaded = 'generated'; |
|
| 4573 | - $ecmfile->description = ''; // indexed content |
|
| 4574 | - $ecmfile->keyword = ''; // keyword content |
|
| 4575 | - $result = $ecmfile->update($user); |
|
| 4576 | - if ($result < 0) |
|
| 4577 | - {
|
|
| 4578 | - setEventMessages($ecmfile->error, $ecmfile->errors, 'warnings'); |
|
| 4579 | - } |
|
| 4580 | - } |
|
| 4581 | - else |
|
| 4582 | - {
|
|
| 4583 | - $ecmfile->entity = Globals::$conf->entity; |
|
| 4584 | - $ecmfile->filepath = $rel_dir; |
|
| 4585 | - $ecmfile->filename = $filename; |
|
| 4586 | - $ecmfile->label = md5_file(dol_osencode($destfull)); // hash of file content |
|
| 4587 | - $ecmfile->fullpath_orig = ''; |
|
| 4588 | - $ecmfile->gen_or_uploaded = 'generated'; |
|
| 4589 | - $ecmfile->description = ''; // indexed content |
|
| 4590 | - $ecmfile->keyword = ''; // keyword content |
|
| 4591 | - $ecmfile->src_object_type = $this->table_element; |
|
| 4592 | - $ecmfile->src_object_id = $this->id; |
|
| 4593 | - |
|
| 4594 | - $result = $ecmfile->create($user); |
|
| 4595 | - if ($result < 0) |
|
| 4596 | - {
|
|
| 4597 | - setEventMessages($ecmfile->error, $ecmfile->errors, 'warnings'); |
|
| 4598 | - } |
|
| 4599 | - } |
|
| 1548 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 1549 | + /** |
|
| 1550 | + * Load properties id_previous and id_next by comparing $fieldid with $this->ref |
|
| 1551 | + * |
|
| 1552 | + * @param string $filter Optional filter. Example: " AND (t.field1 = 'aa' OR t.field2 = 'bb')" |
|
| 1553 | + * @param string $fieldid Name of field to use for the select MAX and MIN |
|
| 1554 | + * @param int $nodbprefix Do not include DB prefix to forge table name |
|
| 1555 | + * @return int <0 if KO, >0 if OK |
|
| 1556 | + */ |
|
| 1557 | + function load_previous_next_ref($filter, $fieldid, $nodbprefix=0) |
|
| 1558 | + {
|
|
| 1559 | + // phpcs:enable |
|
| 1560 | + global $conf, $user; |
|
| 4600 | 1561 | |
| 4601 | - /*$this->result['fullname']=$destfull; |
|
| 4602 | - $this->result['filepath']=$ecmfile->filepath; |
|
| 4603 | - $this->result['filename']=$ecmfile->filename;*/ |
|
| 4604 | - //var_dump($obj->update_main_doc_field);exit; |
|
| 4605 | - |
|
| 4606 | - // Update the last_main_doc field into main object (if documenent generator has property ->update_main_doc_field set) |
|
| 4607 | - $update_main_doc_field=0; |
|
| 4608 | - if (! empty($obj->update_main_doc_field)) $update_main_doc_field=1; |
|
| 4609 | - if ($update_main_doc_field && ! empty($this->table_element)) |
|
| 4610 | - {
|
|
| 4611 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element." SET last_main_doc = '".($ecmfile->filepath.'/'.$ecmfile->filename)."'"; |
|
| 4612 | - $sql.= ' WHERE rowid = '.$this->id; |
|
| 4613 | - $resql = $this->db->query($sql); |
|
| 4614 | - if (! $resql) dol_print_error($this->db); |
|
| 4615 | - } |
|
| 4616 | - } |
|
| 4617 | - } |
|
| 4618 | - else |
|
| 4619 | - {
|
|
| 4620 | - dol_syslog('Method ->write_file was called on object '.get_class($obj).' and return a success but the return array ->result["fullpath"] was not set.', LOG_WARNING);
|
|
| 4621 | - } |
|
| 1562 | + if (! $this->table_element) |
|
| 1563 | + {
|
|
| 1564 | + dol_print_error('',get_class($this)."::load_previous_next_ref was called on objet with property table_element not defined");
|
|
| 1565 | + return -1; |
|
| 1566 | + } |
|
| 1567 | + if ($fieldid == 'none') return 1; |
|
| 4622 | 1568 | |
| 4623 | - // Success in building document. We build meta file. |
|
| 4624 | - dol_meta_create($this); |
|
| 1569 | + // Security on socid |
|
| 1570 | + $socid = 0; |
|
| 1571 | + if ($user->societe_id > 0) $socid = $user->societe_id; |
|
| 4625 | 1572 | |
| 4626 | - return 1; |
|
| 4627 | - } |
|
| 4628 | - else |
|
| 4629 | - {
|
|
| 4630 | - $outputlangs->charset_output=$sav_charset_output; |
|
| 4631 | - dol_print_error($this->db, "Error generating document for ".__CLASS__.". Error: ".$obj->error, $obj->errors); |
|
| 4632 | - return -1; |
|
| 4633 | - } |
|
| 4634 | - } |
|
| 4635 | - else |
|
| 4636 | - {
|
|
| 4637 | - $this->error=$langs->trans("Error")." ".$langs->trans("ErrorFileDoesNotExists",$file);
|
|
| 4638 | - dol_print_error('',$this->error);
|
|
| 4639 | - return -1; |
|
| 4640 | - } |
|
| 4641 | - } |
|
| 4642 | - |
|
| 4643 | - /** |
|
| 4644 | - * Build thumb |
|
| 4645 | - * @TODO Move this into files.lib.php |
|
| 4646 | - * |
|
| 4647 | - * @param string $file Path file in UTF8 to original file to create thumbs from. |
|
| 4648 | - * @return void |
|
| 4649 | - */ |
|
| 4650 | - function addThumbs($file) |
|
| 4651 | - {
|
|
| 4652 | - global $maxwidthsmall, $maxheightsmall, $maxwidthmini, $maxheightmini, $quality; |
|
| 4653 | - |
|
| 4654 | - require_once DOL_DOCUMENT_ROOT .'/core/lib/images.lib.php'; // This define also $maxwidthsmall, $quality, ... |
|
| 4655 | - |
|
| 4656 | - $file_osencoded=dol_osencode($file); |
|
| 4657 | - if (file_exists($file_osencoded)) |
|
| 4658 | - {
|
|
| 4659 | - // Create small thumbs for company (Ratio is near 16/9) |
|
| 4660 | - // Used on logon for example |
|
| 4661 | - vignette($file_osencoded, $maxwidthsmall, $maxheightsmall, '_small', $quality); |
|
| 4662 | - |
|
| 4663 | - // Create mini thumbs for company (Ratio is near 16/9) |
|
| 4664 | - // Used on menu or for setup page for example |
|
| 4665 | - vignette($file_osencoded, $maxwidthmini, $maxheightmini, '_mini', $quality); |
|
| 4666 | - } |
|
| 4667 | - } |
|
| 4668 | - |
|
| 4669 | - |
|
| 4670 | - /* Functions common to commonobject and commonobjectline */ |
|
| 4671 | - |
|
| 4672 | - /* For default values */ |
|
| 4673 | - |
|
| 4674 | - /** |
|
| 4675 | - * Return the default value to use for a field when showing the create form of object. |
|
| 4676 | - * Return values in this order: |
|
| 4677 | - * 1) If parameter is available into POST, we return it first. |
|
| 4678 | - * 2) If not but an alternate value was provided as parameter of function, we return it. |
|
| 4679 | - * 3) If not but a constant Globals::$conf->global->OBJECTELEMENT_FIELDNAME is set, we return it (It is better to use the dedicated table). |
|
| 4680 | - * 4) Return value found into database (TODO No yet implemented) |
|
| 4681 | - * |
|
| 4682 | - * @param string $fieldname Name of field |
|
| 4683 | - * @param string $alternatevalue Alternate value to use |
|
| 4684 | - * @return string|string[] Default value (can be an array if the GETPOST return an array) |
|
| 4685 | - **/ |
|
| 4686 | - function getDefaultCreateValueFor($fieldname, $alternatevalue=null) |
|
| 4687 | - {
|
|
| 4688 | - global $conf, $_POST; |
|
| 4689 | - |
|
| 4690 | - // If param here has been posted, we use this value first. |
|
| 4691 | - if (isset($_POST[$fieldname])) return GETPOST($fieldname, 2); |
|
| 4692 | - |
|
| 4693 | - if (isset($alternatevalue)) return $alternatevalue; |
|
| 4694 | - |
|
| 4695 | - $newelement=$this->element; |
|
| 4696 | - if ($newelement == 'facture') $newelement='invoice'; |
|
| 4697 | - if ($newelement == 'commande') $newelement='order'; |
|
| 4698 | - if (empty($newelement)) |
|
| 4699 | - {
|
|
| 4700 | - dol_syslog("Ask a default value using common method getDefaultCreateValueForField on an object with no property ->element defined. Return empty string.", LOG_WARNING);
|
|
| 4701 | - return ''; |
|
| 4702 | - } |
|
| 4703 | - |
|
| 4704 | - $keyforfieldname=strtoupper($newelement.'_DEFAULT_'.$fieldname); |
|
| 4705 | - //var_dump($keyforfieldname); |
|
| 4706 | - if (isset(Globals::$conf->global->$keyforfieldname)) |
|
| 4707 | - return Globals::$conf->global->$keyforfieldname; |
|
| 1573 | + // this->ismultientitymanaged contains |
|
| 1574 | + // 0=No test on entity, 1=Test with field entity, 2=Test with link by societe |
|
| 1575 | + $alias = 's'; |
|
| 1576 | + if ($this->element == 'societe') $alias = 'te'; |
|
| 4708 | 1577 | |
| 4709 | - // TODO Ad here a scan into table llx_overwrite_default with a filter on $this->element and $fieldname |
|
| 4710 | - } |
|
| 1578 | + $sql = "SELECT MAX(te.".$fieldid.")"; |
|
| 1579 | + $sql.= " FROM ".(empty($nodbprefix)?MAIN_DB_PREFIX:'').$this->table_element." as te"; |
|
| 1580 | + if ($this->element == 'user' && !empty(Globals::$conf->global->MULTICOMPANY_TRANSVERSE_MODE)) {
|
|
| 1581 | + $sql.= ",".MAIN_DB_PREFIX."usergroup_user as ug"; |
|
| 1582 | + } |
|
| 1583 | + if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 2) $sql.= ", ".MAIN_DB_PREFIX."societe as s"; // If we need to link to societe to limit select to entity |
|
| 1584 | + else if ($this->restrictiononfksoc == 1 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe as s"; // If we need to link to societe to limit select to socid |
|
| 1585 | + else if ($this->restrictiononfksoc == 2 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON te.fk_soc = s.rowid"; // If we need to link to societe to limit select to socid |
|
| 1586 | + if ($this->restrictiononfksoc && !$user->rights->societe->client->voir && !$socid) $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON ".$alias.".rowid = sc.fk_soc"; |
|
| 1587 | + $sql.= " WHERE te.".$fieldid." < '".$this->db->escape($this->ref)."'"; // ->ref must always be defined (set to id if field does not exists) |
|
| 1588 | + if ($this->restrictiononfksoc == 1 && !$user->rights->societe->client->voir && !$socid) $sql.= " AND sc.fk_user = " .$user->id; |
|
| 1589 | + if ($this->restrictiononfksoc == 2 && !$user->rights->societe->client->voir && !$socid) $sql.= " AND (sc.fk_user = " .$user->id.' OR te.fk_soc IS NULL)'; |
|
| 1590 | + if (! empty($filter)) |
|
| 1591 | + {
|
|
| 1592 | + if (! preg_match('/^\s*AND/i', $filter)) $sql.=" AND "; // For backward compatibility
|
|
| 1593 | + $sql.=$filter; |
|
| 1594 | + } |
|
| 1595 | + if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 2) $sql.= ' AND te.fk_soc = s.rowid'; // If we need to link to societe to limit select to entity |
|
| 1596 | + else if ($this->restrictiononfksoc == 1 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= ' AND te.fk_soc = s.rowid'; // If we need to link to societe to limit select to socid |
|
| 1597 | + if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 1) {
|
|
| 1598 | + if ($this->element == 'user' && !empty(Globals::$conf->global->MULTICOMPANY_TRANSVERSE_MODE)) {
|
|
| 1599 | + if (!empty($user->admin) && empty($user->entity) && Globals::$conf->entity == 1) {
|
|
| 1600 | + $sql.= " AND te.entity IS NOT NULL"; // Show all users |
|
| 1601 | + } else {
|
|
| 1602 | + $sql.= " AND ug.fk_user = te.rowid"; |
|
| 1603 | + $sql.= " AND ug.entity IN (".getEntity($this->element).")";
|
|
| 1604 | + } |
|
| 1605 | + } else {
|
|
| 1606 | + $sql.= ' AND te.entity IN ('.getEntity($this->element).')';
|
|
| 1607 | + } |
|
| 1608 | + } |
|
| 1609 | + if ($this->restrictiononfksoc == 1 && $socid && $this->element != 'societe') $sql.= ' AND te.fk_soc = ' . $socid; |
|
| 1610 | + if ($this->restrictiononfksoc == 2 && $socid && $this->element != 'societe') $sql.= ' AND (te.fk_soc = ' . $socid.' OR te.fk_soc IS NULL)'; |
|
| 1611 | + if ($this->restrictiononfksoc && $socid && $this->element == 'societe') $sql.= ' AND te.rowid = ' . $socid; |
|
| 1612 | + //print 'socid='.$socid.' restrictiononfksoc='.$this->restrictiononfksoc.' ismultientitymanaged = '.$this->ismultientitymanaged.' filter = '.$filter.' -> '.$sql."<br>"; |
|
| 4711 | 1613 | |
| 1614 | + $result = $this->db->query($sql); |
|
| 1615 | + if (! $result) |
|
| 1616 | + {
|
|
| 1617 | + $this->error=$this->db->lasterror(); |
|
| 1618 | + return -1; |
|
| 1619 | + } |
|
| 1620 | + $row = $this->db->fetch_row($result); |
|
| 1621 | + $this->ref_previous = $row[0]; |
|
| 4712 | 1622 | |
| 4713 | - /* For triggers */ |
|
| 4714 | 1623 | |
| 1624 | + $sql = "SELECT MIN(te.".$fieldid.")"; |
|
| 1625 | + $sql.= " FROM ".(empty($nodbprefix)?MAIN_DB_PREFIX:'').$this->table_element." as te"; |
|
| 1626 | + if ($this->element == 'user' && !empty(Globals::$conf->global->MULTICOMPANY_TRANSVERSE_MODE)) {
|
|
| 1627 | + $sql.= ",".MAIN_DB_PREFIX."usergroup_user as ug"; |
|
| 1628 | + } |
|
| 1629 | + if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 2) $sql.= ", ".MAIN_DB_PREFIX."societe as s"; // If we need to link to societe to limit select to entity |
|
| 1630 | + else if ($this->restrictiononfksoc == 1 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe as s"; // If we need to link to societe to limit select to socid |
|
| 1631 | + else if ($this->restrictiononfksoc == 2 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON te.fk_soc = s.rowid"; // If we need to link to societe to limit select to socid |
|
| 1632 | + if ($this->restrictiononfksoc && !$user->rights->societe->client->voir && !$socid) $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON ".$alias.".rowid = sc.fk_soc"; |
|
| 1633 | + $sql.= " WHERE te.".$fieldid." > '".$this->db->escape($this->ref)."'"; // ->ref must always be defined (set to id if field does not exists) |
|
| 1634 | + if ($this->restrictiononfksoc == 1 && !$user->rights->societe->client->voir && !$socid) $sql.= " AND sc.fk_user = " .$user->id; |
|
| 1635 | + if ($this->restrictiononfksoc == 2 && !$user->rights->societe->client->voir && !$socid) $sql.= " AND (sc.fk_user = " .$user->id.' OR te.fk_soc IS NULL)'; |
|
| 1636 | + if (! empty($filter)) |
|
| 1637 | + {
|
|
| 1638 | + if (! preg_match('/^\s*AND/i', $filter)) $sql.=" AND "; // For backward compatibility
|
|
| 1639 | + $sql.=$filter; |
|
| 1640 | + } |
|
| 1641 | + if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 2) $sql.= ' AND te.fk_soc = s.rowid'; // If we need to link to societe to limit select to entity |
|
| 1642 | + else if ($this->restrictiononfksoc == 1 && $this->element != 'societe' && !$user->rights->societe->client->voir && !$socid) $sql.= ' AND te.fk_soc = s.rowid'; // If we need to link to societe to limit select to socid |
|
| 1643 | + if (isset($this->ismultientitymanaged) && $this->ismultientitymanaged == 1) {
|
|
| 1644 | + if ($this->element == 'user' && !empty(Globals::$conf->global->MULTICOMPANY_TRANSVERSE_MODE)) {
|
|
| 1645 | + if (!empty($user->admin) && empty($user->entity) && Globals::$conf->entity == 1) {
|
|
| 1646 | + $sql.= " AND te.entity IS NOT NULL"; // Show all users |
|
| 1647 | + } else {
|
|
| 1648 | + $sql.= " AND ug.fk_user = te.rowid"; |
|
| 1649 | + $sql.= " AND ug.entity IN (".getEntity($this->element).")";
|
|
| 1650 | + } |
|
| 1651 | + } else {
|
|
| 1652 | + $sql.= ' AND te.entity IN ('.getEntity($this->element).')';
|
|
| 1653 | + } |
|
| 1654 | + } |
|
| 1655 | + if ($this->restrictiononfksoc == 1 && $socid && $this->element != 'societe') $sql.= ' AND te.fk_soc = ' . $socid; |
|
| 1656 | + if ($this->restrictiononfksoc == 2 && $socid && $this->element != 'societe') $sql.= ' AND (te.fk_soc = ' . $socid.' OR te.fk_soc IS NULL)'; |
|
| 1657 | + if ($this->restrictiononfksoc && $socid && $this->element == 'societe') $sql.= ' AND te.rowid = ' . $socid; |
|
| 1658 | + //print 'socid='.$socid.' restrictiononfksoc='.$this->restrictiononfksoc.' ismultientitymanaged = '.$this->ismultientitymanaged.' filter = '.$filter.' -> '.$sql."<br>"; |
|
| 1659 | + // Rem: Bug in some mysql version: SELECT MIN(rowid) FROM llx_socpeople WHERE rowid > 1 when one row in database with rowid=1, returns 1 instead of null |
|
| 1660 | + |
|
| 1661 | + $result = $this->db->query($sql); |
|
| 1662 | + if (! $result) |
|
| 1663 | + {
|
|
| 1664 | + $this->error=$this->db->lasterror(); |
|
| 1665 | + return -2; |
|
| 1666 | + } |
|
| 1667 | + $row = $this->db->fetch_row($result); |
|
| 1668 | + $this->ref_next = $row[0]; |
|
| 4715 | 1669 | |
| 4716 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 4717 | - /** |
|
| 4718 | - * Call trigger based on this instance. |
|
| 4719 | - * Some context information may also be provided into array property this->context. |
|
| 4720 | - * NB: Error from trigger are stacked in interface->errors |
|
| 4721 | - * NB2: If return code of triggers are < 0, action calling trigger should cancel all transaction. |
|
| 4722 | - * |
|
| 4723 | - * @param string $trigger_name trigger's name to execute |
|
| 4724 | - * @param User $user Object user |
|
| 4725 | - * @return int Result of run_triggers |
|
| 4726 | - */ |
|
| 4727 | - function call_trigger($trigger_name, $user) |
|
| 4728 | - {
|
|
| 4729 | - // phpcs:enable |
|
| 4730 | - global $langs,$conf; |
|
| 1670 | + return 1; |
|
| 1671 | + } |
|
| 4731 | 1672 | |
| 4732 | - include_once DOL_DOCUMENT_ROOT . '/core/class/interfaces.class.php'; |
|
| 4733 | - $interface=new Interfaces($this->db); |
|
| 4734 | - $result=$interface->run_triggers($trigger_name,$this,$user,$langs,$conf); |
|
| 4735 | 1673 | |
| 4736 | - if ($result < 0) |
|
| 4737 | - {
|
|
| 4738 | - if (!empty($this->errors)) |
|
| 4739 | - {
|
|
| 4740 | - $this->errors=array_unique(array_merge($this->errors,$interface->errors)); // We use array_unique because when a trigger call another trigger on same object, this->errors is added twice. |
|
| 4741 | - } |
|
| 4742 | - else |
|
| 4743 | - {
|
|
| 4744 | - $this->errors=$interface->errors; |
|
| 4745 | - } |
|
| 4746 | - } |
|
| 4747 | - return $result; |
|
| 4748 | - } |
|
| 1674 | + /** |
|
| 1675 | + * Return list of id of contacts of object |
|
| 1676 | + * |
|
| 1677 | + * @param string $source Source of contact: external (llx_socpeople) or internal (llx_user) or thirdparty (llx_societe) |
|
| 1678 | + * @return array Array of id of contacts (if source=external or internal) |
|
| 1679 | + * Array of id of third parties with at least one contact on object (if source=thirdparty) |
|
| 1680 | + */ |
|
| 1681 | + function getListContactId($source='external') |
|
| 1682 | + {
|
|
| 1683 | + $contactAlreadySelected = array(); |
|
| 1684 | + $tab = $this->liste_contact(-1,$source); |
|
| 1685 | + $num=count($tab); |
|
| 1686 | + $i = 0; |
|
| 1687 | + while ($i < $num) |
|
| 1688 | + {
|
|
| 1689 | + if ($source == 'thirdparty') $contactAlreadySelected[$i] = $tab[$i]['socid']; |
|
| 1690 | + else $contactAlreadySelected[$i] = $tab[$i]['id']; |
|
| 1691 | + $i++; |
|
| 1692 | + } |
|
| 1693 | + return $contactAlreadySelected; |
|
| 1694 | + } |
|
| 4749 | 1695 | |
| 4750 | 1696 | |
| 4751 | - /* Functions for extrafields */ |
|
| 1697 | + /** |
|
| 1698 | + * Link element with a project |
|
| 1699 | + * |
|
| 1700 | + * @param int $projectid Project id to link element to |
|
| 1701 | + * @return int <0 if KO, >0 if OK |
|
| 1702 | + */ |
|
| 1703 | + function setProject($projectid) |
|
| 1704 | + {
|
|
| 1705 | + if (! $this->table_element) |
|
| 1706 | + {
|
|
| 1707 | + dol_syslog(get_class($this)."::setProject was called on objet with property table_element not defined",LOG_ERR); |
|
| 1708 | + return -1; |
|
| 1709 | + } |
|
| 4752 | 1710 | |
| 1711 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1712 | + if ($this->table_element == 'actioncomm') |
|
| 1713 | + {
|
|
| 1714 | + if ($projectid) $sql.= ' SET fk_project = '.$projectid; |
|
| 1715 | + else $sql.= ' SET fk_project = NULL'; |
|
| 1716 | + $sql.= ' WHERE id = '.$this->id; |
|
| 1717 | + } |
|
| 1718 | + else |
|
| 1719 | + {
|
|
| 1720 | + if ($projectid) $sql.= ' SET fk_projet = '.$projectid; |
|
| 1721 | + else $sql.= ' SET fk_projet = NULL'; |
|
| 1722 | + $sql.= ' WHERE rowid = '.$this->id; |
|
| 1723 | + } |
|
| 4753 | 1724 | |
| 4754 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 4755 | - /** |
|
| 4756 | - * Function to get extra fields of an object into $this->array_options |
|
| 4757 | - * This method is in most cases called by method fetch of objects but you can call it separately. |
|
| 4758 | - * |
|
| 4759 | - * @param int $rowid Id of line. Use the id of object if not defined. Deprecated. Function must be called without parameters. |
|
| 4760 | - * @param array $optionsArray Array resulting of call of extrafields->fetch_name_optionals_label(). Deprecated. Function must be called without parameters. |
|
| 4761 | - * @return int <0 if error, 0 if no values of extrafield to find nor found, 1 if an attribute is found and value loaded |
|
| 4762 | - */ |
|
| 4763 | - function fetch_optionals($rowid=null, $optionsArray=null) |
|
| 4764 | - {
|
|
| 4765 | - // phpcs:enable |
|
| 4766 | - if (empty($rowid)) {
|
|
| 4767 | - $rowid = $this->id; |
|
| 1725 | + dol_syslog(get_class($this)."::setProject", LOG_DEBUG); |
|
| 1726 | + if ($this->db->query($sql)) |
|
| 1727 | + {
|
|
| 1728 | + $this->fk_project = $projectid; |
|
| 1729 | + return 1; |
|
| 1730 | + } |
|
| 1731 | + else |
|
| 1732 | + {
|
|
| 1733 | + dol_print_error($this->db); |
|
| 1734 | + return -1; |
|
| 4768 | 1735 | } |
| 1736 | + } |
|
| 4769 | 1737 | |
| 4770 | - // To avoid SQL errors. Probably not the better solution though |
|
| 4771 | - if (!$this->table_element) {
|
|
| 4772 | - return 0; |
|
| 4773 | - } |
|
| 4774 | - |
|
| 4775 | - $this->array_options=array(); |
|
| 4776 | - |
|
| 4777 | - if (! is_array($optionsArray)) |
|
| 4778 | - {
|
|
| 4779 | - // If $extrafields is not a known object, we initialize it. Best practice is to have $extrafields defined into card.php or list.php page. |
|
| 4780 | - // TODO Use of existing $extrafield is not yet ready (must mutualize code that use extrafields in form first) |
|
| 4781 | - // global $extrafields; |
|
| 4782 | - //if (! is_object($extrafields)) |
|
| 4783 | - //{
|
|
| 4784 | - // require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 4785 | - $extrafields = new AlExtraFields(); |
|
| 4786 | - //} |
|
| 1738 | + /** |
|
| 1739 | + * Change the payments methods |
|
| 1740 | + * |
|
| 1741 | + * @param int $id Id of new payment method |
|
| 1742 | + * @return int >0 if OK, <0 if KO |
|
| 1743 | + */ |
|
| 1744 | + function setPaymentMethods($id) |
|
| 1745 | + {
|
|
| 1746 | + dol_syslog(get_class($this).'::setPaymentMethods('.$id.')');
|
|
| 1747 | + if ($this->statut >= 0 || $this->element == 'societe') |
|
| 1748 | + {
|
|
| 1749 | + // TODO uniformize field name |
|
| 1750 | + $fieldname = 'fk_mode_reglement'; |
|
| 1751 | + if ($this->element == 'societe') $fieldname = 'mode_reglement'; |
|
| 1752 | + if (get_class($this) == 'Fournisseur') $fieldname = 'mode_reglement_supplier'; |
|
| 4787 | 1753 | |
| 4788 | - // Load array of extrafields for elementype = $this->table_element |
|
| 4789 | - if (empty($extrafields->attributes[$this->table_element]['loaded'])) |
|
| 4790 | - {
|
|
| 4791 | - $extrafields->fetch_name_optionals_label($this->table_element); |
|
| 4792 | - } |
|
| 4793 | - $optionsArray = (! empty($extrafields->attributes[$this->table_element]['label'])?$extrafields->attributes[$this->table_element]['label']:null); |
|
| 4794 | - } |
|
| 4795 | - else |
|
| 4796 | - {
|
|
| 4797 | - // global $extrafields; |
|
| 4798 | - dol_syslog("Warning: fetch_optionals was called with param optionsArray defined when you should pass null now", LOG_WARNING);
|
|
| 4799 | - } |
|
| 1754 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1755 | + $sql .= ' SET '.$fieldname.' = '.$id; |
|
| 1756 | + $sql .= ' WHERE rowid='.$this->id; |
|
| 4800 | 1757 | |
| 4801 | - $table_element = $this->table_element; |
|
| 4802 | - if ($table_element == 'categorie') $table_element = 'categories'; // For compatibility |
|
| 1758 | + if ($this->db->query($sql)) |
|
| 1759 | + {
|
|
| 1760 | + $this->mode_reglement_id = $id; |
|
| 1761 | + // for supplier |
|
| 1762 | + if (get_class($this) == 'Fournisseur') $this->mode_reglement_supplier_id = $id; |
|
| 1763 | + return 1; |
|
| 1764 | + } |
|
| 1765 | + else |
|
| 1766 | + {
|
|
| 1767 | + dol_syslog(get_class($this).'::setPaymentMethods Erreur '.$sql.' - '.$this->db->error()); |
|
| 1768 | + $this->error=$this->db->error(); |
|
| 1769 | + return -1; |
|
| 1770 | + } |
|
| 1771 | + } |
|
| 1772 | + else |
|
| 1773 | + {
|
|
| 1774 | + dol_syslog(get_class($this).'::setPaymentMethods, status of the object is incompatible'); |
|
| 1775 | + $this->error='Status of the object is incompatible '.$this->statut; |
|
| 1776 | + return -2; |
|
| 1777 | + } |
|
| 1778 | + } |
|
| 4803 | 1779 | |
| 4804 | - // Request to get complementary values |
|
| 4805 | - if (is_array($optionsArray) && count($optionsArray) > 0) |
|
| 4806 | - {
|
|
| 4807 | - $sql = "SELECT rowid"; |
|
| 4808 | - foreach ($optionsArray as $name => $label) |
|
| 4809 | - {
|
|
| 4810 | - if (empty($extrafields->attributes[$this->table_element]['type'][$name]) || $extrafields->attributes[$this->table_element]['type'][$name] != 'separate') |
|
| 4811 | - {
|
|
| 4812 | - $sql.= ", ".$name; |
|
| 4813 | - } |
|
| 4814 | - } |
|
| 4815 | - $sql.= " FROM ".MAIN_DB_PREFIX.$table_element."_extrafields"; |
|
| 4816 | - $sql.= " WHERE fk_object = ".$rowid; |
|
| 1780 | + /** |
|
| 1781 | + * Change the multicurrency code |
|
| 1782 | + * |
|
| 1783 | + * @param string $code multicurrency code |
|
| 1784 | + * @return int >0 if OK, <0 if KO |
|
| 1785 | + */ |
|
| 1786 | + function setMulticurrencyCode($code) |
|
| 1787 | + {
|
|
| 1788 | + dol_syslog(get_class($this).'::setMulticurrencyCode('.$id.')');
|
|
| 1789 | + if ($this->statut >= 0 || $this->element == 'societe') |
|
| 1790 | + {
|
|
| 1791 | + $fieldname = 'multicurrency_code'; |
|
| 4817 | 1792 | |
| 4818 | - //dol_syslog(get_class($this)."::fetch_optionals get extrafields data for ".$this->table_element, LOG_DEBUG); // Too verbose |
|
| 4819 | - $resql=$this->db->query($sql); |
|
| 4820 | - if ($resql) |
|
| 4821 | - {
|
|
| 4822 | - $this->array_options = array(); |
|
| 4823 | - $numrows=$this->db->num_rows($resql); |
|
| 4824 | - if ($numrows) |
|
| 4825 | - {
|
|
| 4826 | - $tab = $this->db->fetch_array($resql); |
|
| 4827 | - |
|
| 4828 | - foreach ($tab as $key => $value) |
|
| 4829 | - {
|
|
| 4830 | - // Test fetch_array ! is_int($key) because fetch_array result is a mix table with Key as alpha and Key as int (depend db engine) |
|
| 4831 | - if ($key != 'rowid' && $key != 'tms' && $key != 'fk_member' && ! is_int($key)) |
|
| 4832 | - {
|
|
| 4833 | - // we can add this attribute to object |
|
| 4834 | - if (! empty($extrafields) && in_array($extrafields->attributes[$this->table_element]['type'][$key], array('date','datetime')))
|
|
| 4835 | - {
|
|
| 4836 | - //var_dump($extrafields->attributes[$this->table_element]['type'][$key]); |
|
| 4837 | - $this->array_options["options_".$key]=$this->db->jdate($value); |
|
| 4838 | - } |
|
| 4839 | - else |
|
| 4840 | - {
|
|
| 4841 | - $this->array_options["options_".$key]=$value; |
|
| 4842 | - } |
|
| 1793 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1794 | + $sql .= ' SET '.$fieldname." = '".$this->db->escape($code)."'"; |
|
| 1795 | + $sql .= ' WHERE rowid='.$this->id; |
|
| 4843 | 1796 | |
| 4844 | - //var_dump('key '.$key.' '.$value.' type='.$extrafields->attributes[$this->table_element]['type'][$key].' '.$this->array_options["options_".$key]);
|
|
| 4845 | - } |
|
| 4846 | - } |
|
| 4847 | - } |
|
| 1797 | + if ($this->db->query($sql)) |
|
| 1798 | + {
|
|
| 1799 | + $this->multicurrency_code = $code; |
|
| 4848 | 1800 | |
| 4849 | - $this->db->free($resql); |
|
| 1801 | + list($fk_multicurrency, $rate) = MultiCurrency::getIdAndTxFromCode($this->db, $code); |
|
| 1802 | + if ($rate) $this->setMulticurrencyRate($rate,2); |
|
| 4850 | 1803 | |
| 4851 | - if ($numrows) return $numrows; |
|
| 4852 | - else return 0; |
|
| 4853 | - } |
|
| 4854 | - else |
|
| 4855 | - {
|
|
| 4856 | - dol_print_error($this->db); |
|
| 4857 | - return -1; |
|
| 4858 | - } |
|
| 4859 | - } |
|
| 4860 | - return 0; |
|
| 4861 | - } |
|
| 4862 | - |
|
| 4863 | - /** |
|
| 4864 | - * Delete all extra fields values for the current object. |
|
| 4865 | - * |
|
| 4866 | - * @return int <0 if KO, >0 if OK |
|
| 4867 | - */ |
|
| 4868 | - function deleteExtraFields() |
|
| 4869 | - {
|
|
| 4870 | - $this->db->begin(); |
|
| 4871 | - |
|
| 4872 | - $table_element = $this->table_element; |
|
| 4873 | - if ($table_element == 'categorie') $table_element = 'categories'; // For compatibility |
|
| 4874 | - |
|
| 4875 | - $sql_del = "DELETE FROM ".MAIN_DB_PREFIX.$table_element."_extrafields WHERE fk_object = ".$this->id; |
|
| 4876 | - dol_syslog(get_class($this)."::deleteExtraFields delete", LOG_DEBUG); |
|
| 4877 | - $resql=$this->db->query($sql_del); |
|
| 4878 | - if (! $resql) |
|
| 4879 | - {
|
|
| 4880 | - $this->error=$this->db->lasterror(); |
|
| 4881 | - $this->db->rollback(); |
|
| 4882 | - return -1; |
|
| 4883 | - } |
|
| 4884 | - else |
|
| 4885 | - {
|
|
| 4886 | - $this->db->commit(); |
|
| 4887 | - return 1; |
|
| 4888 | - } |
|
| 4889 | - } |
|
| 4890 | - |
|
| 4891 | - /** |
|
| 4892 | - * Add/Update all extra fields values for the current object. |
|
| 4893 | - * Data to describe values to insert/update are stored into $this->array_options=array('options_codeforfield1'=>'valueforfield1', 'options_codeforfield2'=>'valueforfield2', ...)
|
|
| 4894 | - * This function delete record with all extrafields and insert them again from the array $this->array_options. |
|
| 4895 | - * |
|
| 4896 | - * @param string $trigger If defined, call also the trigger (for example COMPANY_MODIFY) |
|
| 4897 | - * @param User $userused Object user |
|
| 4898 | - * @return int -1=error, O=did nothing, 1=OK |
|
| 4899 | - * @see updateExtraField, setValueFrom |
|
| 4900 | - */ |
|
| 4901 | - function insertExtraFields($trigger='', $userused=null) |
|
| 4902 | - {
|
|
| 4903 | - global $conf,$langs,$user; |
|
| 4904 | - |
|
| 4905 | - if (empty($userused)) $userused=$user; |
|
| 4906 | - |
|
| 4907 | - $error=0; |
|
| 4908 | - |
|
| 4909 | - if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_DISABLED)) |
|
| 4910 | - return 0; // For avoid conflicts if trigger used |
|
| 1804 | + return 1; |
|
| 1805 | + } |
|
| 1806 | + else |
|
| 1807 | + {
|
|
| 1808 | + dol_syslog(get_class($this).'::setMulticurrencyCode Erreur '.$sql.' - '.$this->db->error()); |
|
| 1809 | + $this->error=$this->db->error(); |
|
| 1810 | + return -1; |
|
| 1811 | + } |
|
| 1812 | + } |
|
| 1813 | + else |
|
| 1814 | + {
|
|
| 1815 | + dol_syslog(get_class($this).'::setMulticurrencyCode, status of the object is incompatible'); |
|
| 1816 | + $this->error='Status of the object is incompatible '.$this->statut; |
|
| 1817 | + return -2; |
|
| 1818 | + } |
|
| 1819 | + } |
|
| 4911 | 1820 | |
| 4912 | - if (! empty($this->array_options)) |
|
| 4913 | - {
|
|
| 4914 | - // Check parameters |
|
| 4915 | - $langs->load('admin');
|
|
| 4916 | - require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 4917 | - $extrafields = new AlExtraFields($this->db); |
|
| 4918 | - $target_extrafields=$extrafields->fetch_name_optionals_label($this->table_element); |
|
| 1821 | + /** |
|
| 1822 | + * Change the multicurrency rate |
|
| 1823 | + * |
|
| 1824 | + * @param double $rate multicurrency rate |
|
| 1825 | + * @param int $mode mode 1 : amounts in company currency will be recalculated, mode 2 : amounts in foreign currency |
|
| 1826 | + * @return int >0 if OK, <0 if KO |
|
| 1827 | + */ |
|
| 1828 | + function setMulticurrencyRate($rate, $mode=1) |
|
| 1829 | + {
|
|
| 1830 | + dol_syslog(get_class($this).'::setMulticurrencyRate('.$id.')');
|
|
| 1831 | + if ($this->statut >= 0 || $this->element == 'societe') |
|
| 1832 | + {
|
|
| 1833 | + $fieldname = 'multicurrency_tx'; |
|
| 4919 | 1834 | |
| 4920 | - //Eliminate copied source object extra_fields that do not exist in target object |
|
| 4921 | - $new_array_options=array(); |
|
| 4922 | - foreach ($this->array_options as $key => $value) {
|
|
| 4923 | - if (in_array(substr($key,8), array_keys($target_extrafields))) // We remove the 'options_' from $key for test |
|
| 4924 | - $new_array_options[$key] = $value; |
|
| 4925 | - elseif (in_array($key, array_keys($target_extrafields))) // We test on $key that does not contains the 'options_' prefix |
|
| 4926 | - $new_array_options['options_'.$key] = $value; |
|
| 4927 | - } |
|
| 1835 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1836 | + $sql .= ' SET '.$fieldname.' = '.$rate; |
|
| 1837 | + $sql .= ' WHERE rowid='.$this->id; |
|
| 4928 | 1838 | |
| 4929 | - foreach($new_array_options as $key => $value) |
|
| 4930 | - {
|
|
| 4931 | - $attributeKey = substr($key,8); // Remove 'options_' prefix |
|
| 4932 | - $attributeType = $extrafields->attributes[$this->table_element]['type'][$attributeKey]; |
|
| 4933 | - $attributeLabel = $extrafields->attributes[$this->table_element]['label'][$attributeKey]; |
|
| 4934 | - $attributeParam = $extrafields->attributes[$this->table_element]['param'][$attributeKey]; |
|
| 4935 | - $attributeRequired = $extrafields->attributes[$this->table_element]['required'][$attributeKey]; |
|
| 4936 | - |
|
| 4937 | - if ($attributeRequired) |
|
| 4938 | - {
|
|
| 4939 | - $mandatorypb=false; |
|
| 4940 | - if ($attributeType == 'link' && $this->array_options[$key] == '-1') $mandatorypb=true; |
|
| 4941 | - if ($this->array_options[$key] === '') $mandatorypb=true; |
|
| 4942 | - if ($mandatorypb) |
|
| 4943 | - {
|
|
| 4944 | - dol_syslog($this->error); |
|
| 4945 | - $this->errors[]=$langs->trans('ErrorFieldRequired', $attributeLabel);
|
|
| 4946 | - return -1; |
|
| 4947 | - } |
|
| 4948 | - } |
|
| 4949 | - |
|
| 4950 | - //dol_syslog("attributeLabel=".$attributeLabel, LOG_DEBUG);
|
|
| 4951 | - //dol_syslog("attributeType=".$attributeType, LOG_DEBUG);
|
|
| 4952 | - |
|
| 4953 | - switch ($attributeType) |
|
| 4954 | - {
|
|
| 4955 | - case 'int': |
|
| 4956 | - if (!is_numeric($value) && $value!='') |
|
| 4957 | - {
|
|
| 4958 | - $this->errors[]=$langs->trans("ExtraFieldHasWrongValue", $attributeLabel);
|
|
| 4959 | - return -1; |
|
| 4960 | - } |
|
| 4961 | - elseif ($value=='') |
|
| 4962 | - {
|
|
| 4963 | - $new_array_options[$key] = null; |
|
| 4964 | - } |
|
| 4965 | - break; |
|
| 4966 | - case 'double': |
|
| 4967 | - $value = price2num($value); |
|
| 4968 | - if (!is_numeric($value) && $value!='') |
|
| 4969 | - {
|
|
| 4970 | - dol_syslog($langs->trans("ExtraFieldHasWrongValue")." sur ".$attributeLabel."(".$value."is not '".$attributeType."')", LOG_DEBUG);
|
|
| 4971 | - $this->errors[]=$langs->trans("ExtraFieldHasWrongValue", $attributeLabel);
|
|
| 4972 | - return -1; |
|
| 4973 | - } |
|
| 4974 | - elseif ($value=='') |
|
| 4975 | - {
|
|
| 4976 | - $new_array_options[$key] = null; |
|
| 4977 | - } |
|
| 4978 | - //dol_syslog("double value"." sur ".$attributeLabel."(".$value." is '".$attributeType."')", LOG_DEBUG);
|
|
| 4979 | - $new_array_options[$key] = $value; |
|
| 4980 | - break; |
|
| 4981 | - /*case 'select': // Not required, we chosed value='0' for undefined values |
|
| 4982 | - if ($value=='-1') |
|
| 4983 | - {
|
|
| 4984 | - $this->array_options[$key] = null; |
|
| 4985 | - } |
|
| 4986 | - break;*/ |
|
| 4987 | - case 'password': |
|
| 4988 | - $algo=''; |
|
| 4989 | - if ($this->array_options[$key] != '' && is_array($extrafields->attributes[$this->table_element]['param'][$attributeKey]['options'])) |
|
| 4990 | - {
|
|
| 4991 | - // If there is an encryption choice, we use it to crypt data before insert |
|
| 4992 | - $tmparrays = array_keys($extrafields->attributes[$this->table_element]['param'][$attributeKey]['options']); |
|
| 4993 | - $algo=reset($tmparrays); |
|
| 4994 | - if ($algo != '') |
|
| 4995 | - {
|
|
| 4996 | - //global $action; // $action may be 'create', 'update', 'update_extras'... |
|
| 4997 | - //var_dump($action); |
|
| 4998 | - //var_dump($this->oldcopy);exit; |
|
| 4999 | - if (is_object($this->oldcopy)) // If this->oldcopy is not defined, we can't know if we change attribute or not, so we must keep value |
|
| 5000 | - {
|
|
| 5001 | - //var_dump($this->oldcopy->array_options[$key]); var_dump($this->array_options[$key]); |
|
| 5002 | - if ($this->array_options[$key] == $this->oldcopy->array_options[$key]) // If old value crypted in database is same than submited new value, it means we don't change it, so we don't update. |
|
| 5003 | - {
|
|
| 5004 | - $new_array_options[$key] = $this->array_options[$key]; // Value is kept |
|
| 5005 | - } |
|
| 5006 | - else |
|
| 5007 | - {
|
|
| 5008 | - // var_dump($algo); |
|
| 5009 | - $newvalue = dol_hash($this->array_options[$key], $algo); |
|
| 5010 | - $new_array_options[$key] = $newvalue; |
|
| 5011 | - } |
|
| 5012 | - } |
|
| 5013 | - else |
|
| 5014 | - {
|
|
| 5015 | - $new_array_options[$key] = $this->array_options[$key]; // Value is kept |
|
| 5016 | - } |
|
| 5017 | - } |
|
| 5018 | - } |
|
| 5019 | - else // Common usage |
|
| 5020 | - {
|
|
| 5021 | - $new_array_options[$key] = $this->array_options[$key]; |
|
| 5022 | - } |
|
| 5023 | - break; |
|
| 5024 | - case 'price': |
|
| 5025 | - $new_array_options[$key] = price2num($this->array_options[$key]); |
|
| 5026 | - break; |
|
| 5027 | - case 'date': |
|
| 5028 | - $new_array_options[$key] = $this->db->idate($this->array_options[$key]); |
|
| 5029 | - break; |
|
| 5030 | - case 'datetime': |
|
| 5031 | - // If data is a string instead of a timestamp, we convert it |
|
| 5032 | - if (! is_int($this->array_options[$key])) {
|
|
| 5033 | - $this->array_options[$key] = strtotime($this->array_options[$key]); |
|
| 5034 | - } |
|
| 5035 | - $new_array_options[$key] = $this->db->idate($this->array_options[$key]); |
|
| 5036 | - break; |
|
| 5037 | - case 'link': |
|
| 5038 | - $param_list=array_keys($attributeParam['options']); |
|
| 5039 | - // 0 : ObjectName |
|
| 5040 | - // 1 : classPath |
|
| 5041 | - $InfoFieldList = explode(":", $param_list[0]);
|
|
| 5042 | - dol_include_once($InfoFieldList[1]); |
|
| 5043 | - if ($InfoFieldList[0] && class_exists($InfoFieldList[0])) |
|
| 5044 | - {
|
|
| 5045 | - if ($value == '-1') // -1 is key for no defined in combo list of objects |
|
| 5046 | - {
|
|
| 5047 | - $new_array_options[$key]=''; |
|
| 5048 | - } |
|
| 5049 | - elseif ($value) |
|
| 5050 | - {
|
|
| 5051 | - $object = new $InfoFieldList[0]($this->db); |
|
| 5052 | - if (is_numeric($value)) $res=$object->fetch($value); |
|
| 5053 | - else $res=$object->fetch('',$value);
|
|
| 5054 | - |
|
| 5055 | - if ($res > 0) $new_array_options[$key]=$object->id; |
|
| 5056 | - else |
|
| 5057 | - {
|
|
| 5058 | - $this->error="Id/Ref '".$value."' for object '".$object->element."' not found"; |
|
| 5059 | - $this->db->rollback(); |
|
| 5060 | - return -1; |
|
| 5061 | - } |
|
| 5062 | - } |
|
| 5063 | - } |
|
| 5064 | - else |
|
| 5065 | - {
|
|
| 5066 | - dol_syslog('Error bad setup of extrafield', LOG_WARNING);
|
|
| 5067 | - } |
|
| 5068 | - break; |
|
| 5069 | - } |
|
| 5070 | - } |
|
| 5071 | - |
|
| 5072 | - $this->db->begin(); |
|
| 1839 | + if ($this->db->query($sql)) |
|
| 1840 | + {
|
|
| 1841 | + $this->multicurrency_tx = $rate; |
|
| 1842 | + |
|
| 1843 | + // Update line price |
|
| 1844 | + if (!empty($this->lines)) |
|
| 1845 | + {
|
|
| 1846 | + foreach ($this->lines as &$line) |
|
| 1847 | + {
|
|
| 1848 | + if($mode == 1) {
|
|
| 1849 | + $line->subprice = 0; |
|
| 1850 | + } |
|
| 5073 | 1851 | |
| 5074 | - $table_element = $this->table_element; |
|
| 5075 | - if ($table_element == 'categorie') $table_element = 'categories'; // For compatibility |
|
| 1852 | + switch ($this->element) {
|
|
| 1853 | + case 'propal': |
|
| 1854 | + $this->updateline( |
|
| 1855 | + $line->id, $line->subprice, $line->qty, $line->remise_percent, $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, |
|
| 1856 | + ($line->description?$line->description:$line->desc), 'HT', $line->info_bits, $line->special_code, $line->fk_parent_line, |
|
| 1857 | + $line->skip_update_total, $line->fk_fournprice, $line->pa_ht, $line->label, $line->product_type, $line->date_start, |
|
| 1858 | + $line->date_end, $line->array_options, $line->fk_unit, $line->multicurrency_subprice |
|
| 1859 | + ); |
|
| 1860 | + break; |
|
| 1861 | + case 'commande': |
|
| 1862 | + $this->updateline( |
|
| 1863 | + $line->id, ($line->description?$line->description:$line->desc), $line->subprice, $line->qty, $line->remise_percent, |
|
| 1864 | + $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, 'HT', $line->info_bits, $line->date_start, $line->date_end, |
|
| 1865 | + $line->product_type, $line->fk_parent_line, $line->skip_update_total, $line->fk_fournprice, $line->pa_ht, $line->label, |
|
| 1866 | + $line->special_code, $line->array_options, $line->fk_unit, $line->multicurrency_subprice |
|
| 1867 | + ); |
|
| 1868 | + break; |
|
| 1869 | + case 'facture': |
|
| 1870 | + $this->updateline( |
|
| 1871 | + $line->id, ($line->description?$line->description:$line->desc), $line->subprice, $line->qty, $line->remise_percent, |
|
| 1872 | + $line->date_start, $line->date_end, $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, 'HT', $line->info_bits, |
|
| 1873 | + $line->product_type, $line->fk_parent_line, $line->skip_update_total, $line->fk_fournprice, $line->pa_ht, $line->label, |
|
| 1874 | + $line->special_code, $line->array_options, $line->situation_percent, $line->fk_unit, $line->multicurrency_subprice |
|
| 1875 | + ); |
|
| 1876 | + break; |
|
| 1877 | + case 'supplier_proposal': |
|
| 1878 | + $this->updateline( |
|
| 1879 | + $line->id, $line->subprice, $line->qty, $line->remise_percent, $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, |
|
| 1880 | + ($line->description?$line->description:$line->desc), 'HT', $line->info_bits, $line->special_code, $line->fk_parent_line, |
|
| 1881 | + $line->skip_update_total, $line->fk_fournprice, $line->pa_ht, $line->label, $line->product_type, $line->array_options, |
|
| 1882 | + $line->ref_fourn, $line->multicurrency_subprice |
|
| 1883 | + ); |
|
| 1884 | + break; |
|
| 1885 | + case 'order_supplier': |
|
| 1886 | + $this->updateline( |
|
| 1887 | + $line->id, ($line->description?$line->description:$line->desc), $line->subprice, $line->qty, $line->remise_percent, |
|
| 1888 | + $line->tva_tx, $line->localtax1_tx, $line->localtax2_tx, 'HT', $line->info_bits, $line->product_type, false, |
|
| 1889 | + $line->date_start, $line->date_end, $line->array_options, $line->fk_unit, $line->multicurrency_subprice |
|
| 1890 | + ); |
|
| 1891 | + break; |
|
| 1892 | + case 'invoice_supplier': |
|
| 1893 | + $this->updateline( |
|
| 1894 | + $line->id, ($line->description?$line->description:$line->desc), $line->subprice, $line->tva_tx, $line->localtax1_tx, |
|
| 1895 | + $line->localtax2_tx, $line->qty, 0, 'HT', $line->info_bits, $line->product_type, $line->remise_percent, false, |
|
| 1896 | + $line->date_start, $line->date_end, $line->array_options, $line->fk_unit, $line->multicurrency_subprice |
|
| 1897 | + ); |
|
| 1898 | + break; |
|
| 1899 | + default: |
|
| 1900 | + dol_syslog(get_class($this).'::setMulticurrencyRate no updateline defined', LOG_DEBUG); |
|
| 1901 | + break; |
|
| 1902 | + } |
|
| 1903 | + } |
|
| 1904 | + } |
|
| 5076 | 1905 | |
| 5077 | - $sql_del = "DELETE FROM ".MAIN_DB_PREFIX.$table_element."_extrafields WHERE fk_object = ".$this->id; |
|
| 5078 | - dol_syslog(get_class($this)."::insertExtraFields delete", LOG_DEBUG); |
|
| 5079 | - $this->db->query($sql_del); |
|
| 1906 | + return 1; |
|
| 1907 | + } |
|
| 1908 | + else |
|
| 1909 | + {
|
|
| 1910 | + dol_syslog(get_class($this).'::setMulticurrencyRate Erreur '.$sql.' - '.$this->db->error()); |
|
| 1911 | + $this->error=$this->db->error(); |
|
| 1912 | + return -1; |
|
| 1913 | + } |
|
| 1914 | + } |
|
| 1915 | + else |
|
| 1916 | + {
|
|
| 1917 | + dol_syslog(get_class($this).'::setMulticurrencyRate, status of the object is incompatible'); |
|
| 1918 | + $this->error='Status of the object is incompatible '.$this->statut; |
|
| 1919 | + return -2; |
|
| 1920 | + } |
|
| 1921 | + } |
|
| 5080 | 1922 | |
| 5081 | - $sql = "INSERT INTO ".MAIN_DB_PREFIX.$table_element."_extrafields (fk_object"; |
|
| 5082 | - foreach($new_array_options as $key => $value) |
|
| 5083 | - {
|
|
| 5084 | - $attributeKey = substr($key,8); // Remove 'options_' prefix |
|
| 5085 | - // Add field of attribut |
|
| 5086 | - if ($extrafields->attributes[$this->table_element]['type'][$attributeKey] != 'separate') // Only for other type than separator |
|
| 5087 | - $sql.=",".$attributeKey; |
|
| 5088 | - } |
|
| 5089 | - $sql .= ") VALUES (".$this->id;
|
|
| 5090 | - |
|
| 5091 | - foreach($new_array_options as $key => $value) |
|
| 5092 | - {
|
|
| 5093 | - $attributeKey = substr($key,8); // Remove 'options_' prefix |
|
| 5094 | - // Add field of attribute |
|
| 5095 | - if ($extrafields->attributes[$this->table_element]['type'][$attributeKey] != 'separate') // Only for other type than separator) |
|
| 5096 | - {
|
|
| 5097 | - if ($new_array_options[$key] != '') |
|
| 5098 | - {
|
|
| 5099 | - $sql.=",'".$this->db->escape($new_array_options[$key])."'"; |
|
| 5100 | - } |
|
| 5101 | - else |
|
| 5102 | - {
|
|
| 5103 | - $sql.=",null"; |
|
| 5104 | - } |
|
| 5105 | - } |
|
| 5106 | - } |
|
| 5107 | - $sql.=")"; |
|
| 1923 | + /** |
|
| 1924 | + * Change the payments terms |
|
| 1925 | + * |
|
| 1926 | + * @param int $id Id of new payment terms |
|
| 1927 | + * @return int >0 if OK, <0 if KO |
|
| 1928 | + */ |
|
| 1929 | + function setPaymentTerms($id) |
|
| 1930 | + {
|
|
| 1931 | + dol_syslog(get_class($this).'::setPaymentTerms('.$id.')');
|
|
| 1932 | + if ($this->statut >= 0 || $this->element == 'societe') |
|
| 1933 | + {
|
|
| 1934 | + // TODO uniformize field name |
|
| 1935 | + $fieldname = 'fk_cond_reglement'; |
|
| 1936 | + if ($this->element == 'societe') $fieldname = 'cond_reglement'; |
|
| 1937 | + if (get_class($this) == 'Fournisseur') $fieldname = 'cond_reglement_supplier'; |
|
| 5108 | 1938 | |
| 5109 | - dol_syslog(get_class($this)."::insertExtraFields insert", LOG_DEBUG); |
|
| 5110 | - $resql = $this->db->query($sql); |
|
| 5111 | - if (! $resql) |
|
| 5112 | - {
|
|
| 5113 | - $this->error=$this->db->lasterror(); |
|
| 5114 | - $error++; |
|
| 5115 | - } |
|
| 1939 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 1940 | + $sql .= ' SET '.$fieldname.' = '.$id; |
|
| 1941 | + $sql .= ' WHERE rowid='.$this->id; |
|
| 5116 | 1942 | |
| 5117 | - if (! $error && $trigger) |
|
| 5118 | - {
|
|
| 5119 | - // Call trigger |
|
| 5120 | - $this->context=array('extrafieldaddupdate'=>1);
|
|
| 5121 | - $result=$this->call_trigger($trigger, $userused); |
|
| 5122 | - if ($result < 0) $error++; |
|
| 5123 | - // End call trigger |
|
| 5124 | - } |
|
| 5125 | - |
|
| 5126 | - if ($error) |
|
| 5127 | - {
|
|
| 5128 | - $this->db->rollback(); |
|
| 5129 | - return -1; |
|
| 5130 | - } |
|
| 5131 | - else |
|
| 5132 | - {
|
|
| 5133 | - $this->db->commit(); |
|
| 5134 | - return 1; |
|
| 5135 | - } |
|
| 5136 | - } |
|
| 5137 | - else return 0; |
|
| 5138 | - } |
|
| 5139 | - |
|
| 5140 | - /** |
|
| 5141 | - * Update an extra field value for the current object. |
|
| 5142 | - * Data to describe values to update are stored into $this->array_options=array('options_codeforfield1'=>'valueforfield1', 'options_codeforfield2'=>'valueforfield2', ...)
|
|
| 5143 | - * |
|
| 5144 | - * @param string $key Key of the extrafield (without starting 'options_') |
|
| 5145 | - * @param string $trigger If defined, call also the trigger (for example COMPANY_MODIFY) |
|
| 5146 | - * @param User $userused Object user |
|
| 5147 | - * @return int -1=error, O=did nothing, 1=OK |
|
| 5148 | - * @see setValueFrom, insertExtraFields |
|
| 5149 | - */ |
|
| 5150 | - function updateExtraField($key, $trigger=null, $userused=null) |
|
| 5151 | - {
|
|
| 5152 | - global $conf,$langs,$user; |
|
| 5153 | - |
|
| 5154 | - if (empty($userused)) $userused=$user; |
|
| 5155 | - |
|
| 5156 | - $error=0; |
|
| 5157 | - |
|
| 5158 | - if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_DISABLED)) |
|
| 5159 | - return 0; // For avoid conflicts if trigger used |
|
| 1943 | + if ($this->db->query($sql)) |
|
| 1944 | + {
|
|
| 1945 | + $this->cond_reglement_id = $id; |
|
| 1946 | + // for supplier |
|
| 1947 | + if (get_class($this) == 'Fournisseur') $this->cond_reglement_supplier_id = $id; |
|
| 1948 | + $this->cond_reglement = $id; // for compatibility |
|
| 1949 | + return 1; |
|
| 1950 | + } |
|
| 1951 | + else |
|
| 1952 | + {
|
|
| 1953 | + dol_syslog(get_class($this).'::setPaymentTerms Erreur '.$sql.' - '.$this->db->error()); |
|
| 1954 | + $this->error=$this->db->error(); |
|
| 1955 | + return -1; |
|
| 1956 | + } |
|
| 1957 | + } |
|
| 1958 | + else |
|
| 1959 | + {
|
|
| 1960 | + dol_syslog(get_class($this).'::setPaymentTerms, status of the object is incompatible'); |
|
| 1961 | + $this->error='Status of the object is incompatible '.$this->statut; |
|
| 1962 | + return -2; |
|
| 1963 | + } |
|
| 1964 | + } |
|
| 5160 | 1965 | |
| 5161 | - if (! empty($this->array_options) && isset($this->array_options["options_".$key])) |
|
| 5162 | - {
|
|
| 5163 | - // Check parameters |
|
| 5164 | - $langs->load('admin');
|
|
| 5165 | - require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 5166 | - $extrafields = new AlExtraFields($this->db); |
|
| 5167 | - $target_extrafields=$extrafields->fetch_name_optionals_label($this->table_element); |
|
| 1966 | + /** |
|
| 1967 | + * Define delivery address |
|
| 1968 | + * @deprecated |
|
| 1969 | + * |
|
| 1970 | + * @param int $id Address id |
|
| 1971 | + * @return int <0 si ko, >0 si ok |
|
| 1972 | + */ |
|
| 1973 | + function setDeliveryAddress($id) |
|
| 1974 | + {
|
|
| 1975 | + $fieldname = 'fk_delivery_address'; |
|
| 1976 | + if ($this->element == 'delivery' || $this->element == 'shipping') $fieldname = 'fk_address'; |
|
| 5168 | 1977 | |
| 5169 | - $value=$this->array_options["options_".$key]; |
|
| 1978 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element." SET ".$fieldname." = ".$id; |
|
| 1979 | + $sql.= " WHERE rowid = ".$this->id." AND fk_statut = 0"; |
|
| 5170 | 1980 | |
| 5171 | - $attributeType = $extrafields->attributes[$this->table_element]['type'][$key]; |
|
| 5172 | - $attributeLabel = $extrafields->attributes[$this->table_element]['label'][$key]; |
|
| 5173 | - $attributeParam = $extrafields->attributes[$this->table_element]['param'][$key]; |
|
| 5174 | - $attributeRequired = $extrafields->attributes[$this->table_element]['required'][$key]; |
|
| 1981 | + if ($this->db->query($sql)) |
|
| 1982 | + {
|
|
| 1983 | + $this->fk_delivery_address = $id; |
|
| 1984 | + return 1; |
|
| 1985 | + } |
|
| 1986 | + else |
|
| 1987 | + {
|
|
| 1988 | + $this->error=$this->db->error(); |
|
| 1989 | + dol_syslog(get_class($this).'::setDeliveryAddress Erreur '.$sql.' - '.$this->error); |
|
| 1990 | + return -1; |
|
| 1991 | + } |
|
| 1992 | + } |
|
| 5175 | 1993 | |
| 5176 | - //dol_syslog("attributeLabel=".$attributeLabel, LOG_DEBUG);
|
|
| 5177 | - //dol_syslog("attributeType=".$attributeType, LOG_DEBUG);
|
|
| 5178 | 1994 | |
| 5179 | - switch ($attributeType) |
|
| 5180 | - {
|
|
| 5181 | - case 'int': |
|
| 5182 | - if (!is_numeric($value) && $value!='') |
|
| 5183 | - {
|
|
| 5184 | - $this->errors[]=$langs->trans("ExtraFieldHasWrongValue",$attributeLabel);
|
|
| 5185 | - return -1; |
|
| 5186 | - } |
|
| 5187 | - elseif ($value=='') |
|
| 5188 | - {
|
|
| 5189 | - $this->array_options["options_".$key] = null; |
|
| 5190 | - } |
|
| 5191 | - break; |
|
| 5192 | - case 'double': |
|
| 5193 | - $value = price2num($value); |
|
| 5194 | - if (!is_numeric($value) && $value!='') |
|
| 5195 | - {
|
|
| 5196 | - dol_syslog($langs->trans("ExtraFieldHasWrongValue")." sur ".$attributeLabel."(".$value."is not '".$attributeType."')", LOG_DEBUG);
|
|
| 5197 | - $this->errors[]=$langs->trans("ExtraFieldHasWrongValue", $attributeLabel);
|
|
| 5198 | - return -1; |
|
| 5199 | - } |
|
| 5200 | - elseif ($value=='') |
|
| 5201 | - {
|
|
| 5202 | - $this->array_options["options_".$key] = null; |
|
| 5203 | - } |
|
| 5204 | - //dol_syslog("double value"." sur ".$attributeLabel."(".$value." is '".$attributeType."')", LOG_DEBUG);
|
|
| 5205 | - $this->array_options["options_".$key] = $value; |
|
| 5206 | - break; |
|
| 5207 | - /*case 'select': // Not required, we chosed value='0' for undefined values |
|
| 5208 | - if ($value=='-1') |
|
| 5209 | - {
|
|
| 5210 | - $this->array_options[$key] = null; |
|
| 5211 | - } |
|
| 5212 | - break;*/ |
|
| 5213 | - case 'price': |
|
| 5214 | - $this->array_options["options_".$key] = price2num($this->array_options["options_".$key]); |
|
| 5215 | - break; |
|
| 5216 | - case 'date': |
|
| 5217 | - $this->array_options["options_".$key]=$this->db->idate($this->array_options["options_".$key]); |
|
| 5218 | - break; |
|
| 5219 | - case 'datetime': |
|
| 5220 | - $this->array_options["options_".$key]=$this->db->idate($this->array_options["options_".$key]); |
|
| 5221 | - break; |
|
| 5222 | - case 'link': |
|
| 5223 | - $param_list=array_keys($attributeParam['options']); |
|
| 5224 | - // 0 : ObjectName |
|
| 5225 | - // 1 : classPath |
|
| 5226 | - $InfoFieldList = explode(":", $param_list[0]);
|
|
| 5227 | - dol_include_once($InfoFieldList[1]); |
|
| 5228 | - if ($value) |
|
| 5229 | - {
|
|
| 5230 | - $object = new $InfoFieldList[0]($this->db); |
|
| 5231 | - $object->fetch(0,$value); |
|
| 5232 | - $this->array_options["options_".$key]=$object->id; |
|
| 5233 | - } |
|
| 5234 | - break; |
|
| 5235 | - } |
|
| 5236 | - |
|
| 5237 | - $this->db->begin(); |
|
| 5238 | - $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element."_extrafields SET ".$key."='".$this->db->escape($this->array_options["options_".$key])."'"; |
|
| 5239 | - $sql .= " WHERE fk_object = ".$this->id; |
|
| 5240 | - $resql = $this->db->query($sql); |
|
| 5241 | - if (! $resql) |
|
| 5242 | - {
|
|
| 5243 | - $error++; |
|
| 5244 | - $this->error=$this->db->lasterror(); |
|
| 5245 | - } |
|
| 1995 | + /** |
|
| 1996 | + * Change the shipping method |
|
| 1997 | + * |
|
| 1998 | + * @param int $shipping_method_id Id of shipping method |
|
| 1999 | + * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 2000 | + * @param User $userused Object user |
|
| 2001 | + * |
|
| 2002 | + * @return int 1 if OK, 0 if KO |
|
| 2003 | + */ |
|
| 2004 | + function setShippingMethod($shipping_method_id, $notrigger=false, $userused=null) |
|
| 2005 | + {
|
|
| 2006 | + global $user; |
|
| 5246 | 2007 | |
| 5247 | - if (! $error && $trigger) |
|
| 5248 | - {
|
|
| 5249 | - // Call trigger |
|
| 5250 | - $this->context=array('extrafieldupdate'=>1);
|
|
| 5251 | - $result=$this->call_trigger($trigger, $userused); |
|
| 5252 | - if ($result < 0) $error++; |
|
| 5253 | - // End call trigger |
|
| 5254 | - } |
|
| 5255 | - |
|
| 5256 | - if ($error) |
|
| 5257 | - {
|
|
| 5258 | - dol_syslog(get_class($this) . "::".__METHOD__ . $this->error, LOG_ERR); |
|
| 5259 | - $this->db->rollback(); |
|
| 5260 | - return -1; |
|
| 5261 | - } |
|
| 5262 | - else |
|
| 5263 | - {
|
|
| 5264 | - $this->db->commit(); |
|
| 5265 | - return 1; |
|
| 5266 | - } |
|
| 5267 | - } |
|
| 5268 | - else return 0; |
|
| 5269 | - } |
|
| 5270 | - |
|
| 5271 | - |
|
| 5272 | - /** |
|
| 5273 | - * Return HTML string to put an input field into a page |
|
| 5274 | - * Code very similar with showInputField of extra fields |
|
| 5275 | - * |
|
| 5276 | - * @param array $val Array of properties for field to show |
|
| 5277 | - * @param string $key Key of attribute |
|
| 5278 | - * @param string $value Preselected value to show (for date type it must be in timestamp format, for amount or price it must be a php numeric value) |
|
| 5279 | - * @param string $moreparam To add more parameters on html input tag |
|
| 5280 | - * @param string $keysuffix Prefix string to add into name and id of field (can be used to avoid duplicate names) |
|
| 5281 | - * @param string $keyprefix Suffix string to add into name and id of field (can be used to avoid duplicate names) |
|
| 5282 | - * @param string|int $morecss Value for css to define style/length of field. May also be a numeric. |
|
| 5283 | - * @return string |
|
| 5284 | - */ |
|
| 5285 | - function showInputField($val, $key, $value, $moreparam='', $keysuffix='', $keyprefix='', $morecss=0) |
|
| 5286 | - {
|
|
| 5287 | - global $conf,$langs,$form; |
|
| 5288 | - |
|
| 5289 | - if (! is_object($form)) |
|
| 5290 | - {
|
|
| 5291 | - require_once DOL_DOCUMENT_ROOT.'/core/class/html.form.class.php'; |
|
| 5292 | - $form=new Form($this->db); |
|
| 5293 | - } |
|
| 5294 | - |
|
| 5295 | - $val=$this->fields[$key]; |
|
| 5296 | - |
|
| 5297 | - $out=''; |
|
| 5298 | - $type=''; |
|
| 5299 | - $param = array(); |
|
| 5300 | - $param['options']=array(); |
|
| 5301 | - $size =$this->fields[$key]['size']; |
|
| 5302 | - // Because we work on extrafields |
|
| 5303 | - if(preg_match('/^integer:(.*):(.*)/i', $val['type'], $reg)){
|
|
| 5304 | - $param['options']=array($reg[1].':'.$reg[2]=>'N'); |
|
| 5305 | - $type ='link'; |
|
| 5306 | - } elseif(preg_match('/^link:(.*):(.*)/i', $val['type'], $reg)) {
|
|
| 5307 | - $param['options']=array($reg[1].':'.$reg[2]=>'N'); |
|
| 5308 | - $type ='link'; |
|
| 5309 | - } elseif(preg_match('/^sellist:(.*):(.*):(.*):(.*)/i', $val['type'], $reg)) {
|
|
| 5310 | - $param['options']=array($reg[1].':'.$reg[2].':'.$reg[3].':'.$reg[4]=>'N'); |
|
| 5311 | - $type ='sellist'; |
|
| 5312 | - } elseif(preg_match('/varchar\((\d+)\)/', $val['type'],$reg)) {
|
|
| 5313 | - $param['options']=array(); |
|
| 5314 | - $type ='varchar'; |
|
| 5315 | - $size=$reg[1]; |
|
| 5316 | - } elseif(preg_match('/varchar/', $val['type'])) {
|
|
| 5317 | - $param['options']=array(); |
|
| 5318 | - $type ='varchar'; |
|
| 5319 | - } elseif(is_array($this->fields[$key]['arrayofkeyval'])) {
|
|
| 5320 | - $param['options']=$this->fields[$key]['arrayofkeyval']; |
|
| 5321 | - $type ='select'; |
|
| 5322 | - } else {
|
|
| 5323 | - $param['options']=array(); |
|
| 5324 | - $type =$this->fields[$key]['type']; |
|
| 5325 | - } |
|
| 2008 | + if (empty($userused)) $userused=$user; |
|
| 5326 | 2009 | |
| 5327 | - $label=$this->fields[$key]['label']; |
|
| 5328 | - //$elementtype=$this->fields[$key]['elementtype']; // Seems not used |
|
| 5329 | - $default=$this->fields[$key]['default']; |
|
| 5330 | - $computed=$this->fields[$key]['computed']; |
|
| 5331 | - $unique=$this->fields[$key]['unique']; |
|
| 5332 | - $required=$this->fields[$key]['required']; |
|
| 2010 | + $error = 0; |
|
| 5333 | 2011 | |
| 5334 | - $langfile=$this->fields[$key]['langfile']; |
|
| 5335 | - $list=$this->fields[$key]['list']; |
|
| 5336 | - $hidden=abs($this->fields[$key]['visible'])!=1?1:0; |
|
| 2012 | + if (! $this->table_element) {
|
|
| 2013 | + dol_syslog(get_class($this)."::setShippingMethod was called on objet with property table_element not defined",LOG_ERR); |
|
| 2014 | + return -1; |
|
| 2015 | + } |
|
| 5337 | 2016 | |
| 5338 | - $objectid = $this->id; |
|
| 2017 | + $this->db->begin(); |
|
| 5339 | 2018 | |
| 2019 | + if ($shipping_method_id<0) $shipping_method_id='NULL'; |
|
| 2020 | + dol_syslog(get_class($this).'::setShippingMethod('.$shipping_method_id.')');
|
|
| 5340 | 2021 | |
| 5341 | - if ($computed) |
|
| 5342 | - {
|
|
| 5343 | - if (! preg_match('/^search_/', $keyprefix)) return '<span class="opacitymedium">'.$langs->trans("AutomaticallyCalculated").'</span>';
|
|
| 5344 | - else return ''; |
|
| 5345 | - } |
|
| 2022 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 2023 | + $sql.= " SET fk_shipping_method = ".$shipping_method_id; |
|
| 2024 | + $sql.= " WHERE rowid=".$this->id; |
|
| 2025 | + $resql = $this->db->query($sql); |
|
| 2026 | + if (! $resql) {
|
|
| 2027 | + dol_syslog(get_class($this).'::setShippingMethod Error ', LOG_DEBUG); |
|
| 2028 | + $this->error = $this->db->lasterror(); |
|
| 2029 | + $error++; |
|
| 2030 | + } else {
|
|
| 2031 | + if (!$notrigger) |
|
| 2032 | + {
|
|
| 2033 | + // Call trigger |
|
| 2034 | + $this->context=array('shippingmethodupdate'=>1);
|
|
| 2035 | + $result = $this->call_trigger(strtoupper(get_class($this)) . '_MODIFY', $userused); |
|
| 2036 | + if ($result < 0) $error++; |
|
| 2037 | + // End call trigger |
|
| 2038 | + } |
|
| 2039 | + } |
|
| 2040 | + if ($error) |
|
| 2041 | + {
|
|
| 2042 | + $this->db->rollback(); |
|
| 2043 | + return -1; |
|
| 2044 | + } else {
|
|
| 2045 | + $this->shipping_method_id = ($shipping_method_id=='NULL')?null:$shipping_method_id; |
|
| 2046 | + $this->db->commit(); |
|
| 2047 | + return 1; |
|
| 2048 | + } |
|
| 2049 | + } |
|
| 5346 | 2050 | |
| 5347 | 2051 | |
| 5348 | - // Use in priority showsize from parameters, then $val['css'] then autodefine |
|
| 5349 | - if (empty($morecss) && ! empty($val['css'])) |
|
| 5350 | - {
|
|
| 5351 | - $showsize = $val['css']; |
|
| 5352 | - } |
|
| 5353 | - if (empty($morecss)) |
|
| 5354 | - {
|
|
| 5355 | - if ($type == 'date') |
|
| 5356 | - {
|
|
| 5357 | - $morecss = 'minwidth100imp'; |
|
| 5358 | - } |
|
| 5359 | - elseif ($type == 'datetime') |
|
| 5360 | - {
|
|
| 5361 | - $morecss = 'minwidth200imp'; |
|
| 5362 | - } |
|
| 5363 | - elseif (in_array($type,array('int','integer','price')) || preg_match('/^double(\([0-9],[0-9]\)){0,1}/',$type))
|
|
| 5364 | - {
|
|
| 5365 | - $morecss = 'maxwidth75'; |
|
| 5366 | - }elseif ($type == 'url') |
|
| 5367 | - {
|
|
| 5368 | - $morecss='minwidth400'; |
|
| 5369 | - } |
|
| 5370 | - elseif ($type == 'boolean') |
|
| 5371 | - {
|
|
| 5372 | - $morecss=''; |
|
| 5373 | - } |
|
| 5374 | - else |
|
| 5375 | - {
|
|
| 5376 | - if (round($size) < 12) |
|
| 5377 | - {
|
|
| 5378 | - $morecss = 'minwidth100'; |
|
| 5379 | - } |
|
| 5380 | - else if (round($size) <= 48) |
|
| 5381 | - {
|
|
| 5382 | - $morecss = 'minwidth200'; |
|
| 5383 | - } |
|
| 5384 | - else |
|
| 5385 | - {
|
|
| 5386 | - $morecss = 'minwidth400'; |
|
| 5387 | - } |
|
| 5388 | - } |
|
| 5389 | - } |
|
| 5390 | - |
|
| 5391 | - if (in_array($type,array('date','datetime')))
|
|
| 5392 | - {
|
|
| 5393 | - $tmp=explode(',',$size);
|
|
| 5394 | - $newsize=$tmp[0]; |
|
| 5395 | - |
|
| 5396 | - $showtime = in_array($type,array('datetime')) ? 1 : 0;
|
|
| 5397 | - |
|
| 5398 | - // Do not show current date when field not required (see selectDate() method) |
|
| 5399 | - if (!$required && $value == '') $value = '-1'; |
|
| 5400 | - |
|
| 5401 | - // TODO Must also support $moreparam |
|
| 5402 | - $out = $form->selectDate($value, $keyprefix.$key.$keysuffix, $showtime, $showtime, $required, '', 1, (($keyprefix != 'search_' && $keyprefix != 'search_options_') ? 1 : 0), 0, 1); |
|
| 5403 | - } |
|
| 5404 | - elseif (in_array($type,array('int','integer')))
|
|
| 5405 | - {
|
|
| 5406 | - $tmp=explode(',',$size);
|
|
| 5407 | - $newsize=$tmp[0]; |
|
| 5408 | - $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" maxlength="'.$newsize.'" value="'.dol_escape_htmltag($value).'"'.($moreparam?$moreparam:'').'>'; |
|
| 5409 | - } |
|
| 5410 | - elseif (preg_match('/varchar/', $type))
|
|
| 5411 | - {
|
|
| 5412 | - $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" maxlength="'.$size.'" value="'.dol_escape_htmltag($value).'"'.($moreparam?$moreparam:'').'>'; |
|
| 5413 | - } |
|
| 5414 | - elseif (in_array($type, array('mail', 'phone', 'url')))
|
|
| 5415 | - {
|
|
| 5416 | - $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam?$moreparam:'').'>'; |
|
| 5417 | - } |
|
| 5418 | - elseif ($type == 'text') |
|
| 5419 | - {
|
|
| 5420 | - if (! preg_match('/search_/', $keyprefix)) // If keyprefix is search_ or search_options_, we must just use a simple text field
|
|
| 5421 | - {
|
|
| 5422 | - require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php'; |
|
| 5423 | - $doleditor=new DolEditor($keyprefix.$key.$keysuffix,$value,'',200,'dolibarr_notes','In',false,false,false,ROWS_5,'90%'); |
|
| 5424 | - $out=$doleditor->Create(1); |
|
| 5425 | - } |
|
| 5426 | - else |
|
| 5427 | - {
|
|
| 5428 | - $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam?$moreparam:'').'>'; |
|
| 5429 | - } |
|
| 5430 | - } |
|
| 5431 | - elseif ($type == 'html') |
|
| 5432 | - {
|
|
| 5433 | - if (! preg_match('/search_/', $keyprefix)) // If keyprefix is search_ or search_options_, we must just use a simple text field
|
|
| 5434 | - {
|
|
| 5435 | - require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php'; |
|
| 5436 | - $doleditor = new DolEditor($keyprefix . $key . $keysuffix, $value, '', 200, 'dolibarr_notes', 'In', false, false, !empty(Globals::$conf->fckeditor->enabled) && Globals::$conf->global->FCKEDITOR_ENABLE_SOCIETE, ROWS_5, '90%'); |
|
| 5437 | - $out=$doleditor->Create(1); |
|
| 5438 | - } |
|
| 5439 | - else |
|
| 5440 | - {
|
|
| 5441 | - $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam?$moreparam:'').'>'; |
|
| 5442 | - } |
|
| 5443 | - } |
|
| 5444 | - elseif ($type == 'boolean') |
|
| 5445 | - {
|
|
| 5446 | - $checked=''; |
|
| 5447 | - if (!empty($value)) {
|
|
| 5448 | - $checked=' checked value="1" '; |
|
| 5449 | - } else {
|
|
| 5450 | - $checked=' value="1" '; |
|
| 5451 | - } |
|
| 5452 | - $out='<input type="checkbox" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.$checked.' '.($moreparam?$moreparam:'').'>'; |
|
| 5453 | - } |
|
| 5454 | - elseif ($type == 'price') |
|
| 5455 | - {
|
|
| 5456 | - if (!empty($value)) { // $value in memory is a php numeric, we format it into user number format.
|
|
| 5457 | - $value=price($value); |
|
| 5458 | - } |
|
| 5459 | - $out = '<input type="text" class="flat ' . $morecss . ' maxwidthonsmartphone" name="' . $keyprefix . $key . $keysuffix . '" id="' . $keyprefix . $key . $keysuffix . '" value="' . $value . '" ' . ($moreparam ? $moreparam : '') . '> ' . $langs->getCurrencySymbol(Globals::$conf->currency); |
|
| 5460 | - } |
|
| 5461 | - elseif (preg_match('/^double(\([0-9],[0-9]\)){0,1}/',$type))
|
|
| 5462 | - {
|
|
| 5463 | - if (!empty($value)) { // $value in memory is a php numeric, we format it into user number format.
|
|
| 5464 | - $value=price($value); |
|
| 5465 | - } |
|
| 5466 | - $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.$value.'" '.($moreparam?$moreparam:'').'> '; |
|
| 5467 | - } |
|
| 5468 | - elseif ($type == 'select') |
|
| 5469 | - {
|
|
| 5470 | - $out = ''; |
|
| 5471 | - if (!empty(Globals::$conf->use_javascript_ajax) && !empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_SELECT2)) {
|
|
| 5472 | - include_once DOL_DOCUMENT_ROOT . '/core/lib/ajax.lib.php'; |
|
| 5473 | - $out.= ajax_combobox($keyprefix.$key.$keysuffix, array(), 0); |
|
| 5474 | - } |
|
| 5475 | - |
|
| 5476 | - $out.='<select class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam?$moreparam:'').'>'; |
|
| 5477 | - if((! isset($this->fields[$key]['default'])) ||($this->fields[$key]['notnull']!=1))$out.='<option value="0"> </option>'; |
|
| 5478 | - foreach ($param['options'] as $key => $val) |
|
| 5479 | - {
|
|
| 5480 | - if ((string) $key == '') continue; |
|
| 5481 | - list($val, $parent) = explode('|', $val);
|
|
| 5482 | - $out.='<option value="'.$key.'"'; |
|
| 5483 | - $out.= (((string) $value == (string) $key)?' selected':''); |
|
| 5484 | - $out.= (!empty($parent)?' parent="'.$parent.'"':''); |
|
| 5485 | - $out.='>'.$val.'</option>'; |
|
| 5486 | - } |
|
| 5487 | - $out.='</select>'; |
|
| 5488 | - } |
|
| 5489 | - elseif ($type == 'sellist') |
|
| 5490 | - {
|
|
| 5491 | - $out = ''; |
|
| 5492 | - if (!empty(Globals::$conf->use_javascript_ajax) && !empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_SELECT2)) {
|
|
| 5493 | - include_once DOL_DOCUMENT_ROOT . '/core/lib/ajax.lib.php'; |
|
| 5494 | - $out.= ajax_combobox($keyprefix.$key.$keysuffix, array(), 0); |
|
| 5495 | - } |
|
| 5496 | - |
|
| 5497 | - $out.='<select class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam?$moreparam:'').'>'; |
|
| 5498 | - if (is_array($param['options'])) |
|
| 5499 | - {
|
|
| 5500 | - $param_list=array_keys($param['options']); |
|
| 5501 | - $InfoFieldList = explode(":", $param_list[0]);
|
|
| 5502 | - $parentName=''; |
|
| 5503 | - $parentField=''; |
|
| 5504 | - // 0 : tableName |
|
| 5505 | - // 1 : label field name |
|
| 5506 | - // 2 : key fields name (if differ of rowid) |
|
| 5507 | - // 3 : key field parent (for dependent lists) |
|
| 5508 | - // 4 : where clause filter on column or table extrafield, syntax field='value' or extra.field=value |
|
| 5509 | - $keyList=(empty($InfoFieldList[2])?'rowid':$InfoFieldList[2].' as rowid'); |
|
| 5510 | - |
|
| 5511 | - |
|
| 5512 | - if (count($InfoFieldList) > 4 && ! empty($InfoFieldList[4])) |
|
| 5513 | - {
|
|
| 5514 | - if (strpos($InfoFieldList[4], 'extra.') !== false) |
|
| 5515 | - {
|
|
| 5516 | - $keyList='main.'.$InfoFieldList[2].' as rowid'; |
|
| 5517 | - } else {
|
|
| 5518 | - $keyList=$InfoFieldList[2].' as rowid'; |
|
| 5519 | - } |
|
| 5520 | - } |
|
| 5521 | - if (count($InfoFieldList) > 3 && ! empty($InfoFieldList[3])) |
|
| 5522 | - {
|
|
| 5523 | - list($parentName, $parentField) = explode('|', $InfoFieldList[3]);
|
|
| 5524 | - $keyList.= ', '.$parentField; |
|
| 5525 | - } |
|
| 2052 | + /** |
|
| 2053 | + * Change the warehouse |
|
| 2054 | + * |
|
| 2055 | + * @param int $warehouse_id Id of warehouse |
|
| 2056 | + * @return int 1 if OK, 0 if KO |
|
| 2057 | + */ |
|
| 2058 | + function setWarehouse($warehouse_id) |
|
| 2059 | + {
|
|
| 2060 | + if (! $this->table_element) {
|
|
| 2061 | + dol_syslog(get_class($this)."::setWarehouse was called on objet with property table_element not defined",LOG_ERR); |
|
| 2062 | + return -1; |
|
| 2063 | + } |
|
| 2064 | + if ($warehouse_id<0) $warehouse_id='NULL'; |
|
| 2065 | + dol_syslog(get_class($this).'::setWarehouse('.$warehouse_id.')');
|
|
| 5526 | 2066 | |
| 5527 | - $fields_label = explode('|',$InfoFieldList[1]);
|
|
| 5528 | - if (is_array($fields_label)) |
|
| 5529 | - {
|
|
| 5530 | - $keyList .=', '; |
|
| 5531 | - $keyList .= implode(', ', $fields_label);
|
|
| 5532 | - } |
|
| 2067 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 2068 | + $sql.= " SET fk_warehouse = ".$warehouse_id; |
|
| 2069 | + $sql.= " WHERE rowid=".$this->id; |
|
| 5533 | 2070 | |
| 5534 | - $sqlwhere=''; |
|
| 5535 | - $sql = 'SELECT '.$keyList; |
|
| 5536 | - $sql.= ' FROM '.MAIN_DB_PREFIX .$InfoFieldList[0]; |
|
| 5537 | - if (!empty($InfoFieldList[4])) |
|
| 5538 | - {
|
|
| 5539 | - // can use SELECT request |
|
| 5540 | - if (strpos($InfoFieldList[4], '$SEL$')!==false) {
|
|
| 5541 | - $InfoFieldList[4]=str_replace('$SEL$','SELECT',$InfoFieldList[4]);
|
|
| 5542 | - } |
|
| 5543 | - |
|
| 5544 | - // current object id can be use into filter |
|
| 5545 | - if (strpos($InfoFieldList[4], '$ID$')!==false && !empty($objectid)) {
|
|
| 5546 | - $InfoFieldList[4]=str_replace('$ID$',$objectid,$InfoFieldList[4]);
|
|
| 5547 | - } else {
|
|
| 5548 | - $InfoFieldList[4]=str_replace('$ID$','0',$InfoFieldList[4]);
|
|
| 5549 | - } |
|
| 5550 | - //We have to join on extrafield table |
|
| 5551 | - if (strpos($InfoFieldList[4], 'extra')!==false) |
|
| 5552 | - {
|
|
| 5553 | - $sql.= ' as main, '.MAIN_DB_PREFIX .$InfoFieldList[0].'_extrafields as extra'; |
|
| 5554 | - $sqlwhere.= ' WHERE extra.fk_object=main.'.$InfoFieldList[2]. ' AND '.$InfoFieldList[4]; |
|
| 5555 | - } |
|
| 5556 | - else |
|
| 5557 | - {
|
|
| 5558 | - $sqlwhere.= ' WHERE '.$InfoFieldList[4]; |
|
| 5559 | - } |
|
| 5560 | - } |
|
| 5561 | - else |
|
| 5562 | - {
|
|
| 5563 | - $sqlwhere.= ' WHERE 1=1'; |
|
| 5564 | - } |
|
| 5565 | - // Some tables may have field, some other not. For the moment we disable it. |
|
| 5566 | - if (in_array($InfoFieldList[0],array('tablewithentity')))
|
|
| 5567 | - {
|
|
| 5568 | - $sqlwhere .= ' AND entity = ' . Globals::$conf->entity; |
|
| 5569 | - } |
|
| 5570 | - $sql.=$sqlwhere; |
|
| 5571 | - //print $sql; |
|
| 2071 | + if ($this->db->query($sql)) {
|
|
| 2072 | + $this->warehouse_id = ($warehouse_id=='NULL')?null:$warehouse_id; |
|
| 2073 | + return 1; |
|
| 2074 | + } else {
|
|
| 2075 | + dol_syslog(get_class($this).'::setWarehouse Error ', LOG_DEBUG); |
|
| 2076 | + $this->error=$this->db->error(); |
|
| 2077 | + return 0; |
|
| 2078 | + } |
|
| 2079 | + } |
|
| 5572 | 2080 | |
| 5573 | - $sql .= ' ORDER BY ' . implode(', ', $fields_label);
|
|
| 5574 | 2081 | |
| 5575 | - dol_syslog(get_class($this).'::showInputField type=sellist', LOG_DEBUG); |
|
| 5576 | - $resql = $this->db->query($sql); |
|
| 5577 | - if ($resql) |
|
| 5578 | - {
|
|
| 5579 | - $out.='<option value="0"> </option>'; |
|
| 5580 | - $num = $this->db->num_rows($resql); |
|
| 5581 | - $i = 0; |
|
| 5582 | - while ($i < $num) |
|
| 5583 | - {
|
|
| 5584 | - $labeltoshow=''; |
|
| 5585 | - $obj = $this->db->fetch_object($resql); |
|
| 5586 | - |
|
| 5587 | - // Several field into label (eq table:code|libelle:rowid) |
|
| 5588 | - $notrans = false; |
|
| 5589 | - $fields_label = explode('|',$InfoFieldList[1]);
|
|
| 5590 | - if (is_array($fields_label)) |
|
| 5591 | - {
|
|
| 5592 | - $notrans = true; |
|
| 5593 | - foreach ($fields_label as $field_toshow) |
|
| 5594 | - {
|
|
| 5595 | - $labeltoshow.= $obj->$field_toshow.' '; |
|
| 5596 | - } |
|
| 5597 | - } |
|
| 5598 | - else |
|
| 5599 | - {
|
|
| 5600 | - $labeltoshow=$obj->{$InfoFieldList[1]};
|
|
| 5601 | - } |
|
| 5602 | - $labeltoshow=dol_trunc($labeltoshow,45); |
|
| 5603 | - |
|
| 5604 | - if ($value == $obj->rowid) |
|
| 5605 | - {
|
|
| 5606 | - foreach ($fields_label as $field_toshow) |
|
| 5607 | - {
|
|
| 5608 | - $translabel=$langs->trans($obj->$field_toshow); |
|
| 5609 | - if ($translabel!=$obj->$field_toshow) {
|
|
| 5610 | - $labeltoshow=dol_trunc($translabel,18).' '; |
|
| 5611 | - }else {
|
|
| 5612 | - $labeltoshow=dol_trunc($obj->$field_toshow,18).' '; |
|
| 5613 | - } |
|
| 5614 | - } |
|
| 5615 | - $out.='<option value="'.$obj->rowid.'" selected>'.$labeltoshow.'</option>'; |
|
| 5616 | - } |
|
| 5617 | - else |
|
| 5618 | - {
|
|
| 5619 | - if (! $notrans) |
|
| 5620 | - {
|
|
| 5621 | - $translabel=$langs->trans($obj->{$InfoFieldList[1]});
|
|
| 5622 | - if ($translabel!=$obj->{$InfoFieldList[1]}) {
|
|
| 5623 | - $labeltoshow=dol_trunc($translabel,18); |
|
| 5624 | - } |
|
| 5625 | - else {
|
|
| 5626 | - $labeltoshow=dol_trunc($obj->{$InfoFieldList[1]},18);
|
|
| 5627 | - } |
|
| 5628 | - } |
|
| 5629 | - if (empty($labeltoshow)) $labeltoshow='(not defined)'; |
|
| 5630 | - if ($value==$obj->rowid) |
|
| 5631 | - {
|
|
| 5632 | - $out.='<option value="'.$obj->rowid.'" selected>'.$labeltoshow.'</option>'; |
|
| 5633 | - } |
|
| 2082 | + /** |
|
| 2083 | + * Set last model used by doc generator |
|
| 2084 | + * |
|
| 2085 | + * @param User $user User object that make change |
|
| 2086 | + * @param string $modelpdf Modele name |
|
| 2087 | + * @return int <0 if KO, >0 if OK |
|
| 2088 | + */ |
|
| 2089 | + function setDocModel($user, $modelpdf) |
|
| 2090 | + {
|
|
| 2091 | + if (! $this->table_element) |
|
| 2092 | + {
|
|
| 2093 | + dol_syslog(get_class($this)."::setDocModel was called on objet with property table_element not defined",LOG_ERR); |
|
| 2094 | + return -1; |
|
| 2095 | + } |
|
| 5634 | 2096 | |
| 5635 | - if (!empty($InfoFieldList[3]) && $parentField) |
|
| 5636 | - {
|
|
| 5637 | - $parent = $parentName.':'.$obj->{$parentField};
|
|
| 5638 | - } |
|
| 2097 | + $newmodelpdf=dol_trunc($modelpdf,255); |
|
| 5639 | 2098 | |
| 5640 | - $out.='<option value="'.$obj->rowid.'"'; |
|
| 5641 | - $out.= ($value==$obj->rowid?' selected':''); |
|
| 5642 | - $out.= (!empty($parent)?' parent="'.$parent.'"':''); |
|
| 5643 | - $out.='>'.$labeltoshow.'</option>'; |
|
| 5644 | - } |
|
| 2099 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 2100 | + $sql.= " SET model_pdf = '".$this->db->escape($newmodelpdf)."'"; |
|
| 2101 | + $sql.= " WHERE rowid = ".$this->id; |
|
| 2102 | + // if ($this->element == 'facture') $sql.= " AND fk_statut < 2"; |
|
| 2103 | + // if ($this->element == 'propal') $sql.= " AND fk_statut = 0"; |
|
| 5645 | 2104 | |
| 5646 | - $i++; |
|
| 5647 | - } |
|
| 5648 | - $this->db->free($resql); |
|
| 5649 | - } |
|
| 5650 | - else {
|
|
| 5651 | - print 'Error in request '.$sql.' '.$this->db->lasterror().'. Check setup of extra parameters.<br>'; |
|
| 5652 | - } |
|
| 5653 | - } |
|
| 5654 | - $out.='</select>'; |
|
| 5655 | - } |
|
| 5656 | - elseif ($type == 'checkbox') |
|
| 5657 | - {
|
|
| 5658 | - $value_arr=explode(',',$value);
|
|
| 5659 | - $out=$form->multiselectarray($keyprefix.$key.$keysuffix, (empty($param['options'])?null:$param['options']), $value_arr, '', 0, '', 0, '100%'); |
|
| 5660 | - } |
|
| 5661 | - elseif ($type == 'radio') |
|
| 5662 | - {
|
|
| 5663 | - $out=''; |
|
| 5664 | - foreach ($param['options'] as $keyopt => $val) |
|
| 5665 | - {
|
|
| 5666 | - $out.='<input class="flat '.$morecss.'" type="radio" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam?$moreparam:''); |
|
| 5667 | - $out.=' value="'.$keyopt.'"'; |
|
| 5668 | - $out.=' id="'.$keyprefix.$key.$keysuffix.'_'.$keyopt.'"'; |
|
| 5669 | - $out.= ($value==$keyopt?'checked':''); |
|
| 5670 | - $out.='/><label for="'.$keyprefix.$key.$keysuffix.'_'.$keyopt.'">'.$val.'</label><br>'; |
|
| 5671 | - } |
|
| 5672 | - } |
|
| 5673 | - elseif ($type == 'chkbxlst') |
|
| 5674 | - {
|
|
| 5675 | - if (is_array($value)) {
|
|
| 5676 | - $value_arr = $value; |
|
| 5677 | - } |
|
| 5678 | - else {
|
|
| 5679 | - $value_arr = explode(',', $value);
|
|
| 5680 | - } |
|
| 5681 | - |
|
| 5682 | - if (is_array($param['options'])) {
|
|
| 5683 | - $param_list = array_keys($param['options']); |
|
| 5684 | - $InfoFieldList = explode(":", $param_list[0]);
|
|
| 5685 | - $parentName=''; |
|
| 5686 | - $parentField=''; |
|
| 5687 | - // 0 : tableName |
|
| 5688 | - // 1 : label field name |
|
| 5689 | - // 2 : key fields name (if differ of rowid) |
|
| 5690 | - // 3 : key field parent (for dependent lists) |
|
| 5691 | - // 4 : where clause filter on column or table extrafield, syntax field='value' or extra.field=value |
|
| 5692 | - $keyList = (empty($InfoFieldList[2]) ? 'rowid' : $InfoFieldList[2] . ' as rowid'); |
|
| 5693 | - |
|
| 5694 | - if (count($InfoFieldList) > 3 && ! empty($InfoFieldList[3])) {
|
|
| 5695 | - list ( $parentName, $parentField ) = explode('|', $InfoFieldList[3]);
|
|
| 5696 | - $keyList .= ', ' . $parentField; |
|
| 5697 | - } |
|
| 5698 | - if (count($InfoFieldList) > 4 && ! empty($InfoFieldList[4])) {
|
|
| 5699 | - if (strpos($InfoFieldList[4], 'extra.') !== false) {
|
|
| 5700 | - $keyList = 'main.' . $InfoFieldList[2] . ' as rowid'; |
|
| 5701 | - } else {
|
|
| 5702 | - $keyList = $InfoFieldList[2] . ' as rowid'; |
|
| 5703 | - } |
|
| 5704 | - } |
|
| 2105 | + dol_syslog(get_class($this)."::setDocModel", LOG_DEBUG); |
|
| 2106 | + $resql=$this->db->query($sql); |
|
| 2107 | + if ($resql) |
|
| 2108 | + {
|
|
| 2109 | + $this->modelpdf=$modelpdf; |
|
| 2110 | + return 1; |
|
| 2111 | + } |
|
| 2112 | + else |
|
| 2113 | + {
|
|
| 2114 | + dol_print_error($this->db); |
|
| 2115 | + return 0; |
|
| 2116 | + } |
|
| 2117 | + } |
|
| 5705 | 2118 | |
| 5706 | - $fields_label = explode('|', $InfoFieldList[1]);
|
|
| 5707 | - if (is_array($fields_label)) {
|
|
| 5708 | - $keyList .= ', '; |
|
| 5709 | - $keyList .= implode(', ', $fields_label);
|
|
| 5710 | - } |
|
| 5711 | 2119 | |
| 5712 | - $sqlwhere = ''; |
|
| 5713 | - $sql = 'SELECT ' . $keyList; |
|
| 5714 | - $sql .= ' FROM ' . MAIN_DB_PREFIX . $InfoFieldList[0]; |
|
| 5715 | - if (! empty($InfoFieldList[4])) {
|
|
| 5716 | - |
|
| 5717 | - // can use SELECT request |
|
| 5718 | - if (strpos($InfoFieldList[4], '$SEL$')!==false) {
|
|
| 5719 | - $InfoFieldList[4]=str_replace('$SEL$','SELECT',$InfoFieldList[4]);
|
|
| 5720 | - } |
|
| 5721 | - |
|
| 5722 | - // current object id can be use into filter |
|
| 5723 | - if (strpos($InfoFieldList[4], '$ID$')!==false && !empty($objectid)) {
|
|
| 5724 | - $InfoFieldList[4]=str_replace('$ID$',$objectid,$InfoFieldList[4]);
|
|
| 5725 | - } else {
|
|
| 5726 | - $InfoFieldList[4]=str_replace('$ID$','0',$InfoFieldList[4]);
|
|
| 5727 | - } |
|
| 5728 | - |
|
| 5729 | - // We have to join on extrafield table |
|
| 5730 | - if (strpos($InfoFieldList[4], 'extra') !== false) {
|
|
| 5731 | - $sql .= ' as main, ' . MAIN_DB_PREFIX . $InfoFieldList[0] . '_extrafields as extra'; |
|
| 5732 | - $sqlwhere .= ' WHERE extra.fk_object=main.' . $InfoFieldList[2] . ' AND ' . $InfoFieldList[4]; |
|
| 5733 | - } else {
|
|
| 5734 | - $sqlwhere .= ' WHERE ' . $InfoFieldList[4]; |
|
| 5735 | - } |
|
| 5736 | - } else {
|
|
| 5737 | - $sqlwhere .= ' WHERE 1=1'; |
|
| 5738 | - } |
|
| 5739 | - // Some tables may have field, some other not. For the moment we disable it. |
|
| 5740 | - if (in_array($InfoFieldList[0], array ('tablewithentity')))
|
|
| 5741 | - {
|
|
| 5742 | - $sqlwhere .= ' AND entity = ' . Globals::$conf->entity; |
|
| 5743 | - } |
|
| 5744 | - // $sql.=preg_replace('/^ AND /','',$sqlwhere);
|
|
| 5745 | - // print $sql; |
|
| 5746 | - |
|
| 5747 | - $sql .= $sqlwhere; |
|
| 5748 | - dol_syslog(get_class($this) . '::showInputField type=chkbxlst',LOG_DEBUG); |
|
| 5749 | - $resql = $this->db->query($sql); |
|
| 5750 | - if ($resql) {
|
|
| 5751 | - $num = $this->db->num_rows($resql); |
|
| 5752 | - $i = 0; |
|
| 5753 | - |
|
| 5754 | - $data=array(); |
|
| 5755 | - |
|
| 5756 | - while ( $i < $num ) {
|
|
| 5757 | - $labeltoshow = ''; |
|
| 5758 | - $obj = $this->db->fetch_object($resql); |
|
| 5759 | - |
|
| 5760 | - $notrans = false; |
|
| 5761 | - // Several field into label (eq table:code|libelle:rowid) |
|
| 5762 | - $fields_label = explode('|', $InfoFieldList[1]);
|
|
| 5763 | - if (is_array($fields_label)) {
|
|
| 5764 | - $notrans = true; |
|
| 5765 | - foreach ( $fields_label as $field_toshow ) {
|
|
| 5766 | - $labeltoshow .= $obj->$field_toshow . ' '; |
|
| 5767 | - } |
|
| 5768 | - } else {
|
|
| 5769 | - $labeltoshow = $obj->{$InfoFieldList[1]};
|
|
| 5770 | - } |
|
| 5771 | - $labeltoshow = dol_trunc($labeltoshow, 45); |
|
| 5772 | - |
|
| 5773 | - if (is_array($value_arr) && in_array($obj->rowid, $value_arr)) {
|
|
| 5774 | - foreach ( $fields_label as $field_toshow ) {
|
|
| 5775 | - $translabel = $langs->trans($obj->$field_toshow); |
|
| 5776 | - if ($translabel != $obj->$field_toshow) {
|
|
| 5777 | - $labeltoshow = dol_trunc($translabel, 18) . ' '; |
|
| 5778 | - } else {
|
|
| 5779 | - $labeltoshow = dol_trunc($obj->$field_toshow, 18) . ' '; |
|
| 5780 | - } |
|
| 5781 | - } |
|
| 2120 | + /** |
|
| 2121 | + * Change the bank account |
|
| 2122 | + * |
|
| 2123 | + * @param int $fk_account Id of bank account |
|
| 2124 | + * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 2125 | + * @param User $userused Object user |
|
| 2126 | + * @return int 1 if OK, 0 if KO |
|
| 2127 | + */ |
|
| 2128 | + function setBankAccount($fk_account, $notrigger=false, $userused=null) |
|
| 2129 | + {
|
|
| 2130 | + global $user; |
|
| 5782 | 2131 | |
| 5783 | - $data[$obj->rowid]=$labeltoshow; |
|
| 5784 | - } else {
|
|
| 5785 | - if (! $notrans) {
|
|
| 5786 | - $translabel = $langs->trans($obj->{$InfoFieldList[1]});
|
|
| 5787 | - if ($translabel != $obj->{$InfoFieldList[1]}) {
|
|
| 5788 | - $labeltoshow = dol_trunc($translabel, 18); |
|
| 5789 | - } else {
|
|
| 5790 | - $labeltoshow = dol_trunc($obj->{$InfoFieldList[1]}, 18);
|
|
| 5791 | - } |
|
| 5792 | - } |
|
| 5793 | - if (empty($labeltoshow)) |
|
| 5794 | - $labeltoshow = '(not defined)'; |
|
| 2132 | + if (empty($userused)) $userused=$user; |
|
| 5795 | 2133 | |
| 5796 | - if (is_array($value_arr) && in_array($obj->rowid, $value_arr)) {
|
|
| 5797 | - $data[$obj->rowid]=$labeltoshow; |
|
| 5798 | - } |
|
| 2134 | + $error = 0; |
|
| 5799 | 2135 | |
| 5800 | - if (! empty($InfoFieldList[3]) && $parentField) {
|
|
| 5801 | - $parent = $parentName . ':' . $obj->{$parentField};
|
|
| 5802 | - } |
|
| 2136 | + if (! $this->table_element) {
|
|
| 2137 | + dol_syslog(get_class($this)."::setBankAccount was called on objet with property table_element not defined",LOG_ERR); |
|
| 2138 | + return -1; |
|
| 2139 | + } |
|
| 2140 | + $this->db->begin(); |
|
| 5803 | 2141 | |
| 5804 | - $data[$obj->rowid]=$labeltoshow; |
|
| 5805 | - } |
|
| 2142 | + if ($fk_account<0) $fk_account='NULL'; |
|
| 2143 | + dol_syslog(get_class($this).'::setBankAccount('.$fk_account.')');
|
|
| 5806 | 2144 | |
| 5807 | - $i ++; |
|
| 5808 | - } |
|
| 5809 | - $this->db->free($resql); |
|
| 2145 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 2146 | + $sql.= " SET fk_account = ".$fk_account; |
|
| 2147 | + $sql.= " WHERE rowid=".$this->id; |
|
| 5810 | 2148 | |
| 5811 | - $out=$form->multiselectarray($keyprefix.$key.$keysuffix, $data, $value_arr, '', 0, '', 0, '100%'); |
|
| 5812 | - } else {
|
|
| 5813 | - print 'Error in request ' . $sql . ' ' . $this->db->lasterror() . '. Check setup of extra parameters.<br>'; |
|
| 5814 | - } |
|
| 5815 | - } |
|
| 5816 | - } |
|
| 5817 | - elseif ($type == 'link') |
|
| 5818 | - {
|
|
| 5819 | - $param_list=array_keys($param['options']); // $param_list='ObjectName:classPath' |
|
| 5820 | - $showempty=(($required && $default != '')?0:1); |
|
| 5821 | - $out=$form->selectForForms($param_list[0], $keyprefix.$key.$keysuffix, $value, $showempty); |
|
| 5822 | - if (Globals::$conf->global->MAIN_FEATURES_LEVEL >= 2) {
|
|
| 5823 | - list($class,$classfile)=explode(':',$param_list[0]);
|
|
| 5824 | - if (file_exists(dol_buildpath(dirname(dirname($classfile)).'/card.php'))) $url_path=dol_buildpath(dirname(dirname($classfile)).'/card.php',1); |
|
| 5825 | - else $url_path=dol_buildpath(dirname(dirname($classfile)).'/'.$class.'_card.php',1); |
|
| 5826 | - $out.='<a class="butActionNew" href="'.$url_path.'?action=create&backtopage='.$_SERVER['PHP_SELF'].'"><span class="fa fa-plus-circle valignmiddle"></span></a>'; |
|
| 5827 | - // TODO Add Javascript code to add input fields contents to new elements urls |
|
| 5828 | - } |
|
| 5829 | - } |
|
| 5830 | - elseif ($type == 'password') |
|
| 5831 | - {
|
|
| 5832 | - // If prefix is 'search_', field is used as a filter, we use a common text field. |
|
| 5833 | - $out='<input type="'.($keyprefix=='search_'?'text':'password').'" class="flat '.$morecss.'" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.$value.'" '.($moreparam?$moreparam:'').'>'; |
|
| 5834 | - } |
|
| 5835 | - elseif ($type == 'array') |
|
| 5836 | - {
|
|
| 5837 | - $newval = $val; |
|
| 5838 | - $newval['type'] = 'varchar(256)'; |
|
| 5839 | - |
|
| 5840 | - $out=''; |
|
| 5841 | - |
|
| 5842 | - $inputs = array(); |
|
| 5843 | - if(! empty($value)) {
|
|
| 5844 | - foreach($value as $option) {
|
|
| 5845 | - $out.= '<span><a class="'.dol_escape_htmltag($keyprefix.$key.$keysuffix).'_del" href="javascript:;"><span class="fa fa-minus-circle valignmiddle"></span></a> '; |
|
| 5846 | - $out.= $this->showInputField($newval, $keyprefix.$key.$keysuffix.'[]', $option, $moreparam, '', '', $showsize).'<br></span>'; |
|
| 5847 | - } |
|
| 5848 | - } |
|
| 2149 | + $resql = $this->db->query($sql); |
|
| 2150 | + if (! $resql) |
|
| 2151 | + {
|
|
| 2152 | + dol_syslog(get_class($this).'::setBankAccount Error '.$sql.' - '.$this->db->error()); |
|
| 2153 | + $this->error = $this->db->lasterror(); |
|
| 2154 | + $error++; |
|
| 2155 | + } |
|
| 2156 | + else |
|
| 2157 | + {
|
|
| 2158 | + if (!$notrigger) |
|
| 2159 | + {
|
|
| 2160 | + // Call trigger |
|
| 2161 | + $this->context=array('bankaccountupdate'=>1);
|
|
| 2162 | + $result = $this->call_trigger(strtoupper(get_class($this)) . '_MODIFY', $userused); |
|
| 2163 | + if ($result < 0) $error++; |
|
| 2164 | + // End call trigger |
|
| 2165 | + } |
|
| 2166 | + } |
|
| 2167 | + if ($error) |
|
| 2168 | + {
|
|
| 2169 | + $this->db->rollback(); |
|
| 2170 | + return -1; |
|
| 2171 | + } |
|
| 2172 | + else |
|
| 2173 | + {
|
|
| 2174 | + $this->fk_account = ($fk_account=='NULL')?null:$fk_account; |
|
| 2175 | + $this->db->commit(); |
|
| 2176 | + return 1; |
|
| 2177 | + } |
|
| 2178 | + } |
|
| 5849 | 2179 | |
| 5850 | - $out.= '<a id="'.dol_escape_htmltag($keyprefix.$key.$keysuffix).'_add" href="javascript:;"><span class="fa fa-plus-circle valignmiddle"></span></a>'; |
|
| 5851 | 2180 | |
| 5852 | - $newInput = '<span><a class="'.dol_escape_htmltag($keyprefix.$key.$keysuffix).'_del" href="javascript:;"><span class="fa fa-minus-circle valignmiddle"></span></a> '; |
|
| 5853 | - $newInput.= $this->showInputField($newval, $keyprefix.$key.$keysuffix.'[]', '', $moreparam, '', '', $showsize).'<br></span>'; |
|
| 2181 | + // TODO: Move line related operations to CommonObjectLine? |
|
| 5854 | 2182 | |
| 5855 | - if (!empty(Globals::$conf->use_javascript_ajax)) {
|
|
| 5856 | - $out.= ' |
|
| 5857 | - <script type="text/javascript"> |
|
| 5858 | - $(document).ready(function() {
|
|
| 5859 | - $("a#'.dol_escape_js($keyprefix.$key.$keysuffix).'_add").click(function() {
|
|
| 5860 | - $("'.dol_escape_js($newInput).'").insertBefore(this);
|
|
| 5861 | - }); |
|
| 2183 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2184 | + /** |
|
| 2185 | + * Save a new position (field rang) for details lines. |
|
| 2186 | + * You can choose to set position for lines with already a position or lines without any position defined. |
|
| 2187 | + * |
|
| 2188 | + * @param boolean $renum True to renum all already ordered lines, false to renum only not already ordered lines. |
|
| 2189 | + * @param string $rowidorder ASC or DESC |
|
| 2190 | + * @param boolean $fk_parent_line Table with fk_parent_line field or not |
|
| 2191 | + * @return int <0 if KO, >0 if OK |
|
| 2192 | + */ |
|
| 2193 | + function line_order($renum=false, $rowidorder='ASC', $fk_parent_line=true) |
|
| 2194 | + {
|
|
| 2195 | + // phpcs:enable |
|
| 2196 | + if (! $this->table_element_line) |
|
| 2197 | + {
|
|
| 2198 | + dol_syslog(get_class($this)."::line_order was called on objet with property table_element_line not defined",LOG_ERR); |
|
| 2199 | + return -1; |
|
| 2200 | + } |
|
| 2201 | + if (! $this->fk_element) |
|
| 2202 | + {
|
|
| 2203 | + dol_syslog(get_class($this)."::line_order was called on objet with property fk_element not defined",LOG_ERR); |
|
| 2204 | + return -1; |
|
| 2205 | + } |
|
| 2206 | + |
|
| 2207 | + // Count number of lines to reorder (according to choice $renum) |
|
| 2208 | + $nl=0; |
|
| 2209 | + $sql = 'SELECT count(rowid) FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2210 | + $sql.= ' WHERE '.$this->fk_element.'='.$this->id; |
|
| 2211 | + if (! $renum) $sql.= ' AND rang = 0'; |
|
| 2212 | + if ($renum) $sql.= ' AND rang <> 0'; |
|
| 2213 | + |
|
| 2214 | + dol_syslog(get_class($this)."::line_order", LOG_DEBUG); |
|
| 2215 | + $resql = $this->db->query($sql); |
|
| 2216 | + if ($resql) |
|
| 2217 | + {
|
|
| 2218 | + $row = $this->db->fetch_row($resql); |
|
| 2219 | + $nl = $row[0]; |
|
| 2220 | + } |
|
| 2221 | + else dol_print_error($this->db); |
|
| 2222 | + if ($nl > 0) |
|
| 2223 | + {
|
|
| 2224 | + // The goal of this part is to reorder all lines, with all children lines sharing the same |
|
| 2225 | + // counter that parents. |
|
| 2226 | + $rows=array(); |
|
| 2227 | + |
|
| 2228 | + // We first search all lines that are parent lines (for multilevel details lines) |
|
| 2229 | + $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2230 | + $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2231 | + if ($fk_parent_line) $sql.= ' AND fk_parent_line IS NULL'; |
|
| 2232 | + $sql.= ' ORDER BY rang ASC, rowid '.$rowidorder; |
|
| 2233 | + |
|
| 2234 | + dol_syslog(get_class($this)."::line_order search all parent lines", LOG_DEBUG); |
|
| 2235 | + $resql = $this->db->query($sql); |
|
| 2236 | + if ($resql) |
|
| 2237 | + {
|
|
| 2238 | + $i=0; |
|
| 2239 | + $num = $this->db->num_rows($resql); |
|
| 2240 | + while ($i < $num) |
|
| 2241 | + {
|
|
| 2242 | + $row = $this->db->fetch_row($resql); |
|
| 2243 | + $rows[] = $row[0]; // Add parent line into array rows |
|
| 2244 | + $childrens = $this->getChildrenOfLine($row[0]); |
|
| 2245 | + if (! empty($childrens)) |
|
| 2246 | + {
|
|
| 2247 | + foreach($childrens as $child) |
|
| 2248 | + {
|
|
| 2249 | + array_push($rows, $child); |
|
| 2250 | + } |
|
| 2251 | + } |
|
| 2252 | + $i++; |
|
| 2253 | + } |
|
| 2254 | + |
|
| 2255 | + // Now we set a new number for each lines (parent and children with children included into parent tree) |
|
| 2256 | + if (! empty($rows)) |
|
| 2257 | + {
|
|
| 2258 | + foreach($rows as $key => $row) |
|
| 2259 | + {
|
|
| 2260 | + $this->updateRangOfLine($row, ($key+1)); |
|
| 2261 | + } |
|
| 2262 | + } |
|
| 2263 | + } |
|
| 2264 | + else |
|
| 2265 | + {
|
|
| 2266 | + dol_print_error($this->db); |
|
| 2267 | + } |
|
| 2268 | + } |
|
| 2269 | + return 1; |
|
| 2270 | + } |
|
| 2271 | + |
|
| 2272 | + /** |
|
| 2273 | + * Get children of line |
|
| 2274 | + * |
|
| 2275 | + * @param int $id Id of parent line |
|
| 2276 | + * @return array Array with list of children lines id |
|
| 2277 | + */ |
|
| 2278 | + function getChildrenOfLine($id) |
|
| 2279 | + {
|
|
| 2280 | + $rows=array(); |
|
| 2281 | + |
|
| 2282 | + $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2283 | + $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2284 | + $sql.= ' AND fk_parent_line = '.$id; |
|
| 2285 | + $sql.= ' ORDER BY rang ASC'; |
|
| 2286 | + |
|
| 2287 | + dol_syslog(get_class($this)."::getChildrenOfLine search children lines for line ".$id."", LOG_DEBUG); |
|
| 2288 | + $resql = $this->db->query($sql); |
|
| 2289 | + if ($resql) |
|
| 2290 | + {
|
|
| 2291 | + $i=0; |
|
| 2292 | + $num = $this->db->num_rows($resql); |
|
| 2293 | + while ($i < $num) |
|
| 2294 | + {
|
|
| 2295 | + $row = $this->db->fetch_row($resql); |
|
| 2296 | + $rows[$i] = $row[0]; |
|
| 2297 | + $i++; |
|
| 2298 | + } |
|
| 2299 | + } |
|
| 2300 | + |
|
| 2301 | + return $rows; |
|
| 2302 | + } |
|
| 2303 | + |
|
| 2304 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2305 | + /** |
|
| 2306 | + * Update a line to have a lower rank |
|
| 2307 | + * |
|
| 2308 | + * @param int $rowid Id of line |
|
| 2309 | + * @param boolean $fk_parent_line Table with fk_parent_line field or not |
|
| 2310 | + * @return void |
|
| 2311 | + */ |
|
| 2312 | + function line_up($rowid, $fk_parent_line=true) |
|
| 2313 | + {
|
|
| 2314 | + // phpcs:enable |
|
| 2315 | + $this->line_order(false, 'ASC', $fk_parent_line); |
|
| 2316 | + |
|
| 2317 | + // Get rang of line |
|
| 2318 | + $rang = $this->getRangOfLine($rowid); |
|
| 2319 | + |
|
| 2320 | + // Update position of line |
|
| 2321 | + $this->updateLineUp($rowid, $rang); |
|
| 2322 | + } |
|
| 2323 | + |
|
| 2324 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2325 | + /** |
|
| 2326 | + * Update a line to have a higher rank |
|
| 2327 | + * |
|
| 2328 | + * @param int $rowid Id of line |
|
| 2329 | + * @param boolean $fk_parent_line Table with fk_parent_line field or not |
|
| 2330 | + * @return void |
|
| 2331 | + */ |
|
| 2332 | + function line_down($rowid, $fk_parent_line=true) |
|
| 2333 | + {
|
|
| 2334 | + // phpcs:enable |
|
| 2335 | + $this->line_order(false, 'ASC', $fk_parent_line); |
|
| 2336 | + |
|
| 2337 | + // Get rang of line |
|
| 2338 | + $rang = $this->getRangOfLine($rowid); |
|
| 2339 | + |
|
| 2340 | + // Get max value for rang |
|
| 2341 | + $max = $this->line_max(); |
|
| 2342 | + |
|
| 2343 | + // Update position of line |
|
| 2344 | + $this->updateLineDown($rowid, $rang, $max); |
|
| 2345 | + } |
|
| 2346 | + |
|
| 2347 | + /** |
|
| 2348 | + * Update position of line (rang) |
|
| 2349 | + * |
|
| 2350 | + * @param int $rowid Id of line |
|
| 2351 | + * @param int $rang Position |
|
| 2352 | + * @return void |
|
| 2353 | + */ |
|
| 2354 | + function updateRangOfLine($rowid,$rang) |
|
| 2355 | + {
|
|
| 2356 | + $fieldposition = 'rang'; |
|
| 2357 | + if (in_array($this->table_element_line, array('ecm_files', 'emailcollector_emailcollectoraction'))) $fieldposition = 'position';
|
|
| 2358 | + |
|
| 2359 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.$rang; |
|
| 2360 | + $sql.= ' WHERE rowid = '.$rowid; |
|
| 2361 | + |
|
| 2362 | + dol_syslog(get_class($this)."::updateRangOfLine", LOG_DEBUG); |
|
| 2363 | + if (! $this->db->query($sql)) |
|
| 2364 | + {
|
|
| 2365 | + dol_print_error($this->db); |
|
| 2366 | + } |
|
| 2367 | + } |
|
| 2368 | + |
|
| 2369 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2370 | + /** |
|
| 2371 | + * Update position of line with ajax (rang) |
|
| 2372 | + * |
|
| 2373 | + * @param array $rows Array of rows |
|
| 2374 | + * @return void |
|
| 2375 | + */ |
|
| 2376 | + function line_ajaxorder($rows) |
|
| 2377 | + {
|
|
| 2378 | + // phpcs:enable |
|
| 2379 | + $num = count($rows); |
|
| 2380 | + for ($i = 0 ; $i < $num ; $i++) |
|
| 2381 | + {
|
|
| 2382 | + $this->updateRangOfLine($rows[$i], ($i+1)); |
|
| 2383 | + } |
|
| 2384 | + } |
|
| 2385 | + |
|
| 2386 | + /** |
|
| 2387 | + * Update position of line up (rang) |
|
| 2388 | + * |
|
| 2389 | + * @param int $rowid Id of line |
|
| 2390 | + * @param int $rang Position |
|
| 2391 | + * @return void |
|
| 2392 | + */ |
|
| 2393 | + function updateLineUp($rowid,$rang) |
|
| 2394 | + {
|
|
| 2395 | + if ($rang > 1) |
|
| 2396 | + {
|
|
| 2397 | + $fieldposition = 'rang'; |
|
| 2398 | + if (in_array($this->table_element_line, array('ecm_files', 'emailcollector_emailcollectoraction'))) $fieldposition = 'position';
|
|
| 2399 | + |
|
| 2400 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.$rang ; |
|
| 2401 | + $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2402 | + $sql.= ' AND rang = '.($rang - 1); |
|
| 2403 | + if ($this->db->query($sql) ) |
|
| 2404 | + {
|
|
| 2405 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.($rang - 1); |
|
| 2406 | + $sql.= ' WHERE rowid = '.$rowid; |
|
| 2407 | + if (! $this->db->query($sql) ) |
|
| 2408 | + {
|
|
| 2409 | + dol_print_error($this->db); |
|
| 2410 | + } |
|
| 2411 | + } |
|
| 2412 | + else |
|
| 2413 | + {
|
|
| 2414 | + dol_print_error($this->db); |
|
| 2415 | + } |
|
| 2416 | + } |
|
| 2417 | + } |
|
| 2418 | + |
|
| 2419 | + /** |
|
| 2420 | + * Update position of line down (rang) |
|
| 2421 | + * |
|
| 2422 | + * @param int $rowid Id of line |
|
| 2423 | + * @param int $rang Position |
|
| 2424 | + * @param int $max Max |
|
| 2425 | + * @return void |
|
| 2426 | + */ |
|
| 2427 | + function updateLineDown($rowid,$rang,$max) |
|
| 2428 | + {
|
|
| 2429 | + if ($rang < $max) |
|
| 2430 | + {
|
|
| 2431 | + $fieldposition = 'rang'; |
|
| 2432 | + if (in_array($this->table_element_line, array('ecm_files', 'emailcollector_emailcollectoraction'))) $fieldposition = 'position';
|
|
| 2433 | + |
|
| 2434 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.$rang; |
|
| 2435 | + $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2436 | + $sql.= ' AND rang = '.($rang+1); |
|
| 2437 | + if ($this->db->query($sql) ) |
|
| 2438 | + {
|
|
| 2439 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element_line.' SET '.$fieldposition.' = '.($rang+1); |
|
| 2440 | + $sql.= ' WHERE rowid = '.$rowid; |
|
| 2441 | + if (! $this->db->query($sql) ) |
|
| 2442 | + {
|
|
| 2443 | + dol_print_error($this->db); |
|
| 2444 | + } |
|
| 2445 | + } |
|
| 2446 | + else |
|
| 2447 | + {
|
|
| 2448 | + dol_print_error($this->db); |
|
| 2449 | + } |
|
| 2450 | + } |
|
| 2451 | + } |
|
| 2452 | + |
|
| 2453 | + /** |
|
| 2454 | + * Get position of line (rang) |
|
| 2455 | + * |
|
| 2456 | + * @param int $rowid Id of line |
|
| 2457 | + * @return int Value of rang in table of lines |
|
| 2458 | + */ |
|
| 2459 | + function getRangOfLine($rowid) |
|
| 2460 | + {
|
|
| 2461 | + $sql = 'SELECT rang FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2462 | + $sql.= ' WHERE rowid ='.$rowid; |
|
| 2463 | + |
|
| 2464 | + dol_syslog(get_class($this)."::getRangOfLine", LOG_DEBUG); |
|
| 2465 | + $resql = $this->db->query($sql); |
|
| 2466 | + if ($resql) |
|
| 2467 | + {
|
|
| 2468 | + $row = $this->db->fetch_row($resql); |
|
| 2469 | + return $row[0]; |
|
| 2470 | + } |
|
| 2471 | + } |
|
| 2472 | + |
|
| 2473 | + /** |
|
| 2474 | + * Get rowid of the line relative to its position |
|
| 2475 | + * |
|
| 2476 | + * @param int $rang Rang value |
|
| 2477 | + * @return int Rowid of the line |
|
| 2478 | + */ |
|
| 2479 | + function getIdOfLine($rang) |
|
| 2480 | + {
|
|
| 2481 | + $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2482 | + $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2483 | + $sql.= ' AND rang = '.$rang; |
|
| 2484 | + $resql = $this->db->query($sql); |
|
| 2485 | + if ($resql) |
|
| 2486 | + {
|
|
| 2487 | + $row = $this->db->fetch_row($resql); |
|
| 2488 | + return $row[0]; |
|
| 2489 | + } |
|
| 2490 | + } |
|
| 2491 | + |
|
| 2492 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2493 | + /** |
|
| 2494 | + * Get max value used for position of line (rang) |
|
| 2495 | + * |
|
| 2496 | + * @param int $fk_parent_line Parent line id |
|
| 2497 | + * @return int Max value of rang in table of lines |
|
| 2498 | + */ |
|
| 2499 | + function line_max($fk_parent_line=0) |
|
| 2500 | + {
|
|
| 2501 | + // phpcs:enable |
|
| 2502 | + // Search the last rang with fk_parent_line |
|
| 2503 | + if ($fk_parent_line) |
|
| 2504 | + {
|
|
| 2505 | + $sql = 'SELECT max(rang) FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2506 | + $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2507 | + $sql.= ' AND fk_parent_line = '.$fk_parent_line; |
|
| 2508 | + |
|
| 2509 | + dol_syslog(get_class($this)."::line_max", LOG_DEBUG); |
|
| 2510 | + $resql = $this->db->query($sql); |
|
| 2511 | + if ($resql) |
|
| 2512 | + {
|
|
| 2513 | + $row = $this->db->fetch_row($resql); |
|
| 2514 | + if (! empty($row[0])) |
|
| 2515 | + {
|
|
| 2516 | + return $row[0]; |
|
| 2517 | + } |
|
| 2518 | + else |
|
| 2519 | + {
|
|
| 2520 | + return $this->getRangOfLine($fk_parent_line); |
|
| 2521 | + } |
|
| 2522 | + } |
|
| 2523 | + } |
|
| 2524 | + // If not, search the last rang of element |
|
| 2525 | + else |
|
| 2526 | + {
|
|
| 2527 | + $sql = 'SELECT max(rang) FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2528 | + $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2529 | + |
|
| 2530 | + dol_syslog(get_class($this)."::line_max", LOG_DEBUG); |
|
| 2531 | + $resql = $this->db->query($sql); |
|
| 2532 | + if ($resql) |
|
| 2533 | + {
|
|
| 2534 | + $row = $this->db->fetch_row($resql); |
|
| 2535 | + return $row[0]; |
|
| 2536 | + } |
|
| 2537 | + } |
|
| 2538 | + } |
|
| 2539 | + |
|
| 2540 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2541 | + /** |
|
| 2542 | + * Update external ref of element |
|
| 2543 | + * |
|
| 2544 | + * @param string $ref_ext Update field ref_ext |
|
| 2545 | + * @return int <0 if KO, >0 if OK |
|
| 2546 | + */ |
|
| 2547 | + function update_ref_ext($ref_ext) |
|
| 2548 | + {
|
|
| 2549 | + // phpcs:enable |
|
| 2550 | + if (! $this->table_element) |
|
| 2551 | + {
|
|
| 2552 | + dol_syslog(get_class($this)."::update_ref_ext was called on objet with property table_element not defined", LOG_ERR); |
|
| 2553 | + return -1; |
|
| 2554 | + } |
|
| 2555 | + |
|
| 2556 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 2557 | + $sql.= " SET ref_ext = '".$this->db->escape($ref_ext)."'"; |
|
| 2558 | + $sql.= " WHERE ".(isset($this->table_rowid)?$this->table_rowid:'rowid')." = ". $this->id; |
|
| 2559 | + |
|
| 2560 | + dol_syslog(get_class($this)."::update_ref_ext", LOG_DEBUG); |
|
| 2561 | + if ($this->db->query($sql)) |
|
| 2562 | + {
|
|
| 2563 | + $this->ref_ext = $ref_ext; |
|
| 2564 | + return 1; |
|
| 2565 | + } |
|
| 2566 | + else |
|
| 2567 | + {
|
|
| 2568 | + $this->error=$this->db->error(); |
|
| 2569 | + return -1; |
|
| 2570 | + } |
|
| 2571 | + } |
|
| 2572 | + |
|
| 2573 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2574 | + /** |
|
| 2575 | + * Update note of element |
|
| 2576 | + * |
|
| 2577 | + * @param string $note New value for note |
|
| 2578 | + * @param string $suffix '', '_public' or '_private' |
|
| 2579 | + * @return int <0 if KO, >0 if OK |
|
| 2580 | + */ |
|
| 2581 | + function update_note($note, $suffix='') |
|
| 2582 | + {
|
|
| 2583 | + // phpcs:enable |
|
| 2584 | + global $user; |
|
| 2585 | + |
|
| 2586 | + if (! $this->table_element) |
|
| 2587 | + {
|
|
| 2588 | + $this->error='update_note was called on objet with property table_element not defined'; |
|
| 2589 | + dol_syslog(get_class($this)."::update_note was called on objet with property table_element not defined", LOG_ERR); |
|
| 2590 | + return -1; |
|
| 2591 | + } |
|
| 2592 | + if (! in_array($suffix,array('','_public','_private')))
|
|
| 2593 | + {
|
|
| 2594 | + $this->error='update_note Parameter suffix must be empty, \'_private\' or \'_public\''; |
|
| 2595 | + dol_syslog(get_class($this)."::update_note Parameter suffix must be empty, '_private' or '_public'", LOG_ERR); |
|
| 2596 | + return -2; |
|
| 2597 | + } |
|
| 2598 | + // Special cas |
|
| 2599 | + //var_dump($this->table_element);exit; |
|
| 2600 | + if ($this->table_element == 'product') $suffix=''; |
|
| 2601 | + |
|
| 2602 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element; |
|
| 2603 | + $sql.= " SET note".$suffix." = ".(!empty($note)?("'".$this->db->escape($note)."'"):"NULL");
|
|
| 2604 | + $sql.= " ,".(in_array($this->table_element, array('actioncomm', 'adherent', 'advtargetemailing', 'cronjob', 'establishment'))?"fk_user_mod":"fk_user_modif")." = ".$user->id;
|
|
| 2605 | + $sql.= " WHERE rowid =". $this->id; |
|
| 2606 | + |
|
| 2607 | + dol_syslog(get_class($this)."::update_note", LOG_DEBUG); |
|
| 2608 | + if ($this->db->query($sql)) |
|
| 2609 | + {
|
|
| 2610 | + if ($suffix == '_public') $this->note_public = $note; |
|
| 2611 | + else if ($suffix == '_private') $this->note_private = $note; |
|
| 2612 | + else |
|
| 2613 | + {
|
|
| 2614 | + $this->note = $note; // deprecated |
|
| 2615 | + $this->note_private = $note; |
|
| 2616 | + } |
|
| 2617 | + return 1; |
|
| 2618 | + } |
|
| 2619 | + else |
|
| 2620 | + {
|
|
| 2621 | + $this->error=$this->db->lasterror(); |
|
| 2622 | + return -1; |
|
| 2623 | + } |
|
| 2624 | + } |
|
| 2625 | + |
|
| 2626 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2627 | + /** |
|
| 2628 | + * Update public note (kept for backward compatibility) |
|
| 2629 | + * |
|
| 2630 | + * @param string $note New value for note |
|
| 2631 | + * @return int <0 if KO, >0 if OK |
|
| 2632 | + * @deprecated |
|
| 2633 | + * @see update_note() |
|
| 2634 | + */ |
|
| 2635 | + function update_note_public($note) |
|
| 2636 | + {
|
|
| 2637 | + // phpcs:enable |
|
| 2638 | + return $this->update_note($note,'_public'); |
|
| 2639 | + } |
|
| 2640 | + |
|
| 2641 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2642 | + /** |
|
| 2643 | + * Update total_ht, total_ttc, total_vat, total_localtax1, total_localtax2 for an object (sum of lines). |
|
| 2644 | + * Must be called at end of methods addline or updateline. |
|
| 2645 | + * |
|
| 2646 | + * @param int $exclspec >0 = Exclude special product (product_type=9) |
|
| 2647 | + * @param string $roundingadjust 'none'=Do nothing, 'auto'=Use default method (MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND if defined, or '0'), '0'=Force mode total of rounding, '1'=Force mode rounding of total |
|
| 2648 | + * @param int $nodatabaseupdate 1=Do not update database. Update only properties of object. |
|
| 2649 | + * @param Societe $seller If roundingadjust is '0' or '1' or maybe 'auto', it means we recalculate total for lines before calculating total for object and for this, we need seller object. |
|
| 2650 | + * @return int <0 if KO, >0 if OK |
|
| 2651 | + */ |
|
| 2652 | + function update_price($exclspec=0,$roundingadjust='none',$nodatabaseupdate=0,$seller=null) |
|
| 2653 | + {
|
|
| 2654 | + // phpcs:enable |
|
| 2655 | + global $conf, $hookmanager, $action; |
|
| 2656 | + |
|
| 2657 | + // Some external module want no update price after a trigger because they have another method to calculate the total (ex: with an extrafield) |
|
| 2658 | + $MODULE = ""; |
|
| 2659 | + if ($this->element == 'propal') |
|
| 2660 | + $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_PROPOSAL"; |
|
| 2661 | + elseif ($this->element == 'order') |
|
| 2662 | + $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_ORDER"; |
|
| 2663 | + elseif ($this->element == 'facture') |
|
| 2664 | + $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_INVOICE"; |
|
| 2665 | + elseif ($this->element == 'facture_fourn') |
|
| 2666 | + $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_SUPPLIER_INVOICE"; |
|
| 2667 | + elseif ($this->element == 'order_supplier') |
|
| 2668 | + $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_SUPPLIER_ORDER"; |
|
| 2669 | + elseif ($this->element == 'supplier_proposal') |
|
| 2670 | + $MODULE = "MODULE_DISALLOW_UPDATE_PRICE_SUPPLIER_PROPOSAL"; |
|
| 2671 | + |
|
| 2672 | + if (! empty($MODULE)) {
|
|
| 2673 | + if (!empty(Globals::$conf->global->$MODULE)) {
|
|
| 2674 | + $modsactivated = explode(',', Globals::$conf->global->$MODULE);
|
|
| 2675 | + foreach ($modsactivated as $mod) {
|
|
| 2676 | + if (Globals::$conf->$mod->enabled) |
|
| 2677 | + return 1; // update was disabled by specific setup |
|
| 2678 | + } |
|
| 2679 | + } |
|
| 2680 | + } |
|
| 2681 | + |
|
| 2682 | + include_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php'; |
|
| 2683 | + |
|
| 2684 | + if ($roundingadjust == '-1') $roundingadjust='auto'; // For backward compatibility |
|
| 2685 | + |
|
| 2686 | + $forcedroundingmode=$roundingadjust; |
|
| 2687 | + if ($forcedroundingmode == 'auto' && isset(Globals::$conf->global->MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND)) |
|
| 2688 | + $forcedroundingmode = Globals::$conf->global->MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND; |
|
| 2689 | + elseif ($forcedroundingmode == 'auto') $forcedroundingmode='0'; |
|
| 2690 | + |
|
| 2691 | + $error=0; |
|
| 2692 | + |
|
| 2693 | + $multicurrency_tx = !empty($this->multicurrency_tx) ? $this->multicurrency_tx : 1; |
|
| 2694 | + |
|
| 2695 | + // Define constants to find lines to sum |
|
| 2696 | + $fieldtva='total_tva'; |
|
| 2697 | + $fieldlocaltax1='total_localtax1'; |
|
| 2698 | + $fieldlocaltax2='total_localtax2'; |
|
| 2699 | + $fieldup='subprice'; |
|
| 2700 | + if ($this->element == 'facture_fourn' || $this->element == 'invoice_supplier') |
|
| 2701 | + {
|
|
| 2702 | + $fieldtva='tva'; |
|
| 2703 | + $fieldup='pu_ht'; |
|
| 2704 | + } |
|
| 2705 | + if ($this->element == 'expensereport') |
|
| 2706 | + {
|
|
| 2707 | + $fieldup='value_unit'; |
|
| 2708 | + } |
|
| 2709 | + |
|
| 2710 | + $sql = 'SELECT rowid, qty, '.$fieldup.' as up, remise_percent, total_ht, '.$fieldtva.' as total_tva, total_ttc, '.$fieldlocaltax1.' as total_localtax1, '.$fieldlocaltax2.' as total_localtax2,'; |
|
| 2711 | + $sql.= ' tva_tx as vatrate, localtax1_tx, localtax2_tx, localtax1_type, localtax2_type, info_bits, product_type'; |
|
| 2712 | + if ($this->table_element_line == 'facturedet') $sql.= ', situation_percent'; |
|
| 2713 | + $sql.= ', multicurrency_total_ht, multicurrency_total_tva, multicurrency_total_ttc'; |
|
| 2714 | + $sql.= ' FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 2715 | + $sql.= ' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 2716 | + if ($exclspec) |
|
| 2717 | + {
|
|
| 2718 | + $product_field='product_type'; |
|
| 2719 | + if ($this->table_element_line == 'contratdet') $product_field=''; // contratdet table has no product_type field |
|
| 2720 | + if ($product_field) $sql.= ' AND '.$product_field.' <> 9'; |
|
| 2721 | + } |
|
| 2722 | + $sql.= ' ORDER by rowid'; // We want to be sure to always use same order of line to not change lines differently when option MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND is used |
|
| 2723 | + |
|
| 2724 | + dol_syslog(get_class($this)."::update_price", LOG_DEBUG); |
|
| 2725 | + $resql = $this->db->query($sql); |
|
| 2726 | + if ($resql) |
|
| 2727 | + {
|
|
| 2728 | + $this->total_ht = 0; |
|
| 2729 | + $this->total_tva = 0; |
|
| 2730 | + $this->total_localtax1 = 0; |
|
| 2731 | + $this->total_localtax2 = 0; |
|
| 2732 | + $this->total_ttc = 0; |
|
| 2733 | + $total_ht_by_vats = array(); |
|
| 2734 | + $total_tva_by_vats = array(); |
|
| 2735 | + $total_ttc_by_vats = array(); |
|
| 2736 | + $this->multicurrency_total_ht = 0; |
|
| 2737 | + $this->multicurrency_total_tva = 0; |
|
| 2738 | + $this->multicurrency_total_ttc = 0; |
|
| 2739 | + |
|
| 2740 | + $num = $this->db->num_rows($resql); |
|
| 2741 | + $i = 0; |
|
| 2742 | + while ($i < $num) |
|
| 2743 | + {
|
|
| 2744 | + $obj = $this->db->fetch_object($resql); |
|
| 2745 | + |
|
| 2746 | + // Note: There is no check on detail line and no check on total, if $forcedroundingmode = 'none' |
|
| 2747 | + $parameters=array('fk_element' => $obj->rowid);
|
|
| 2748 | + $reshook = $hookmanager->executeHooks('changeRoundingMode', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
|
|
| 2749 | + |
|
| 2750 | + if (empty($reshook) && $forcedroundingmode == '0') // Check if data on line are consistent. This may solve lines that were not consistent because set with $forcedroundingmode='auto' |
|
| 2751 | + {
|
|
| 2752 | + $localtax_array=array($obj->localtax1_type,$obj->localtax1_tx,$obj->localtax2_type,$obj->localtax2_tx); |
|
| 2753 | + $tmpcal=calcul_price_total($obj->qty, $obj->up, $obj->remise_percent, $obj->vatrate, $obj->localtax1_tx, $obj->localtax2_tx, 0, 'HT', $obj->info_bits, $obj->product_type, $seller, $localtax_array, (isset($obj->situation_percent) ? $obj->situation_percent : 100), $multicurrency_tx); |
|
| 2754 | + $diff=price2num($tmpcal[1] - $obj->total_tva, 'MT', 1); |
|
| 2755 | + if ($diff) |
|
| 2756 | + {
|
|
| 2757 | + $sqlfix="UPDATE ".MAIN_DB_PREFIX.$this->table_element_line." SET ".$fieldtva." = ".$tmpcal[1].", total_ttc = ".$tmpcal[2]." WHERE rowid = ".$obj->rowid; |
|
| 2758 | + dol_syslog('We found unconsistent data into detailed line (difference of '.$diff.') for line rowid = '.$obj->rowid." (total vat of line calculated=".$tmpcal[1].", database=".$obj->total_tva."). We fix the total_vat and total_ttc of line by running sqlfix = ".$sqlfix);
|
|
| 2759 | + $resqlfix=$this->db->query($sqlfix); |
|
| 2760 | + if (! $resqlfix) dol_print_error($this->db,'Failed to update line'); |
|
| 2761 | + $obj->total_tva = $tmpcal[1]; |
|
| 2762 | + $obj->total_ttc = $tmpcal[2]; |
|
| 2763 | + // |
|
| 2764 | + } |
|
| 2765 | + } |
|
| 2766 | + |
|
| 2767 | + $this->total_ht += $obj->total_ht; // The field visible at end of line detail |
|
| 2768 | + $this->total_tva += $obj->total_tva; |
|
| 2769 | + $this->total_localtax1 += $obj->total_localtax1; |
|
| 2770 | + $this->total_localtax2 += $obj->total_localtax2; |
|
| 2771 | + $this->total_ttc += $obj->total_ttc; |
|
| 2772 | + $this->multicurrency_total_ht += $obj->multicurrency_total_ht; // The field visible at end of line detail |
|
| 2773 | + $this->multicurrency_total_tva += $obj->multicurrency_total_tva; |
|
| 2774 | + $this->multicurrency_total_ttc += $obj->multicurrency_total_ttc; |
|
| 2775 | + |
|
| 2776 | + if (! isset($total_ht_by_vats[$obj->vatrate])) $total_ht_by_vats[$obj->vatrate]=0; |
|
| 2777 | + if (! isset($total_tva_by_vats[$obj->vatrate])) $total_tva_by_vats[$obj->vatrate]=0; |
|
| 2778 | + if (! isset($total_ttc_by_vats[$obj->vatrate])) $total_ttc_by_vats[$obj->vatrate]=0; |
|
| 2779 | + $total_ht_by_vats[$obj->vatrate] += $obj->total_ht; |
|
| 2780 | + $total_tva_by_vats[$obj->vatrate] += $obj->total_tva; |
|
| 2781 | + $total_ttc_by_vats[$obj->vatrate] += $obj->total_ttc; |
|
| 2782 | + |
|
| 2783 | + if ($forcedroundingmode == '1') // Check if we need adjustement onto line for vat. TODO This works on the company currency but not on multicurrency |
|
| 2784 | + {
|
|
| 2785 | + $tmpvat=price2num($total_ht_by_vats[$obj->vatrate] * $obj->vatrate / 100, 'MT', 1); |
|
| 2786 | + $diff=price2num($total_tva_by_vats[$obj->vatrate]-$tmpvat, 'MT', 1); |
|
| 2787 | + //print 'Line '.$i.' rowid='.$obj->rowid.' vat_rate='.$obj->vatrate.' total_ht='.$obj->total_ht.' total_tva='.$obj->total_tva.' total_ttc='.$obj->total_ttc.' total_ht_by_vats='.$total_ht_by_vats[$obj->vatrate].' total_tva_by_vats='.$total_tva_by_vats[$obj->vatrate].' (new calculation = '.$tmpvat.') total_ttc_by_vats='.$total_ttc_by_vats[$obj->vatrate].($diff?" => DIFF":"")."<br>\n"; |
|
| 2788 | + if ($diff) |
|
| 2789 | + {
|
|
| 2790 | + if (abs($diff) > 0.1) { dol_syslog('A rounding difference was detected into TOTAL but is too high to be corrected', LOG_WARNING); exit; }
|
|
| 2791 | + $sqlfix="UPDATE ".MAIN_DB_PREFIX.$this->table_element_line." SET ".$fieldtva." = ".($obj->total_tva - $diff).", total_ttc = ".($obj->total_ttc - $diff)." WHERE rowid = ".$obj->rowid; |
|
| 2792 | + dol_syslog('We found a difference of '.$diff.' for line rowid = '.$obj->rowid.". We fix the total_vat and total_ttc of line by running sqlfix = ".$sqlfix);
|
|
| 2793 | + $resqlfix=$this->db->query($sqlfix); |
|
| 2794 | + if (! $resqlfix) dol_print_error($this->db,'Failed to update line'); |
|
| 2795 | + $this->total_tva -= $diff; |
|
| 2796 | + $this->total_ttc -= $diff; |
|
| 2797 | + $total_tva_by_vats[$obj->vatrate] -= $diff; |
|
| 2798 | + $total_ttc_by_vats[$obj->vatrate] -= $diff; |
|
| 2799 | + } |
|
| 2800 | + } |
|
| 2801 | + |
|
| 2802 | + $i++; |
|
| 2803 | + } |
|
| 2804 | + |
|
| 2805 | + // Add revenue stamp to total |
|
| 2806 | + $this->total_ttc += isset($this->revenuestamp)?$this->revenuestamp:0; |
|
| 2807 | + $this->multicurrency_total_ttc += isset($this->revenuestamp)?($this->revenuestamp * $multicurrency_tx):0; |
|
| 2808 | + |
|
| 2809 | + // Situations totals |
|
| 2810 | + if ($this->situation_cycle_ref && $this->situation_counter > 1 && method_exists($this, 'get_prev_sits') && $this->type != $this::TYPE_CREDIT_NOTE ) |
|
| 2811 | + {
|
|
| 2812 | + $prev_sits = $this->get_prev_sits(); |
|
| 2813 | + |
|
| 2814 | + foreach ($prev_sits as $sit) { // $sit is an object Facture loaded with a fetch.
|
|
| 2815 | + $this->total_ht -= $sit->total_ht; |
|
| 2816 | + $this->total_tva -= $sit->total_tva; |
|
| 2817 | + $this->total_localtax1 -= $sit->total_localtax1; |
|
| 2818 | + $this->total_localtax2 -= $sit->total_localtax2; |
|
| 2819 | + $this->total_ttc -= $sit->total_ttc; |
|
| 2820 | + $this->multicurrency_total_ht -= $sit->multicurrency_total_ht; |
|
| 2821 | + $this->multicurrency_total_tva -= $sit->multicurrency_total_tva; |
|
| 2822 | + $this->multicurrency_total_ttc -= $sit->multicurrency_total_ttc; |
|
| 2823 | + } |
|
| 2824 | + } |
|
| 2825 | + |
|
| 2826 | + $this->db->free($resql); |
|
| 2827 | + |
|
| 2828 | + // Now update global field total_ht, total_ttc and tva |
|
| 2829 | + $fieldht='total_ht'; |
|
| 2830 | + $fieldtva='tva'; |
|
| 2831 | + $fieldlocaltax1='localtax1'; |
|
| 2832 | + $fieldlocaltax2='localtax2'; |
|
| 2833 | + $fieldttc='total_ttc'; |
|
| 2834 | + // Specific code for backward compatibility with old field names |
|
| 2835 | + if ($this->element == 'facture' || $this->element == 'facturerec') $fieldht='total'; |
|
| 2836 | + if ($this->element == 'facture_fourn' || $this->element == 'invoice_supplier') $fieldtva='total_tva'; |
|
| 2837 | + if ($this->element == 'propal') $fieldttc='total'; |
|
| 2838 | + if ($this->element == 'expensereport') $fieldtva='total_tva'; |
|
| 2839 | + if ($this->element == 'supplier_proposal') $fieldttc='total'; |
|
| 2840 | + |
|
| 2841 | + if (empty($nodatabaseupdate)) |
|
| 2842 | + {
|
|
| 2843 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element.' SET'; |
|
| 2844 | + $sql .= " ".$fieldht."='".price2num($this->total_ht)."',"; |
|
| 2845 | + $sql .= " ".$fieldtva."='".price2num($this->total_tva)."',"; |
|
| 2846 | + $sql .= " ".$fieldlocaltax1."='".price2num($this->total_localtax1)."',"; |
|
| 2847 | + $sql .= " ".$fieldlocaltax2."='".price2num($this->total_localtax2)."',"; |
|
| 2848 | + $sql .= " ".$fieldttc."='".price2num($this->total_ttc)."'"; |
|
| 2849 | + $sql .= ", multicurrency_total_ht='".price2num($this->multicurrency_total_ht, 'MT', 1)."'"; |
|
| 2850 | + $sql .= ", multicurrency_total_tva='".price2num($this->multicurrency_total_tva, 'MT', 1)."'"; |
|
| 2851 | + $sql .= ", multicurrency_total_ttc='".price2num($this->multicurrency_total_ttc, 'MT', 1)."'"; |
|
| 2852 | + $sql .= ' WHERE rowid = '.$this->id; |
|
| 2853 | + |
|
| 2854 | + |
|
| 2855 | + dol_syslog(get_class($this)."::update_price", LOG_DEBUG); |
|
| 2856 | + $resql=$this->db->query($sql); |
|
| 2857 | + if (! $resql) |
|
| 2858 | + {
|
|
| 2859 | + $error++; |
|
| 2860 | + $this->error=$this->db->lasterror(); |
|
| 2861 | + $this->errors[]=$this->db->lasterror(); |
|
| 2862 | + } |
|
| 2863 | + } |
|
| 2864 | + |
|
| 2865 | + if (! $error) |
|
| 2866 | + {
|
|
| 2867 | + return 1; |
|
| 2868 | + } |
|
| 2869 | + else |
|
| 2870 | + {
|
|
| 2871 | + return -1; |
|
| 2872 | + } |
|
| 2873 | + } |
|
| 2874 | + else |
|
| 2875 | + {
|
|
| 2876 | + dol_print_error($this->db,'Bad request in update_price'); |
|
| 2877 | + return -1; |
|
| 2878 | + } |
|
| 2879 | + } |
|
| 2880 | + |
|
| 2881 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 2882 | + /** |
|
| 2883 | + * Add objects linked in llx_element_element. |
|
| 2884 | + * |
|
| 2885 | + * @param string $origin Linked element type |
|
| 2886 | + * @param int $origin_id Linked element id |
|
| 2887 | + * @return int <=0 if KO, >0 if OK |
|
| 2888 | + * @see fetchObjectLinked, updateObjectLinked, deleteObjectLinked |
|
| 2889 | + */ |
|
| 2890 | + function add_object_linked($origin=null, $origin_id=null) |
|
| 2891 | + {
|
|
| 2892 | + // phpcs:enable |
|
| 2893 | + $origin = (! empty($origin) ? $origin : $this->origin); |
|
| 2894 | + $origin_id = (! empty($origin_id) ? $origin_id : $this->origin_id); |
|
| 2895 | + |
|
| 2896 | + // Special case |
|
| 2897 | + if ($origin == 'order') $origin='commande'; |
|
| 2898 | + if ($origin == 'invoice') $origin='facture'; |
|
| 2899 | + if ($origin == 'invoice_template') $origin='facturerec'; |
|
| 2900 | + if ($origin == 'supplierorder') $origin='order_supplier'; |
|
| 2901 | + $this->db->begin(); |
|
| 2902 | + |
|
| 2903 | + $sql = "INSERT INTO ".MAIN_DB_PREFIX."element_element (";
|
|
| 2904 | + $sql.= "fk_source"; |
|
| 2905 | + $sql.= ", sourcetype"; |
|
| 2906 | + $sql.= ", fk_target"; |
|
| 2907 | + $sql.= ", targettype"; |
|
| 2908 | + $sql.= ") VALUES (";
|
|
| 2909 | + $sql.= $origin_id; |
|
| 2910 | + $sql.= ", '".$this->db->escape($origin)."'"; |
|
| 2911 | + $sql.= ", ".$this->id; |
|
| 2912 | + $sql.= ", '".$this->db->escape($this->element)."'"; |
|
| 2913 | + $sql.= ")"; |
|
| 2914 | + |
|
| 2915 | + dol_syslog(get_class($this)."::add_object_linked", LOG_DEBUG); |
|
| 2916 | + if ($this->db->query($sql)) |
|
| 2917 | + {
|
|
| 2918 | + $this->db->commit(); |
|
| 2919 | + return 1; |
|
| 2920 | + } |
|
| 2921 | + else |
|
| 2922 | + {
|
|
| 2923 | + $this->error=$this->db->lasterror(); |
|
| 2924 | + $this->db->rollback(); |
|
| 2925 | + return 0; |
|
| 2926 | + } |
|
| 2927 | + } |
|
| 2928 | + |
|
| 2929 | + /** |
|
| 2930 | + * Fetch array of objects linked to current object (object of enabled modules only). Links are loaded into |
|
| 2931 | + * this->linkedObjectsIds array and |
|
| 2932 | + * this->linkedObjects array if $loadalsoobjects = 1 |
|
| 2933 | + * Possible usage for parameters: |
|
| 2934 | + * - all parameters empty -> we look all link to current object (current object can be source or target) |
|
| 2935 | + * - source id+type -> will get target list linked to source |
|
| 2936 | + * - target id+type -> will get source list linked to target |
|
| 2937 | + * - source id+type + target type -> will get target list of the type |
|
| 2938 | + * - target id+type + target source -> will get source list of the type |
|
| 2939 | + * |
|
| 2940 | + * @param int $sourceid Object source id (if not defined, id of object) |
|
| 2941 | + * @param string $sourcetype Object source type (if not defined, element name of object) |
|
| 2942 | + * @param int $targetid Object target id (if not defined, id of object) |
|
| 2943 | + * @param string $targettype Object target type (if not defined, elemennt name of object) |
|
| 2944 | + * @param string $clause 'OR' or 'AND' clause used when both source id and target id are provided |
|
| 2945 | + * @param int $alsosametype 0=Return only links to object that differs from source type. 1=Include also link to objects of same type. |
|
| 2946 | + * @param string $orderby SQL 'ORDER BY' clause |
|
| 2947 | + * @param int $loadalsoobjects Load also array this->linkedObjects (Use 0 to increase performances) |
|
| 2948 | + * @return int <0 if KO, >0 if OK |
|
| 2949 | + * @see add_object_linked, updateObjectLinked, deleteObjectLinked |
|
| 2950 | + */ |
|
| 2951 | + function fetchObjectLinked($sourceid=null,$sourcetype='',$targetid=null,$targettype='',$clause='OR',$alsosametype=1,$orderby='sourcetype',$loadalsoobjects=1) |
|
| 2952 | + {
|
|
| 2953 | + global $conf; |
|
| 2954 | + |
|
| 2955 | + $this->linkedObjectsIds=array(); |
|
| 2956 | + $this->linkedObjects=array(); |
|
| 2957 | + |
|
| 2958 | + $justsource=false; |
|
| 2959 | + $justtarget=false; |
|
| 2960 | + $withtargettype=false; |
|
| 2961 | + $withsourcetype=false; |
|
| 2962 | + |
|
| 2963 | + if (! empty($sourceid) && ! empty($sourcetype) && empty($targetid)) |
|
| 2964 | + {
|
|
| 2965 | + $justsource=true; // the source (id and type) is a search criteria |
|
| 2966 | + if (! empty($targettype)) $withtargettype=true; |
|
| 2967 | + } |
|
| 2968 | + if (! empty($targetid) && ! empty($targettype) && empty($sourceid)) |
|
| 2969 | + {
|
|
| 2970 | + $justtarget=true; // the target (id and type) is a search criteria |
|
| 2971 | + if (! empty($sourcetype)) $withsourcetype=true; |
|
| 2972 | + } |
|
| 2973 | + |
|
| 2974 | + $sourceid = (! empty($sourceid) ? $sourceid : $this->id); |
|
| 2975 | + $targetid = (! empty($targetid) ? $targetid : $this->id); |
|
| 2976 | + $sourcetype = (! empty($sourcetype) ? $sourcetype : $this->element); |
|
| 2977 | + $targettype = (! empty($targettype) ? $targettype : $this->element); |
|
| 2978 | + |
|
| 2979 | + /*if (empty($sourceid) && empty($targetid)) |
|
| 2980 | + {
|
|
| 2981 | + dol_syslog('Bad usage of function. No source nor target id defined (nor as parameter nor as object id)', LOG_ERR);
|
|
| 2982 | + return -1; |
|
| 2983 | + }*/ |
|
| 2984 | + |
|
| 2985 | + // Links between objects are stored in table element_element |
|
| 2986 | + $sql = 'SELECT rowid, fk_source, sourcetype, fk_target, targettype'; |
|
| 2987 | + $sql.= ' FROM '.MAIN_DB_PREFIX.'element_element'; |
|
| 2988 | + $sql.= " WHERE "; |
|
| 2989 | + if ($justsource || $justtarget) |
|
| 2990 | + {
|
|
| 2991 | + if ($justsource) |
|
| 2992 | + {
|
|
| 2993 | + $sql.= "fk_source = ".$sourceid." AND sourcetype = '".$sourcetype."'"; |
|
| 2994 | + if ($withtargettype) $sql.= " AND targettype = '".$targettype."'"; |
|
| 2995 | + } |
|
| 2996 | + else if ($justtarget) |
|
| 2997 | + {
|
|
| 2998 | + $sql.= "fk_target = ".$targetid." AND targettype = '".$targettype."'"; |
|
| 2999 | + if ($withsourcetype) $sql.= " AND sourcetype = '".$sourcetype."'"; |
|
| 3000 | + } |
|
| 3001 | + } |
|
| 3002 | + else |
|
| 3003 | + {
|
|
| 3004 | + $sql.= "(fk_source = ".$sourceid." AND sourcetype = '".$sourcetype."')"; |
|
| 3005 | + $sql.= " ".$clause." (fk_target = ".$targetid." AND targettype = '".$targettype."')"; |
|
| 3006 | + } |
|
| 3007 | + $sql .= ' ORDER BY '.$orderby; |
|
| 3008 | + |
|
| 3009 | + dol_syslog(get_class($this)."::fetchObjectLink", LOG_DEBUG); |
|
| 3010 | + $resql = $this->db->query($sql); |
|
| 3011 | + if ($resql) |
|
| 3012 | + {
|
|
| 3013 | + $num = $this->db->num_rows($resql); |
|
| 3014 | + $i = 0; |
|
| 3015 | + while ($i < $num) |
|
| 3016 | + {
|
|
| 3017 | + $obj = $this->db->fetch_object($resql); |
|
| 3018 | + if ($justsource || $justtarget) |
|
| 3019 | + {
|
|
| 3020 | + if ($justsource) |
|
| 3021 | + {
|
|
| 3022 | + $this->linkedObjectsIds[$obj->targettype][$obj->rowid]=$obj->fk_target; |
|
| 3023 | + } |
|
| 3024 | + else if ($justtarget) |
|
| 3025 | + {
|
|
| 3026 | + $this->linkedObjectsIds[$obj->sourcetype][$obj->rowid]=$obj->fk_source; |
|
| 3027 | + } |
|
| 3028 | + } |
|
| 3029 | + else |
|
| 3030 | + {
|
|
| 3031 | + if ($obj->fk_source == $sourceid && $obj->sourcetype == $sourcetype) |
|
| 3032 | + {
|
|
| 3033 | + $this->linkedObjectsIds[$obj->targettype][$obj->rowid]=$obj->fk_target; |
|
| 3034 | + } |
|
| 3035 | + if ($obj->fk_target == $targetid && $obj->targettype == $targettype) |
|
| 3036 | + {
|
|
| 3037 | + $this->linkedObjectsIds[$obj->sourcetype][$obj->rowid]=$obj->fk_source; |
|
| 3038 | + } |
|
| 3039 | + } |
|
| 3040 | + $i++; |
|
| 3041 | + } |
|
| 3042 | + |
|
| 3043 | + if (! empty($this->linkedObjectsIds)) |
|
| 3044 | + {
|
|
| 3045 | + $tmparray = $this->linkedObjectsIds; |
|
| 3046 | + foreach($tmparray as $objecttype => $objectids) // $objecttype is a module name ('facture', 'mymodule', ...) or a module name with a suffix ('project_task', 'mymodule_myobj', ...)
|
|
| 3047 | + {
|
|
| 3048 | + // Parse element/subelement (ex: project_task, cabinetmed_consultation, ...) |
|
| 3049 | + $module = $element = $subelement = $objecttype; |
|
| 3050 | + if ($objecttype != 'supplier_proposal' && $objecttype != 'order_supplier' && $objecttype != 'invoice_supplier' |
|
| 3051 | + && preg_match('/^([^_]+)_([^_]+)/i',$objecttype,$regs))
|
|
| 3052 | + {
|
|
| 3053 | + $module = $element = $regs[1]; |
|
| 3054 | + $subelement = $regs[2]; |
|
| 3055 | + } |
|
| 3056 | + |
|
| 3057 | + $classpath = $element.'/class'; |
|
| 3058 | + // To work with non standard classpath or module name |
|
| 3059 | + if ($objecttype == 'facture') {
|
|
| 3060 | + $classpath = 'compta/facture/class'; |
|
| 3061 | + } |
|
| 3062 | + else if ($objecttype == 'facturerec') {
|
|
| 3063 | + $classpath = 'compta/facture/class'; $module = 'facture'; |
|
| 3064 | + } |
|
| 3065 | + else if ($objecttype == 'propal') {
|
|
| 3066 | + $classpath = 'comm/propal/class'; |
|
| 3067 | + } |
|
| 3068 | + else if ($objecttype == 'supplier_proposal') {
|
|
| 3069 | + $classpath = 'supplier_proposal/class'; |
|
| 3070 | + } |
|
| 3071 | + else if ($objecttype == 'shipping') {
|
|
| 3072 | + $classpath = 'expedition/class'; $subelement = 'expedition'; $module = 'expedition_bon'; |
|
| 3073 | + } |
|
| 3074 | + else if ($objecttype == 'delivery') {
|
|
| 3075 | + $classpath = 'livraison/class'; $subelement = 'livraison'; $module = 'livraison_bon'; |
|
| 3076 | + } |
|
| 3077 | + else if ($objecttype == 'invoice_supplier' || $objecttype == 'order_supplier') {
|
|
| 3078 | + $classpath = 'fourn/class'; $module = 'fournisseur'; |
|
| 3079 | + } |
|
| 3080 | + else if ($objecttype == 'fichinter') {
|
|
| 3081 | + $classpath = 'fichinter/class'; $subelement = 'fichinter'; $module = 'ficheinter'; |
|
| 3082 | + } |
|
| 3083 | + else if ($objecttype == 'subscription') {
|
|
| 3084 | + $classpath = 'adherents/class'; $module = 'adherent'; |
|
| 3085 | + } |
|
| 3086 | + |
|
| 3087 | + // Set classfile |
|
| 3088 | + $classfile = strtolower($subelement); $classname = ucfirst($subelement); |
|
| 3089 | + |
|
| 3090 | + if ($objecttype == 'order') {
|
|
| 3091 | + $classfile = 'commande'; $classname = 'Commande'; |
|
| 3092 | + } |
|
| 3093 | + else if ($objecttype == 'invoice_supplier') {
|
|
| 3094 | + $classfile = 'fournisseur.facture'; $classname = 'FactureFournisseur'; |
|
| 3095 | + } |
|
| 3096 | + else if ($objecttype == 'order_supplier') {
|
|
| 3097 | + $classfile = 'fournisseur.commande'; $classname = 'CommandeFournisseur'; |
|
| 3098 | + } |
|
| 3099 | + else if ($objecttype == 'supplier_proposal') {
|
|
| 3100 | + $classfile = 'supplier_proposal'; $classname = 'SupplierProposal'; |
|
| 3101 | + } |
|
| 3102 | + else if ($objecttype == 'facturerec') {
|
|
| 3103 | + $classfile = 'facture-rec'; $classname = 'FactureRec'; |
|
| 3104 | + } |
|
| 3105 | + else if ($objecttype == 'subscription') {
|
|
| 3106 | + $classfile = 'subscription'; $classname = 'Subscription'; |
|
| 3107 | + } |
|
| 3108 | + |
|
| 3109 | + // Here $module, $classfile and $classname are set |
|
| 3110 | + if (Globals::$conf->$module->enabled && (($element != $this->element) || $alsosametype)) {
|
|
| 3111 | + if ($loadalsoobjects) |
|
| 3112 | + {
|
|
| 3113 | + dol_include_once('/'.$classpath.'/'.$classfile.'.class.php');
|
|
| 3114 | + //print '/'.$classpath.'/'.$classfile.'.class.php '.class_exists($classname); |
|
| 3115 | + if (class_exists($classname)) |
|
| 3116 | + {
|
|
| 3117 | + foreach($objectids as $i => $objectid) // $i is rowid into llx_element_element |
|
| 3118 | + {
|
|
| 3119 | + $object = new $classname($this->db); |
|
| 3120 | + $ret = $object->fetch($objectid); |
|
| 3121 | + if ($ret >= 0) |
|
| 3122 | + {
|
|
| 3123 | + $this->linkedObjects[$objecttype][$i] = $object; |
|
| 3124 | + } |
|
| 3125 | + } |
|
| 3126 | + } |
|
| 3127 | + } |
|
| 3128 | + } |
|
| 3129 | + else |
|
| 3130 | + {
|
|
| 3131 | + unset($this->linkedObjectsIds[$objecttype]); |
|
| 3132 | + } |
|
| 3133 | + } |
|
| 3134 | + } |
|
| 3135 | + return 1; |
|
| 3136 | + } |
|
| 3137 | + else |
|
| 3138 | + {
|
|
| 3139 | + dol_print_error($this->db); |
|
| 3140 | + return -1; |
|
| 3141 | + } |
|
| 3142 | + } |
|
| 3143 | + |
|
| 3144 | + /** |
|
| 3145 | + * Update object linked of a current object |
|
| 3146 | + * |
|
| 3147 | + * @param int $sourceid Object source id |
|
| 3148 | + * @param string $sourcetype Object source type |
|
| 3149 | + * @param int $targetid Object target id |
|
| 3150 | + * @param string $targettype Object target type |
|
| 3151 | + * @return int >0 if OK, <0 if KO |
|
| 3152 | + * @see add_object_linked, fetObjectLinked, deleteObjectLinked |
|
| 3153 | + */ |
|
| 3154 | + function updateObjectLinked($sourceid=null, $sourcetype='', $targetid=null, $targettype='') |
|
| 3155 | + {
|
|
| 3156 | + $updatesource=false; |
|
| 3157 | + $updatetarget=false; |
|
| 3158 | + |
|
| 3159 | + if (! empty($sourceid) && ! empty($sourcetype) && empty($targetid) && empty($targettype)) $updatesource=true; |
|
| 3160 | + else if (empty($sourceid) && empty($sourcetype) && ! empty($targetid) && ! empty($targettype)) $updatetarget=true; |
|
| 3161 | + |
|
| 3162 | + $sql = "UPDATE ".MAIN_DB_PREFIX."element_element SET "; |
|
| 3163 | + if ($updatesource) |
|
| 3164 | + {
|
|
| 3165 | + $sql.= "fk_source = ".$sourceid; |
|
| 3166 | + $sql.= ", sourcetype = '".$this->db->escape($sourcetype)."'"; |
|
| 3167 | + $sql.= " WHERE fk_target = ".$this->id; |
|
| 3168 | + $sql.= " AND targettype = '".$this->db->escape($this->element)."'"; |
|
| 3169 | + } |
|
| 3170 | + else if ($updatetarget) |
|
| 3171 | + {
|
|
| 3172 | + $sql.= "fk_target = ".$targetid; |
|
| 3173 | + $sql.= ", targettype = '".$this->db->escape($targettype)."'"; |
|
| 3174 | + $sql.= " WHERE fk_source = ".$this->id; |
|
| 3175 | + $sql.= " AND sourcetype = '".$this->db->escape($this->element)."'"; |
|
| 3176 | + } |
|
| 3177 | + |
|
| 3178 | + dol_syslog(get_class($this)."::updateObjectLinked", LOG_DEBUG); |
|
| 3179 | + if ($this->db->query($sql)) |
|
| 3180 | + {
|
|
| 3181 | + return 1; |
|
| 3182 | + } |
|
| 3183 | + else |
|
| 3184 | + {
|
|
| 3185 | + $this->error=$this->db->lasterror(); |
|
| 3186 | + return -1; |
|
| 3187 | + } |
|
| 3188 | + } |
|
| 3189 | + |
|
| 3190 | + /** |
|
| 3191 | + * Delete all links between an object $this |
|
| 3192 | + * |
|
| 3193 | + * @param int $sourceid Object source id |
|
| 3194 | + * @param string $sourcetype Object source type |
|
| 3195 | + * @param int $targetid Object target id |
|
| 3196 | + * @param string $targettype Object target type |
|
| 3197 | + * @param int $rowid Row id of line to delete. If defined, other parameters are not used. |
|
| 3198 | + * @return int >0 if OK, <0 if KO |
|
| 3199 | + * @see add_object_linked, updateObjectLinked, fetchObjectLinked |
|
| 3200 | + */ |
|
| 3201 | + function deleteObjectLinked($sourceid=null, $sourcetype='', $targetid=null, $targettype='', $rowid='') |
|
| 3202 | + {
|
|
| 3203 | + $deletesource=false; |
|
| 3204 | + $deletetarget=false; |
|
| 3205 | + |
|
| 3206 | + if (! empty($sourceid) && ! empty($sourcetype) && empty($targetid) && empty($targettype)) $deletesource=true; |
|
| 3207 | + else if (empty($sourceid) && empty($sourcetype) && ! empty($targetid) && ! empty($targettype)) $deletetarget=true; |
|
| 3208 | + |
|
| 3209 | + $sourceid = (! empty($sourceid) ? $sourceid : $this->id); |
|
| 3210 | + $sourcetype = (! empty($sourcetype) ? $sourcetype : $this->element); |
|
| 3211 | + $targetid = (! empty($targetid) ? $targetid : $this->id); |
|
| 3212 | + $targettype = (! empty($targettype) ? $targettype : $this->element); |
|
| 3213 | + |
|
| 3214 | + $sql = "DELETE FROM ".MAIN_DB_PREFIX."element_element"; |
|
| 3215 | + $sql.= " WHERE"; |
|
| 3216 | + if ($rowid > 0) |
|
| 3217 | + {
|
|
| 3218 | + $sql.=" rowid = ".$rowid; |
|
| 3219 | + } |
|
| 3220 | + else |
|
| 3221 | + {
|
|
| 3222 | + if ($deletesource) |
|
| 3223 | + {
|
|
| 3224 | + $sql.= " fk_source = ".$sourceid." AND sourcetype = '".$this->db->escape($sourcetype)."'"; |
|
| 3225 | + $sql.= " AND fk_target = ".$this->id." AND targettype = '".$this->db->escape($this->element)."'"; |
|
| 3226 | + } |
|
| 3227 | + else if ($deletetarget) |
|
| 3228 | + {
|
|
| 3229 | + $sql.= " fk_target = ".$targetid." AND targettype = '".$this->db->escape($targettype)."'"; |
|
| 3230 | + $sql.= " AND fk_source = ".$this->id." AND sourcetype = '".$this->db->escape($this->element)."'"; |
|
| 3231 | + } |
|
| 3232 | + else |
|
| 3233 | + {
|
|
| 3234 | + $sql.= " (fk_source = ".$this->id." AND sourcetype = '".$this->db->escape($this->element)."')"; |
|
| 3235 | + $sql.= " OR"; |
|
| 3236 | + $sql.= " (fk_target = ".$this->id." AND targettype = '".$this->db->escape($this->element)."')"; |
|
| 3237 | + } |
|
| 3238 | + } |
|
| 3239 | + |
|
| 3240 | + dol_syslog(get_class($this)."::deleteObjectLinked", LOG_DEBUG); |
|
| 3241 | + if ($this->db->query($sql)) |
|
| 3242 | + {
|
|
| 3243 | + return 1; |
|
| 3244 | + } |
|
| 3245 | + else |
|
| 3246 | + {
|
|
| 3247 | + $this->error=$this->db->lasterror(); |
|
| 3248 | + $this->errors[]=$this->error; |
|
| 3249 | + return -1; |
|
| 3250 | + } |
|
| 3251 | + } |
|
| 3252 | + |
|
| 3253 | + /** |
|
| 3254 | + * Set status of an object |
|
| 3255 | + * |
|
| 3256 | + * @param int $status Status to set |
|
| 3257 | + * @param int $elementId Id of element to force (use this->id by default) |
|
| 3258 | + * @param string $elementType Type of element to force (use this->table_element by default) |
|
| 3259 | + * @param string $trigkey Trigger key to use for trigger |
|
| 3260 | + * @return int <0 if KO, >0 if OK |
|
| 3261 | + */ |
|
| 3262 | + function setStatut($status, $elementId=null, $elementType='', $trigkey='') |
|
| 3263 | + {
|
|
| 3264 | + global $user,$langs,$conf; |
|
| 3265 | + |
|
| 3266 | + $savElementId=$elementId; // To be used later to know if we were using the method using the id of this or not. |
|
| 3267 | + |
|
| 3268 | + $elementId = (!empty($elementId)?$elementId:$this->id); |
|
| 3269 | + $elementTable = (!empty($elementType)?$elementType:$this->table_element); |
|
| 3270 | + |
|
| 3271 | + $this->db->begin(); |
|
| 3272 | + |
|
| 3273 | + $fieldstatus="fk_statut"; |
|
| 3274 | + if ($elementTable == 'facture_rec') $fieldstatus="suspended"; |
|
| 3275 | + if ($elementTable == 'mailing') $fieldstatus="statut"; |
|
| 3276 | + if ($elementTable == 'cronjob') $fieldstatus="status"; |
|
| 3277 | + if ($elementTable == 'user') $fieldstatus="statut"; |
|
| 3278 | + if ($elementTable == 'expensereport') $fieldstatus="fk_statut"; |
|
| 3279 | + if ($elementTable == 'commande_fournisseur_dispatch') $fieldstatus="status"; |
|
| 3280 | + |
|
| 3281 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$elementTable; |
|
| 3282 | + $sql.= " SET ".$fieldstatus." = ".$status; |
|
| 3283 | + // If status = 1 = validated, update also fk_user_valid |
|
| 3284 | + if ($status == 1 && $elementTable == 'expensereport') $sql.=", fk_user_valid = ".$user->id; |
|
| 3285 | + $sql.= " WHERE rowid=".$elementId; |
|
| 3286 | + |
|
| 3287 | + dol_syslog(get_class($this)."::setStatut", LOG_DEBUG); |
|
| 3288 | + if ($this->db->query($sql)) |
|
| 3289 | + {
|
|
| 3290 | + $error = 0; |
|
| 3291 | + |
|
| 3292 | + // Try autoset of trigkey |
|
| 3293 | + if (empty($trigkey)) |
|
| 3294 | + {
|
|
| 3295 | + if ($this->element == 'supplier_proposal' && $status == 2) $trigkey='SUPPLIER_PROPOSAL_SIGN'; // 2 = SupplierProposal::STATUS_SIGNED. Can't use constant into this generic class |
|
| 3296 | + if ($this->element == 'supplier_proposal' && $status == 3) $trigkey='SUPPLIER_PROPOSAL_REFUSE'; // 3 = SupplierProposal::STATUS_REFUSED. Can't use constant into this generic class |
|
| 3297 | + if ($this->element == 'supplier_proposal' && $status == 4) $trigkey='SUPPLIER_PROPOSAL_CLOSE'; // 4 = SupplierProposal::STATUS_CLOSED. Can't use constant into this generic class |
|
| 3298 | + if ($this->element == 'fichinter' && $status == 3) $trigkey='FICHINTER_CLASSIFY_DONE'; |
|
| 3299 | + if ($this->element == 'fichinter' && $status == 2) $trigkey='FICHINTER_CLASSIFY_BILLED'; |
|
| 3300 | + if ($this->element == 'fichinter' && $status == 1) $trigkey='FICHINTER_CLASSIFY_UNBILLED'; |
|
| 3301 | + } |
|
| 3302 | + |
|
| 3303 | + if ($trigkey) |
|
| 3304 | + {
|
|
| 3305 | + // Appel des triggers |
|
| 3306 | + include_once DOL_DOCUMENT_ROOT . '/core/class/interfaces.class.php'; |
|
| 3307 | + $interface=new Interfaces($this->db); |
|
| 3308 | + $result=$interface->run_triggers($trigkey,$this,$user,$langs,$conf); |
|
| 3309 | + if ($result < 0) {
|
|
| 3310 | + $error++; $this->errors=$interface->errors; |
|
| 3311 | + } |
|
| 3312 | + // Fin appel triggers |
|
| 3313 | + } |
|
| 3314 | + |
|
| 3315 | + if (! $error) |
|
| 3316 | + {
|
|
| 3317 | + $this->db->commit(); |
|
| 3318 | + |
|
| 3319 | + if (empty($savElementId)) // If the element we update was $this (so $elementId is null) |
|
| 3320 | + {
|
|
| 3321 | + $this->statut = $status; |
|
| 3322 | + $this->status = $status; |
|
| 3323 | + } |
|
| 3324 | + |
|
| 3325 | + return 1; |
|
| 3326 | + } |
|
| 3327 | + else |
|
| 3328 | + {
|
|
| 3329 | + $this->db->rollback(); |
|
| 3330 | + dol_syslog(get_class($this)."::setStatus ".$this->error,LOG_ERR); |
|
| 3331 | + return -1; |
|
| 3332 | + } |
|
| 3333 | + } |
|
| 3334 | + else |
|
| 3335 | + {
|
|
| 3336 | + $this->error=$this->db->lasterror(); |
|
| 3337 | + $this->db->rollback(); |
|
| 3338 | + return -1; |
|
| 3339 | + } |
|
| 3340 | + } |
|
| 3341 | + |
|
| 3342 | + |
|
| 3343 | + /** |
|
| 3344 | + * Load type of canvas of an object if it exists |
|
| 3345 | + * |
|
| 3346 | + * @param int $id Record id |
|
| 3347 | + * @param string $ref Record ref |
|
| 3348 | + * @return int <0 if KO, 0 if nothing done, >0 if OK |
|
| 3349 | + */ |
|
| 3350 | + function getCanvas($id=0,$ref='') |
|
| 3351 | + {
|
|
| 3352 | + global $conf; |
|
| 3353 | + |
|
| 3354 | + if (empty($id) && empty($ref)) return 0; |
|
| 3355 | + if (!empty(Globals::$conf->global->MAIN_DISABLE_CANVAS)) |
|
| 3356 | + return 0; // To increase speed. Not enabled by default. |
|
| 3357 | + |
|
| 3358 | + // Clean parameters |
|
| 3359 | + $ref = trim($ref); |
|
| 3360 | + |
|
| 3361 | + $sql = "SELECT rowid, canvas"; |
|
| 3362 | + $sql.= " FROM ".MAIN_DB_PREFIX.$this->table_element; |
|
| 3363 | + $sql.= " WHERE entity IN (".getEntity($this->element).")";
|
|
| 3364 | + if (! empty($id)) $sql.= " AND rowid = ".$id; |
|
| 3365 | + if (! empty($ref)) $sql.= " AND ref = '".$this->db->escape($ref)."'"; |
|
| 3366 | + |
|
| 3367 | + $resql = $this->db->query($sql); |
|
| 3368 | + if ($resql) |
|
| 3369 | + {
|
|
| 3370 | + $obj = $this->db->fetch_object($resql); |
|
| 3371 | + if ($obj) |
|
| 3372 | + {
|
|
| 3373 | + $this->canvas = $obj->canvas; |
|
| 3374 | + return 1; |
|
| 3375 | + } |
|
| 3376 | + else return 0; |
|
| 3377 | + } |
|
| 3378 | + else |
|
| 3379 | + {
|
|
| 3380 | + dol_print_error($this->db); |
|
| 3381 | + return -1; |
|
| 3382 | + } |
|
| 3383 | + } |
|
| 3384 | + |
|
| 3385 | + |
|
| 3386 | + /** |
|
| 3387 | + * Get special code of a line |
|
| 3388 | + * |
|
| 3389 | + * @param int $lineid Id of line |
|
| 3390 | + * @return int Special code |
|
| 3391 | + */ |
|
| 3392 | + function getSpecialCode($lineid) |
|
| 3393 | + {
|
|
| 3394 | + $sql = 'SELECT special_code FROM '.MAIN_DB_PREFIX.$this->table_element_line; |
|
| 3395 | + $sql.= ' WHERE rowid = '.$lineid; |
|
| 3396 | + $resql = $this->db->query($sql); |
|
| 3397 | + if ($resql) |
|
| 3398 | + {
|
|
| 3399 | + $row = $this->db->fetch_row($resql); |
|
| 3400 | + return $row[0]; |
|
| 3401 | + } |
|
| 3402 | + } |
|
| 3403 | + |
|
| 3404 | + /** |
|
| 3405 | + * Function to check if an object is used by others. |
|
| 3406 | + * Check is done into this->childtables. There is no check into llx_element_element. |
|
| 3407 | + * |
|
| 3408 | + * @param int $id Force id of object |
|
| 3409 | + * @return int <0 if KO, 0 if not used, >0 if already used |
|
| 3410 | + */ |
|
| 3411 | + function isObjectUsed($id=0) |
|
| 3412 | + {
|
|
| 3413 | + global $langs; |
|
| 3414 | + |
|
| 3415 | + if (empty($id)) $id=$this->id; |
|
| 3416 | + |
|
| 3417 | + // Check parameters |
|
| 3418 | + if (! isset($this->childtables) || ! is_array($this->childtables) || count($this->childtables) == 0) |
|
| 3419 | + {
|
|
| 3420 | + dol_print_error('Called isObjectUsed on a class with property this->childtables not defined');
|
|
| 3421 | + return -1; |
|
| 3422 | + } |
|
| 3423 | + |
|
| 3424 | + $arraytoscan = $this->childtables; |
|
| 3425 | + // For backward compatibility, we check if array is old format array('table1', 'table2', ...)
|
|
| 3426 | + $tmparray=array_keys($this->childtables); |
|
| 3427 | + if (is_numeric($tmparray[0])) |
|
| 3428 | + {
|
|
| 3429 | + $arraytoscan = array_flip($this->childtables); |
|
| 3430 | + } |
|
| 3431 | + |
|
| 3432 | + // Test if child exists |
|
| 3433 | + $haschild=0; |
|
| 3434 | + foreach($arraytoscan as $table => $elementname) |
|
| 3435 | + {
|
|
| 3436 | + //print $id.'-'.$table.'-'.$elementname.'<br>'; |
|
| 3437 | + // Check if third party can be deleted |
|
| 3438 | + $sql = "SELECT COUNT(*) as nb from ".MAIN_DB_PREFIX.$table; |
|
| 3439 | + $sql.= " WHERE ".$this->fk_element." = ".$id; |
|
| 3440 | + $resql=$this->db->query($sql); |
|
| 3441 | + if ($resql) |
|
| 3442 | + {
|
|
| 3443 | + $obj=$this->db->fetch_object($resql); |
|
| 3444 | + if ($obj->nb > 0) |
|
| 3445 | + {
|
|
| 3446 | + $langs->load("errors");
|
|
| 3447 | + //print 'Found into table '.$table.', type '.$langs->transnoentitiesnoconv($elementname).', haschild='.$haschild; |
|
| 3448 | + $haschild += $obj->nb; |
|
| 3449 | + if (is_numeric($elementname)) // old usage |
|
| 3450 | + {
|
|
| 3451 | + $this->errors[]=$langs->trans("ErrorRecordHasAtLeastOneChildOfType", $table);
|
|
| 3452 | + } |
|
| 3453 | + else // new usage: $elementname=Translation key |
|
| 3454 | + {
|
|
| 3455 | + $this->errors[]=$langs->trans("ErrorRecordHasAtLeastOneChildOfType", $langs->transnoentitiesnoconv($elementname));
|
|
| 3456 | + } |
|
| 3457 | + break; // We found at least one, we stop here |
|
| 3458 | + } |
|
| 3459 | + } |
|
| 3460 | + else |
|
| 3461 | + {
|
|
| 3462 | + $this->errors[]=$this->db->lasterror(); |
|
| 3463 | + return -1; |
|
| 3464 | + } |
|
| 3465 | + } |
|
| 3466 | + if ($haschild > 0) |
|
| 3467 | + {
|
|
| 3468 | + $this->errors[]="ErrorRecordHasChildren"; |
|
| 3469 | + return $haschild; |
|
| 3470 | + } |
|
| 3471 | + else return 0; |
|
| 3472 | + } |
|
| 3473 | + |
|
| 3474 | + /** |
|
| 3475 | + * Function to say how many lines object contains |
|
| 3476 | + * |
|
| 3477 | + * @param int $predefined -1=All, 0=Count free product/service only, 1=Count predefined product/service only, 2=Count predefined product, 3=Count predefined service |
|
| 3478 | + * @return int <0 if KO, 0 if no predefined products, nb of lines with predefined products if found |
|
| 3479 | + */ |
|
| 3480 | + function hasProductsOrServices($predefined=-1) |
|
| 3481 | + {
|
|
| 3482 | + $nb=0; |
|
| 3483 | + |
|
| 3484 | + foreach($this->lines as $key => $val) |
|
| 3485 | + {
|
|
| 3486 | + $qualified=0; |
|
| 3487 | + if ($predefined == -1) $qualified=1; |
|
| 3488 | + if ($predefined == 1 && $val->fk_product > 0) $qualified=1; |
|
| 3489 | + if ($predefined == 0 && $val->fk_product <= 0) $qualified=1; |
|
| 3490 | + if ($predefined == 2 && $val->fk_product > 0 && $val->product_type==0) $qualified=1; |
|
| 3491 | + if ($predefined == 3 && $val->fk_product > 0 && $val->product_type==1) $qualified=1; |
|
| 3492 | + if ($qualified) $nb++; |
|
| 3493 | + } |
|
| 3494 | + dol_syslog(get_class($this).'::hasProductsOrServices we found '.$nb.' qualified lines of products/servcies'); |
|
| 3495 | + return $nb; |
|
| 3496 | + } |
|
| 3497 | + |
|
| 3498 | + /** |
|
| 3499 | + * Function that returns the total amount HT of discounts applied for all lines. |
|
| 3500 | + * |
|
| 3501 | + * @return float |
|
| 3502 | + */ |
|
| 3503 | + function getTotalDiscount() |
|
| 3504 | + {
|
|
| 3505 | + $total_discount=0.00; |
|
| 3506 | + |
|
| 3507 | + $sql = "SELECT subprice as pu_ht, qty, remise_percent, total_ht"; |
|
| 3508 | + $sql.= " FROM ".MAIN_DB_PREFIX.$this->table_element."det"; |
|
| 3509 | + $sql.= " WHERE ".$this->fk_element." = ".$this->id; |
|
| 3510 | + |
|
| 3511 | + dol_syslog(get_class($this).'::getTotalDiscount', LOG_DEBUG); |
|
| 3512 | + $resql = $this->db->query($sql); |
|
| 3513 | + if ($resql) |
|
| 3514 | + {
|
|
| 3515 | + $num=$this->db->num_rows($resql); |
|
| 3516 | + $i=0; |
|
| 3517 | + while ($i < $num) |
|
| 3518 | + {
|
|
| 3519 | + $obj = $this->db->fetch_object($resql); |
|
| 3520 | + |
|
| 3521 | + $pu_ht = $obj->pu_ht; |
|
| 3522 | + $qty= $obj->qty; |
|
| 3523 | + $total_ht = $obj->total_ht; |
|
| 3524 | + |
|
| 3525 | + $total_discount_line = floatval(price2num(($pu_ht * $qty) - $total_ht, 'MT')); |
|
| 3526 | + $total_discount += $total_discount_line; |
|
| 3527 | + |
|
| 3528 | + $i++; |
|
| 3529 | + } |
|
| 3530 | + } |
|
| 3531 | + |
|
| 3532 | + //print $total_discount; exit; |
|
| 3533 | + return price2num($total_discount); |
|
| 3534 | + } |
|
| 3535 | + |
|
| 3536 | + |
|
| 3537 | + /** |
|
| 3538 | + * Return into unit=0, the calculated total of weight and volume of all lines * qty |
|
| 3539 | + * Calculate by adding weight and volume of each product line, so properties ->volume/volume_units/weight/weight_units must be loaded on line. |
|
| 3540 | + * |
|
| 3541 | + * @return array array('weight'=>...,'volume'=>...)
|
|
| 3542 | + */ |
|
| 3543 | + function getTotalWeightVolume() |
|
| 3544 | + {
|
|
| 3545 | + $totalWeight = 0; |
|
| 3546 | + $totalVolume = 0; |
|
| 3547 | + // defined for shipment only |
|
| 3548 | + $totalOrdered = ''; |
|
| 3549 | + // defined for shipment only |
|
| 3550 | + $totalToShip = ''; |
|
| 3551 | + |
|
| 3552 | + foreach ($this->lines as $line) |
|
| 3553 | + {
|
|
| 3554 | + if (isset($line->qty_asked)) |
|
| 3555 | + {
|
|
| 3556 | + if (empty($totalOrdered)) $totalOrdered=0; // Avoid warning because $totalOrdered is '' |
|
| 3557 | + $totalOrdered+=$line->qty_asked; // defined for shipment only |
|
| 3558 | + } |
|
| 3559 | + if (isset($line->qty_shipped)) |
|
| 3560 | + {
|
|
| 3561 | + if (empty($totalToShip)) $totalToShip=0; // Avoid warning because $totalToShip is '' |
|
| 3562 | + $totalToShip+=$line->qty_shipped; // defined for shipment only |
|
| 3563 | + }else if ($line->element == 'commandefournisseurdispatch' && isset($line->qty)) |
|
| 3564 | + {
|
|
| 3565 | + if (empty($totalToShip)) $totalToShip=0; |
|
| 3566 | + $totalToShip+=$line->qty; // defined for reception only |
|
| 3567 | + } |
|
| 3568 | + |
|
| 3569 | + // Define qty, weight, volume, weight_units, volume_units |
|
| 3570 | + if ($this->element == 'shipping') {
|
|
| 3571 | + // for shipments |
|
| 3572 | + $qty = $line->qty_shipped ? $line->qty_shipped : 0; |
|
| 3573 | + } |
|
| 3574 | + else {
|
|
| 3575 | + $qty = $line->qty ? $line->qty : 0; |
|
| 3576 | + } |
|
| 3577 | + |
|
| 3578 | + $weight = $line->weight ? $line->weight : 0; |
|
| 3579 | + ($weight==0 && !empty($line->product->weight))? $weight=$line->product->weight: 0; |
|
| 3580 | + $volume = $line->volume ? $line->volume : 0; |
|
| 3581 | + ($volume==0 && !empty($line->product->volume))? $volume=$line->product->volume: 0; |
|
| 3582 | + |
|
| 3583 | + $weight_units=$line->weight_units; |
|
| 3584 | + ($weight_units==0 && !empty($line->product->weight_units))? $weight_units=$line->product->weight_units: 0; |
|
| 3585 | + $volume_units=$line->volume_units; |
|
| 3586 | + ($volume_units==0 && !empty($line->product->volume_units))? $volume_units=$line->product->volume_units: 0; |
|
| 3587 | + |
|
| 3588 | + $weightUnit=0; |
|
| 3589 | + $volumeUnit=0; |
|
| 3590 | + if (! empty($weight_units)) $weightUnit = $weight_units; |
|
| 3591 | + if (! empty($volume_units)) $volumeUnit = $volume_units; |
|
| 3592 | + |
|
| 3593 | + if (empty($totalWeight)) $totalWeight=0; // Avoid warning because $totalWeight is '' |
|
| 3594 | + if (empty($totalVolume)) $totalVolume=0; // Avoid warning because $totalVolume is '' |
|
| 3595 | + |
|
| 3596 | + //var_dump($line->volume_units); |
|
| 3597 | + if ($weight_units < 50) // >50 means a standard unit (power of 10 of official unit), > 50 means an exotic unit (like inch) |
|
| 3598 | + {
|
|
| 3599 | + $trueWeightUnit=pow(10, $weightUnit); |
|
| 3600 | + $totalWeight += $weight * $qty * $trueWeightUnit; |
|
| 3601 | + } |
|
| 3602 | + else {
|
|
| 3603 | + if ($weight_units == 99) {
|
|
| 3604 | + // conversion 1 Pound = 0.45359237 KG |
|
| 3605 | + $trueWeightUnit = 0.45359237; |
|
| 3606 | + $totalWeight += $weight * $qty * $trueWeightUnit; |
|
| 3607 | + } elseif ($weight_units == 98) {
|
|
| 3608 | + // conversion 1 Ounce = 0.0283495 KG |
|
| 3609 | + $trueWeightUnit = 0.0283495; |
|
| 3610 | + $totalWeight += $weight * $qty * $trueWeightUnit; |
|
| 3611 | + } |
|
| 3612 | + else |
|
| 3613 | + $totalWeight += $weight * $qty; // This may be wrong if we mix different units |
|
| 3614 | + } |
|
| 3615 | + if ($volume_units < 50) // >50 means a standard unit (power of 10 of official unit), > 50 means an exotic unit (like inch) |
|
| 3616 | + {
|
|
| 3617 | + //print $line->volume."x".$line->volume_units."x".($line->volume_units < 50)."x".$volumeUnit; |
|
| 3618 | + $trueVolumeUnit=pow(10, $volumeUnit); |
|
| 3619 | + //print $line->volume; |
|
| 3620 | + $totalVolume += $volume * $qty * $trueVolumeUnit; |
|
| 3621 | + } |
|
| 3622 | + else |
|
| 3623 | + {
|
|
| 3624 | + $totalVolume += $volume * $qty; // This may be wrong if we mix different units |
|
| 3625 | + } |
|
| 3626 | + } |
|
| 3627 | + |
|
| 3628 | + return array('weight'=>$totalWeight, 'volume'=>$totalVolume, 'ordered'=>$totalOrdered, 'toship'=>$totalToShip);
|
|
| 3629 | + } |
|
| 3630 | + |
|
| 3631 | + |
|
| 3632 | + /** |
|
| 3633 | + * Set extra parameters |
|
| 3634 | + * |
|
| 3635 | + * @return int <0 if KO, >0 if OK |
|
| 3636 | + */ |
|
| 3637 | + function setExtraParameters() |
|
| 3638 | + {
|
|
| 3639 | + $this->db->begin(); |
|
| 3640 | + |
|
| 3641 | + $extraparams = (! empty($this->extraparams) ? json_encode($this->extraparams) : null); |
|
| 3642 | + |
|
| 3643 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 3644 | + $sql.= " SET extraparams = ".(! empty($extraparams) ? "'".$this->db->escape($extraparams)."'" : "null"); |
|
| 3645 | + $sql.= " WHERE rowid = ".$this->id; |
|
| 3646 | + |
|
| 3647 | + dol_syslog(get_class($this)."::setExtraParameters", LOG_DEBUG); |
|
| 3648 | + $resql = $this->db->query($sql); |
|
| 3649 | + if (! $resql) |
|
| 3650 | + {
|
|
| 3651 | + $this->error=$this->db->lasterror(); |
|
| 3652 | + $this->db->rollback(); |
|
| 3653 | + return -1; |
|
| 3654 | + } |
|
| 3655 | + else |
|
| 3656 | + {
|
|
| 3657 | + $this->db->commit(); |
|
| 3658 | + return 1; |
|
| 3659 | + } |
|
| 3660 | + } |
|
| 3661 | + |
|
| 3662 | + |
|
| 3663 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 3664 | + /** |
|
| 3665 | + * Return incoterms informations |
|
| 3666 | + * TODO Use a cache for label get |
|
| 3667 | + * |
|
| 3668 | + * @return string incoterms info |
|
| 3669 | + */ |
|
| 3670 | + function display_incoterms() |
|
| 3671 | + {
|
|
| 3672 | + // phpcs:enable |
|
| 3673 | + $out = ''; |
|
| 3674 | + $this->libelle_incoterms = ''; |
|
| 3675 | + if (!empty($this->fk_incoterms)) |
|
| 3676 | + {
|
|
| 3677 | + $sql = 'SELECT code FROM '.MAIN_DB_PREFIX.'c_incoterms WHERE rowid = '.(int) $this->fk_incoterms; |
|
| 3678 | + $result = $this->db->query($sql); |
|
| 3679 | + if ($result) |
|
| 3680 | + {
|
|
| 3681 | + $res = $this->db->fetch_object($result); |
|
| 3682 | + $out .= $res->code; |
|
| 3683 | + } |
|
| 3684 | + } |
|
| 3685 | + |
|
| 3686 | + $out .= (($res->code && $this->location_incoterms)?' - ':'').$this->location_incoterms; |
|
| 3687 | + |
|
| 3688 | + return $out; |
|
| 3689 | + } |
|
| 3690 | + |
|
| 3691 | + /** |
|
| 3692 | + * Return incoterms informations for pdf display |
|
| 3693 | + * |
|
| 3694 | + * @return string incoterms info |
|
| 3695 | + */ |
|
| 3696 | + function getIncotermsForPDF() |
|
| 3697 | + {
|
|
| 3698 | + $sql = 'SELECT code FROM '.MAIN_DB_PREFIX.'c_incoterms WHERE rowid = '.(int) $this->fk_incoterms; |
|
| 3699 | + $resql = $this->db->query($sql); |
|
| 3700 | + if ($resql) |
|
| 3701 | + {
|
|
| 3702 | + $num = $this->db->num_rows($resql); |
|
| 3703 | + if ($num > 0) |
|
| 3704 | + {
|
|
| 3705 | + $res = $this->db->fetch_object($resql); |
|
| 3706 | + return 'Incoterm : '.$res->code.' - '.$this->location_incoterms; |
|
| 3707 | + } |
|
| 3708 | + else |
|
| 3709 | + {
|
|
| 3710 | + return ''; |
|
| 3711 | + } |
|
| 3712 | + } |
|
| 3713 | + else |
|
| 3714 | + {
|
|
| 3715 | + $this->errors[] = $this->db->lasterror(); |
|
| 3716 | + return false; |
|
| 3717 | + } |
|
| 3718 | + } |
|
| 3719 | + |
|
| 3720 | + /** |
|
| 3721 | + * Define incoterms values of current object |
|
| 3722 | + * |
|
| 3723 | + * @param int $id_incoterm Id of incoterm to set or '' to remove |
|
| 3724 | + * @param string $location location of incoterm |
|
| 3725 | + * @return int <0 if KO, >0 if OK |
|
| 3726 | + */ |
|
| 3727 | + function setIncoterms($id_incoterm, $location) |
|
| 3728 | + {
|
|
| 3729 | + if ($this->id && $this->table_element) |
|
| 3730 | + {
|
|
| 3731 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element; |
|
| 3732 | + $sql.= " SET fk_incoterms = ".($id_incoterm > 0 ? $id_incoterm : "null"); |
|
| 3733 | + $sql.= ", location_incoterms = ".($id_incoterm > 0 ? "'".$this->db->escape($location)."'" : "null"); |
|
| 3734 | + $sql.= " WHERE rowid = " . $this->id; |
|
| 3735 | + dol_syslog(get_class($this).'::setIncoterms', LOG_DEBUG); |
|
| 3736 | + $resql=$this->db->query($sql); |
|
| 3737 | + if ($resql) |
|
| 3738 | + {
|
|
| 3739 | + $this->fk_incoterms = $id_incoterm; |
|
| 3740 | + $this->location_incoterms = $location; |
|
| 3741 | + |
|
| 3742 | + $sql = 'SELECT libelle FROM '.MAIN_DB_PREFIX.'c_incoterms WHERE rowid = '.(int) $this->fk_incoterms; |
|
| 3743 | + $res = $this->db->query($sql); |
|
| 3744 | + if ($res) |
|
| 3745 | + {
|
|
| 3746 | + $obj = $this->db->fetch_object($res); |
|
| 3747 | + $this->libelle_incoterms = $obj->libelle; |
|
| 3748 | + } |
|
| 3749 | + return 1; |
|
| 3750 | + } |
|
| 3751 | + else |
|
| 3752 | + {
|
|
| 3753 | + $this->errors[] = $this->db->lasterror(); |
|
| 3754 | + return -1; |
|
| 3755 | + } |
|
| 3756 | + } |
|
| 3757 | + else return -1; |
|
| 3758 | + } |
|
| 3759 | + |
|
| 3760 | + |
|
| 3761 | + // -------------------- |
|
| 3762 | + // TODO: All functions here must be redesigned and moved as they are not business functions but output functions |
|
| 3763 | + // -------------------- |
|
| 3764 | + |
|
| 3765 | + /* This is to show add lines */ |
|
| 3766 | + |
|
| 3767 | + /** |
|
| 3768 | + * Show add free and predefined products/services form |
|
| 3769 | + * |
|
| 3770 | + * @param int $dateSelector 1=Show also date range input fields |
|
| 3771 | + * @param Societe $seller Object thirdparty who sell |
|
| 3772 | + * @param Societe $buyer Object thirdparty who buy |
|
| 3773 | + * @return void |
|
| 3774 | + */ |
|
| 3775 | + function formAddObjectLine($dateSelector, $seller, $buyer) |
|
| 3776 | + {
|
|
| 3777 | + global $conf,$user,$langs,$object,$hookmanager; |
|
| 3778 | + global $form,$bcnd,$var; |
|
| 3779 | + |
|
| 3780 | + // Line extrafield |
|
| 3781 | + require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 3782 | + $extrafieldsline = new AlExtraFields($this->db); |
|
| 3783 | + $extralabelslines=$extrafieldsline->fetch_name_optionals_label($this->table_element_line); |
|
| 3784 | + |
|
| 3785 | + // Output template part (modules that overwrite templates must declare this into descriptor) |
|
| 3786 | + // Use global variables + $dateSelector + $seller and $buyer |
|
| 3787 | + $dirtpls = array_merge(Globals::$conf->modules_parts['tpl'], array('/core/tpl'));
|
|
| 3788 | + foreach($dirtpls as $reldir) |
|
| 3789 | + {
|
|
| 3790 | + $tpl = dol_buildpath($reldir.'/objectline_create.tpl.php'); |
|
| 3791 | + if (empty(Globals::$conf->file->strict_mode)) {
|
|
| 3792 | + $res=@include $tpl; |
|
| 3793 | + } else {
|
|
| 3794 | + $res=include $tpl; // for debug |
|
| 3795 | + } |
|
| 3796 | + if ($res) break; |
|
| 3797 | + } |
|
| 3798 | + } |
|
| 3799 | + |
|
| 3800 | + |
|
| 3801 | + |
|
| 3802 | + /* This is to show array of line of details */ |
|
| 3803 | + |
|
| 3804 | + |
|
| 3805 | + /** |
|
| 3806 | + * Return HTML table for object lines |
|
| 3807 | + * TODO Move this into an output class file (htmlline.class.php) |
|
| 3808 | + * If lines are into a template, title must also be into a template |
|
| 3809 | + * But for the moment we don't know if it's possible as we keep a method available on overloaded objects. |
|
| 3810 | + * |
|
| 3811 | + * @param string $action Action code |
|
| 3812 | + * @param string $seller Object of seller third party |
|
| 3813 | + * @param string $buyer Object of buyer third party |
|
| 3814 | + * @param int $selected Object line selected |
|
| 3815 | + * @param int $dateSelector 1=Show also date range input fields |
|
| 3816 | + * @return void |
|
| 3817 | + */ |
|
| 3818 | + function printObjectLines($action, $seller, $buyer, $selected=0, $dateSelector=0) |
|
| 3819 | + {
|
|
| 3820 | + global $conf, $hookmanager, $langs, $user; |
|
| 3821 | + // TODO We should not use global var for this ! |
|
| 3822 | + global $inputalsopricewithtax, $usemargins, $disableedit, $disablemove, $disableremove, $outputalsopricetotalwithtax; |
|
| 3823 | + |
|
| 3824 | + // Define usemargins |
|
| 3825 | + $usemargins=0; |
|
| 3826 | + if (!empty(Globals::$conf->margin->enabled) && !empty($this->element) && in_array($this->element, array('facture', 'propal', 'commande')))
|
|
| 3827 | + $usemargins = 1; |
|
| 3828 | + |
|
| 3829 | + $num = count($this->lines); |
|
| 3830 | + |
|
| 3831 | + // Line extrafield |
|
| 3832 | + require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 3833 | + $extrafieldsline = new AlExtraFields($this->db); |
|
| 3834 | + $extralabelslines=$extrafieldsline->fetch_name_optionals_label($this->table_element_line); |
|
| 3835 | + |
|
| 3836 | + $parameters = array('num'=>$num,'i'=>$i,'dateSelector'=>$dateSelector,'seller'=>$seller,'buyer'=>$buyer,'selected'=>$selected, 'extrafieldsline'=>$extrafieldsline);
|
|
| 3837 | + $reshook = $hookmanager->executeHooks('printObjectLineTitle', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
|
|
| 3838 | + if (empty($reshook)) |
|
| 3839 | + {
|
|
| 3840 | + // Title line |
|
| 3841 | + print "<thead>\n"; |
|
| 3842 | + |
|
| 3843 | + print '<tr class="liste_titre nodrag nodrop">'; |
|
| 3844 | + |
|
| 3845 | + // Adds a line numbering column |
|
| 3846 | + if (!empty(Globals::$conf->global->MAIN_VIEW_LINE_NUMBER)) |
|
| 3847 | + print '<td class="linecolnum" align="center" width="5"> </td>'; |
|
| 3848 | + |
|
| 3849 | + // Description |
|
| 3850 | + print '<td class="linecoldescription">'.$langs->trans('Description').'</td>';
|
|
| 3851 | + |
|
| 3852 | + if ($this->element == 'supplier_proposal' || $this->element == 'order_supplier' || $this->element == 'invoice_supplier') |
|
| 3853 | + {
|
|
| 3854 | + print '<td class="linerefsupplier"><span id="title_fourn_ref">'.$langs->trans("SupplierRef").'</span></td>';
|
|
| 3855 | + } |
|
| 3856 | + |
|
| 3857 | + // VAT |
|
| 3858 | + print '<td class="linecolvat" align="right" width="80">'.$langs->trans('VAT').'</td>';
|
|
| 3859 | + |
|
| 3860 | + // Price HT |
|
| 3861 | + print '<td class="linecoluht" align="right" width="80">'.$langs->trans('PriceUHT').'</td>';
|
|
| 3862 | + |
|
| 3863 | + // Multicurrency |
|
| 3864 | + if (!empty(Globals::$conf->multicurrency->enabled) && $this->multicurrency_code != Globals::$conf->currency) |
|
| 3865 | + print '<td class="linecoluht_currency" align="right" width="80">' . $langs->trans('PriceUHTCurrency', $this->multicurrency_code) . '</td>';
|
|
| 3866 | + |
|
| 3867 | + if ($inputalsopricewithtax) print '<td align="right" width="80">'.$langs->trans('PriceUTTC').'</td>';
|
|
| 3868 | + |
|
| 3869 | + // Qty |
|
| 3870 | + print '<td class="linecolqty" align="right">'.$langs->trans('Qty').'</td>';
|
|
| 3871 | + |
|
| 3872 | + if (Globals::$conf->global->PRODUCT_USE_UNITS) {
|
|
| 3873 | + print '<td class="linecoluseunit" align="left">'.$langs->trans('Unit').'</td>';
|
|
| 3874 | + } |
|
| 3875 | + |
|
| 3876 | + // Reduction short |
|
| 3877 | + print '<td class="linecoldiscount" align="right">'.$langs->trans('ReductionShort').'</td>';
|
|
| 3878 | + |
|
| 3879 | + if ($this->situation_cycle_ref) {
|
|
| 3880 | + print '<td class="linecolcycleref" align="right">' . $langs->trans('Progress') . '</td>';
|
|
| 3881 | + } |
|
| 3882 | + |
|
| 3883 | + if ($usemargins && !empty(Globals::$conf->margin->enabled) && empty($user->societe_id)) {
|
|
| 3884 | + if (!empty($user->rights->margins->creer)) |
|
| 3885 | + {
|
|
| 3886 | + if (Globals::$conf->global->MARGIN_TYPE == "1") |
|
| 3887 | + print '<td class="linecolmargin1 margininfos" align="right" width="80">'.$langs->trans('BuyingPrice').'</td>';
|
|
| 3888 | + else |
|
| 3889 | + print '<td class="linecolmargin1 margininfos" align="right" width="80">'.$langs->trans('CostPrice').'</td>';
|
|
| 3890 | + } |
|
| 3891 | + |
|
| 3892 | + if (!empty(Globals::$conf->global->DISPLAY_MARGIN_RATES) && $user->rights->margins->liretous) |
|
| 3893 | + print '<td class="linecolmargin2 margininfos" align="right" width="50">'.$langs->trans('MarginRate').'</td>';
|
|
| 3894 | + if (!empty(Globals::$conf->global->DISPLAY_MARK_RATES) && $user->rights->margins->liretous) |
|
| 3895 | + print '<td class="linecolmargin2 margininfos" align="right" width="50">'.$langs->trans('MarkRate').'</td>';
|
|
| 3896 | + } |
|
| 3897 | + |
|
| 3898 | + // Total HT |
|
| 3899 | + print '<td class="linecolht" align="right">'.$langs->trans('TotalHTShort').'</td>';
|
|
| 3900 | + |
|
| 3901 | + // Multicurrency |
|
| 3902 | + if (!empty(Globals::$conf->multicurrency->enabled) && $this->multicurrency_code != Globals::$conf->currency) |
|
| 3903 | + print '<td class="linecoltotalht_currency" align="right">' . $langs->trans('TotalHTShortCurrency', $this->multicurrency_code) . '</td>';
|
|
| 3904 | + |
|
| 3905 | + if ($outputalsopricetotalwithtax) print '<td align="right" width="80">'.$langs->trans('TotalTTCShort').'</td>';
|
|
| 3906 | + |
|
| 3907 | + print '<td class="linecoledit"></td>'; // No width to allow autodim |
|
| 3908 | + |
|
| 3909 | + print '<td class="linecoldelete" width="10"></td>'; |
|
| 3910 | + |
|
| 3911 | + print '<td class="linecolmove" width="10"></td>'; |
|
| 3912 | + |
|
| 3913 | + if($action == 'selectlines') |
|
| 3914 | + {
|
|
| 3915 | + print '<td class="linecolcheckall" align="center">'; |
|
| 3916 | + print '<input type="checkbox" class="linecheckboxtoggle" />'; |
|
| 3917 | + print '<script type="text/javascript">$(document).ready(function() {$(".linecheckboxtoggle").click(function() {var checkBoxes = $(".linecheckbox");checkBoxes.prop("checked", this.checked);})});</script>';
|
|
| 3918 | + print '</td>'; |
|
| 3919 | + } |
|
| 3920 | + |
|
| 3921 | + print "</tr>\n"; |
|
| 3922 | + print "</thead>\n"; |
|
| 3923 | + } |
|
| 3924 | + |
|
| 3925 | + $var = true; |
|
| 3926 | + $i = 0; |
|
| 3927 | + |
|
| 3928 | + print "<tbody>\n"; |
|
| 3929 | + foreach ($this->lines as $line) |
|
| 3930 | + {
|
|
| 3931 | + //Line extrafield |
|
| 3932 | + $line->fetch_optionals(); |
|
| 3933 | + |
|
| 3934 | + //if (is_object($hookmanager) && (($line->product_type == 9 && ! empty($line->special_code)) || ! empty($line->fk_parent_line))) |
|
| 3935 | + if (is_object($hookmanager)) // Old code is commented on preceding line. |
|
| 3936 | + {
|
|
| 3937 | + if (empty($line->fk_parent_line)) |
|
| 3938 | + {
|
|
| 3939 | + $parameters = array('line'=>$line,'var'=>$var,'num'=>$num,'i'=>$i,'dateSelector'=>$dateSelector,'seller'=>$seller,'buyer'=>$buyer,'selected'=>$selected, 'extrafieldsline'=>$extrafieldsline);
|
|
| 3940 | + $reshook = $hookmanager->executeHooks('printObjectLine', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
|
|
| 3941 | + } |
|
| 3942 | + else |
|
| 3943 | + {
|
|
| 3944 | + $parameters = array('line'=>$line,'var'=>$var,'num'=>$num,'i'=>$i,'dateSelector'=>$dateSelector,'seller'=>$seller,'buyer'=>$buyer,'selected'=>$selected, 'extrafieldsline'=>$extrafieldsline, 'fk_parent_line'=>$line->fk_parent_line);
|
|
| 3945 | + $reshook = $hookmanager->executeHooks('printObjectSubLine', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
|
|
| 3946 | + } |
|
| 3947 | + } |
|
| 3948 | + if (empty($reshook)) |
|
| 3949 | + {
|
|
| 3950 | + $this->printObjectLine($action,$line,$var,$num,$i,$dateSelector,$seller,$buyer,$selected,$extrafieldsline); |
|
| 3951 | + } |
|
| 3952 | + |
|
| 3953 | + $i++; |
|
| 3954 | + } |
|
| 3955 | + print "</tbody>\n"; |
|
| 3956 | + } |
|
| 3957 | + |
|
| 3958 | + /** |
|
| 3959 | + * Return HTML content of a detail line |
|
| 3960 | + * TODO Move this into an output class file (htmlline.class.php) |
|
| 3961 | + * |
|
| 3962 | + * @param string $action GET/POST action |
|
| 3963 | + * @param CommonObjectLine $line Selected object line to output |
|
| 3964 | + * @param string $var Is it a an odd line (true) |
|
| 3965 | + * @param int $num Number of line (0) |
|
| 3966 | + * @param int $i I |
|
| 3967 | + * @param int $dateSelector 1=Show also date range input fields |
|
| 3968 | + * @param string $seller Object of seller third party |
|
| 3969 | + * @param string $buyer Object of buyer third party |
|
| 3970 | + * @param int $selected Object line selected |
|
| 3971 | + * @param int $extrafieldsline Object of extrafield line attribute |
|
| 3972 | + * @return void |
|
| 3973 | + */ |
|
| 3974 | + function printObjectLine($action,$line,$var,$num,$i,$dateSelector,$seller,$buyer,$selected=0,$extrafieldsline=0) |
|
| 3975 | + {
|
|
| 3976 | + global $conf,$langs,$user,$object,$hookmanager; |
|
| 3977 | + global $form,$bc,$bcdd; |
|
| 3978 | + global $object_rights, $disableedit, $disablemove, $disableremove; // TODO We should not use global var for this ! |
|
| 3979 | + |
|
| 3980 | + $object_rights = $this->getRights(); |
|
| 3981 | + |
|
| 3982 | + $element=$this->element; |
|
| 3983 | + |
|
| 3984 | + $text=''; $description=''; $type=0; |
|
| 3985 | + |
|
| 3986 | + // Show product and description |
|
| 3987 | + $type=(! empty($line->product_type)?$line->product_type:$line->fk_product_type); |
|
| 3988 | + // Try to enhance type detection using date_start and date_end for free lines where type was not saved. |
|
| 3989 | + if (! empty($line->date_start)) $type=1; // deprecated |
|
| 3990 | + if (! empty($line->date_end)) $type=1; // deprecated |
|
| 3991 | + |
|
| 3992 | + // Ligne en mode visu |
|
| 3993 | + if ($action != 'editline' || $selected != $line->id) |
|
| 3994 | + {
|
|
| 3995 | + // Product |
|
| 3996 | + if ($line->fk_product > 0) |
|
| 3997 | + {
|
|
| 3998 | + $product_static = new Product($this->db); |
|
| 3999 | + $product_static->fetch($line->fk_product); |
|
| 4000 | + |
|
| 4001 | + $product_static->ref = $line->ref; //can change ref in hook |
|
| 4002 | + $product_static->label = $line->label; //can change label in hook |
|
| 4003 | + $text=$product_static->getNomUrl(1); |
|
| 4004 | + |
|
| 4005 | + // Define output language and label |
|
| 4006 | + if (!empty(Globals::$conf->global->MAIN_MULTILANGS)) {
|
|
| 4007 | + if (! is_object($this->thirdparty)) |
|
| 4008 | + {
|
|
| 4009 | + dol_print_error('','Error: Method printObjectLine was called on an object and object->fetch_thirdparty was not done before');
|
|
| 4010 | + return; |
|
| 4011 | + } |
|
| 4012 | + |
|
| 4013 | + $prod = new Product($this->db); |
|
| 4014 | + $prod->fetch($line->fk_product); |
|
| 4015 | + |
|
| 4016 | + $outputlangs = $langs; |
|
| 4017 | + $newlang=''; |
|
| 4018 | + if (empty($newlang) && GETPOST('lang_id','aZ09')) $newlang=GETPOST('lang_id','aZ09');
|
|
| 4019 | + if (!empty(Globals::$conf->global->PRODUIT_TEXTS_IN_THIRDPARTY_LANGUAGE) && empty($newlang)) |
|
| 4020 | + $newlang = $this->thirdparty->default_lang; // For language to language of customer |
|
| 4021 | + if (! empty($newlang)) |
|
| 4022 | + {
|
|
| 4023 | + $outputlangs = new Translate("",$conf);
|
|
| 4024 | + $outputlangs->setDefaultLang($newlang); |
|
| 4025 | + } |
|
| 4026 | + |
|
| 4027 | + $label = (! empty($prod->multilangs[$outputlangs->defaultlang]["label"])) ? $prod->multilangs[$outputlangs->defaultlang]["label"] : $line->product_label; |
|
| 4028 | + } |
|
| 4029 | + else |
|
| 4030 | + {
|
|
| 4031 | + $label = $line->product_label; |
|
| 4032 | + } |
|
| 4033 | + |
|
| 4034 | + $text.= ' - '.(! empty($line->label)?$line->label:$label); |
|
| 4035 | + $description .= (!empty(Globals::$conf->global->PRODUIT_DESC_IN_FORM) ? '' : dol_htmlentitiesbr($line->description)); // Description is what to show on popup. We shown nothing if already into desc. |
|
| 4036 | + } |
|
| 4037 | + |
|
| 4038 | + $line->pu_ttc = price2num($line->subprice * (1 + ($line->tva_tx/100)), 'MU'); |
|
| 4039 | + |
|
| 4040 | + // Output template part (modules that overwrite templates must declare this into descriptor) |
|
| 4041 | + // Use global variables + $dateSelector + $seller and $buyer |
|
| 4042 | + $dirtpls = array_merge(Globals::$conf->modules_parts['tpl'], array('/core/tpl'));
|
|
| 4043 | + foreach($dirtpls as $reldir) |
|
| 4044 | + {
|
|
| 4045 | + $tpl = dol_buildpath($reldir.'/objectline_view.tpl.php'); |
|
| 4046 | + if (empty(Globals::$conf->file->strict_mode)) {
|
|
| 4047 | + $res=@include $tpl; |
|
| 4048 | + } else {
|
|
| 4049 | + $res=include $tpl; // for debug |
|
| 4050 | + } |
|
| 4051 | + if ($res) break; |
|
| 4052 | + } |
|
| 4053 | + } |
|
| 4054 | + |
|
| 4055 | + // Ligne en mode update |
|
| 4056 | + if ($this->statut == 0 && $action == 'editline' && $selected == $line->id) |
|
| 4057 | + {
|
|
| 4058 | + $label = (! empty($line->label) ? $line->label : (($line->fk_product > 0) ? $line->product_label : '')); |
|
| 4059 | + $placeholder=' placeholder="'.$langs->trans("Label").'"';
|
|
| 4060 | + |
|
| 4061 | + $line->pu_ttc = price2num($line->subprice * (1 + ($line->tva_tx/100)), 'MU'); |
|
| 4062 | + |
|
| 4063 | + // Output template part (modules that overwrite templates must declare this into descriptor) |
|
| 4064 | + // Use global variables + $dateSelector + $seller and $buyer |
|
| 4065 | + $dirtpls = array_merge(Globals::$conf->modules_parts['tpl'], array('/core/tpl'));
|
|
| 4066 | + foreach($dirtpls as $reldir) |
|
| 4067 | + {
|
|
| 4068 | + $tpl = dol_buildpath($reldir.'/objectline_edit.tpl.php'); |
|
| 4069 | + if (empty(Globals::$conf->file->strict_mode)) {
|
|
| 4070 | + $res=@include $tpl; |
|
| 4071 | + } else {
|
|
| 4072 | + $res=include $tpl; // for debug |
|
| 4073 | + } |
|
| 4074 | + if ($res) break; |
|
| 4075 | + } |
|
| 4076 | + } |
|
| 4077 | + } |
|
| 4078 | + |
|
| 4079 | + |
|
| 4080 | + /* This is to show array of line of details of source object */ |
|
| 4081 | + |
|
| 4082 | + |
|
| 4083 | + /** |
|
| 4084 | + * Return HTML table table of source object lines |
|
| 4085 | + * TODO Move this and previous function into output html class file (htmlline.class.php). |
|
| 4086 | + * If lines are into a template, title must also be into a template |
|
| 4087 | + * But for the moment we don't know if it's possible, so we keep the method available on overloaded objects. |
|
| 4088 | + * |
|
| 4089 | + * @param string $restrictlist ''=All lines, 'services'=Restrict to services only |
|
| 4090 | + * @return void |
|
| 4091 | + */ |
|
| 4092 | + function printOriginLinesList($restrictlist='') |
|
| 4093 | + {
|
|
| 4094 | + global $langs, $hookmanager, $conf; |
|
| 4095 | + |
|
| 4096 | + print '<tr class="liste_titre">'; |
|
| 4097 | + print '<td>'.$langs->trans('Ref').'</td>';
|
|
| 4098 | + print '<td>'.$langs->trans('Description').'</td>';
|
|
| 4099 | + print '<td align="right">'.$langs->trans('VATRate').'</td>';
|
|
| 4100 | + print '<td align="right">'.$langs->trans('PriceUHT').'</td>';
|
|
| 4101 | + if (!empty(Globals::$conf->multicurrency->enabled)) |
|
| 4102 | + print '<td align="right">' . $langs->trans('PriceUHTCurrency') . '</td>';
|
|
| 4103 | + print '<td align="right">'.$langs->trans('Qty').'</td>';
|
|
| 4104 | + if (Globals::$conf->global->PRODUCT_USE_UNITS) {
|
|
| 4105 | + print '<td align="left">'.$langs->trans('Unit').'</td>';
|
|
| 4106 | + } |
|
| 4107 | + print '<td align="right">'.$langs->trans('ReductionShort').'</td></tr>';
|
|
| 4108 | + |
|
| 4109 | + $var = true; |
|
| 4110 | + $i = 0; |
|
| 4111 | + |
|
| 4112 | + if (! empty($this->lines)) |
|
| 4113 | + {
|
|
| 4114 | + foreach ($this->lines as $line) |
|
| 4115 | + {
|
|
| 4116 | + if (is_object($hookmanager) && (($line->product_type == 9 && ! empty($line->special_code)) || ! empty($line->fk_parent_line))) |
|
| 4117 | + {
|
|
| 4118 | + if (empty($line->fk_parent_line)) |
|
| 4119 | + {
|
|
| 4120 | + $parameters=array('line'=>$line,'var'=>$var,'i'=>$i);
|
|
| 4121 | + $action=''; |
|
| 4122 | + $hookmanager->executeHooks('printOriginObjectLine',$parameters,$this,$action); // Note that $action and $object may have been modified by some hooks
|
|
| 4123 | + } |
|
| 4124 | + } |
|
| 4125 | + else |
|
| 4126 | + {
|
|
| 4127 | + $this->printOriginLine($line, $var, $restrictlist); |
|
| 4128 | + } |
|
| 4129 | + |
|
| 4130 | + $i++; |
|
| 4131 | + } |
|
| 4132 | + } |
|
| 4133 | + } |
|
| 4134 | + |
|
| 4135 | + /** |
|
| 4136 | + * Return HTML with a line of table array of source object lines |
|
| 4137 | + * TODO Move this and previous function into output html class file (htmlline.class.php). |
|
| 4138 | + * If lines are into a template, title must also be into a template |
|
| 4139 | + * But for the moment we don't know if it's possible as we keep a method available on overloaded objects. |
|
| 4140 | + * |
|
| 4141 | + * @param CommonObjectLine $line Line |
|
| 4142 | + * @param string $var Var |
|
| 4143 | + * @param string $restrictlist ''=All lines, 'services'=Restrict to services only (strike line if not) |
|
| 4144 | + * @return void |
|
| 4145 | + */ |
|
| 4146 | + function printOriginLine($line, $var, $restrictlist='') |
|
| 4147 | + {
|
|
| 4148 | + global $langs, $conf; |
|
| 4149 | + |
|
| 4150 | + //var_dump($line); |
|
| 4151 | + if (!empty($line->date_start)) |
|
| 4152 | + {
|
|
| 4153 | + $date_start=$line->date_start; |
|
| 4154 | + } |
|
| 4155 | + else |
|
| 4156 | + {
|
|
| 4157 | + $date_start=$line->date_debut_prevue; |
|
| 4158 | + if ($line->date_debut_reel) $date_start=$line->date_debut_reel; |
|
| 4159 | + } |
|
| 4160 | + if (!empty($line->date_end)) |
|
| 4161 | + {
|
|
| 4162 | + $date_end=$line->date_end; |
|
| 4163 | + } |
|
| 4164 | + else |
|
| 4165 | + {
|
|
| 4166 | + $date_end=$line->date_fin_prevue; |
|
| 4167 | + if ($line->date_fin_reel) $date_end=$line->date_fin_reel; |
|
| 4168 | + } |
|
| 4169 | + |
|
| 4170 | + $this->tpl['label'] = ''; |
|
| 4171 | + if (! empty($line->fk_parent_line)) $this->tpl['label'].= img_picto('', 'rightarrow');
|
|
| 4172 | + |
|
| 4173 | + if (($line->info_bits & 2) == 2) // TODO Not sure this is used for source object |
|
| 4174 | + {
|
|
| 4175 | + $discount=new DiscountAbsolute($this->db); |
|
| 4176 | + $discount->fk_soc = $this->socid; |
|
| 4177 | + $this->tpl['label'].= $discount->getNomUrl(0,'discount'); |
|
| 4178 | + } |
|
| 4179 | + else if (! empty($line->fk_product)) |
|
| 4180 | + {
|
|
| 4181 | + $productstatic = new Product($this->db); |
|
| 4182 | + $productstatic->id = $line->fk_product; |
|
| 4183 | + $productstatic->ref = $line->ref; |
|
| 4184 | + $productstatic->type = $line->fk_product_type; |
|
| 4185 | + if(empty($productstatic->ref)){
|
|
| 4186 | + $line->fetch_product(); |
|
| 4187 | + $productstatic = $line->product; |
|
| 4188 | + } |
|
| 4189 | + |
|
| 4190 | + $this->tpl['label'].= $productstatic->getNomUrl(1); |
|
| 4191 | + $this->tpl['label'].= ' - '.(! empty($line->label)?$line->label:$line->product_label); |
|
| 4192 | + // Dates |
|
| 4193 | + if ($line->product_type == 1 && ($date_start || $date_end)) |
|
| 4194 | + {
|
|
| 4195 | + $this->tpl['label'].= get_date_range($date_start,$date_end); |
|
| 4196 | + } |
|
| 4197 | + } |
|
| 4198 | + else |
|
| 4199 | + {
|
|
| 4200 | + $this->tpl['label'].= ($line->product_type == -1 ? ' ' : ($line->product_type == 1 ? img_object($langs->trans(''),'service') : img_object($langs->trans(''),'product')));
|
|
| 4201 | + if (!empty($line->desc)) {
|
|
| 4202 | + $this->tpl['label'].=$line->desc; |
|
| 4203 | + }else {
|
|
| 4204 | + $this->tpl['label'].= ($line->label ? ' '.$line->label : ''); |
|
| 4205 | + } |
|
| 4206 | + |
|
| 4207 | + // Dates |
|
| 4208 | + if ($line->product_type == 1 && ($date_start || $date_end)) |
|
| 4209 | + {
|
|
| 4210 | + $this->tpl['label'].= get_date_range($date_start,$date_end); |
|
| 4211 | + } |
|
| 4212 | + } |
|
| 4213 | + |
|
| 4214 | + if (! empty($line->desc)) |
|
| 4215 | + {
|
|
| 4216 | + if ($line->desc == '(CREDIT_NOTE)') // TODO Not sure this is used for source object |
|
| 4217 | + {
|
|
| 4218 | + $discount=new DiscountAbsolute($this->db); |
|
| 4219 | + $discount->fetch($line->fk_remise_except); |
|
| 4220 | + $this->tpl['description'] = $langs->transnoentities("DiscountFromCreditNote",$discount->getNomUrl(0));
|
|
| 4221 | + } |
|
| 4222 | + elseif ($line->desc == '(DEPOSIT)') // TODO Not sure this is used for source object |
|
| 4223 | + {
|
|
| 4224 | + $discount=new DiscountAbsolute($this->db); |
|
| 4225 | + $discount->fetch($line->fk_remise_except); |
|
| 4226 | + $this->tpl['description'] = $langs->transnoentities("DiscountFromDeposit",$discount->getNomUrl(0));
|
|
| 4227 | + } |
|
| 4228 | + elseif ($line->desc == '(EXCESS RECEIVED)') |
|
| 4229 | + {
|
|
| 4230 | + $discount=new DiscountAbsolute($this->db); |
|
| 4231 | + $discount->fetch($line->fk_remise_except); |
|
| 4232 | + $this->tpl['description'] = $langs->transnoentities("DiscountFromExcessReceived",$discount->getNomUrl(0));
|
|
| 4233 | + } |
|
| 4234 | + elseif ($line->desc == '(EXCESS PAID)') |
|
| 4235 | + {
|
|
| 4236 | + $discount=new DiscountAbsolute($this->db); |
|
| 4237 | + $discount->fetch($line->fk_remise_except); |
|
| 4238 | + $this->tpl['description'] = $langs->transnoentities("DiscountFromExcessPaid",$discount->getNomUrl(0));
|
|
| 4239 | + } |
|
| 4240 | + else |
|
| 4241 | + {
|
|
| 4242 | + $this->tpl['description'] = dol_trunc($line->desc,60); |
|
| 4243 | + } |
|
| 4244 | + } |
|
| 4245 | + else |
|
| 4246 | + {
|
|
| 4247 | + $this->tpl['description'] = ' '; |
|
| 4248 | + } |
|
| 4249 | + |
|
| 4250 | + // VAT Rate |
|
| 4251 | + $this->tpl['vat_rate'] = vatrate($line->tva_tx, true); |
|
| 4252 | + $this->tpl['vat_rate'] .= (($line->info_bits & 1) == 1) ? '*' : ''; |
|
| 4253 | + if (! empty($line->vat_src_code) && ! preg_match('/\(/', $this->tpl['vat_rate'])) $this->tpl['vat_rate'].=' ('.$line->vat_src_code.')';
|
|
| 4254 | + |
|
| 4255 | + $this->tpl['price'] = price($line->subprice); |
|
| 4256 | + $this->tpl['multicurrency_price'] = price($line->multicurrency_subprice); |
|
| 4257 | + $this->tpl['qty'] = (($line->info_bits & 2) != 2) ? $line->qty : ' '; |
|
| 4258 | + if (Globals::$conf->global->PRODUCT_USE_UNITS) |
|
| 4259 | + $this->tpl['unit'] = $langs->transnoentities($line->getLabelOfUnit('long'));
|
|
| 4260 | + $this->tpl['remise_percent'] = (($line->info_bits & 2) != 2) ? vatrate($line->remise_percent, true) : ' '; |
|
| 4261 | + |
|
| 4262 | + // Is the line strike or not |
|
| 4263 | + $this->tpl['strike']=0; |
|
| 4264 | + if ($restrictlist == 'services' && $line->product_type != Product::TYPE_SERVICE) $this->tpl['strike']=1; |
|
| 4265 | + |
|
| 4266 | + // Output template part (modules that overwrite templates must declare this into descriptor) |
|
| 4267 | + // Use global variables + $dateSelector + $seller and $buyer |
|
| 4268 | + $dirtpls = array_merge(Globals::$conf->modules_parts['tpl'], array('/core/tpl'));
|
|
| 4269 | + foreach($dirtpls as $reldir) |
|
| 4270 | + {
|
|
| 4271 | + $tpl = dol_buildpath($reldir.'/originproductline.tpl.php'); |
|
| 4272 | + if (empty(Globals::$conf->file->strict_mode)) {
|
|
| 4273 | + $res=@include $tpl; |
|
| 4274 | + } else {
|
|
| 4275 | + $res=include $tpl; // for debug |
|
| 4276 | + } |
|
| 4277 | + if ($res) break; |
|
| 4278 | + } |
|
| 4279 | + } |
|
| 4280 | + |
|
| 4281 | + |
|
| 4282 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 4283 | + /** |
|
| 4284 | + * Add resources to the current object : add entry into llx_element_resources |
|
| 4285 | + * Need $this->element & $this->id |
|
| 4286 | + * |
|
| 4287 | + * @param int $resource_id Resource id |
|
| 4288 | + * @param string $resource_type 'resource' |
|
| 4289 | + * @param int $busy Busy or not |
|
| 4290 | + * @param int $mandatory Mandatory or not |
|
| 4291 | + * @return int <=0 if KO, >0 if OK |
|
| 4292 | + */ |
|
| 4293 | + function add_element_resource($resource_id, $resource_type, $busy=0, $mandatory=0) |
|
| 4294 | + {
|
|
| 4295 | + // phpcs:enable |
|
| 4296 | + $this->db->begin(); |
|
| 4297 | + |
|
| 4298 | + $sql = "INSERT INTO ".MAIN_DB_PREFIX."element_resources (";
|
|
| 4299 | + $sql.= "resource_id"; |
|
| 4300 | + $sql.= ", resource_type"; |
|
| 4301 | + $sql.= ", element_id"; |
|
| 4302 | + $sql.= ", element_type"; |
|
| 4303 | + $sql.= ", busy"; |
|
| 4304 | + $sql.= ", mandatory"; |
|
| 4305 | + $sql.= ") VALUES (";
|
|
| 4306 | + $sql.= $resource_id; |
|
| 4307 | + $sql.= ", '".$this->db->escape($resource_type)."'"; |
|
| 4308 | + $sql.= ", '".$this->db->escape($this->id)."'"; |
|
| 4309 | + $sql.= ", '".$this->db->escape($this->element)."'"; |
|
| 4310 | + $sql.= ", '".$this->db->escape($busy)."'"; |
|
| 4311 | + $sql.= ", '".$this->db->escape($mandatory)."'"; |
|
| 4312 | + $sql.= ")"; |
|
| 4313 | + |
|
| 4314 | + dol_syslog(get_class($this)."::add_element_resource", LOG_DEBUG); |
|
| 4315 | + if ($this->db->query($sql)) |
|
| 4316 | + {
|
|
| 4317 | + $this->db->commit(); |
|
| 4318 | + return 1; |
|
| 4319 | + } |
|
| 4320 | + else |
|
| 4321 | + {
|
|
| 4322 | + $this->error=$this->db->lasterror(); |
|
| 4323 | + $this->db->rollback(); |
|
| 4324 | + return 0; |
|
| 4325 | + } |
|
| 4326 | + } |
|
| 4327 | + |
|
| 4328 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 4329 | + /** |
|
| 4330 | + * Delete a link to resource line |
|
| 4331 | + * |
|
| 4332 | + * @param int $rowid Id of resource line to delete |
|
| 4333 | + * @param int $element element name (for trigger) TODO: use $this->element into commonobject class |
|
| 4334 | + * @param int $notrigger Disable all triggers |
|
| 4335 | + * @return int >0 if OK, <0 if KO |
|
| 4336 | + */ |
|
| 4337 | + function delete_resource($rowid, $element, $notrigger=0) |
|
| 4338 | + {
|
|
| 4339 | + // phpcs:enable |
|
| 4340 | + global $user; |
|
| 4341 | + |
|
| 4342 | + $this->db->begin(); |
|
| 4343 | + |
|
| 4344 | + $sql = "DELETE FROM ".MAIN_DB_PREFIX."element_resources"; |
|
| 4345 | + $sql.= " WHERE rowid=".$rowid; |
|
| 4346 | + |
|
| 4347 | + dol_syslog(get_class($this)."::delete_resource", LOG_DEBUG); |
|
| 4348 | + |
|
| 4349 | + $resql=$this->db->query($sql); |
|
| 4350 | + if (! $resql) |
|
| 4351 | + {
|
|
| 4352 | + $this->error=$this->db->lasterror(); |
|
| 4353 | + $this->db->rollback(); |
|
| 4354 | + return -1; |
|
| 4355 | + } |
|
| 4356 | + else |
|
| 4357 | + {
|
|
| 4358 | + if (! $notrigger) |
|
| 4359 | + {
|
|
| 4360 | + $result=$this->call_trigger(strtoupper($element).'_DELETE_RESOURCE', $user); |
|
| 4361 | + if ($result < 0) { $this->db->rollback(); return -1; }
|
|
| 4362 | + } |
|
| 4363 | + $this->db->commit(); |
|
| 4364 | + return 1; |
|
| 4365 | + } |
|
| 4366 | + } |
|
| 4367 | + |
|
| 4368 | + |
|
| 4369 | + /** |
|
| 4370 | + * Overwrite magic function to solve problem of cloning object that are kept as references |
|
| 4371 | + * |
|
| 4372 | + * @return void |
|
| 4373 | + */ |
|
| 4374 | + function __clone() |
|
| 4375 | + {
|
|
| 4376 | + // Force a copy of this->lines, otherwise it will point to same object. |
|
| 4377 | + if (isset($this->lines) && is_array($this->lines)) |
|
| 4378 | + {
|
|
| 4379 | + $nboflines=count($this->lines); |
|
| 4380 | + for($i=0; $i < $nboflines; $i++) |
|
| 4381 | + {
|
|
| 4382 | + $this->lines[$i] = clone $this->lines[$i]; |
|
| 4383 | + } |
|
| 4384 | + } |
|
| 4385 | + } |
|
| 4386 | + |
|
| 4387 | + /** |
|
| 4388 | + * Common function for all objects extending CommonObject for generating documents |
|
| 4389 | + * |
|
| 4390 | + * @param string $modelspath Relative folder where generators are placed |
|
| 4391 | + * @param string $modele Generator to use. Caller must set it to obj->modelpdf or GETPOST('modelpdf') for example.
|
|
| 4392 | + * @param Translate $outputlangs Output language to use |
|
| 4393 | + * @param int $hidedetails 1 to hide details. 0 by default |
|
| 4394 | + * @param int $hidedesc 1 to hide product description. 0 by default |
|
| 4395 | + * @param int $hideref 1 to hide product reference. 0 by default |
|
| 4396 | + * @param null|array $moreparams Array to provide more information |
|
| 4397 | + * @return int >0 if OK, <0 if KO |
|
| 4398 | + * @see addFileIntoDatabaseIndex |
|
| 4399 | + */ |
|
| 4400 | + protected function commonGenerateDocument($modelspath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams=null) |
|
| 4401 | + {
|
|
| 4402 | + global $conf, $langs, $user; |
|
| 4403 | + |
|
| 4404 | + $srctemplatepath=''; |
|
| 4405 | + |
|
| 4406 | + // Increase limit for PDF build |
|
| 4407 | + $err=error_reporting(); |
|
| 4408 | + error_reporting(0); |
|
| 4409 | + @set_time_limit(120); |
|
| 4410 | + error_reporting($err); |
|
| 4411 | + |
|
| 4412 | + // If selected model is a filename template (then $modele="modelname" or "modelname:filename") |
|
| 4413 | + $tmp=explode(':',$modele,2);
|
|
| 4414 | + if (! empty($tmp[1])) |
|
| 4415 | + {
|
|
| 4416 | + $modele=$tmp[0]; |
|
| 4417 | + $srctemplatepath=$tmp[1]; |
|
| 4418 | + } |
|
| 4419 | + |
|
| 4420 | + // Search template files |
|
| 4421 | + $file=''; $classname=''; $filefound=0; |
|
| 4422 | + $dirmodels=array('/');
|
|
| 4423 | + if (is_array(Globals::$conf->modules_parts['models'])) |
|
| 4424 | + $dirmodels = array_merge($dirmodels, Globals::$conf->modules_parts['models']); |
|
| 4425 | + foreach($dirmodels as $reldir) |
|
| 4426 | + {
|
|
| 4427 | + foreach(array('doc','pdf') as $prefix)
|
|
| 4428 | + {
|
|
| 4429 | + if (in_array(get_class($this), array('Adherent'))) $file = $prefix."_".$modele.".class.php"; // Member module use prefix_module.class.php
|
|
| 4430 | + else $file = $prefix."_".$modele.".modules.php"; |
|
| 4431 | + |
|
| 4432 | + // On verifie l'emplacement du modele |
|
| 4433 | + $file=dol_buildpath($reldir.$modelspath.$file,0); |
|
| 4434 | + if (file_exists($file)) |
|
| 4435 | + {
|
|
| 4436 | + $filefound=1; |
|
| 4437 | + $classname=$prefix.'_'.$modele; |
|
| 4438 | + break; |
|
| 4439 | + } |
|
| 4440 | + } |
|
| 4441 | + if ($filefound) break; |
|
| 4442 | + } |
|
| 4443 | + |
|
| 4444 | + // If generator was found |
|
| 4445 | + if ($filefound) |
|
| 4446 | + {
|
|
| 4447 | + global $db; // Required to solve a conception default in commonstickergenerator.class.php making an include of code using $db |
|
| 4448 | + |
|
| 4449 | + require_once $file; |
|
| 4450 | + |
|
| 4451 | + $obj = new $classname($this->db); |
|
| 4452 | + |
|
| 4453 | + // If generator is ODT, we must have srctemplatepath defined, if not we set it. |
|
| 4454 | + if ($obj->type == 'odt' && empty($srctemplatepath)) |
|
| 4455 | + {
|
|
| 4456 | + $varfortemplatedir=$obj->scandir; |
|
| 4457 | + if ($varfortemplatedir && !empty(Globals::$conf->global->$varfortemplatedir)) {
|
|
| 4458 | + $dirtoscan = Globals::$conf->global->$varfortemplatedir; |
|
| 4459 | + |
|
| 4460 | + $listoffiles=array(); |
|
| 4461 | + |
|
| 4462 | + // Now we add first model found in directories scanned |
|
| 4463 | + $listofdir=explode(',',$dirtoscan);
|
|
| 4464 | + foreach($listofdir as $key => $tmpdir) |
|
| 4465 | + {
|
|
| 4466 | + $tmpdir=trim($tmpdir); |
|
| 4467 | + $tmpdir=preg_replace('/DOL_DATA_ROOT/',DOL_DATA_ROOT,$tmpdir);
|
|
| 4468 | + if (! $tmpdir) { unset($listofdir[$key]); continue; }
|
|
| 4469 | + if (is_dir($tmpdir)) |
|
| 4470 | + {
|
|
| 4471 | + $tmpfiles=dol_dir_list($tmpdir,'files',0,'\.od(s|t)$','','name',SORT_ASC,0); |
|
| 4472 | + if (count($tmpfiles)) $listoffiles=array_merge($listoffiles,$tmpfiles); |
|
| 4473 | + } |
|
| 4474 | + } |
|
| 4475 | + |
|
| 4476 | + if (count($listoffiles)) |
|
| 4477 | + {
|
|
| 4478 | + foreach($listoffiles as $record) |
|
| 4479 | + {
|
|
| 4480 | + $srctemplatepath=$record['fullname']; |
|
| 4481 | + break; |
|
| 4482 | + } |
|
| 4483 | + } |
|
| 4484 | + } |
|
| 4485 | + |
|
| 4486 | + if (empty($srctemplatepath)) |
|
| 4487 | + {
|
|
| 4488 | + $this->error='ErrorGenerationAskedForOdtTemplateWithSrcFileNotDefined'; |
|
| 4489 | + return -1; |
|
| 4490 | + } |
|
| 4491 | + } |
|
| 4492 | + |
|
| 4493 | + if ($obj->type == 'odt' && ! empty($srctemplatepath)) |
|
| 4494 | + {
|
|
| 4495 | + if (! dol_is_file($srctemplatepath)) |
|
| 4496 | + {
|
|
| 4497 | + $this->error='ErrorGenerationAskedForOdtTemplateWithSrcFileNotFound'; |
|
| 4498 | + return -1; |
|
| 4499 | + } |
|
| 4500 | + } |
|
| 4501 | + |
|
| 4502 | + // We save charset_output to restore it because write_file can change it if needed for |
|
| 4503 | + // output format that does not support UTF8. |
|
| 4504 | + $sav_charset_output=$outputlangs->charset_output; |
|
| 4505 | + |
|
| 4506 | + if (in_array(get_class($this), array('Adherent')))
|
|
| 4507 | + {
|
|
| 4508 | + $arrayofrecords = array(); // The write_file of templates of adherent class need this var |
|
| 4509 | + $resultwritefile = $obj->write_file($this, $outputlangs, $srctemplatepath, 'member', 1, $moreparams); |
|
| 4510 | + } |
|
| 4511 | + else |
|
| 4512 | + {
|
|
| 4513 | + $resultwritefile = $obj->write_file($this, $outputlangs, $srctemplatepath, $hidedetails, $hidedesc, $hideref, $moreparams); |
|
| 4514 | + } |
|
| 4515 | + // After call of write_file $obj->result['fullpath'] is set with generated file. It will be used to update the ECM database index. |
|
| 4516 | + |
|
| 4517 | + if ($resultwritefile > 0) |
|
| 4518 | + {
|
|
| 4519 | + $outputlangs->charset_output=$sav_charset_output; |
|
| 4520 | + |
|
| 4521 | + // We delete old preview |
|
| 4522 | + require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php'; |
|
| 4523 | + dol_delete_preview($this); |
|
| 4524 | + |
|
| 4525 | + // Index file in database |
|
| 4526 | + if (! empty($obj->result['fullpath'])) |
|
| 4527 | + {
|
|
| 4528 | + $destfull = $obj->result['fullpath']; |
|
| 4529 | + $upload_dir = dirname($destfull); |
|
| 4530 | + $destfile = basename($destfull); |
|
| 4531 | + $rel_dir = preg_replace('/^'.preg_quote(DOL_DATA_ROOT,'/').'/', '', $upload_dir);
|
|
| 4532 | + |
|
| 4533 | + if (! preg_match('/[\\/]temp[\\/]|[\\/]thumbs|\.meta$/', $rel_dir)) // If not a tmp dir
|
|
| 4534 | + {
|
|
| 4535 | + $filename = basename($destfile); |
|
| 4536 | + $rel_dir = preg_replace('/[\\/]$/', '', $rel_dir);
|
|
| 4537 | + $rel_dir = preg_replace('/^[\\/]/', '', $rel_dir);
|
|
| 4538 | + |
|
| 4539 | + include_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmfiles.class.php'; |
|
| 4540 | + $ecmfile=new EcmFiles($this->db); |
|
| 4541 | + $result = $ecmfile->fetch(0, '', ($rel_dir?$rel_dir.'/':'').$filename); |
|
| 4542 | + |
|
| 4543 | + // Set the public "share" key |
|
| 4544 | + $setsharekey = false; |
|
| 4545 | + if ($this->element == 'propal') |
|
| 4546 | + {
|
|
| 4547 | + $useonlinesignature = Globals::$conf->global->MAIN_FEATURES_LEVEL; // Replace this with 1 when feature to make online signature is ok |
|
| 4548 | + if ($useonlinesignature) $setsharekey=true; |
|
| 4549 | + if (!empty(Globals::$conf->global->PROPOSAL_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 4550 | + $setsharekey = true; |
|
| 4551 | + } |
|
| 4552 | + if ($this->element == 'commande' && !empty(Globals::$conf->global->ORDER_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 4553 | + $setsharekey = true; |
|
| 4554 | + if ($this->element == 'facture' && !empty(Globals::$conf->global->INVOICE_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 4555 | + $setsharekey = true; |
|
| 4556 | + if ($this->element == 'bank_account' && !empty(Globals::$conf->global->BANK_ACCOUNT_ALLOW_EXTERNAL_DOWNLOAD)) |
|
| 4557 | + $setsharekey = true; |
|
| 4558 | + |
|
| 4559 | + if ($setsharekey) |
|
| 4560 | + {
|
|
| 4561 | + if (empty($ecmfile->share)) // Because object not found or share not set yet |
|
| 4562 | + {
|
|
| 4563 | + require_once DOL_DOCUMENT_ROOT.'/core/lib/security2.lib.php'; |
|
| 4564 | + $ecmfile->share = getRandomPassword(true); |
|
| 4565 | + } |
|
| 4566 | + } |
|
| 4567 | + |
|
| 4568 | + if ($result > 0) |
|
| 4569 | + {
|
|
| 4570 | + $ecmfile->label = md5_file(dol_osencode($destfull)); // hash of file content |
|
| 4571 | + $ecmfile->fullpath_orig = ''; |
|
| 4572 | + $ecmfile->gen_or_uploaded = 'generated'; |
|
| 4573 | + $ecmfile->description = ''; // indexed content |
|
| 4574 | + $ecmfile->keyword = ''; // keyword content |
|
| 4575 | + $result = $ecmfile->update($user); |
|
| 4576 | + if ($result < 0) |
|
| 4577 | + {
|
|
| 4578 | + setEventMessages($ecmfile->error, $ecmfile->errors, 'warnings'); |
|
| 4579 | + } |
|
| 4580 | + } |
|
| 4581 | + else |
|
| 4582 | + {
|
|
| 4583 | + $ecmfile->entity = Globals::$conf->entity; |
|
| 4584 | + $ecmfile->filepath = $rel_dir; |
|
| 4585 | + $ecmfile->filename = $filename; |
|
| 4586 | + $ecmfile->label = md5_file(dol_osencode($destfull)); // hash of file content |
|
| 4587 | + $ecmfile->fullpath_orig = ''; |
|
| 4588 | + $ecmfile->gen_or_uploaded = 'generated'; |
|
| 4589 | + $ecmfile->description = ''; // indexed content |
|
| 4590 | + $ecmfile->keyword = ''; // keyword content |
|
| 4591 | + $ecmfile->src_object_type = $this->table_element; |
|
| 4592 | + $ecmfile->src_object_id = $this->id; |
|
| 4593 | + |
|
| 4594 | + $result = $ecmfile->create($user); |
|
| 4595 | + if ($result < 0) |
|
| 4596 | + {
|
|
| 4597 | + setEventMessages($ecmfile->error, $ecmfile->errors, 'warnings'); |
|
| 4598 | + } |
|
| 4599 | + } |
|
| 4600 | + |
|
| 4601 | + /*$this->result['fullname']=$destfull; |
|
| 4602 | + $this->result['filepath']=$ecmfile->filepath; |
|
| 4603 | + $this->result['filename']=$ecmfile->filename;*/ |
|
| 4604 | + //var_dump($obj->update_main_doc_field);exit; |
|
| 4605 | + |
|
| 4606 | + // Update the last_main_doc field into main object (if documenent generator has property ->update_main_doc_field set) |
|
| 4607 | + $update_main_doc_field=0; |
|
| 4608 | + if (! empty($obj->update_main_doc_field)) $update_main_doc_field=1; |
|
| 4609 | + if ($update_main_doc_field && ! empty($this->table_element)) |
|
| 4610 | + {
|
|
| 4611 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element." SET last_main_doc = '".($ecmfile->filepath.'/'.$ecmfile->filename)."'"; |
|
| 4612 | + $sql.= ' WHERE rowid = '.$this->id; |
|
| 4613 | + $resql = $this->db->query($sql); |
|
| 4614 | + if (! $resql) dol_print_error($this->db); |
|
| 4615 | + } |
|
| 4616 | + } |
|
| 4617 | + } |
|
| 4618 | + else |
|
| 4619 | + {
|
|
| 4620 | + dol_syslog('Method ->write_file was called on object '.get_class($obj).' and return a success but the return array ->result["fullpath"] was not set.', LOG_WARNING);
|
|
| 4621 | + } |
|
| 4622 | + |
|
| 4623 | + // Success in building document. We build meta file. |
|
| 4624 | + dol_meta_create($this); |
|
| 4625 | + |
|
| 4626 | + return 1; |
|
| 4627 | + } |
|
| 4628 | + else |
|
| 4629 | + {
|
|
| 4630 | + $outputlangs->charset_output=$sav_charset_output; |
|
| 4631 | + dol_print_error($this->db, "Error generating document for ".__CLASS__.". Error: ".$obj->error, $obj->errors); |
|
| 4632 | + return -1; |
|
| 4633 | + } |
|
| 4634 | + } |
|
| 4635 | + else |
|
| 4636 | + {
|
|
| 4637 | + $this->error=$langs->trans("Error")." ".$langs->trans("ErrorFileDoesNotExists",$file);
|
|
| 4638 | + dol_print_error('',$this->error);
|
|
| 4639 | + return -1; |
|
| 4640 | + } |
|
| 4641 | + } |
|
| 4642 | + |
|
| 4643 | + /** |
|
| 4644 | + * Build thumb |
|
| 4645 | + * @TODO Move this into files.lib.php |
|
| 4646 | + * |
|
| 4647 | + * @param string $file Path file in UTF8 to original file to create thumbs from. |
|
| 4648 | + * @return void |
|
| 4649 | + */ |
|
| 4650 | + function addThumbs($file) |
|
| 4651 | + {
|
|
| 4652 | + global $maxwidthsmall, $maxheightsmall, $maxwidthmini, $maxheightmini, $quality; |
|
| 4653 | + |
|
| 4654 | + require_once DOL_DOCUMENT_ROOT .'/core/lib/images.lib.php'; // This define also $maxwidthsmall, $quality, ... |
|
| 4655 | + |
|
| 4656 | + $file_osencoded=dol_osencode($file); |
|
| 4657 | + if (file_exists($file_osencoded)) |
|
| 4658 | + {
|
|
| 4659 | + // Create small thumbs for company (Ratio is near 16/9) |
|
| 4660 | + // Used on logon for example |
|
| 4661 | + vignette($file_osencoded, $maxwidthsmall, $maxheightsmall, '_small', $quality); |
|
| 4662 | + |
|
| 4663 | + // Create mini thumbs for company (Ratio is near 16/9) |
|
| 4664 | + // Used on menu or for setup page for example |
|
| 4665 | + vignette($file_osencoded, $maxwidthmini, $maxheightmini, '_mini', $quality); |
|
| 4666 | + } |
|
| 4667 | + } |
|
| 4668 | + |
|
| 4669 | + |
|
| 4670 | + /* Functions common to commonobject and commonobjectline */ |
|
| 4671 | + |
|
| 4672 | + /* For default values */ |
|
| 4673 | + |
|
| 4674 | + /** |
|
| 4675 | + * Return the default value to use for a field when showing the create form of object. |
|
| 4676 | + * Return values in this order: |
|
| 4677 | + * 1) If parameter is available into POST, we return it first. |
|
| 4678 | + * 2) If not but an alternate value was provided as parameter of function, we return it. |
|
| 4679 | + * 3) If not but a constant Globals::$conf->global->OBJECTELEMENT_FIELDNAME is set, we return it (It is better to use the dedicated table). |
|
| 4680 | + * 4) Return value found into database (TODO No yet implemented) |
|
| 4681 | + * |
|
| 4682 | + * @param string $fieldname Name of field |
|
| 4683 | + * @param string $alternatevalue Alternate value to use |
|
| 4684 | + * @return string|string[] Default value (can be an array if the GETPOST return an array) |
|
| 4685 | + **/ |
|
| 4686 | + function getDefaultCreateValueFor($fieldname, $alternatevalue=null) |
|
| 4687 | + {
|
|
| 4688 | + global $conf, $_POST; |
|
| 4689 | + |
|
| 4690 | + // If param here has been posted, we use this value first. |
|
| 4691 | + if (isset($_POST[$fieldname])) return GETPOST($fieldname, 2); |
|
| 4692 | + |
|
| 4693 | + if (isset($alternatevalue)) return $alternatevalue; |
|
| 4694 | + |
|
| 4695 | + $newelement=$this->element; |
|
| 4696 | + if ($newelement == 'facture') $newelement='invoice'; |
|
| 4697 | + if ($newelement == 'commande') $newelement='order'; |
|
| 4698 | + if (empty($newelement)) |
|
| 4699 | + {
|
|
| 4700 | + dol_syslog("Ask a default value using common method getDefaultCreateValueForField on an object with no property ->element defined. Return empty string.", LOG_WARNING);
|
|
| 4701 | + return ''; |
|
| 4702 | + } |
|
| 4703 | + |
|
| 4704 | + $keyforfieldname=strtoupper($newelement.'_DEFAULT_'.$fieldname); |
|
| 4705 | + //var_dump($keyforfieldname); |
|
| 4706 | + if (isset(Globals::$conf->global->$keyforfieldname)) |
|
| 4707 | + return Globals::$conf->global->$keyforfieldname; |
|
| 4708 | + |
|
| 4709 | + // TODO Ad here a scan into table llx_overwrite_default with a filter on $this->element and $fieldname |
|
| 4710 | + } |
|
| 4711 | + |
|
| 4712 | + |
|
| 4713 | + /* For triggers */ |
|
| 4714 | + |
|
| 4715 | + |
|
| 4716 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 4717 | + /** |
|
| 4718 | + * Call trigger based on this instance. |
|
| 4719 | + * Some context information may also be provided into array property this->context. |
|
| 4720 | + * NB: Error from trigger are stacked in interface->errors |
|
| 4721 | + * NB2: If return code of triggers are < 0, action calling trigger should cancel all transaction. |
|
| 4722 | + * |
|
| 4723 | + * @param string $trigger_name trigger's name to execute |
|
| 4724 | + * @param User $user Object user |
|
| 4725 | + * @return int Result of run_triggers |
|
| 4726 | + */ |
|
| 4727 | + function call_trigger($trigger_name, $user) |
|
| 4728 | + {
|
|
| 4729 | + // phpcs:enable |
|
| 4730 | + global $langs,$conf; |
|
| 4731 | + |
|
| 4732 | + include_once DOL_DOCUMENT_ROOT . '/core/class/interfaces.class.php'; |
|
| 4733 | + $interface=new Interfaces($this->db); |
|
| 4734 | + $result=$interface->run_triggers($trigger_name,$this,$user,$langs,$conf); |
|
| 4735 | + |
|
| 4736 | + if ($result < 0) |
|
| 4737 | + {
|
|
| 4738 | + if (!empty($this->errors)) |
|
| 4739 | + {
|
|
| 4740 | + $this->errors=array_unique(array_merge($this->errors,$interface->errors)); // We use array_unique because when a trigger call another trigger on same object, this->errors is added twice. |
|
| 4741 | + } |
|
| 4742 | + else |
|
| 4743 | + {
|
|
| 4744 | + $this->errors=$interface->errors; |
|
| 4745 | + } |
|
| 4746 | + } |
|
| 4747 | + return $result; |
|
| 4748 | + } |
|
| 4749 | + |
|
| 4750 | + |
|
| 4751 | + /* Functions for extrafields */ |
|
| 4752 | + |
|
| 4753 | + |
|
| 4754 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 4755 | + /** |
|
| 4756 | + * Function to get extra fields of an object into $this->array_options |
|
| 4757 | + * This method is in most cases called by method fetch of objects but you can call it separately. |
|
| 4758 | + * |
|
| 4759 | + * @param int $rowid Id of line. Use the id of object if not defined. Deprecated. Function must be called without parameters. |
|
| 4760 | + * @param array $optionsArray Array resulting of call of extrafields->fetch_name_optionals_label(). Deprecated. Function must be called without parameters. |
|
| 4761 | + * @return int <0 if error, 0 if no values of extrafield to find nor found, 1 if an attribute is found and value loaded |
|
| 4762 | + */ |
|
| 4763 | + function fetch_optionals($rowid=null, $optionsArray=null) |
|
| 4764 | + {
|
|
| 4765 | + // phpcs:enable |
|
| 4766 | + if (empty($rowid)) {
|
|
| 4767 | + $rowid = $this->id; |
|
| 4768 | + } |
|
| 4769 | + |
|
| 4770 | + // To avoid SQL errors. Probably not the better solution though |
|
| 4771 | + if (!$this->table_element) {
|
|
| 4772 | + return 0; |
|
| 4773 | + } |
|
| 4774 | + |
|
| 4775 | + $this->array_options=array(); |
|
| 4776 | + |
|
| 4777 | + if (! is_array($optionsArray)) |
|
| 4778 | + {
|
|
| 4779 | + // If $extrafields is not a known object, we initialize it. Best practice is to have $extrafields defined into card.php or list.php page. |
|
| 4780 | + // TODO Use of existing $extrafield is not yet ready (must mutualize code that use extrafields in form first) |
|
| 4781 | + // global $extrafields; |
|
| 4782 | + //if (! is_object($extrafields)) |
|
| 4783 | + //{
|
|
| 4784 | + // require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 4785 | + $extrafields = new AlExtraFields(); |
|
| 4786 | + //} |
|
| 4787 | + |
|
| 4788 | + // Load array of extrafields for elementype = $this->table_element |
|
| 4789 | + if (empty($extrafields->attributes[$this->table_element]['loaded'])) |
|
| 4790 | + {
|
|
| 4791 | + $extrafields->fetch_name_optionals_label($this->table_element); |
|
| 4792 | + } |
|
| 4793 | + $optionsArray = (! empty($extrafields->attributes[$this->table_element]['label'])?$extrafields->attributes[$this->table_element]['label']:null); |
|
| 4794 | + } |
|
| 4795 | + else |
|
| 4796 | + {
|
|
| 4797 | + // global $extrafields; |
|
| 4798 | + dol_syslog("Warning: fetch_optionals was called with param optionsArray defined when you should pass null now", LOG_WARNING);
|
|
| 4799 | + } |
|
| 4800 | + |
|
| 4801 | + $table_element = $this->table_element; |
|
| 4802 | + if ($table_element == 'categorie') $table_element = 'categories'; // For compatibility |
|
| 4803 | + |
|
| 4804 | + // Request to get complementary values |
|
| 4805 | + if (is_array($optionsArray) && count($optionsArray) > 0) |
|
| 4806 | + {
|
|
| 4807 | + $sql = "SELECT rowid"; |
|
| 4808 | + foreach ($optionsArray as $name => $label) |
|
| 4809 | + {
|
|
| 4810 | + if (empty($extrafields->attributes[$this->table_element]['type'][$name]) || $extrafields->attributes[$this->table_element]['type'][$name] != 'separate') |
|
| 4811 | + {
|
|
| 4812 | + $sql.= ", ".$name; |
|
| 4813 | + } |
|
| 4814 | + } |
|
| 4815 | + $sql.= " FROM ".MAIN_DB_PREFIX.$table_element."_extrafields"; |
|
| 4816 | + $sql.= " WHERE fk_object = ".$rowid; |
|
| 4817 | + |
|
| 4818 | + //dol_syslog(get_class($this)."::fetch_optionals get extrafields data for ".$this->table_element, LOG_DEBUG); // Too verbose |
|
| 4819 | + $resql=$this->db->query($sql); |
|
| 4820 | + if ($resql) |
|
| 4821 | + {
|
|
| 4822 | + $this->array_options = array(); |
|
| 4823 | + $numrows=$this->db->num_rows($resql); |
|
| 4824 | + if ($numrows) |
|
| 4825 | + {
|
|
| 4826 | + $tab = $this->db->fetch_array($resql); |
|
| 4827 | + |
|
| 4828 | + foreach ($tab as $key => $value) |
|
| 4829 | + {
|
|
| 4830 | + // Test fetch_array ! is_int($key) because fetch_array result is a mix table with Key as alpha and Key as int (depend db engine) |
|
| 4831 | + if ($key != 'rowid' && $key != 'tms' && $key != 'fk_member' && ! is_int($key)) |
|
| 4832 | + {
|
|
| 4833 | + // we can add this attribute to object |
|
| 4834 | + if (! empty($extrafields) && in_array($extrafields->attributes[$this->table_element]['type'][$key], array('date','datetime')))
|
|
| 4835 | + {
|
|
| 4836 | + //var_dump($extrafields->attributes[$this->table_element]['type'][$key]); |
|
| 4837 | + $this->array_options["options_".$key]=$this->db->jdate($value); |
|
| 4838 | + } |
|
| 4839 | + else |
|
| 4840 | + {
|
|
| 4841 | + $this->array_options["options_".$key]=$value; |
|
| 4842 | + } |
|
| 4843 | + |
|
| 4844 | + //var_dump('key '.$key.' '.$value.' type='.$extrafields->attributes[$this->table_element]['type'][$key].' '.$this->array_options["options_".$key]);
|
|
| 4845 | + } |
|
| 4846 | + } |
|
| 4847 | + } |
|
| 4848 | + |
|
| 4849 | + $this->db->free($resql); |
|
| 4850 | + |
|
| 4851 | + if ($numrows) return $numrows; |
|
| 4852 | + else return 0; |
|
| 4853 | + } |
|
| 4854 | + else |
|
| 4855 | + {
|
|
| 4856 | + dol_print_error($this->db); |
|
| 4857 | + return -1; |
|
| 4858 | + } |
|
| 4859 | + } |
|
| 4860 | + return 0; |
|
| 4861 | + } |
|
| 4862 | + |
|
| 4863 | + /** |
|
| 4864 | + * Delete all extra fields values for the current object. |
|
| 4865 | + * |
|
| 4866 | + * @return int <0 if KO, >0 if OK |
|
| 4867 | + */ |
|
| 4868 | + function deleteExtraFields() |
|
| 4869 | + {
|
|
| 4870 | + $this->db->begin(); |
|
| 4871 | + |
|
| 4872 | + $table_element = $this->table_element; |
|
| 4873 | + if ($table_element == 'categorie') $table_element = 'categories'; // For compatibility |
|
| 4874 | + |
|
| 4875 | + $sql_del = "DELETE FROM ".MAIN_DB_PREFIX.$table_element."_extrafields WHERE fk_object = ".$this->id; |
|
| 4876 | + dol_syslog(get_class($this)."::deleteExtraFields delete", LOG_DEBUG); |
|
| 4877 | + $resql=$this->db->query($sql_del); |
|
| 4878 | + if (! $resql) |
|
| 4879 | + {
|
|
| 4880 | + $this->error=$this->db->lasterror(); |
|
| 4881 | + $this->db->rollback(); |
|
| 4882 | + return -1; |
|
| 4883 | + } |
|
| 4884 | + else |
|
| 4885 | + {
|
|
| 4886 | + $this->db->commit(); |
|
| 4887 | + return 1; |
|
| 4888 | + } |
|
| 4889 | + } |
|
| 4890 | + |
|
| 4891 | + /** |
|
| 4892 | + * Add/Update all extra fields values for the current object. |
|
| 4893 | + * Data to describe values to insert/update are stored into $this->array_options=array('options_codeforfield1'=>'valueforfield1', 'options_codeforfield2'=>'valueforfield2', ...)
|
|
| 4894 | + * This function delete record with all extrafields and insert them again from the array $this->array_options. |
|
| 4895 | + * |
|
| 4896 | + * @param string $trigger If defined, call also the trigger (for example COMPANY_MODIFY) |
|
| 4897 | + * @param User $userused Object user |
|
| 4898 | + * @return int -1=error, O=did nothing, 1=OK |
|
| 4899 | + * @see updateExtraField, setValueFrom |
|
| 4900 | + */ |
|
| 4901 | + function insertExtraFields($trigger='', $userused=null) |
|
| 4902 | + {
|
|
| 4903 | + global $conf,$langs,$user; |
|
| 4904 | + |
|
| 4905 | + if (empty($userused)) $userused=$user; |
|
| 4906 | + |
|
| 4907 | + $error=0; |
|
| 4908 | + |
|
| 4909 | + if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_DISABLED)) |
|
| 4910 | + return 0; // For avoid conflicts if trigger used |
|
| 4911 | + |
|
| 4912 | + if (! empty($this->array_options)) |
|
| 4913 | + {
|
|
| 4914 | + // Check parameters |
|
| 4915 | + $langs->load('admin');
|
|
| 4916 | + require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 4917 | + $extrafields = new AlExtraFields($this->db); |
|
| 4918 | + $target_extrafields=$extrafields->fetch_name_optionals_label($this->table_element); |
|
| 4919 | + |
|
| 4920 | + //Eliminate copied source object extra_fields that do not exist in target object |
|
| 4921 | + $new_array_options=array(); |
|
| 4922 | + foreach ($this->array_options as $key => $value) {
|
|
| 4923 | + if (in_array(substr($key,8), array_keys($target_extrafields))) // We remove the 'options_' from $key for test |
|
| 4924 | + $new_array_options[$key] = $value; |
|
| 4925 | + elseif (in_array($key, array_keys($target_extrafields))) // We test on $key that does not contains the 'options_' prefix |
|
| 4926 | + $new_array_options['options_'.$key] = $value; |
|
| 4927 | + } |
|
| 4928 | + |
|
| 4929 | + foreach($new_array_options as $key => $value) |
|
| 4930 | + {
|
|
| 4931 | + $attributeKey = substr($key,8); // Remove 'options_' prefix |
|
| 4932 | + $attributeType = $extrafields->attributes[$this->table_element]['type'][$attributeKey]; |
|
| 4933 | + $attributeLabel = $extrafields->attributes[$this->table_element]['label'][$attributeKey]; |
|
| 4934 | + $attributeParam = $extrafields->attributes[$this->table_element]['param'][$attributeKey]; |
|
| 4935 | + $attributeRequired = $extrafields->attributes[$this->table_element]['required'][$attributeKey]; |
|
| 4936 | + |
|
| 4937 | + if ($attributeRequired) |
|
| 4938 | + {
|
|
| 4939 | + $mandatorypb=false; |
|
| 4940 | + if ($attributeType == 'link' && $this->array_options[$key] == '-1') $mandatorypb=true; |
|
| 4941 | + if ($this->array_options[$key] === '') $mandatorypb=true; |
|
| 4942 | + if ($mandatorypb) |
|
| 4943 | + {
|
|
| 4944 | + dol_syslog($this->error); |
|
| 4945 | + $this->errors[]=$langs->trans('ErrorFieldRequired', $attributeLabel);
|
|
| 4946 | + return -1; |
|
| 4947 | + } |
|
| 4948 | + } |
|
| 4949 | + |
|
| 4950 | + //dol_syslog("attributeLabel=".$attributeLabel, LOG_DEBUG);
|
|
| 4951 | + //dol_syslog("attributeType=".$attributeType, LOG_DEBUG);
|
|
| 4952 | + |
|
| 4953 | + switch ($attributeType) |
|
| 4954 | + {
|
|
| 4955 | + case 'int': |
|
| 4956 | + if (!is_numeric($value) && $value!='') |
|
| 4957 | + {
|
|
| 4958 | + $this->errors[]=$langs->trans("ExtraFieldHasWrongValue", $attributeLabel);
|
|
| 4959 | + return -1; |
|
| 4960 | + } |
|
| 4961 | + elseif ($value=='') |
|
| 4962 | + {
|
|
| 4963 | + $new_array_options[$key] = null; |
|
| 4964 | + } |
|
| 4965 | + break; |
|
| 4966 | + case 'double': |
|
| 4967 | + $value = price2num($value); |
|
| 4968 | + if (!is_numeric($value) && $value!='') |
|
| 4969 | + {
|
|
| 4970 | + dol_syslog($langs->trans("ExtraFieldHasWrongValue")." sur ".$attributeLabel."(".$value."is not '".$attributeType."')", LOG_DEBUG);
|
|
| 4971 | + $this->errors[]=$langs->trans("ExtraFieldHasWrongValue", $attributeLabel);
|
|
| 4972 | + return -1; |
|
| 4973 | + } |
|
| 4974 | + elseif ($value=='') |
|
| 4975 | + {
|
|
| 4976 | + $new_array_options[$key] = null; |
|
| 4977 | + } |
|
| 4978 | + //dol_syslog("double value"." sur ".$attributeLabel."(".$value." is '".$attributeType."')", LOG_DEBUG);
|
|
| 4979 | + $new_array_options[$key] = $value; |
|
| 4980 | + break; |
|
| 4981 | + /*case 'select': // Not required, we chosed value='0' for undefined values |
|
| 4982 | + if ($value=='-1') |
|
| 4983 | + {
|
|
| 4984 | + $this->array_options[$key] = null; |
|
| 4985 | + } |
|
| 4986 | + break;*/ |
|
| 4987 | + case 'password': |
|
| 4988 | + $algo=''; |
|
| 4989 | + if ($this->array_options[$key] != '' && is_array($extrafields->attributes[$this->table_element]['param'][$attributeKey]['options'])) |
|
| 4990 | + {
|
|
| 4991 | + // If there is an encryption choice, we use it to crypt data before insert |
|
| 4992 | + $tmparrays = array_keys($extrafields->attributes[$this->table_element]['param'][$attributeKey]['options']); |
|
| 4993 | + $algo=reset($tmparrays); |
|
| 4994 | + if ($algo != '') |
|
| 4995 | + {
|
|
| 4996 | + //global $action; // $action may be 'create', 'update', 'update_extras'... |
|
| 4997 | + //var_dump($action); |
|
| 4998 | + //var_dump($this->oldcopy);exit; |
|
| 4999 | + if (is_object($this->oldcopy)) // If this->oldcopy is not defined, we can't know if we change attribute or not, so we must keep value |
|
| 5000 | + {
|
|
| 5001 | + //var_dump($this->oldcopy->array_options[$key]); var_dump($this->array_options[$key]); |
|
| 5002 | + if ($this->array_options[$key] == $this->oldcopy->array_options[$key]) // If old value crypted in database is same than submited new value, it means we don't change it, so we don't update. |
|
| 5003 | + {
|
|
| 5004 | + $new_array_options[$key] = $this->array_options[$key]; // Value is kept |
|
| 5005 | + } |
|
| 5006 | + else |
|
| 5007 | + {
|
|
| 5008 | + // var_dump($algo); |
|
| 5009 | + $newvalue = dol_hash($this->array_options[$key], $algo); |
|
| 5010 | + $new_array_options[$key] = $newvalue; |
|
| 5011 | + } |
|
| 5012 | + } |
|
| 5013 | + else |
|
| 5014 | + {
|
|
| 5015 | + $new_array_options[$key] = $this->array_options[$key]; // Value is kept |
|
| 5016 | + } |
|
| 5017 | + } |
|
| 5018 | + } |
|
| 5019 | + else // Common usage |
|
| 5020 | + {
|
|
| 5021 | + $new_array_options[$key] = $this->array_options[$key]; |
|
| 5022 | + } |
|
| 5023 | + break; |
|
| 5024 | + case 'price': |
|
| 5025 | + $new_array_options[$key] = price2num($this->array_options[$key]); |
|
| 5026 | + break; |
|
| 5027 | + case 'date': |
|
| 5028 | + $new_array_options[$key] = $this->db->idate($this->array_options[$key]); |
|
| 5029 | + break; |
|
| 5030 | + case 'datetime': |
|
| 5031 | + // If data is a string instead of a timestamp, we convert it |
|
| 5032 | + if (! is_int($this->array_options[$key])) {
|
|
| 5033 | + $this->array_options[$key] = strtotime($this->array_options[$key]); |
|
| 5034 | + } |
|
| 5035 | + $new_array_options[$key] = $this->db->idate($this->array_options[$key]); |
|
| 5036 | + break; |
|
| 5037 | + case 'link': |
|
| 5038 | + $param_list=array_keys($attributeParam['options']); |
|
| 5039 | + // 0 : ObjectName |
|
| 5040 | + // 1 : classPath |
|
| 5041 | + $InfoFieldList = explode(":", $param_list[0]);
|
|
| 5042 | + dol_include_once($InfoFieldList[1]); |
|
| 5043 | + if ($InfoFieldList[0] && class_exists($InfoFieldList[0])) |
|
| 5044 | + {
|
|
| 5045 | + if ($value == '-1') // -1 is key for no defined in combo list of objects |
|
| 5046 | + {
|
|
| 5047 | + $new_array_options[$key]=''; |
|
| 5048 | + } |
|
| 5049 | + elseif ($value) |
|
| 5050 | + {
|
|
| 5051 | + $object = new $InfoFieldList[0]($this->db); |
|
| 5052 | + if (is_numeric($value)) $res=$object->fetch($value); |
|
| 5053 | + else $res=$object->fetch('',$value);
|
|
| 5054 | + |
|
| 5055 | + if ($res > 0) $new_array_options[$key]=$object->id; |
|
| 5056 | + else |
|
| 5057 | + {
|
|
| 5058 | + $this->error="Id/Ref '".$value."' for object '".$object->element."' not found"; |
|
| 5059 | + $this->db->rollback(); |
|
| 5060 | + return -1; |
|
| 5061 | + } |
|
| 5062 | + } |
|
| 5063 | + } |
|
| 5064 | + else |
|
| 5065 | + {
|
|
| 5066 | + dol_syslog('Error bad setup of extrafield', LOG_WARNING);
|
|
| 5067 | + } |
|
| 5068 | + break; |
|
| 5069 | + } |
|
| 5070 | + } |
|
| 5071 | + |
|
| 5072 | + $this->db->begin(); |
|
| 5073 | + |
|
| 5074 | + $table_element = $this->table_element; |
|
| 5075 | + if ($table_element == 'categorie') $table_element = 'categories'; // For compatibility |
|
| 5076 | + |
|
| 5077 | + $sql_del = "DELETE FROM ".MAIN_DB_PREFIX.$table_element."_extrafields WHERE fk_object = ".$this->id; |
|
| 5078 | + dol_syslog(get_class($this)."::insertExtraFields delete", LOG_DEBUG); |
|
| 5079 | + $this->db->query($sql_del); |
|
| 5080 | + |
|
| 5081 | + $sql = "INSERT INTO ".MAIN_DB_PREFIX.$table_element."_extrafields (fk_object"; |
|
| 5082 | + foreach($new_array_options as $key => $value) |
|
| 5083 | + {
|
|
| 5084 | + $attributeKey = substr($key,8); // Remove 'options_' prefix |
|
| 5085 | + // Add field of attribut |
|
| 5086 | + if ($extrafields->attributes[$this->table_element]['type'][$attributeKey] != 'separate') // Only for other type than separator |
|
| 5087 | + $sql.=",".$attributeKey; |
|
| 5088 | + } |
|
| 5089 | + $sql .= ") VALUES (".$this->id;
|
|
| 5090 | + |
|
| 5091 | + foreach($new_array_options as $key => $value) |
|
| 5092 | + {
|
|
| 5093 | + $attributeKey = substr($key,8); // Remove 'options_' prefix |
|
| 5094 | + // Add field of attribute |
|
| 5095 | + if ($extrafields->attributes[$this->table_element]['type'][$attributeKey] != 'separate') // Only for other type than separator) |
|
| 5096 | + {
|
|
| 5097 | + if ($new_array_options[$key] != '') |
|
| 5098 | + {
|
|
| 5099 | + $sql.=",'".$this->db->escape($new_array_options[$key])."'"; |
|
| 5100 | + } |
|
| 5101 | + else |
|
| 5102 | + {
|
|
| 5103 | + $sql.=",null"; |
|
| 5104 | + } |
|
| 5105 | + } |
|
| 5106 | + } |
|
| 5107 | + $sql.=")"; |
|
| 5108 | + |
|
| 5109 | + dol_syslog(get_class($this)."::insertExtraFields insert", LOG_DEBUG); |
|
| 5110 | + $resql = $this->db->query($sql); |
|
| 5111 | + if (! $resql) |
|
| 5112 | + {
|
|
| 5113 | + $this->error=$this->db->lasterror(); |
|
| 5114 | + $error++; |
|
| 5115 | + } |
|
| 5116 | + |
|
| 5117 | + if (! $error && $trigger) |
|
| 5118 | + {
|
|
| 5119 | + // Call trigger |
|
| 5120 | + $this->context=array('extrafieldaddupdate'=>1);
|
|
| 5121 | + $result=$this->call_trigger($trigger, $userused); |
|
| 5122 | + if ($result < 0) $error++; |
|
| 5123 | + // End call trigger |
|
| 5124 | + } |
|
| 5125 | + |
|
| 5126 | + if ($error) |
|
| 5127 | + {
|
|
| 5128 | + $this->db->rollback(); |
|
| 5129 | + return -1; |
|
| 5130 | + } |
|
| 5131 | + else |
|
| 5132 | + {
|
|
| 5133 | + $this->db->commit(); |
|
| 5134 | + return 1; |
|
| 5135 | + } |
|
| 5136 | + } |
|
| 5137 | + else return 0; |
|
| 5138 | + } |
|
| 5139 | + |
|
| 5140 | + /** |
|
| 5141 | + * Update an extra field value for the current object. |
|
| 5142 | + * Data to describe values to update are stored into $this->array_options=array('options_codeforfield1'=>'valueforfield1', 'options_codeforfield2'=>'valueforfield2', ...)
|
|
| 5143 | + * |
|
| 5144 | + * @param string $key Key of the extrafield (without starting 'options_') |
|
| 5145 | + * @param string $trigger If defined, call also the trigger (for example COMPANY_MODIFY) |
|
| 5146 | + * @param User $userused Object user |
|
| 5147 | + * @return int -1=error, O=did nothing, 1=OK |
|
| 5148 | + * @see setValueFrom, insertExtraFields |
|
| 5149 | + */ |
|
| 5150 | + function updateExtraField($key, $trigger=null, $userused=null) |
|
| 5151 | + {
|
|
| 5152 | + global $conf,$langs,$user; |
|
| 5153 | + |
|
| 5154 | + if (empty($userused)) $userused=$user; |
|
| 5155 | + |
|
| 5156 | + $error=0; |
|
| 5157 | + |
|
| 5158 | + if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_DISABLED)) |
|
| 5159 | + return 0; // For avoid conflicts if trigger used |
|
| 5160 | + |
|
| 5161 | + if (! empty($this->array_options) && isset($this->array_options["options_".$key])) |
|
| 5162 | + {
|
|
| 5163 | + // Check parameters |
|
| 5164 | + $langs->load('admin');
|
|
| 5165 | + require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php'; |
|
| 5166 | + $extrafields = new AlExtraFields($this->db); |
|
| 5167 | + $target_extrafields=$extrafields->fetch_name_optionals_label($this->table_element); |
|
| 5168 | + |
|
| 5169 | + $value=$this->array_options["options_".$key]; |
|
| 5170 | + |
|
| 5171 | + $attributeType = $extrafields->attributes[$this->table_element]['type'][$key]; |
|
| 5172 | + $attributeLabel = $extrafields->attributes[$this->table_element]['label'][$key]; |
|
| 5173 | + $attributeParam = $extrafields->attributes[$this->table_element]['param'][$key]; |
|
| 5174 | + $attributeRequired = $extrafields->attributes[$this->table_element]['required'][$key]; |
|
| 5175 | + |
|
| 5176 | + //dol_syslog("attributeLabel=".$attributeLabel, LOG_DEBUG);
|
|
| 5177 | + //dol_syslog("attributeType=".$attributeType, LOG_DEBUG);
|
|
| 5178 | + |
|
| 5179 | + switch ($attributeType) |
|
| 5180 | + {
|
|
| 5181 | + case 'int': |
|
| 5182 | + if (!is_numeric($value) && $value!='') |
|
| 5183 | + {
|
|
| 5184 | + $this->errors[]=$langs->trans("ExtraFieldHasWrongValue",$attributeLabel);
|
|
| 5185 | + return -1; |
|
| 5186 | + } |
|
| 5187 | + elseif ($value=='') |
|
| 5188 | + {
|
|
| 5189 | + $this->array_options["options_".$key] = null; |
|
| 5190 | + } |
|
| 5191 | + break; |
|
| 5192 | + case 'double': |
|
| 5193 | + $value = price2num($value); |
|
| 5194 | + if (!is_numeric($value) && $value!='') |
|
| 5195 | + {
|
|
| 5196 | + dol_syslog($langs->trans("ExtraFieldHasWrongValue")." sur ".$attributeLabel."(".$value."is not '".$attributeType."')", LOG_DEBUG);
|
|
| 5197 | + $this->errors[]=$langs->trans("ExtraFieldHasWrongValue", $attributeLabel);
|
|
| 5198 | + return -1; |
|
| 5199 | + } |
|
| 5200 | + elseif ($value=='') |
|
| 5201 | + {
|
|
| 5202 | + $this->array_options["options_".$key] = null; |
|
| 5203 | + } |
|
| 5204 | + //dol_syslog("double value"." sur ".$attributeLabel."(".$value." is '".$attributeType."')", LOG_DEBUG);
|
|
| 5205 | + $this->array_options["options_".$key] = $value; |
|
| 5206 | + break; |
|
| 5207 | + /*case 'select': // Not required, we chosed value='0' for undefined values |
|
| 5208 | + if ($value=='-1') |
|
| 5209 | + {
|
|
| 5210 | + $this->array_options[$key] = null; |
|
| 5211 | + } |
|
| 5212 | + break;*/ |
|
| 5213 | + case 'price': |
|
| 5214 | + $this->array_options["options_".$key] = price2num($this->array_options["options_".$key]); |
|
| 5215 | + break; |
|
| 5216 | + case 'date': |
|
| 5217 | + $this->array_options["options_".$key]=$this->db->idate($this->array_options["options_".$key]); |
|
| 5218 | + break; |
|
| 5219 | + case 'datetime': |
|
| 5220 | + $this->array_options["options_".$key]=$this->db->idate($this->array_options["options_".$key]); |
|
| 5221 | + break; |
|
| 5222 | + case 'link': |
|
| 5223 | + $param_list=array_keys($attributeParam['options']); |
|
| 5224 | + // 0 : ObjectName |
|
| 5225 | + // 1 : classPath |
|
| 5226 | + $InfoFieldList = explode(":", $param_list[0]);
|
|
| 5227 | + dol_include_once($InfoFieldList[1]); |
|
| 5228 | + if ($value) |
|
| 5229 | + {
|
|
| 5230 | + $object = new $InfoFieldList[0]($this->db); |
|
| 5231 | + $object->fetch(0,$value); |
|
| 5232 | + $this->array_options["options_".$key]=$object->id; |
|
| 5233 | + } |
|
| 5234 | + break; |
|
| 5235 | + } |
|
| 5236 | + |
|
| 5237 | + $this->db->begin(); |
|
| 5238 | + $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element."_extrafields SET ".$key."='".$this->db->escape($this->array_options["options_".$key])."'"; |
|
| 5239 | + $sql .= " WHERE fk_object = ".$this->id; |
|
| 5240 | + $resql = $this->db->query($sql); |
|
| 5241 | + if (! $resql) |
|
| 5242 | + {
|
|
| 5243 | + $error++; |
|
| 5244 | + $this->error=$this->db->lasterror(); |
|
| 5245 | + } |
|
| 5246 | + |
|
| 5247 | + if (! $error && $trigger) |
|
| 5248 | + {
|
|
| 5249 | + // Call trigger |
|
| 5250 | + $this->context=array('extrafieldupdate'=>1);
|
|
| 5251 | + $result=$this->call_trigger($trigger, $userused); |
|
| 5252 | + if ($result < 0) $error++; |
|
| 5253 | + // End call trigger |
|
| 5254 | + } |
|
| 5255 | + |
|
| 5256 | + if ($error) |
|
| 5257 | + {
|
|
| 5258 | + dol_syslog(get_class($this) . "::".__METHOD__ . $this->error, LOG_ERR); |
|
| 5259 | + $this->db->rollback(); |
|
| 5260 | + return -1; |
|
| 5261 | + } |
|
| 5262 | + else |
|
| 5263 | + {
|
|
| 5264 | + $this->db->commit(); |
|
| 5265 | + return 1; |
|
| 5266 | + } |
|
| 5267 | + } |
|
| 5268 | + else return 0; |
|
| 5269 | + } |
|
| 5270 | + |
|
| 5271 | + |
|
| 5272 | + /** |
|
| 5273 | + * Return HTML string to put an input field into a page |
|
| 5274 | + * Code very similar with showInputField of extra fields |
|
| 5275 | + * |
|
| 5276 | + * @param array $val Array of properties for field to show |
|
| 5277 | + * @param string $key Key of attribute |
|
| 5278 | + * @param string $value Preselected value to show (for date type it must be in timestamp format, for amount or price it must be a php numeric value) |
|
| 5279 | + * @param string $moreparam To add more parameters on html input tag |
|
| 5280 | + * @param string $keysuffix Prefix string to add into name and id of field (can be used to avoid duplicate names) |
|
| 5281 | + * @param string $keyprefix Suffix string to add into name and id of field (can be used to avoid duplicate names) |
|
| 5282 | + * @param string|int $morecss Value for css to define style/length of field. May also be a numeric. |
|
| 5283 | + * @return string |
|
| 5284 | + */ |
|
| 5285 | + function showInputField($val, $key, $value, $moreparam='', $keysuffix='', $keyprefix='', $morecss=0) |
|
| 5286 | + {
|
|
| 5287 | + global $conf,$langs,$form; |
|
| 5288 | + |
|
| 5289 | + if (! is_object($form)) |
|
| 5290 | + {
|
|
| 5291 | + require_once DOL_DOCUMENT_ROOT.'/core/class/html.form.class.php'; |
|
| 5292 | + $form=new Form($this->db); |
|
| 5293 | + } |
|
| 5294 | + |
|
| 5295 | + $val=$this->fields[$key]; |
|
| 5296 | + |
|
| 5297 | + $out=''; |
|
| 5298 | + $type=''; |
|
| 5299 | + $param = array(); |
|
| 5300 | + $param['options']=array(); |
|
| 5301 | + $size =$this->fields[$key]['size']; |
|
| 5302 | + // Because we work on extrafields |
|
| 5303 | + if(preg_match('/^integer:(.*):(.*)/i', $val['type'], $reg)){
|
|
| 5304 | + $param['options']=array($reg[1].':'.$reg[2]=>'N'); |
|
| 5305 | + $type ='link'; |
|
| 5306 | + } elseif(preg_match('/^link:(.*):(.*)/i', $val['type'], $reg)) {
|
|
| 5307 | + $param['options']=array($reg[1].':'.$reg[2]=>'N'); |
|
| 5308 | + $type ='link'; |
|
| 5309 | + } elseif(preg_match('/^sellist:(.*):(.*):(.*):(.*)/i', $val['type'], $reg)) {
|
|
| 5310 | + $param['options']=array($reg[1].':'.$reg[2].':'.$reg[3].':'.$reg[4]=>'N'); |
|
| 5311 | + $type ='sellist'; |
|
| 5312 | + } elseif(preg_match('/varchar\((\d+)\)/', $val['type'],$reg)) {
|
|
| 5313 | + $param['options']=array(); |
|
| 5314 | + $type ='varchar'; |
|
| 5315 | + $size=$reg[1]; |
|
| 5316 | + } elseif(preg_match('/varchar/', $val['type'])) {
|
|
| 5317 | + $param['options']=array(); |
|
| 5318 | + $type ='varchar'; |
|
| 5319 | + } elseif(is_array($this->fields[$key]['arrayofkeyval'])) {
|
|
| 5320 | + $param['options']=$this->fields[$key]['arrayofkeyval']; |
|
| 5321 | + $type ='select'; |
|
| 5322 | + } else {
|
|
| 5323 | + $param['options']=array(); |
|
| 5324 | + $type =$this->fields[$key]['type']; |
|
| 5325 | + } |
|
| 5326 | + |
|
| 5327 | + $label=$this->fields[$key]['label']; |
|
| 5328 | + //$elementtype=$this->fields[$key]['elementtype']; // Seems not used |
|
| 5329 | + $default=$this->fields[$key]['default']; |
|
| 5330 | + $computed=$this->fields[$key]['computed']; |
|
| 5331 | + $unique=$this->fields[$key]['unique']; |
|
| 5332 | + $required=$this->fields[$key]['required']; |
|
| 5333 | + |
|
| 5334 | + $langfile=$this->fields[$key]['langfile']; |
|
| 5335 | + $list=$this->fields[$key]['list']; |
|
| 5336 | + $hidden=abs($this->fields[$key]['visible'])!=1?1:0; |
|
| 5337 | + |
|
| 5338 | + $objectid = $this->id; |
|
| 5339 | + |
|
| 5340 | + |
|
| 5341 | + if ($computed) |
|
| 5342 | + {
|
|
| 5343 | + if (! preg_match('/^search_/', $keyprefix)) return '<span class="opacitymedium">'.$langs->trans("AutomaticallyCalculated").'</span>';
|
|
| 5344 | + else return ''; |
|
| 5345 | + } |
|
| 5346 | + |
|
| 5347 | + |
|
| 5348 | + // Use in priority showsize from parameters, then $val['css'] then autodefine |
|
| 5349 | + if (empty($morecss) && ! empty($val['css'])) |
|
| 5350 | + {
|
|
| 5351 | + $showsize = $val['css']; |
|
| 5352 | + } |
|
| 5353 | + if (empty($morecss)) |
|
| 5354 | + {
|
|
| 5355 | + if ($type == 'date') |
|
| 5356 | + {
|
|
| 5357 | + $morecss = 'minwidth100imp'; |
|
| 5358 | + } |
|
| 5359 | + elseif ($type == 'datetime') |
|
| 5360 | + {
|
|
| 5361 | + $morecss = 'minwidth200imp'; |
|
| 5362 | + } |
|
| 5363 | + elseif (in_array($type,array('int','integer','price')) || preg_match('/^double(\([0-9],[0-9]\)){0,1}/',$type))
|
|
| 5364 | + {
|
|
| 5365 | + $morecss = 'maxwidth75'; |
|
| 5366 | + }elseif ($type == 'url') |
|
| 5367 | + {
|
|
| 5368 | + $morecss='minwidth400'; |
|
| 5369 | + } |
|
| 5370 | + elseif ($type == 'boolean') |
|
| 5371 | + {
|
|
| 5372 | + $morecss=''; |
|
| 5373 | + } |
|
| 5374 | + else |
|
| 5375 | + {
|
|
| 5376 | + if (round($size) < 12) |
|
| 5377 | + {
|
|
| 5378 | + $morecss = 'minwidth100'; |
|
| 5379 | + } |
|
| 5380 | + else if (round($size) <= 48) |
|
| 5381 | + {
|
|
| 5382 | + $morecss = 'minwidth200'; |
|
| 5383 | + } |
|
| 5384 | + else |
|
| 5385 | + {
|
|
| 5386 | + $morecss = 'minwidth400'; |
|
| 5387 | + } |
|
| 5388 | + } |
|
| 5389 | + } |
|
| 5390 | + |
|
| 5391 | + if (in_array($type,array('date','datetime')))
|
|
| 5392 | + {
|
|
| 5393 | + $tmp=explode(',',$size);
|
|
| 5394 | + $newsize=$tmp[0]; |
|
| 5395 | + |
|
| 5396 | + $showtime = in_array($type,array('datetime')) ? 1 : 0;
|
|
| 5397 | + |
|
| 5398 | + // Do not show current date when field not required (see selectDate() method) |
|
| 5399 | + if (!$required && $value == '') $value = '-1'; |
|
| 5400 | + |
|
| 5401 | + // TODO Must also support $moreparam |
|
| 5402 | + $out = $form->selectDate($value, $keyprefix.$key.$keysuffix, $showtime, $showtime, $required, '', 1, (($keyprefix != 'search_' && $keyprefix != 'search_options_') ? 1 : 0), 0, 1); |
|
| 5403 | + } |
|
| 5404 | + elseif (in_array($type,array('int','integer')))
|
|
| 5405 | + {
|
|
| 5406 | + $tmp=explode(',',$size);
|
|
| 5407 | + $newsize=$tmp[0]; |
|
| 5408 | + $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" maxlength="'.$newsize.'" value="'.dol_escape_htmltag($value).'"'.($moreparam?$moreparam:'').'>'; |
|
| 5409 | + } |
|
| 5410 | + elseif (preg_match('/varchar/', $type))
|
|
| 5411 | + {
|
|
| 5412 | + $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" maxlength="'.$size.'" value="'.dol_escape_htmltag($value).'"'.($moreparam?$moreparam:'').'>'; |
|
| 5413 | + } |
|
| 5414 | + elseif (in_array($type, array('mail', 'phone', 'url')))
|
|
| 5415 | + {
|
|
| 5416 | + $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam?$moreparam:'').'>'; |
|
| 5417 | + } |
|
| 5418 | + elseif ($type == 'text') |
|
| 5419 | + {
|
|
| 5420 | + if (! preg_match('/search_/', $keyprefix)) // If keyprefix is search_ or search_options_, we must just use a simple text field
|
|
| 5421 | + {
|
|
| 5422 | + require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php'; |
|
| 5423 | + $doleditor=new DolEditor($keyprefix.$key.$keysuffix,$value,'',200,'dolibarr_notes','In',false,false,false,ROWS_5,'90%'); |
|
| 5424 | + $out=$doleditor->Create(1); |
|
| 5425 | + } |
|
| 5426 | + else |
|
| 5427 | + {
|
|
| 5428 | + $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam?$moreparam:'').'>'; |
|
| 5429 | + } |
|
| 5430 | + } |
|
| 5431 | + elseif ($type == 'html') |
|
| 5432 | + {
|
|
| 5433 | + if (! preg_match('/search_/', $keyprefix)) // If keyprefix is search_ or search_options_, we must just use a simple text field
|
|
| 5434 | + {
|
|
| 5435 | + require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php'; |
|
| 5436 | + $doleditor = new DolEditor($keyprefix . $key . $keysuffix, $value, '', 200, 'dolibarr_notes', 'In', false, false, !empty(Globals::$conf->fckeditor->enabled) && Globals::$conf->global->FCKEDITOR_ENABLE_SOCIETE, ROWS_5, '90%'); |
|
| 5437 | + $out=$doleditor->Create(1); |
|
| 5438 | + } |
|
| 5439 | + else |
|
| 5440 | + {
|
|
| 5441 | + $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam?$moreparam:'').'>'; |
|
| 5442 | + } |
|
| 5443 | + } |
|
| 5444 | + elseif ($type == 'boolean') |
|
| 5445 | + {
|
|
| 5446 | + $checked=''; |
|
| 5447 | + if (!empty($value)) {
|
|
| 5448 | + $checked=' checked value="1" '; |
|
| 5449 | + } else {
|
|
| 5450 | + $checked=' value="1" '; |
|
| 5451 | + } |
|
| 5452 | + $out='<input type="checkbox" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.$checked.' '.($moreparam?$moreparam:'').'>'; |
|
| 5453 | + } |
|
| 5454 | + elseif ($type == 'price') |
|
| 5455 | + {
|
|
| 5456 | + if (!empty($value)) { // $value in memory is a php numeric, we format it into user number format.
|
|
| 5457 | + $value=price($value); |
|
| 5458 | + } |
|
| 5459 | + $out = '<input type="text" class="flat ' . $morecss . ' maxwidthonsmartphone" name="' . $keyprefix . $key . $keysuffix . '" id="' . $keyprefix . $key . $keysuffix . '" value="' . $value . '" ' . ($moreparam ? $moreparam : '') . '> ' . $langs->getCurrencySymbol(Globals::$conf->currency); |
|
| 5460 | + } |
|
| 5461 | + elseif (preg_match('/^double(\([0-9],[0-9]\)){0,1}/',$type))
|
|
| 5462 | + {
|
|
| 5463 | + if (!empty($value)) { // $value in memory is a php numeric, we format it into user number format.
|
|
| 5464 | + $value=price($value); |
|
| 5465 | + } |
|
| 5466 | + $out='<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.$value.'" '.($moreparam?$moreparam:'').'> '; |
|
| 5467 | + } |
|
| 5468 | + elseif ($type == 'select') |
|
| 5469 | + {
|
|
| 5470 | + $out = ''; |
|
| 5471 | + if (!empty(Globals::$conf->use_javascript_ajax) && !empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_SELECT2)) {
|
|
| 5472 | + include_once DOL_DOCUMENT_ROOT . '/core/lib/ajax.lib.php'; |
|
| 5473 | + $out.= ajax_combobox($keyprefix.$key.$keysuffix, array(), 0); |
|
| 5474 | + } |
|
| 5475 | + |
|
| 5476 | + $out.='<select class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam?$moreparam:'').'>'; |
|
| 5477 | + if((! isset($this->fields[$key]['default'])) ||($this->fields[$key]['notnull']!=1))$out.='<option value="0"> </option>'; |
|
| 5478 | + foreach ($param['options'] as $key => $val) |
|
| 5479 | + {
|
|
| 5480 | + if ((string) $key == '') continue; |
|
| 5481 | + list($val, $parent) = explode('|', $val);
|
|
| 5482 | + $out.='<option value="'.$key.'"'; |
|
| 5483 | + $out.= (((string) $value == (string) $key)?' selected':''); |
|
| 5484 | + $out.= (!empty($parent)?' parent="'.$parent.'"':''); |
|
| 5485 | + $out.='>'.$val.'</option>'; |
|
| 5486 | + } |
|
| 5487 | + $out.='</select>'; |
|
| 5488 | + } |
|
| 5489 | + elseif ($type == 'sellist') |
|
| 5490 | + {
|
|
| 5491 | + $out = ''; |
|
| 5492 | + if (!empty(Globals::$conf->use_javascript_ajax) && !empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_SELECT2)) {
|
|
| 5493 | + include_once DOL_DOCUMENT_ROOT . '/core/lib/ajax.lib.php'; |
|
| 5494 | + $out.= ajax_combobox($keyprefix.$key.$keysuffix, array(), 0); |
|
| 5495 | + } |
|
| 5496 | + |
|
| 5497 | + $out.='<select class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam?$moreparam:'').'>'; |
|
| 5498 | + if (is_array($param['options'])) |
|
| 5499 | + {
|
|
| 5500 | + $param_list=array_keys($param['options']); |
|
| 5501 | + $InfoFieldList = explode(":", $param_list[0]);
|
|
| 5502 | + $parentName=''; |
|
| 5503 | + $parentField=''; |
|
| 5504 | + // 0 : tableName |
|
| 5505 | + // 1 : label field name |
|
| 5506 | + // 2 : key fields name (if differ of rowid) |
|
| 5507 | + // 3 : key field parent (for dependent lists) |
|
| 5508 | + // 4 : where clause filter on column or table extrafield, syntax field='value' or extra.field=value |
|
| 5509 | + $keyList=(empty($InfoFieldList[2])?'rowid':$InfoFieldList[2].' as rowid'); |
|
| 5510 | + |
|
| 5511 | + |
|
| 5512 | + if (count($InfoFieldList) > 4 && ! empty($InfoFieldList[4])) |
|
| 5513 | + {
|
|
| 5514 | + if (strpos($InfoFieldList[4], 'extra.') !== false) |
|
| 5515 | + {
|
|
| 5516 | + $keyList='main.'.$InfoFieldList[2].' as rowid'; |
|
| 5517 | + } else {
|
|
| 5518 | + $keyList=$InfoFieldList[2].' as rowid'; |
|
| 5519 | + } |
|
| 5520 | + } |
|
| 5521 | + if (count($InfoFieldList) > 3 && ! empty($InfoFieldList[3])) |
|
| 5522 | + {
|
|
| 5523 | + list($parentName, $parentField) = explode('|', $InfoFieldList[3]);
|
|
| 5524 | + $keyList.= ', '.$parentField; |
|
| 5525 | + } |
|
| 5526 | + |
|
| 5527 | + $fields_label = explode('|',$InfoFieldList[1]);
|
|
| 5528 | + if (is_array($fields_label)) |
|
| 5529 | + {
|
|
| 5530 | + $keyList .=', '; |
|
| 5531 | + $keyList .= implode(', ', $fields_label);
|
|
| 5532 | + } |
|
| 5533 | + |
|
| 5534 | + $sqlwhere=''; |
|
| 5535 | + $sql = 'SELECT '.$keyList; |
|
| 5536 | + $sql.= ' FROM '.MAIN_DB_PREFIX .$InfoFieldList[0]; |
|
| 5537 | + if (!empty($InfoFieldList[4])) |
|
| 5538 | + {
|
|
| 5539 | + // can use SELECT request |
|
| 5540 | + if (strpos($InfoFieldList[4], '$SEL$')!==false) {
|
|
| 5541 | + $InfoFieldList[4]=str_replace('$SEL$','SELECT',$InfoFieldList[4]);
|
|
| 5542 | + } |
|
| 5543 | + |
|
| 5544 | + // current object id can be use into filter |
|
| 5545 | + if (strpos($InfoFieldList[4], '$ID$')!==false && !empty($objectid)) {
|
|
| 5546 | + $InfoFieldList[4]=str_replace('$ID$',$objectid,$InfoFieldList[4]);
|
|
| 5547 | + } else {
|
|
| 5548 | + $InfoFieldList[4]=str_replace('$ID$','0',$InfoFieldList[4]);
|
|
| 5549 | + } |
|
| 5550 | + //We have to join on extrafield table |
|
| 5551 | + if (strpos($InfoFieldList[4], 'extra')!==false) |
|
| 5552 | + {
|
|
| 5553 | + $sql.= ' as main, '.MAIN_DB_PREFIX .$InfoFieldList[0].'_extrafields as extra'; |
|
| 5554 | + $sqlwhere.= ' WHERE extra.fk_object=main.'.$InfoFieldList[2]. ' AND '.$InfoFieldList[4]; |
|
| 5555 | + } |
|
| 5556 | + else |
|
| 5557 | + {
|
|
| 5558 | + $sqlwhere.= ' WHERE '.$InfoFieldList[4]; |
|
| 5559 | + } |
|
| 5560 | + } |
|
| 5561 | + else |
|
| 5562 | + {
|
|
| 5563 | + $sqlwhere.= ' WHERE 1=1'; |
|
| 5564 | + } |
|
| 5565 | + // Some tables may have field, some other not. For the moment we disable it. |
|
| 5566 | + if (in_array($InfoFieldList[0],array('tablewithentity')))
|
|
| 5567 | + {
|
|
| 5568 | + $sqlwhere .= ' AND entity = ' . Globals::$conf->entity; |
|
| 5569 | + } |
|
| 5570 | + $sql.=$sqlwhere; |
|
| 5571 | + //print $sql; |
|
| 5572 | + |
|
| 5573 | + $sql .= ' ORDER BY ' . implode(', ', $fields_label);
|
|
| 5574 | + |
|
| 5575 | + dol_syslog(get_class($this).'::showInputField type=sellist', LOG_DEBUG); |
|
| 5576 | + $resql = $this->db->query($sql); |
|
| 5577 | + if ($resql) |
|
| 5578 | + {
|
|
| 5579 | + $out.='<option value="0"> </option>'; |
|
| 5580 | + $num = $this->db->num_rows($resql); |
|
| 5581 | + $i = 0; |
|
| 5582 | + while ($i < $num) |
|
| 5583 | + {
|
|
| 5584 | + $labeltoshow=''; |
|
| 5585 | + $obj = $this->db->fetch_object($resql); |
|
| 5586 | + |
|
| 5587 | + // Several field into label (eq table:code|libelle:rowid) |
|
| 5588 | + $notrans = false; |
|
| 5589 | + $fields_label = explode('|',$InfoFieldList[1]);
|
|
| 5590 | + if (is_array($fields_label)) |
|
| 5591 | + {
|
|
| 5592 | + $notrans = true; |
|
| 5593 | + foreach ($fields_label as $field_toshow) |
|
| 5594 | + {
|
|
| 5595 | + $labeltoshow.= $obj->$field_toshow.' '; |
|
| 5596 | + } |
|
| 5597 | + } |
|
| 5598 | + else |
|
| 5599 | + {
|
|
| 5600 | + $labeltoshow=$obj->{$InfoFieldList[1]};
|
|
| 5601 | + } |
|
| 5602 | + $labeltoshow=dol_trunc($labeltoshow,45); |
|
| 5603 | + |
|
| 5604 | + if ($value == $obj->rowid) |
|
| 5605 | + {
|
|
| 5606 | + foreach ($fields_label as $field_toshow) |
|
| 5607 | + {
|
|
| 5608 | + $translabel=$langs->trans($obj->$field_toshow); |
|
| 5609 | + if ($translabel!=$obj->$field_toshow) {
|
|
| 5610 | + $labeltoshow=dol_trunc($translabel,18).' '; |
|
| 5611 | + }else {
|
|
| 5612 | + $labeltoshow=dol_trunc($obj->$field_toshow,18).' '; |
|
| 5613 | + } |
|
| 5614 | + } |
|
| 5615 | + $out.='<option value="'.$obj->rowid.'" selected>'.$labeltoshow.'</option>'; |
|
| 5616 | + } |
|
| 5617 | + else |
|
| 5618 | + {
|
|
| 5619 | + if (! $notrans) |
|
| 5620 | + {
|
|
| 5621 | + $translabel=$langs->trans($obj->{$InfoFieldList[1]});
|
|
| 5622 | + if ($translabel!=$obj->{$InfoFieldList[1]}) {
|
|
| 5623 | + $labeltoshow=dol_trunc($translabel,18); |
|
| 5624 | + } |
|
| 5625 | + else {
|
|
| 5626 | + $labeltoshow=dol_trunc($obj->{$InfoFieldList[1]},18);
|
|
| 5627 | + } |
|
| 5628 | + } |
|
| 5629 | + if (empty($labeltoshow)) $labeltoshow='(not defined)'; |
|
| 5630 | + if ($value==$obj->rowid) |
|
| 5631 | + {
|
|
| 5632 | + $out.='<option value="'.$obj->rowid.'" selected>'.$labeltoshow.'</option>'; |
|
| 5633 | + } |
|
| 5634 | + |
|
| 5635 | + if (!empty($InfoFieldList[3]) && $parentField) |
|
| 5636 | + {
|
|
| 5637 | + $parent = $parentName.':'.$obj->{$parentField};
|
|
| 5638 | + } |
|
| 5639 | + |
|
| 5640 | + $out.='<option value="'.$obj->rowid.'"'; |
|
| 5641 | + $out.= ($value==$obj->rowid?' selected':''); |
|
| 5642 | + $out.= (!empty($parent)?' parent="'.$parent.'"':''); |
|
| 5643 | + $out.='>'.$labeltoshow.'</option>'; |
|
| 5644 | + } |
|
| 5645 | + |
|
| 5646 | + $i++; |
|
| 5647 | + } |
|
| 5648 | + $this->db->free($resql); |
|
| 5649 | + } |
|
| 5650 | + else {
|
|
| 5651 | + print 'Error in request '.$sql.' '.$this->db->lasterror().'. Check setup of extra parameters.<br>'; |
|
| 5652 | + } |
|
| 5653 | + } |
|
| 5654 | + $out.='</select>'; |
|
| 5655 | + } |
|
| 5656 | + elseif ($type == 'checkbox') |
|
| 5657 | + {
|
|
| 5658 | + $value_arr=explode(',',$value);
|
|
| 5659 | + $out=$form->multiselectarray($keyprefix.$key.$keysuffix, (empty($param['options'])?null:$param['options']), $value_arr, '', 0, '', 0, '100%'); |
|
| 5660 | + } |
|
| 5661 | + elseif ($type == 'radio') |
|
| 5662 | + {
|
|
| 5663 | + $out=''; |
|
| 5664 | + foreach ($param['options'] as $keyopt => $val) |
|
| 5665 | + {
|
|
| 5666 | + $out.='<input class="flat '.$morecss.'" type="radio" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam?$moreparam:''); |
|
| 5667 | + $out.=' value="'.$keyopt.'"'; |
|
| 5668 | + $out.=' id="'.$keyprefix.$key.$keysuffix.'_'.$keyopt.'"'; |
|
| 5669 | + $out.= ($value==$keyopt?'checked':''); |
|
| 5670 | + $out.='/><label for="'.$keyprefix.$key.$keysuffix.'_'.$keyopt.'">'.$val.'</label><br>'; |
|
| 5671 | + } |
|
| 5672 | + } |
|
| 5673 | + elseif ($type == 'chkbxlst') |
|
| 5674 | + {
|
|
| 5675 | + if (is_array($value)) {
|
|
| 5676 | + $value_arr = $value; |
|
| 5677 | + } |
|
| 5678 | + else {
|
|
| 5679 | + $value_arr = explode(',', $value);
|
|
| 5680 | + } |
|
| 5681 | + |
|
| 5682 | + if (is_array($param['options'])) {
|
|
| 5683 | + $param_list = array_keys($param['options']); |
|
| 5684 | + $InfoFieldList = explode(":", $param_list[0]);
|
|
| 5685 | + $parentName=''; |
|
| 5686 | + $parentField=''; |
|
| 5687 | + // 0 : tableName |
|
| 5688 | + // 1 : label field name |
|
| 5689 | + // 2 : key fields name (if differ of rowid) |
|
| 5690 | + // 3 : key field parent (for dependent lists) |
|
| 5691 | + // 4 : where clause filter on column or table extrafield, syntax field='value' or extra.field=value |
|
| 5692 | + $keyList = (empty($InfoFieldList[2]) ? 'rowid' : $InfoFieldList[2] . ' as rowid'); |
|
| 5693 | + |
|
| 5694 | + if (count($InfoFieldList) > 3 && ! empty($InfoFieldList[3])) {
|
|
| 5695 | + list ( $parentName, $parentField ) = explode('|', $InfoFieldList[3]);
|
|
| 5696 | + $keyList .= ', ' . $parentField; |
|
| 5697 | + } |
|
| 5698 | + if (count($InfoFieldList) > 4 && ! empty($InfoFieldList[4])) {
|
|
| 5699 | + if (strpos($InfoFieldList[4], 'extra.') !== false) {
|
|
| 5700 | + $keyList = 'main.' . $InfoFieldList[2] . ' as rowid'; |
|
| 5701 | + } else {
|
|
| 5702 | + $keyList = $InfoFieldList[2] . ' as rowid'; |
|
| 5703 | + } |
|
| 5704 | + } |
|
| 5705 | + |
|
| 5706 | + $fields_label = explode('|', $InfoFieldList[1]);
|
|
| 5707 | + if (is_array($fields_label)) {
|
|
| 5708 | + $keyList .= ', '; |
|
| 5709 | + $keyList .= implode(', ', $fields_label);
|
|
| 5710 | + } |
|
| 5711 | + |
|
| 5712 | + $sqlwhere = ''; |
|
| 5713 | + $sql = 'SELECT ' . $keyList; |
|
| 5714 | + $sql .= ' FROM ' . MAIN_DB_PREFIX . $InfoFieldList[0]; |
|
| 5715 | + if (! empty($InfoFieldList[4])) {
|
|
| 5716 | + |
|
| 5717 | + // can use SELECT request |
|
| 5718 | + if (strpos($InfoFieldList[4], '$SEL$')!==false) {
|
|
| 5719 | + $InfoFieldList[4]=str_replace('$SEL$','SELECT',$InfoFieldList[4]);
|
|
| 5720 | + } |
|
| 5721 | + |
|
| 5722 | + // current object id can be use into filter |
|
| 5723 | + if (strpos($InfoFieldList[4], '$ID$')!==false && !empty($objectid)) {
|
|
| 5724 | + $InfoFieldList[4]=str_replace('$ID$',$objectid,$InfoFieldList[4]);
|
|
| 5725 | + } else {
|
|
| 5726 | + $InfoFieldList[4]=str_replace('$ID$','0',$InfoFieldList[4]);
|
|
| 5727 | + } |
|
| 5728 | + |
|
| 5729 | + // We have to join on extrafield table |
|
| 5730 | + if (strpos($InfoFieldList[4], 'extra') !== false) {
|
|
| 5731 | + $sql .= ' as main, ' . MAIN_DB_PREFIX . $InfoFieldList[0] . '_extrafields as extra'; |
|
| 5732 | + $sqlwhere .= ' WHERE extra.fk_object=main.' . $InfoFieldList[2] . ' AND ' . $InfoFieldList[4]; |
|
| 5733 | + } else {
|
|
| 5734 | + $sqlwhere .= ' WHERE ' . $InfoFieldList[4]; |
|
| 5735 | + } |
|
| 5736 | + } else {
|
|
| 5737 | + $sqlwhere .= ' WHERE 1=1'; |
|
| 5738 | + } |
|
| 5739 | + // Some tables may have field, some other not. For the moment we disable it. |
|
| 5740 | + if (in_array($InfoFieldList[0], array ('tablewithentity')))
|
|
| 5741 | + {
|
|
| 5742 | + $sqlwhere .= ' AND entity = ' . Globals::$conf->entity; |
|
| 5743 | + } |
|
| 5744 | + // $sql.=preg_replace('/^ AND /','',$sqlwhere);
|
|
| 5745 | + // print $sql; |
|
| 5746 | + |
|
| 5747 | + $sql .= $sqlwhere; |
|
| 5748 | + dol_syslog(get_class($this) . '::showInputField type=chkbxlst',LOG_DEBUG); |
|
| 5749 | + $resql = $this->db->query($sql); |
|
| 5750 | + if ($resql) {
|
|
| 5751 | + $num = $this->db->num_rows($resql); |
|
| 5752 | + $i = 0; |
|
| 5753 | + |
|
| 5754 | + $data=array(); |
|
| 5755 | + |
|
| 5756 | + while ( $i < $num ) {
|
|
| 5757 | + $labeltoshow = ''; |
|
| 5758 | + $obj = $this->db->fetch_object($resql); |
|
| 5759 | + |
|
| 5760 | + $notrans = false; |
|
| 5761 | + // Several field into label (eq table:code|libelle:rowid) |
|
| 5762 | + $fields_label = explode('|', $InfoFieldList[1]);
|
|
| 5763 | + if (is_array($fields_label)) {
|
|
| 5764 | + $notrans = true; |
|
| 5765 | + foreach ( $fields_label as $field_toshow ) {
|
|
| 5766 | + $labeltoshow .= $obj->$field_toshow . ' '; |
|
| 5767 | + } |
|
| 5768 | + } else {
|
|
| 5769 | + $labeltoshow = $obj->{$InfoFieldList[1]};
|
|
| 5770 | + } |
|
| 5771 | + $labeltoshow = dol_trunc($labeltoshow, 45); |
|
| 5772 | + |
|
| 5773 | + if (is_array($value_arr) && in_array($obj->rowid, $value_arr)) {
|
|
| 5774 | + foreach ( $fields_label as $field_toshow ) {
|
|
| 5775 | + $translabel = $langs->trans($obj->$field_toshow); |
|
| 5776 | + if ($translabel != $obj->$field_toshow) {
|
|
| 5777 | + $labeltoshow = dol_trunc($translabel, 18) . ' '; |
|
| 5778 | + } else {
|
|
| 5779 | + $labeltoshow = dol_trunc($obj->$field_toshow, 18) . ' '; |
|
| 5780 | + } |
|
| 5781 | + } |
|
| 5782 | + |
|
| 5783 | + $data[$obj->rowid]=$labeltoshow; |
|
| 5784 | + } else {
|
|
| 5785 | + if (! $notrans) {
|
|
| 5786 | + $translabel = $langs->trans($obj->{$InfoFieldList[1]});
|
|
| 5787 | + if ($translabel != $obj->{$InfoFieldList[1]}) {
|
|
| 5788 | + $labeltoshow = dol_trunc($translabel, 18); |
|
| 5789 | + } else {
|
|
| 5790 | + $labeltoshow = dol_trunc($obj->{$InfoFieldList[1]}, 18);
|
|
| 5791 | + } |
|
| 5792 | + } |
|
| 5793 | + if (empty($labeltoshow)) |
|
| 5794 | + $labeltoshow = '(not defined)'; |
|
| 5795 | + |
|
| 5796 | + if (is_array($value_arr) && in_array($obj->rowid, $value_arr)) {
|
|
| 5797 | + $data[$obj->rowid]=$labeltoshow; |
|
| 5798 | + } |
|
| 5799 | + |
|
| 5800 | + if (! empty($InfoFieldList[3]) && $parentField) {
|
|
| 5801 | + $parent = $parentName . ':' . $obj->{$parentField};
|
|
| 5802 | + } |
|
| 5803 | + |
|
| 5804 | + $data[$obj->rowid]=$labeltoshow; |
|
| 5805 | + } |
|
| 5806 | + |
|
| 5807 | + $i ++; |
|
| 5808 | + } |
|
| 5809 | + $this->db->free($resql); |
|
| 5810 | + |
|
| 5811 | + $out=$form->multiselectarray($keyprefix.$key.$keysuffix, $data, $value_arr, '', 0, '', 0, '100%'); |
|
| 5812 | + } else {
|
|
| 5813 | + print 'Error in request ' . $sql . ' ' . $this->db->lasterror() . '. Check setup of extra parameters.<br>'; |
|
| 5814 | + } |
|
| 5815 | + } |
|
| 5816 | + } |
|
| 5817 | + elseif ($type == 'link') |
|
| 5818 | + {
|
|
| 5819 | + $param_list=array_keys($param['options']); // $param_list='ObjectName:classPath' |
|
| 5820 | + $showempty=(($required && $default != '')?0:1); |
|
| 5821 | + $out=$form->selectForForms($param_list[0], $keyprefix.$key.$keysuffix, $value, $showempty); |
|
| 5822 | + if (Globals::$conf->global->MAIN_FEATURES_LEVEL >= 2) {
|
|
| 5823 | + list($class,$classfile)=explode(':',$param_list[0]);
|
|
| 5824 | + if (file_exists(dol_buildpath(dirname(dirname($classfile)).'/card.php'))) $url_path=dol_buildpath(dirname(dirname($classfile)).'/card.php',1); |
|
| 5825 | + else $url_path=dol_buildpath(dirname(dirname($classfile)).'/'.$class.'_card.php',1); |
|
| 5826 | + $out.='<a class="butActionNew" href="'.$url_path.'?action=create&backtopage='.$_SERVER['PHP_SELF'].'"><span class="fa fa-plus-circle valignmiddle"></span></a>'; |
|
| 5827 | + // TODO Add Javascript code to add input fields contents to new elements urls |
|
| 5828 | + } |
|
| 5829 | + } |
|
| 5830 | + elseif ($type == 'password') |
|
| 5831 | + {
|
|
| 5832 | + // If prefix is 'search_', field is used as a filter, we use a common text field. |
|
| 5833 | + $out='<input type="'.($keyprefix=='search_'?'text':'password').'" class="flat '.$morecss.'" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.$value.'" '.($moreparam?$moreparam:'').'>'; |
|
| 5834 | + } |
|
| 5835 | + elseif ($type == 'array') |
|
| 5836 | + {
|
|
| 5837 | + $newval = $val; |
|
| 5838 | + $newval['type'] = 'varchar(256)'; |
|
| 5839 | + |
|
| 5840 | + $out=''; |
|
| 5841 | + |
|
| 5842 | + $inputs = array(); |
|
| 5843 | + if(! empty($value)) {
|
|
| 5844 | + foreach($value as $option) {
|
|
| 5845 | + $out.= '<span><a class="'.dol_escape_htmltag($keyprefix.$key.$keysuffix).'_del" href="javascript:;"><span class="fa fa-minus-circle valignmiddle"></span></a> '; |
|
| 5846 | + $out.= $this->showInputField($newval, $keyprefix.$key.$keysuffix.'[]', $option, $moreparam, '', '', $showsize).'<br></span>'; |
|
| 5847 | + } |
|
| 5848 | + } |
|
| 5849 | + |
|
| 5850 | + $out.= '<a id="'.dol_escape_htmltag($keyprefix.$key.$keysuffix).'_add" href="javascript:;"><span class="fa fa-plus-circle valignmiddle"></span></a>'; |
|
| 5851 | + |
|
| 5852 | + $newInput = '<span><a class="'.dol_escape_htmltag($keyprefix.$key.$keysuffix).'_del" href="javascript:;"><span class="fa fa-minus-circle valignmiddle"></span></a> '; |
|
| 5853 | + $newInput.= $this->showInputField($newval, $keyprefix.$key.$keysuffix.'[]', '', $moreparam, '', '', $showsize).'<br></span>'; |
|
| 5854 | + |
|
| 5855 | + if (!empty(Globals::$conf->use_javascript_ajax)) {
|
|
| 5856 | + $out.= ' |
|
| 5857 | + <script type="text/javascript"> |
|
| 5858 | + $(document).ready(function() {
|
|
| 5859 | + $("a#'.dol_escape_js($keyprefix.$key.$keysuffix).'_add").click(function() {
|
|
| 5860 | + $("'.dol_escape_js($newInput).'").insertBefore(this);
|
|
| 5861 | + }); |
|
| 5862 | + |
|
| 5863 | + $(document).on("click", "a.'.dol_escape_js($keyprefix.$key.$keysuffix).'_del", function() {
|
|
| 5864 | + $(this).parent().remove(); |
|
| 5865 | + }); |
|
| 5866 | + }); |
|
| 5867 | + </script>'; |
|
| 5868 | + } |
|
| 5869 | + } |
|
| 5870 | + if (!empty($hidden)) {
|
|
| 5871 | + $out='<input type="hidden" value="'.$value.'" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'"/>'; |
|
| 5872 | + } |
|
| 5873 | + /* Add comments |
|
| 5874 | + if ($type == 'date') $out.=' (YYYY-MM-DD)'; |
|
| 5875 | + elseif ($type == 'datetime') $out.=' (YYYY-MM-DD HH:MM:SS)'; |
|
| 5876 | + */ |
|
| 5877 | + return $out; |
|
| 5878 | + } |
|
| 5879 | + |
|
| 5880 | + /** |
|
| 5881 | + * Return HTML string to show a field into a page |
|
| 5882 | + * Code very similar with showOutputField of extra fields |
|
| 5883 | + * |
|
| 5884 | + * @param array $val Array of properties of field to show |
|
| 5885 | + * @param string $key Key of attribute |
|
| 5886 | + * @param string $value Preselected value to show (for date type it must be in timestamp format, for amount or price it must be a php numeric value) |
|
| 5887 | + * @param string $moreparam To add more parametes on html input tag |
|
| 5888 | + * @param string $keysuffix Prefix string to add into name and id of field (can be used to avoid duplicate names) |
|
| 5889 | + * @param string $keyprefix Suffix string to add into name and id of field (can be used to avoid duplicate names) |
|
| 5890 | + * @param mixed $showsize Value for css to define size. May also be a numeric. |
|
| 5891 | + * @return string |
|
| 5892 | + */ |
|
| 5893 | + function showOutputField($val, $key, $value, $moreparam='', $keysuffix='', $keyprefix='', $showsize=0) |
|
| 5894 | + {
|
|
| 5895 | + global $conf,$langs,$form; |
|
| 5896 | + |
|
| 5897 | + if (! is_object($form)) |
|
| 5898 | + {
|
|
| 5899 | + require_once DOL_DOCUMENT_ROOT.'/core/class/html.form.class.php'; |
|
| 5900 | + $form=new Form($this->db); |
|
| 5901 | + } |
|
| 5902 | + |
|
| 5903 | + $objectid = $this->id; |
|
| 5904 | + $label = $val['label']; |
|
| 5905 | + $type = $val['type']; |
|
| 5906 | + $size = $val['css']; |
|
| 5907 | + |
|
| 5908 | + // Convert var to be able to share same code than showOutputField of extrafields |
|
| 5909 | + if (preg_match('/varchar\((\d+)\)/', $type, $reg))
|
|
| 5910 | + {
|
|
| 5911 | + $type = 'varchar'; // convert varchar(xx) int varchar |
|
| 5912 | + $size = $reg[1]; |
|
| 5913 | + } |
|
| 5914 | + elseif (preg_match('/varchar/', $type)) $type = 'varchar'; // convert varchar(xx) int varchar
|
|
| 5915 | + if (is_array($val['arrayofkeyval'])) $type='select'; |
|
| 5916 | + if (preg_match('/^integer:(.*):(.*)/i', $val['type'], $reg)) $type='link';
|
|
| 5917 | + |
|
| 5918 | + $default=$val['default']; |
|
| 5919 | + $computed=$val['computed']; |
|
| 5920 | + $unique=$val['unique']; |
|
| 5921 | + $required=$val['required']; |
|
| 5922 | + $param=$val['param']; |
|
| 5923 | + if (is_array($val['arrayofkeyval'])) $param['options'] = $val['arrayofkeyval']; |
|
| 5924 | + if (preg_match('/^integer:(.*):(.*)/i', $val['type'], $reg))
|
|
| 5925 | + {
|
|
| 5926 | + $type='link'; |
|
| 5927 | + $param['options']=array($reg[1].':'.$reg[2]=>$reg[1].':'.$reg[2]); |
|
| 5928 | + } |
|
| 5929 | + $langfile=$val['langfile']; |
|
| 5930 | + $list=$val['list']; |
|
| 5931 | + $help=$val['help']; |
|
| 5932 | + $hidden=(($val['visible'] == 0) ? 1 : 0); // If zero, we are sure it is hidden, otherwise we show. If it depends on mode (view/create/edit form or list, this must be filtered by caller) |
|
| 5933 | + |
|
| 5934 | + if ($hidden) return ''; |
|
| 5935 | + |
|
| 5936 | + // If field is a computed field, value must become result of compute |
|
| 5937 | + if ($computed) |
|
| 5938 | + {
|
|
| 5939 | + // Make the eval of compute string |
|
| 5940 | + //var_dump($computed); |
|
| 5941 | + $value = dol_eval($computed, 1, 0); |
|
| 5942 | + } |
|
| 5943 | + |
|
| 5944 | + if (empty($showsize)) |
|
| 5945 | + {
|
|
| 5946 | + if ($type == 'date') |
|
| 5947 | + {
|
|
| 5948 | + //$showsize=10; |
|
| 5949 | + $showsize = 'minwidth100imp'; |
|
| 5950 | + } |
|
| 5951 | + elseif ($type == 'datetime') |
|
| 5952 | + {
|
|
| 5953 | + //$showsize=19; |
|
| 5954 | + $showsize = 'minwidth200imp'; |
|
| 5955 | + } |
|
| 5956 | + elseif (in_array($type,array('int','double','price')))
|
|
| 5957 | + {
|
|
| 5958 | + //$showsize=10; |
|
| 5959 | + $showsize = 'maxwidth75'; |
|
| 5960 | + } |
|
| 5961 | + elseif ($type == 'url') |
|
| 5962 | + {
|
|
| 5963 | + $showsize='minwidth400'; |
|
| 5964 | + } |
|
| 5965 | + elseif ($type == 'boolean') |
|
| 5966 | + {
|
|
| 5967 | + $showsize=''; |
|
| 5968 | + } |
|
| 5969 | + else |
|
| 5970 | + {
|
|
| 5971 | + if (round($size) < 12) |
|
| 5972 | + {
|
|
| 5973 | + $showsize = 'minwidth100'; |
|
| 5974 | + } |
|
| 5975 | + else if (round($size) <= 48) |
|
| 5976 | + {
|
|
| 5977 | + $showsize = 'minwidth200'; |
|
| 5978 | + } |
|
| 5979 | + else |
|
| 5980 | + {
|
|
| 5981 | + //$showsize=48; |
|
| 5982 | + $showsize = 'minwidth400'; |
|
| 5983 | + } |
|
| 5984 | + } |
|
| 5985 | + } |
|
| 5986 | + |
|
| 5987 | + // Format output value differently according to properties of field |
|
| 5988 | + if ($key == 'ref' && method_exists($this, 'getNomUrl')) $value=$this->getNomUrl(1, '', 0, '', 1); |
|
| 5989 | + elseif ($key == 'status' && method_exists($this, 'getLibStatut')) $value=$this->getLibStatut(3); |
|
| 5990 | + elseif ($type == 'date') |
|
| 5991 | + {
|
|
| 5992 | + if(! empty($value)) {
|
|
| 5993 | + $value=dol_print_date($value,'day'); |
|
| 5994 | + } else {
|
|
| 5995 | + $value=''; |
|
| 5996 | + } |
|
| 5997 | + } |
|
| 5998 | + elseif ($type == 'datetime') |
|
| 5999 | + {
|
|
| 6000 | + if(! empty($value)) {
|
|
| 6001 | + $value=dol_print_date($value,'dayhour'); |
|
| 6002 | + } else {
|
|
| 6003 | + $value=''; |
|
| 6004 | + } |
|
| 6005 | + } |
|
| 6006 | + elseif ($type == 'double') |
|
| 6007 | + {
|
|
| 6008 | + if (!empty($value)) {
|
|
| 6009 | + $value=price($value); |
|
| 6010 | + } |
|
| 6011 | + } |
|
| 6012 | + elseif ($type == 'boolean') |
|
| 6013 | + {
|
|
| 6014 | + $checked=''; |
|
| 6015 | + if (!empty($value)) {
|
|
| 6016 | + $checked=' checked '; |
|
| 6017 | + } |
|
| 6018 | + $value='<input type="checkbox" '.$checked.' '.($moreparam?$moreparam:'').' readonly disabled>'; |
|
| 6019 | + } |
|
| 6020 | + elseif ($type == 'mail') |
|
| 6021 | + {
|
|
| 6022 | + $value=dol_print_email($value,0,0,0,64,1,1); |
|
| 6023 | + } |
|
| 6024 | + elseif ($type == 'url') |
|
| 6025 | + {
|
|
| 6026 | + $value=dol_print_url($value,'_blank',32,1); |
|
| 6027 | + } |
|
| 6028 | + elseif ($type == 'phone') |
|
| 6029 | + {
|
|
| 6030 | + $value=dol_print_phone($value, '', 0, 0, '', ' ', 1); |
|
| 6031 | + } |
|
| 6032 | + elseif ($type == 'price') |
|
| 6033 | + {
|
|
| 6034 | + $value = price($value, 0, $langs, 0, 0, -1, Globals::$conf->currency); |
|
| 6035 | + } |
|
| 6036 | + elseif ($type == 'select') |
|
| 6037 | + {
|
|
| 6038 | + $value=$param['options'][$value]; |
|
| 6039 | + } |
|
| 6040 | + elseif ($type == 'sellist') |
|
| 6041 | + {
|
|
| 6042 | + $param_list=array_keys($param['options']); |
|
| 6043 | + $InfoFieldList = explode(":", $param_list[0]);
|
|
| 6044 | + |
|
| 6045 | + $selectkey="rowid"; |
|
| 6046 | + $keyList='rowid'; |
|
| 6047 | + |
|
| 6048 | + if (count($InfoFieldList)>=3) |
|
| 6049 | + {
|
|
| 6050 | + $selectkey = $InfoFieldList[2]; |
|
| 6051 | + $keyList=$InfoFieldList[2].' as rowid'; |
|
| 6052 | + } |
|
| 6053 | + |
|
| 6054 | + $fields_label = explode('|',$InfoFieldList[1]);
|
|
| 6055 | + if(is_array($fields_label)) {
|
|
| 6056 | + $keyList .=', '; |
|
| 6057 | + $keyList .= implode(', ', $fields_label);
|
|
| 6058 | + } |
|
| 6059 | + |
|
| 6060 | + $sql = 'SELECT '.$keyList; |
|
| 6061 | + $sql.= ' FROM '.MAIN_DB_PREFIX .$InfoFieldList[0]; |
|
| 6062 | + if (strpos($InfoFieldList[4], 'extra')!==false) |
|
| 6063 | + {
|
|
| 6064 | + $sql.= ' as main'; |
|
| 6065 | + } |
|
| 6066 | + if ($selectkey=='rowid' && empty($value)) {
|
|
| 6067 | + $sql.= " WHERE ".$selectkey."=0"; |
|
| 6068 | + } elseif ($selectkey=='rowid') {
|
|
| 6069 | + $sql.= " WHERE ".$selectkey."=".$this->db->escape($value); |
|
| 6070 | + }else {
|
|
| 6071 | + $sql.= " WHERE ".$selectkey."='".$this->db->escape($value)."'"; |
|
| 6072 | + } |
|
| 6073 | + |
|
| 6074 | + //$sql.= ' AND entity = '.Globals::$conf->entity; |
|
| 6075 | + |
|
| 6076 | + dol_syslog(get_class($this).':showOutputField:$type=sellist', LOG_DEBUG); |
|
| 6077 | + $resql = $this->db->query($sql); |
|
| 6078 | + if ($resql) |
|
| 6079 | + {
|
|
| 6080 | + $value=''; // value was used, so now we reste it to use it to build final output |
|
| 6081 | + |
|
| 6082 | + $obj = $this->db->fetch_object($resql); |
|
| 6083 | + |
|
| 6084 | + // Several field into label (eq table:code|libelle:rowid) |
|
| 6085 | + $fields_label = explode('|',$InfoFieldList[1]);
|
|
| 6086 | + |
|
| 6087 | + if(is_array($fields_label) && count($fields_label)>1) |
|
| 6088 | + {
|
|
| 6089 | + foreach ($fields_label as $field_toshow) |
|
| 6090 | + {
|
|
| 6091 | + $translabel=''; |
|
| 6092 | + if (!empty($obj->$field_toshow)) {
|
|
| 6093 | + $translabel=$langs->trans($obj->$field_toshow); |
|
| 6094 | + } |
|
| 6095 | + if ($translabel!=$field_toshow) {
|
|
| 6096 | + $value.=dol_trunc($translabel,18).' '; |
|
| 6097 | + }else {
|
|
| 6098 | + $value.=$obj->$field_toshow.' '; |
|
| 6099 | + } |
|
| 6100 | + } |
|
| 6101 | + } |
|
| 6102 | + else |
|
| 6103 | + {
|
|
| 6104 | + $translabel=''; |
|
| 6105 | + if (!empty($obj->{$InfoFieldList[1]})) {
|
|
| 6106 | + $translabel=$langs->trans($obj->{$InfoFieldList[1]});
|
|
| 6107 | + } |
|
| 6108 | + if ($translabel!=$obj->{$InfoFieldList[1]}) {
|
|
| 6109 | + $value=dol_trunc($translabel,18); |
|
| 6110 | + }else {
|
|
| 6111 | + $value=$obj->{$InfoFieldList[1]};
|
|
| 6112 | + } |
|
| 6113 | + } |
|
| 6114 | + } |
|
| 6115 | + else dol_syslog(get_class($this).'::showOutputField error '.$this->db->lasterror(), LOG_WARNING); |
|
| 6116 | + } |
|
| 6117 | + elseif ($type == 'radio') |
|
| 6118 | + {
|
|
| 6119 | + $value=$param['options'][$value]; |
|
| 6120 | + } |
|
| 6121 | + elseif ($type == 'checkbox') |
|
| 6122 | + {
|
|
| 6123 | + $value_arr=explode(',',$value);
|
|
| 6124 | + $value=''; |
|
| 6125 | + if (is_array($value_arr) && count($value_arr)>0) |
|
| 6126 | + {
|
|
| 6127 | + foreach ($value_arr as $keyval=>$valueval) {
|
|
| 6128 | + $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.$param['options'][$valueval].'</li>'; |
|
| 6129 | + } |
|
| 6130 | + $value='<div class="select2-container-multi-dolibarr" style="width: 90%;"><ul class="select2-choices-dolibarr">'.implode(' ', $toprint).'</ul></div>';
|
|
| 6131 | + } |
|
| 6132 | + } |
|
| 6133 | + elseif ($type == 'chkbxlst') |
|
| 6134 | + {
|
|
| 6135 | + $value_arr = explode(',', $value);
|
|
| 6136 | + |
|
| 6137 | + $param_list = array_keys($param['options']); |
|
| 6138 | + $InfoFieldList = explode(":", $param_list[0]);
|
|
| 6139 | + |
|
| 6140 | + $selectkey = "rowid"; |
|
| 6141 | + $keyList = 'rowid'; |
|
| 6142 | + |
|
| 6143 | + if (count($InfoFieldList) >= 3) {
|
|
| 6144 | + $selectkey = $InfoFieldList[2]; |
|
| 6145 | + $keyList = $InfoFieldList[2] . ' as rowid'; |
|
| 6146 | + } |
|
| 6147 | + |
|
| 6148 | + $fields_label = explode('|', $InfoFieldList[1]);
|
|
| 6149 | + if (is_array($fields_label)) {
|
|
| 6150 | + $keyList .= ', '; |
|
| 6151 | + $keyList .= implode(', ', $fields_label);
|
|
| 6152 | + } |
|
| 6153 | + |
|
| 6154 | + $sql = 'SELECT ' . $keyList; |
|
| 6155 | + $sql .= ' FROM ' . MAIN_DB_PREFIX . $InfoFieldList[0]; |
|
| 6156 | + if (strpos($InfoFieldList[4], 'extra') !== false) {
|
|
| 6157 | + $sql .= ' as main'; |
|
| 6158 | + } |
|
| 6159 | + // $sql.= " WHERE ".$selectkey."='".$this->db->escape($value)."'"; |
|
| 6160 | + // $sql.= ' AND entity = '.Globals::$conf->entity; |
|
| 6161 | + |
|
| 6162 | + dol_syslog(get_class($this) . ':showOutputField:$type=chkbxlst',LOG_DEBUG); |
|
| 6163 | + $resql = $this->db->query($sql); |
|
| 6164 | + if ($resql) {
|
|
| 6165 | + $value = ''; // value was used, so now we reste it to use it to build final output |
|
| 6166 | + $toprint=array(); |
|
| 6167 | + while ( $obj = $this->db->fetch_object($resql) ) {
|
|
| 6168 | + |
|
| 6169 | + // Several field into label (eq table:code|libelle:rowid) |
|
| 6170 | + $fields_label = explode('|', $InfoFieldList[1]);
|
|
| 6171 | + if (is_array($value_arr) && in_array($obj->rowid, $value_arr)) {
|
|
| 6172 | + if (is_array($fields_label) && count($fields_label) > 1) {
|
|
| 6173 | + foreach ( $fields_label as $field_toshow ) {
|
|
| 6174 | + $translabel = ''; |
|
| 6175 | + if (! empty($obj->$field_toshow)) {
|
|
| 6176 | + $translabel = $langs->trans($obj->$field_toshow); |
|
| 6177 | + } |
|
| 6178 | + if ($translabel != $field_toshow) {
|
|
| 6179 | + $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.dol_trunc($translabel, 18).'</li>'; |
|
| 6180 | + } else {
|
|
| 6181 | + $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.$obj->$field_toshow.'</li>'; |
|
| 6182 | + } |
|
| 6183 | + } |
|
| 6184 | + } else {
|
|
| 6185 | + $translabel = ''; |
|
| 6186 | + if (! empty($obj->{$InfoFieldList[1]})) {
|
|
| 6187 | + $translabel = $langs->trans($obj->{$InfoFieldList[1]});
|
|
| 6188 | + } |
|
| 6189 | + if ($translabel != $obj->{$InfoFieldList[1]}) {
|
|
| 6190 | + $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.dol_trunc($translabel, 18).'</li>'; |
|
| 6191 | + } else {
|
|
| 6192 | + $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.$obj->{$InfoFieldList[1]}.'</li>';
|
|
| 6193 | + } |
|
| 6194 | + } |
|
| 6195 | + } |
|
| 6196 | + } |
|
| 6197 | + $value='<div class="select2-container-multi-dolibarr" style="width: 90%;"><ul class="select2-choices-dolibarr">'.implode(' ', $toprint).'</ul></div>';
|
|
| 6198 | + } else {
|
|
| 6199 | + dol_syslog(get_class($this) . '::showOutputField error ' . $this->db->lasterror(), LOG_WARNING); |
|
| 6200 | + } |
|
| 6201 | + } |
|
| 6202 | + elseif ($type == 'link') |
|
| 6203 | + {
|
|
| 6204 | + $out=''; |
|
| 6205 | + |
|
| 6206 | + // only if something to display (perf) |
|
| 6207 | + if ($value) |
|
| 6208 | + {
|
|
| 6209 | + $param_list=array_keys($param['options']); // $param_list='ObjectName:classPath' |
|
| 6210 | + |
|
| 6211 | + $InfoFieldList = explode(":", $param_list[0]);
|
|
| 6212 | + $classname=$InfoFieldList[0]; |
|
| 6213 | + $classpath=$InfoFieldList[1]; |
|
| 6214 | + $getnomurlparam=(empty($InfoFieldList[2]) ? 3 : $InfoFieldList[2]); |
|
| 6215 | + if (! empty($classpath)) |
|
| 6216 | + {
|
|
| 6217 | + dol_include_once($InfoFieldList[1]); |
|
| 6218 | + if ($classname && class_exists($classname)) |
|
| 6219 | + {
|
|
| 6220 | + $object = new $classname($this->db); |
|
| 6221 | + $object->fetch($value); |
|
| 6222 | + $value=$object->getNomUrl($getnomurlparam); |
|
| 6223 | + } |
|
| 6224 | + } |
|
| 6225 | + else |
|
| 6226 | + {
|
|
| 6227 | + dol_syslog('Error bad setup of extrafield', LOG_WARNING);
|
|
| 6228 | + return 'Error bad setup of extrafield'; |
|
| 6229 | + } |
|
| 6230 | + } |
|
| 6231 | + else $value=''; |
|
| 6232 | + } |
|
| 6233 | + elseif ($type == 'text' || $type == 'html') |
|
| 6234 | + {
|
|
| 6235 | + $value=dol_htmlentitiesbr($value); |
|
| 6236 | + } |
|
| 6237 | + elseif ($type == 'password') |
|
| 6238 | + {
|
|
| 6239 | + $value=preg_replace('/./i','*',$value);
|
|
| 6240 | + } |
|
| 6241 | + elseif ($type == 'array') |
|
| 6242 | + {
|
|
| 6243 | + $value = implode('<br>', $value);
|
|
| 6244 | + } |
|
| 6245 | + |
|
| 6246 | + //print $type.'-'.$size; |
|
| 6247 | + $out=$value; |
|
| 6248 | + |
|
| 6249 | + return $out; |
|
| 6250 | + } |
|
| 6251 | + |
|
| 6252 | + |
|
| 6253 | + /** |
|
| 6254 | + * Function to show lines of extrafields with output datas |
|
| 6255 | + * |
|
| 6256 | + * @param Extrafields $extrafields Extrafield Object |
|
| 6257 | + * @param string $mode Show output (view) or input (edit) for extrafield |
|
| 6258 | + * @param array $params Optional parameters. Example: array('style'=>'class="oddeven"', 'colspan'=>$colspan)
|
|
| 6259 | + * @param string $keysuffix Suffix string to add after name and id of field (can be used to avoid duplicate names) |
|
| 6260 | + * @param string $keyprefix Prefix string to add before name and id of field (can be used to avoid duplicate names) |
|
| 6261 | + * @param string $onetrtd All fields in same tr td |
|
| 6262 | + * @return string |
|
| 6263 | + */ |
|
| 6264 | + function showOptionals($extrafields, $mode='view', $params=null, $keysuffix='', $keyprefix='', $onetrtd=0) |
|
| 6265 | + {
|
|
| 6266 | + global $db, $conf, $langs, $action, $form; |
|
| 6267 | + |
|
| 6268 | + if (! is_object($form)) $form=new Form($db); |
|
| 6269 | + |
|
| 6270 | + $out = ''; |
|
| 6271 | + |
|
| 6272 | + if (is_array($extrafields->attributes[$this->table_element]['label']) && count($extrafields->attributes[$this->table_element]['label']) > 0) |
|
| 6273 | + {
|
|
| 6274 | + $out .= "\n"; |
|
| 6275 | + $out .= '<!-- showOptionalsInput --> '; |
|
| 6276 | + $out .= "\n"; |
|
| 6277 | + |
|
| 6278 | + $e = 0; |
|
| 6279 | + foreach($extrafields->attributes[$this->table_element]['label'] as $key=>$label) |
|
| 6280 | + {
|
|
| 6281 | + // Show only the key field in params |
|
| 6282 | + if (is_array($params) && array_key_exists('onlykey',$params) && $key != $params['onlykey']) continue;
|
|
| 6283 | + |
|
| 6284 | + $enabled = 1; |
|
| 6285 | + if ($enabled && isset($extrafields->attributes[$this->table_element]['list'][$key])) |
|
| 6286 | + {
|
|
| 6287 | + $enabled = dol_eval($extrafields->attributes[$this->table_element]['list'][$key], 1); |
|
| 6288 | + } |
|
| 6289 | + |
|
| 6290 | + $perms = 1; |
|
| 6291 | + if ($perms && isset($extrafields->attributes[$this->table_element]['perms'][$key])) |
|
| 6292 | + {
|
|
| 6293 | + $perms = dol_eval($extrafields->attributes[$this->table_element]['perms'][$key], 1); |
|
| 6294 | + } |
|
| 6295 | + |
|
| 6296 | + if (($mode == 'create' || $mode == 'edit') && abs($enabled) != 1 && abs($enabled) != 3) continue; // <> -1 and <> 1 and <> 3 = not visible on forms, only on list |
|
| 6297 | + if (empty($perms)) continue; |
|
| 6298 | + |
|
| 6299 | + // Load language if required |
|
| 6300 | + if (! empty($extrafields->attributes[$this->table_element]['langfile'][$key])) $langs->load($extrafields->attributes[$this->table_element]['langfile'][$key]); |
|
| 6301 | + |
|
| 6302 | + $colspan='3'; |
|
| 6303 | + if (is_array($params) && count($params)>0) {
|
|
| 6304 | + if (array_key_exists('colspan',$params)) {
|
|
| 6305 | + $colspan=$params['colspan']; |
|
| 6306 | + } |
|
| 6307 | + } |
|
| 6308 | + |
|
| 6309 | + switch($mode) {
|
|
| 6310 | + case "view": |
|
| 6311 | + $value=$this->array_options["options_".$key.$keysuffix]; |
|
| 6312 | + break; |
|
| 6313 | + case "edit": |
|
| 6314 | + $getposttemp = GETPOST($keyprefix.'options_'.$key.$keysuffix, 'none'); // GETPOST can get value from GET, POST or setup of default values. |
|
| 6315 | + // GETPOST("options_" . $key) can be 'abc' or array(0=>'abc')
|
|
| 6316 | + if (is_array($getposttemp) || $getposttemp != '' || GETPOSTISSET($keyprefix.'options_'.$key.$keysuffix)) |
|
| 6317 | + {
|
|
| 6318 | + if (is_array($getposttemp)) {
|
|
| 6319 | + // $getposttemp is an array but following code expects a comma separated string |
|
| 6320 | + $value = implode(",", $getposttemp);
|
|
| 6321 | + } else {
|
|
| 6322 | + $value = $getposttemp; |
|
| 6323 | + } |
|
| 6324 | + } else {
|
|
| 6325 | + $value = $this->array_options["options_" . $key]; // No GET, no POST, no default value, so we take value of object. |
|
| 6326 | + } |
|
| 6327 | + //var_dump($keyprefix.' - '.$key.' - '.$keysuffix.' - '.$keyprefix.'options_'.$key.$keysuffix.' - '.$this->array_options["options_".$key.$keysuffix].' - '.$getposttemp.' - '.$value); |
|
| 6328 | + break; |
|
| 6329 | + } |
|
| 6330 | + |
|
| 6331 | + if ($extrafields->attributes[$this->table_element]['type'][$key] == 'separate') |
|
| 6332 | + {
|
|
| 6333 | + $out .= $extrafields->showSeparator($key, $this); |
|
| 6334 | + } |
|
| 6335 | + else |
|
| 6336 | + {
|
|
| 6337 | + $csstyle=''; |
|
| 6338 | + $class=(!empty($extrafields->attributes[$this->table_element]['hidden'][$key]) ? 'hideobject ' : ''); |
|
| 6339 | + if (is_array($params) && count($params)>0) {
|
|
| 6340 | + if (array_key_exists('style',$params)) {
|
|
| 6341 | + $csstyle=$params['style']; |
|
| 6342 | + } |
|
| 6343 | + } |
|
| 6344 | + |
|
| 6345 | + // add html5 elements |
|
| 6346 | + $domData = ' data-element="extrafield"'; |
|
| 6347 | + $domData .= ' data-targetelement="'.$this->element.'"'; |
|
| 6348 | + $domData .= ' data-targetid="'.$this->id.'"'; |
|
| 6349 | + |
|
| 6350 | + $html_id = !empty($this->id) ? 'extrarow-'.$this->element.'_'.$key.'_'.$this->id : ''; |
|
| 6351 | + |
|
| 6352 | + $out .= '<tr id="'.$html_id.'" '.$csstyle.' class="'.$class.$this->element.'_extras_'.$key.'" '.$domData.' >'; |
|
| 6353 | + |
|
| 6354 | + if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_TWO_COLUMS) && ($e % 2) == 0) {
|
|
| 6355 | + if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_TWO_COLUMS) && ($e % 2) == 0) {
|
|
| 6356 | + $colspan = '0'; |
|
| 6357 | + } |
|
| 6358 | + } |
|
| 6359 | + |
|
| 6360 | + if ($action == 'selectlines') { $colspan++; }
|
|
| 6361 | + |
|
| 6362 | + // Convert date into timestamp format (value in memory must be a timestamp) |
|
| 6363 | + if (in_array($extrafields->attributes[$this->table_element]['type'][$key],array('date','datetime')))
|
|
| 6364 | + {
|
|
| 6365 | + $datenotinstring = $this->array_options['options_' . $key]; |
|
| 6366 | + if (! is_numeric($this->array_options['options_' . $key])) // For backward compatibility |
|
| 6367 | + {
|
|
| 6368 | + $datenotinstring = $this->db->jdate($datenotinstring); |
|
| 6369 | + } |
|
| 6370 | + $value = GETPOSTISSET($keyprefix.'options_'.$key.$keysuffix)?dol_mktime(GETPOST($keyprefix.'options_'.$key.$keysuffix."hour", 'int', 3), GETPOST($keyprefix.'options_'.$key.$keysuffix."min",'int',3), 0, GETPOST($keyprefix.'options_'.$key.$keysuffix."month",'int',3), GETPOST($keyprefix.'options_'.$key.$keysuffix."day",'int',3), GETPOST($keyprefix.'options_'.$key.$keysuffix."year",'int',3)):$datenotinstring; |
|
| 6371 | + } |
|
| 6372 | + // Convert float submited string into real php numeric (value in memory must be a php numeric) |
|
| 6373 | + if (in_array($extrafields->attributes[$this->table_element]['type'][$key],array('price','double')))
|
|
| 6374 | + {
|
|
| 6375 | + $value = GETPOSTISSET($keyprefix.'options_'.$key.$keysuffix)?price2num(GETPOST($keyprefix.'options_'.$key.$keysuffix, 'alpha', 3)):$this->array_options['options_'.$key]; |
|
| 6376 | + } |
|
| 6377 | + |
|
| 6378 | + $labeltoshow = $langs->trans($label); |
|
| 6379 | + |
|
| 6380 | + $out .= '<td class="titlefield'; |
|
| 6381 | + if (GETPOST('action','none') == 'create') $out.='create';
|
|
| 6382 | + if ($mode != 'view' && ! empty($extrafields->attributes[$this->table_element]['required'][$key])) $out .= ' fieldrequired'; |
|
| 6383 | + $out .= '">'; |
|
| 6384 | + if (! empty($extrafields->attributes[$object->table_element]['help'][$key])) $out .= $form->textwithpicto($labeltoshow, $extrafields->attributes[$object->table_element]['help'][$key]); |
|
| 6385 | + else $out .= $labeltoshow; |
|
| 6386 | + $out .= '</td>'; |
|
| 6387 | + |
|
| 6388 | + $html_id = !empty($this->id) ? $this->element.'_extras_'.$key.'_'.$this->id : ''; |
|
| 6389 | + $out .='<td id="'.$html_id.'" class="'.$this->element.'_extras_'.$key.'" '.($colspan?' colspan="'.$colspan.'"':'').'>'; |
|
| 6390 | + |
|
| 6391 | + switch($mode) {
|
|
| 6392 | + case "view": |
|
| 6393 | + $out .= $extrafields->showOutputField($key, $value); |
|
| 6394 | + break; |
|
| 6395 | + case "edit": |
|
| 6396 | + $out .= $extrafields->showInputField($key, $value, '', $keysuffix, '', 0, $this->id); |
|
| 6397 | + break; |
|
| 6398 | + } |
|
| 6399 | + |
|
| 6400 | + $out .= '</td>'; |
|
| 6401 | + |
|
| 6402 | + if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_TWO_COLUMS) && (($e % 2) == 1)) |
|
| 6403 | + $out .= '</tr>'; |
|
| 6404 | + else $out .= '</tr>'; |
|
| 6405 | + $e++; |
|
| 6406 | + } |
|
| 6407 | + } |
|
| 6408 | + $out .= "\n"; |
|
| 6409 | + // Add code to manage list depending on others |
|
| 6410 | + if (!empty(Globals::$conf->use_javascript_ajax)) {
|
|
| 6411 | + $out .= ' |
|
| 6412 | + <script type="text/javascript"> |
|
| 6413 | + jQuery(document).ready(function() {
|
|
| 6414 | + function showOptions(child_list, parent_list) |
|
| 6415 | + {
|
|
| 6416 | + var val = $("select[name=\"options_"+parent_list+"\"]").val();
|
|
| 6417 | + var parentVal = parent_list + ":" + val; |
|
| 6418 | + if(val > 0) {
|
|
| 6419 | + $("select[name=\""+child_list+"\"] option[parent]").hide();
|
|
| 6420 | + $("select[name=\""+child_list+"\"] option[parent=\""+parentVal+"\"]").show();
|
|
| 6421 | + } else {
|
|
| 6422 | + $("select[name=\""+child_list+"\"] option").show();
|
|
| 6423 | + } |
|
| 6424 | + } |
|
| 6425 | + function setListDependencies() {
|
|
| 6426 | + jQuery("select option[parent]").parent().each(function() {
|
|
| 6427 | + var child_list = $(this).attr("name");
|
|
| 6428 | + var parent = $(this).find("option[parent]:first").attr("parent");
|
|
| 6429 | + var infos = parent.split(":");
|
|
| 6430 | + var parent_list = infos[0]; |
|
| 6431 | + $("select[name=\""+parent_list+"\"]").change(function() {
|
|
| 6432 | + showOptions(child_list, parent_list); |
|
| 6433 | + }); |
|
| 6434 | + }); |
|
| 6435 | + } |
|
| 6436 | + |
|
| 6437 | + setListDependencies(); |
|
| 6438 | + }); |
|
| 6439 | + </script>'."\n"; |
|
| 6440 | + $out .= '<!-- /showOptionalsInput --> '."\n"; |
|
| 6441 | + } |
|
| 6442 | + } |
|
| 6443 | + return $out; |
|
| 6444 | + } |
|
| 6445 | + |
|
| 6446 | + |
|
| 6447 | + /** |
|
| 6448 | + * Returns the rights used for this class |
|
| 6449 | + * @return stdClass |
|
| 6450 | + */ |
|
| 6451 | + public function getRights() |
|
| 6452 | + {
|
|
| 6453 | + global $user; |
|
| 6454 | + |
|
| 6455 | + $element = $this->element; |
|
| 6456 | + if ($element == 'facturerec') $element='facture'; |
|
| 6457 | + |
|
| 6458 | + return $user->rights->{$element};
|
|
| 6459 | + } |
|
| 6460 | + |
|
| 6461 | + /** |
|
| 6462 | + * Function used to replace a thirdparty id with another one. |
|
| 6463 | + * This function is meant to be called from replaceThirdparty with the appropiate tables |
|
| 6464 | + * Column name fk_soc MUST be used to identify thirdparties |
|
| 6465 | + * |
|
| 6466 | + * @param DoliDB $db Database handler |
|
| 6467 | + * @param int $origin_id Old thirdparty id (the thirdparty to delete) |
|
| 6468 | + * @param int $dest_id New thirdparty id (the thirdparty that will received element of the other) |
|
| 6469 | + * @param string[] $tables Tables that need to be changed |
|
| 6470 | + * @param int $ignoreerrors Ignore errors. Return true even if errors. We need this when replacement can fails like for categories (categorie of old thirdparty may already exists on new one) |
|
| 6471 | + * @return bool True if success, False if error |
|
| 6472 | + */ |
|
| 6473 | + public static function commonReplaceThirdparty(DoliDB $db, $origin_id, $dest_id, array $tables, $ignoreerrors=0) |
|
| 6474 | + {
|
|
| 6475 | + foreach ($tables as $table) |
|
| 6476 | + {
|
|
| 6477 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$table.' SET fk_soc = '.$dest_id.' WHERE fk_soc = '.$origin_id; |
|
| 5862 | 6478 | |
| 5863 | - $(document).on("click", "a.'.dol_escape_js($keyprefix.$key.$keysuffix).'_del", function() {
|
|
| 5864 | - $(this).parent().remove(); |
|
| 5865 | - }); |
|
| 5866 | - }); |
|
| 5867 | - </script>'; |
|
| 5868 | - } |
|
| 5869 | - } |
|
| 5870 | - if (!empty($hidden)) {
|
|
| 5871 | - $out='<input type="hidden" value="'.$value.'" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'"/>'; |
|
| 5872 | - } |
|
| 5873 | - /* Add comments |
|
| 5874 | - if ($type == 'date') $out.=' (YYYY-MM-DD)'; |
|
| 5875 | - elseif ($type == 'datetime') $out.=' (YYYY-MM-DD HH:MM:SS)'; |
|
| 5876 | - */ |
|
| 5877 | - return $out; |
|
| 5878 | - } |
|
| 5879 | - |
|
| 5880 | - /** |
|
| 5881 | - * Return HTML string to show a field into a page |
|
| 5882 | - * Code very similar with showOutputField of extra fields |
|
| 5883 | - * |
|
| 5884 | - * @param array $val Array of properties of field to show |
|
| 5885 | - * @param string $key Key of attribute |
|
| 5886 | - * @param string $value Preselected value to show (for date type it must be in timestamp format, for amount or price it must be a php numeric value) |
|
| 5887 | - * @param string $moreparam To add more parametes on html input tag |
|
| 5888 | - * @param string $keysuffix Prefix string to add into name and id of field (can be used to avoid duplicate names) |
|
| 5889 | - * @param string $keyprefix Suffix string to add into name and id of field (can be used to avoid duplicate names) |
|
| 5890 | - * @param mixed $showsize Value for css to define size. May also be a numeric. |
|
| 5891 | - * @return string |
|
| 5892 | - */ |
|
| 5893 | - function showOutputField($val, $key, $value, $moreparam='', $keysuffix='', $keyprefix='', $showsize=0) |
|
| 5894 | - {
|
|
| 5895 | - global $conf,$langs,$form; |
|
| 5896 | - |
|
| 5897 | - if (! is_object($form)) |
|
| 5898 | - {
|
|
| 5899 | - require_once DOL_DOCUMENT_ROOT.'/core/class/html.form.class.php'; |
|
| 5900 | - $form=new Form($this->db); |
|
| 5901 | - } |
|
| 5902 | - |
|
| 5903 | - $objectid = $this->id; |
|
| 5904 | - $label = $val['label']; |
|
| 5905 | - $type = $val['type']; |
|
| 5906 | - $size = $val['css']; |
|
| 5907 | - |
|
| 5908 | - // Convert var to be able to share same code than showOutputField of extrafields |
|
| 5909 | - if (preg_match('/varchar\((\d+)\)/', $type, $reg))
|
|
| 5910 | - {
|
|
| 5911 | - $type = 'varchar'; // convert varchar(xx) int varchar |
|
| 5912 | - $size = $reg[1]; |
|
| 5913 | - } |
|
| 5914 | - elseif (preg_match('/varchar/', $type)) $type = 'varchar'; // convert varchar(xx) int varchar
|
|
| 5915 | - if (is_array($val['arrayofkeyval'])) $type='select'; |
|
| 5916 | - if (preg_match('/^integer:(.*):(.*)/i', $val['type'], $reg)) $type='link';
|
|
| 5917 | - |
|
| 5918 | - $default=$val['default']; |
|
| 5919 | - $computed=$val['computed']; |
|
| 5920 | - $unique=$val['unique']; |
|
| 5921 | - $required=$val['required']; |
|
| 5922 | - $param=$val['param']; |
|
| 5923 | - if (is_array($val['arrayofkeyval'])) $param['options'] = $val['arrayofkeyval']; |
|
| 5924 | - if (preg_match('/^integer:(.*):(.*)/i', $val['type'], $reg))
|
|
| 5925 | - {
|
|
| 5926 | - $type='link'; |
|
| 5927 | - $param['options']=array($reg[1].':'.$reg[2]=>$reg[1].':'.$reg[2]); |
|
| 5928 | - } |
|
| 5929 | - $langfile=$val['langfile']; |
|
| 5930 | - $list=$val['list']; |
|
| 5931 | - $help=$val['help']; |
|
| 5932 | - $hidden=(($val['visible'] == 0) ? 1 : 0); // If zero, we are sure it is hidden, otherwise we show. If it depends on mode (view/create/edit form or list, this must be filtered by caller) |
|
| 5933 | - |
|
| 5934 | - if ($hidden) return ''; |
|
| 5935 | - |
|
| 5936 | - // If field is a computed field, value must become result of compute |
|
| 5937 | - if ($computed) |
|
| 5938 | - {
|
|
| 5939 | - // Make the eval of compute string |
|
| 5940 | - //var_dump($computed); |
|
| 5941 | - $value = dol_eval($computed, 1, 0); |
|
| 5942 | - } |
|
| 5943 | - |
|
| 5944 | - if (empty($showsize)) |
|
| 5945 | - {
|
|
| 5946 | - if ($type == 'date') |
|
| 5947 | - {
|
|
| 5948 | - //$showsize=10; |
|
| 5949 | - $showsize = 'minwidth100imp'; |
|
| 5950 | - } |
|
| 5951 | - elseif ($type == 'datetime') |
|
| 5952 | - {
|
|
| 5953 | - //$showsize=19; |
|
| 5954 | - $showsize = 'minwidth200imp'; |
|
| 5955 | - } |
|
| 5956 | - elseif (in_array($type,array('int','double','price')))
|
|
| 5957 | - {
|
|
| 5958 | - //$showsize=10; |
|
| 5959 | - $showsize = 'maxwidth75'; |
|
| 5960 | - } |
|
| 5961 | - elseif ($type == 'url') |
|
| 5962 | - {
|
|
| 5963 | - $showsize='minwidth400'; |
|
| 5964 | - } |
|
| 5965 | - elseif ($type == 'boolean') |
|
| 5966 | - {
|
|
| 5967 | - $showsize=''; |
|
| 5968 | - } |
|
| 5969 | - else |
|
| 5970 | - {
|
|
| 5971 | - if (round($size) < 12) |
|
| 5972 | - {
|
|
| 5973 | - $showsize = 'minwidth100'; |
|
| 5974 | - } |
|
| 5975 | - else if (round($size) <= 48) |
|
| 5976 | - {
|
|
| 5977 | - $showsize = 'minwidth200'; |
|
| 5978 | - } |
|
| 5979 | - else |
|
| 5980 | - {
|
|
| 5981 | - //$showsize=48; |
|
| 5982 | - $showsize = 'minwidth400'; |
|
| 5983 | - } |
|
| 5984 | - } |
|
| 5985 | - } |
|
| 5986 | - |
|
| 5987 | - // Format output value differently according to properties of field |
|
| 5988 | - if ($key == 'ref' && method_exists($this, 'getNomUrl')) $value=$this->getNomUrl(1, '', 0, '', 1); |
|
| 5989 | - elseif ($key == 'status' && method_exists($this, 'getLibStatut')) $value=$this->getLibStatut(3); |
|
| 5990 | - elseif ($type == 'date') |
|
| 5991 | - {
|
|
| 5992 | - if(! empty($value)) {
|
|
| 5993 | - $value=dol_print_date($value,'day'); |
|
| 5994 | - } else {
|
|
| 5995 | - $value=''; |
|
| 5996 | - } |
|
| 5997 | - } |
|
| 5998 | - elseif ($type == 'datetime') |
|
| 5999 | - {
|
|
| 6000 | - if(! empty($value)) {
|
|
| 6001 | - $value=dol_print_date($value,'dayhour'); |
|
| 6002 | - } else {
|
|
| 6003 | - $value=''; |
|
| 6004 | - } |
|
| 6005 | - } |
|
| 6006 | - elseif ($type == 'double') |
|
| 6007 | - {
|
|
| 6008 | - if (!empty($value)) {
|
|
| 6009 | - $value=price($value); |
|
| 6010 | - } |
|
| 6011 | - } |
|
| 6012 | - elseif ($type == 'boolean') |
|
| 6013 | - {
|
|
| 6014 | - $checked=''; |
|
| 6015 | - if (!empty($value)) {
|
|
| 6016 | - $checked=' checked '; |
|
| 6017 | - } |
|
| 6018 | - $value='<input type="checkbox" '.$checked.' '.($moreparam?$moreparam:'').' readonly disabled>'; |
|
| 6019 | - } |
|
| 6020 | - elseif ($type == 'mail') |
|
| 6021 | - {
|
|
| 6022 | - $value=dol_print_email($value,0,0,0,64,1,1); |
|
| 6023 | - } |
|
| 6024 | - elseif ($type == 'url') |
|
| 6025 | - {
|
|
| 6026 | - $value=dol_print_url($value,'_blank',32,1); |
|
| 6027 | - } |
|
| 6028 | - elseif ($type == 'phone') |
|
| 6029 | - {
|
|
| 6030 | - $value=dol_print_phone($value, '', 0, 0, '', ' ', 1); |
|
| 6031 | - } |
|
| 6032 | - elseif ($type == 'price') |
|
| 6033 | - {
|
|
| 6034 | - $value = price($value, 0, $langs, 0, 0, -1, Globals::$conf->currency); |
|
| 6035 | - } |
|
| 6036 | - elseif ($type == 'select') |
|
| 6037 | - {
|
|
| 6038 | - $value=$param['options'][$value]; |
|
| 6039 | - } |
|
| 6040 | - elseif ($type == 'sellist') |
|
| 6041 | - {
|
|
| 6042 | - $param_list=array_keys($param['options']); |
|
| 6043 | - $InfoFieldList = explode(":", $param_list[0]);
|
|
| 6044 | - |
|
| 6045 | - $selectkey="rowid"; |
|
| 6046 | - $keyList='rowid'; |
|
| 6047 | - |
|
| 6048 | - if (count($InfoFieldList)>=3) |
|
| 6049 | - {
|
|
| 6050 | - $selectkey = $InfoFieldList[2]; |
|
| 6051 | - $keyList=$InfoFieldList[2].' as rowid'; |
|
| 6052 | - } |
|
| 6053 | - |
|
| 6054 | - $fields_label = explode('|',$InfoFieldList[1]);
|
|
| 6055 | - if(is_array($fields_label)) {
|
|
| 6056 | - $keyList .=', '; |
|
| 6057 | - $keyList .= implode(', ', $fields_label);
|
|
| 6058 | - } |
|
| 6059 | - |
|
| 6060 | - $sql = 'SELECT '.$keyList; |
|
| 6061 | - $sql.= ' FROM '.MAIN_DB_PREFIX .$InfoFieldList[0]; |
|
| 6062 | - if (strpos($InfoFieldList[4], 'extra')!==false) |
|
| 6063 | - {
|
|
| 6064 | - $sql.= ' as main'; |
|
| 6065 | - } |
|
| 6066 | - if ($selectkey=='rowid' && empty($value)) {
|
|
| 6067 | - $sql.= " WHERE ".$selectkey."=0"; |
|
| 6068 | - } elseif ($selectkey=='rowid') {
|
|
| 6069 | - $sql.= " WHERE ".$selectkey."=".$this->db->escape($value); |
|
| 6070 | - }else {
|
|
| 6071 | - $sql.= " WHERE ".$selectkey."='".$this->db->escape($value)."'"; |
|
| 6072 | - } |
|
| 6073 | - |
|
| 6074 | - //$sql.= ' AND entity = '.Globals::$conf->entity; |
|
| 6479 | + if (! $db->query($sql)) |
|
| 6480 | + {
|
|
| 6481 | + if ($ignoreerrors) return true; // TODO Not enough. If there is A-B on kept thirdarty and B-C on old one, we must get A-B-C after merge. Not A-B. |
|
| 6482 | + //$this->errors = $db->lasterror(); |
|
| 6483 | + return false; |
|
| 6484 | + } |
|
| 6485 | + } |
|
| 6075 | 6486 | |
| 6076 | - dol_syslog(get_class($this).':showOutputField:$type=sellist', LOG_DEBUG); |
|
| 6077 | - $resql = $this->db->query($sql); |
|
| 6078 | - if ($resql) |
|
| 6079 | - {
|
|
| 6080 | - $value=''; // value was used, so now we reste it to use it to build final output |
|
| 6487 | + return true; |
|
| 6488 | + } |
|
| 6081 | 6489 | |
| 6082 | - $obj = $this->db->fetch_object($resql); |
|
| 6490 | + /** |
|
| 6491 | + * Get buy price to use for margin calculation. This function is called when buy price is unknown. |
|
| 6492 | + * Set buy price = sell price if ForceBuyingPriceIfNull configured, |
|
| 6493 | + * else if calculation MARGIN_TYPE = 'costprice' and costprice is defined, use costprice as buyprice |
|
| 6494 | + * else if calculation MARGIN_TYPE = 'pmp' and pmp is calculated, use pmp as buyprice |
|
| 6495 | + * else set min buy price as buy price |
|
| 6496 | + * |
|
| 6497 | + * @param float $unitPrice Product unit price |
|
| 6498 | + * @param float $discountPercent Line discount percent |
|
| 6499 | + * @param int $fk_product Product id |
|
| 6500 | + * @return float <0 if KO, buyprice if OK |
|
| 6501 | + */ |
|
| 6502 | + public function defineBuyPrice($unitPrice = 0.0, $discountPercent = 0.0, $fk_product = 0) |
|
| 6503 | + {
|
|
| 6504 | + global $conf; |
|
| 6083 | 6505 | |
| 6084 | - // Several field into label (eq table:code|libelle:rowid) |
|
| 6085 | - $fields_label = explode('|',$InfoFieldList[1]);
|
|
| 6506 | + $buyPrice = 0; |
|
| 6086 | 6507 | |
| 6087 | - if(is_array($fields_label) && count($fields_label)>1) |
|
| 6088 | - {
|
|
| 6089 | - foreach ($fields_label as $field_toshow) |
|
| 6090 | - {
|
|
| 6091 | - $translabel=''; |
|
| 6092 | - if (!empty($obj->$field_toshow)) {
|
|
| 6093 | - $translabel=$langs->trans($obj->$field_toshow); |
|
| 6094 | - } |
|
| 6095 | - if ($translabel!=$field_toshow) {
|
|
| 6096 | - $value.=dol_trunc($translabel,18).' '; |
|
| 6097 | - }else {
|
|
| 6098 | - $value.=$obj->$field_toshow.' '; |
|
| 6099 | - } |
|
| 6100 | - } |
|
| 6101 | - } |
|
| 6102 | - else |
|
| 6103 | - {
|
|
| 6104 | - $translabel=''; |
|
| 6105 | - if (!empty($obj->{$InfoFieldList[1]})) {
|
|
| 6106 | - $translabel=$langs->trans($obj->{$InfoFieldList[1]});
|
|
| 6107 | - } |
|
| 6108 | - if ($translabel!=$obj->{$InfoFieldList[1]}) {
|
|
| 6109 | - $value=dol_trunc($translabel,18); |
|
| 6110 | - }else {
|
|
| 6111 | - $value=$obj->{$InfoFieldList[1]};
|
|
| 6112 | - } |
|
| 6113 | - } |
|
| 6114 | - } |
|
| 6115 | - else dol_syslog(get_class($this).'::showOutputField error '.$this->db->lasterror(), LOG_WARNING); |
|
| 6116 | - } |
|
| 6117 | - elseif ($type == 'radio') |
|
| 6118 | - {
|
|
| 6119 | - $value=$param['options'][$value]; |
|
| 6120 | - } |
|
| 6121 | - elseif ($type == 'checkbox') |
|
| 6122 | - {
|
|
| 6123 | - $value_arr=explode(',',$value);
|
|
| 6124 | - $value=''; |
|
| 6125 | - if (is_array($value_arr) && count($value_arr)>0) |
|
| 6126 | - {
|
|
| 6127 | - foreach ($value_arr as $keyval=>$valueval) {
|
|
| 6128 | - $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.$param['options'][$valueval].'</li>'; |
|
| 6129 | - } |
|
| 6130 | - $value='<div class="select2-container-multi-dolibarr" style="width: 90%;"><ul class="select2-choices-dolibarr">'.implode(' ', $toprint).'</ul></div>';
|
|
| 6131 | - } |
|
| 6132 | - } |
|
| 6133 | - elseif ($type == 'chkbxlst') |
|
| 6134 | - {
|
|
| 6135 | - $value_arr = explode(',', $value);
|
|
| 6136 | - |
|
| 6137 | - $param_list = array_keys($param['options']); |
|
| 6138 | - $InfoFieldList = explode(":", $param_list[0]);
|
|
| 6139 | - |
|
| 6140 | - $selectkey = "rowid"; |
|
| 6141 | - $keyList = 'rowid'; |
|
| 6142 | - |
|
| 6143 | - if (count($InfoFieldList) >= 3) {
|
|
| 6144 | - $selectkey = $InfoFieldList[2]; |
|
| 6145 | - $keyList = $InfoFieldList[2] . ' as rowid'; |
|
| 6146 | - } |
|
| 6147 | - |
|
| 6148 | - $fields_label = explode('|', $InfoFieldList[1]);
|
|
| 6149 | - if (is_array($fields_label)) {
|
|
| 6150 | - $keyList .= ', '; |
|
| 6151 | - $keyList .= implode(', ', $fields_label);
|
|
| 6152 | - } |
|
| 6153 | - |
|
| 6154 | - $sql = 'SELECT ' . $keyList; |
|
| 6155 | - $sql .= ' FROM ' . MAIN_DB_PREFIX . $InfoFieldList[0]; |
|
| 6156 | - if (strpos($InfoFieldList[4], 'extra') !== false) {
|
|
| 6157 | - $sql .= ' as main'; |
|
| 6158 | - } |
|
| 6159 | - // $sql.= " WHERE ".$selectkey."='".$this->db->escape($value)."'"; |
|
| 6160 | - // $sql.= ' AND entity = '.Globals::$conf->entity; |
|
| 6508 | + if (($unitPrice > 0) && (isset(Globals::$conf->global->ForceBuyingPriceIfNull) && Globals::$conf->global->ForceBuyingPriceIfNull == 1)) { // In most cases, test here is false{
|
|
| 6509 | + $buyPrice = $unitPrice * (1 - $discountPercent / 100); |
|
| 6510 | + } |
|
| 6511 | + else |
|
| 6512 | + {
|
|
| 6513 | + // Get cost price for margin calculation |
|
| 6514 | + if (! empty($fk_product)) |
|
| 6515 | + {
|
|
| 6516 | + if (isset(Globals::$conf->global->MARGIN_TYPE) && Globals::$conf->global->MARGIN_TYPE == 'costprice') {
|
|
| 6517 | + require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php'; |
|
| 6518 | + $product = new Product($this->db); |
|
| 6519 | + $result = $product->fetch($fk_product); |
|
| 6520 | + if ($result <= 0) |
|
| 6521 | + {
|
|
| 6522 | + $this->errors[] = 'ErrorProductIdDoesNotExists'; |
|
| 6523 | + return -1; |
|
| 6524 | + } |
|
| 6525 | + if ($product->cost_price > 0) |
|
| 6526 | + {
|
|
| 6527 | + $buyPrice = $product->cost_price; |
|
| 6528 | + } |
|
| 6529 | + else if ($product->pmp > 0) |
|
| 6530 | + {
|
|
| 6531 | + $buyPrice = $product->pmp; |
|
| 6532 | + } |
|
| 6533 | + } |
|
| 6534 | + else if (isset(Globals::$conf->global->MARGIN_TYPE) && Globals::$conf->global->MARGIN_TYPE == 'pmp') {
|
|
| 6535 | + require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php'; |
|
| 6536 | + $product = new Product($this->db); |
|
| 6537 | + $result = $product->fetch($fk_product); |
|
| 6538 | + if ($result <= 0) |
|
| 6539 | + {
|
|
| 6540 | + $this->errors[] = 'ErrorProductIdDoesNotExists'; |
|
| 6541 | + return -1; |
|
| 6542 | + } |
|
| 6543 | + if ($product->pmp > 0) |
|
| 6544 | + {
|
|
| 6545 | + $buyPrice = $product->pmp; |
|
| 6546 | + } |
|
| 6547 | + } |
|
| 6548 | + |
|
| 6549 | + if (empty($buyPrice) && isset(Globals::$conf->global->MARGIN_TYPE) && in_array(Globals::$conf->global->MARGIN_TYPE, array('1', 'pmp', 'costprice'))) {
|
|
| 6550 | + require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.product.class.php'; |
|
| 6551 | + $productFournisseur = new ProductFournisseur($this->db); |
|
| 6552 | + if (($result = $productFournisseur->find_min_price_product_fournisseur($fk_product)) > 0) |
|
| 6553 | + {
|
|
| 6554 | + $buyPrice = $productFournisseur->fourn_unitprice; |
|
| 6555 | + } |
|
| 6556 | + else if ($result < 0) |
|
| 6557 | + {
|
|
| 6558 | + $this->errors[] = $productFournisseur->error; |
|
| 6559 | + return -2; |
|
| 6560 | + } |
|
| 6561 | + } |
|
| 6562 | + } |
|
| 6563 | + } |
|
| 6564 | + return $buyPrice; |
|
| 6565 | + } |
|
| 6566 | + |
|
| 6567 | + // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 6568 | + /** |
|
| 6569 | + * Show photos of an object (nbmax maximum), into several columns |
|
| 6570 | + * |
|
| 6571 | + * @param string $modulepart 'product', 'ticket', ... |
|
| 6572 | + * @param string $sdir Directory to scan (full absolute path) |
|
| 6573 | + * @param int $size 0=original size, 1='small' use thumbnail if possible |
|
| 6574 | + * @param int $nbmax Nombre maximum de photos (0=pas de max) |
|
| 6575 | + * @param int $nbbyrow Number of image per line or -1 to use div. Used only if size=1. |
|
| 6576 | + * @param int $showfilename 1=Show filename |
|
| 6577 | + * @param int $showaction 1=Show icon with action links (resize, delete) |
|
| 6578 | + * @param int $maxHeight Max height of original image when size='small' (so we can use original even if small requested). If 0, always use 'small' thumb image. |
|
| 6579 | + * @param int $maxWidth Max width of original image when size='small' |
|
| 6580 | + * @param int $nolink Do not add a href link to view enlarged imaged into a new tab |
|
| 6581 | + * @param int $notitle Do not add title tag on image |
|
| 6582 | + * @param int $usesharelink Use the public shared link of image (if not available, the 'nophoto' image will be shown instead) |
|
| 6583 | + * @return string Html code to show photo. Number of photos shown is saved in this->nbphoto |
|
| 6584 | + */ |
|
| 6585 | + function show_photos($modulepart, $sdir, $size=0, $nbmax=0, $nbbyrow=5, $showfilename=0, $showaction=0, $maxHeight=120, $maxWidth=160, $nolink=0, $notitle=0, $usesharelink=0) |
|
| 6586 | + {
|
|
| 6587 | + // phpcs:enable |
|
| 6588 | + global $conf,$user,$langs; |
|
| 6589 | + |
|
| 6590 | + include_once DOL_DOCUMENT_ROOT .'/core/lib/files.lib.php'; |
|
| 6591 | + include_once DOL_DOCUMENT_ROOT .'/core/lib/images.lib.php'; |
|
| 6592 | + |
|
| 6593 | + $sortfield='position_name'; |
|
| 6594 | + $sortorder='asc'; |
|
| 6595 | + |
|
| 6596 | + $dir = $sdir . '/'; |
|
| 6597 | + $pdir = '/'; |
|
| 6598 | + if ($modulepart == 'ticket') |
|
| 6599 | + {
|
|
| 6600 | + $dir .= get_exdir(0, 0, 0, 0, $this, $modulepart).$this->track_id.'/'; |
|
| 6601 | + $pdir .= get_exdir(0, 0, 0, 0, $this, $modulepart).$this->track_id.'/'; |
|
| 6602 | + } |
|
| 6603 | + else |
|
| 6604 | + {
|
|
| 6605 | + $dir .= get_exdir(0, 0, 0, 0, $this, $modulepart).$this->ref.'/'; |
|
| 6606 | + $pdir .= get_exdir(0, 0, 0, 0, $this, $modulepart).$this->ref.'/'; |
|
| 6607 | + } |
|
| 6608 | + |
|
| 6609 | + // For backward compatibility |
|
| 6610 | + if ($modulepart == 'product' && !empty(Globals::$conf->global->PRODUCT_USE_OLD_PATH_FOR_PHOTO)) {
|
|
| 6611 | + $dir = $sdir . '/'. get_exdir($this->id,2,0,0,$this,$modulepart) . $this->id ."/photos/"; |
|
| 6612 | + $pdir = '/' . get_exdir($this->id,2,0,0,$this,$modulepart) . $this->id ."/photos/"; |
|
| 6613 | + } |
|
| 6614 | + |
|
| 6615 | + // Defined relative dir to DOL_DATA_ROOT |
|
| 6616 | + $relativedir = ''; |
|
| 6617 | + if ($dir) |
|
| 6618 | + {
|
|
| 6619 | + $relativedir = preg_replace('/^'.preg_quote(DOL_DATA_ROOT,'/').'/', '', $dir);
|
|
| 6620 | + $relativedir = preg_replace('/^[\\/]/','',$relativedir);
|
|
| 6621 | + $relativedir = preg_replace('/[\\/]$/','',$relativedir);
|
|
| 6622 | + } |
|
| 6623 | + |
|
| 6624 | + $dirthumb = $dir.'thumbs/'; |
|
| 6625 | + $pdirthumb = $pdir.'thumbs/'; |
|
| 6626 | + |
|
| 6627 | + $return ='<!-- Photo -->'."\n"; |
|
| 6628 | + $nbphoto=0; |
|
| 6629 | + |
|
| 6630 | + $filearray=dol_dir_list($dir,"files",0,'','(\.meta|_preview.*\.png)$',$sortfield,(strtolower($sortorder)=='desc'?SORT_DESC:SORT_ASC),1); |
|
| 6631 | + |
|
| 6632 | + /* if (! empty(Globals::$conf->global->PRODUCT_USE_OLD_PATH_FOR_PHOTO)) // For backward compatiblity, we scan also old dirs |
|
| 6633 | + {
|
|
| 6634 | + $filearrayold=dol_dir_list($dirold,"files",0,'','(\.meta|_preview.*\.png)$',$sortfield,(strtolower($sortorder)=='desc'?SORT_DESC:SORT_ASC),1); |
|
| 6635 | + $filearray=array_merge($filearray, $filearrayold); |
|
| 6636 | + } */ |
|
| 6637 | + |
|
| 6638 | + completeFileArrayWithDatabaseInfo($filearray, $relativedir); |
|
| 6639 | + |
|
| 6640 | + if (count($filearray)) |
|
| 6641 | + {
|
|
| 6642 | + if ($sortfield && $sortorder) |
|
| 6643 | + {
|
|
| 6644 | + $filearray=dol_sort_array($filearray, $sortfield, $sortorder); |
|
| 6645 | + } |
|
| 6646 | + |
|
| 6647 | + foreach($filearray as $key => $val) |
|
| 6648 | + {
|
|
| 6649 | + $photo=''; |
|
| 6650 | + $file = $val['name']; |
|
| 6651 | + |
|
| 6652 | + //if (! utf8_check($file)) $file=utf8_encode($file); // To be sure file is stored in UTF8 in memory |
|
| 6653 | + |
|
| 6654 | + //if (dol_is_file($dir.$file) && image_format_supported($file) >= 0) |
|
| 6655 | + if (image_format_supported($file) >= 0) |
|
| 6656 | + {
|
|
| 6657 | + $nbphoto++; |
|
| 6658 | + $photo = $file; |
|
| 6659 | + $viewfilename = $file; |
|
| 6660 | + |
|
| 6661 | + if ($size == 1 || $size == 'small') { // Format vignette
|
|
| 6662 | + |
|
| 6663 | + // Find name of thumb file |
|
| 6664 | + $photo_vignette=basename(getImageFileNameForSize($dir.$file, '_small')); |
|
| 6665 | + if (! dol_is_file($dirthumb.$photo_vignette)) $photo_vignette=''; |
|
| 6666 | + |
|
| 6667 | + // Get filesize of original file |
|
| 6668 | + $imgarray=dol_getImageSize($dir.$photo); |
|
| 6669 | + |
|
| 6670 | + if ($nbbyrow > 0) |
|
| 6671 | + {
|
|
| 6672 | + if ($nbphoto == 1) $return.= '<table width="100%" valign="top" align="center" border="0" cellpadding="2" cellspacing="2">'; |
|
| 6673 | + |
|
| 6674 | + if ($nbphoto % $nbbyrow == 1) $return.= '<tr align=center valign=middle border=1>'; |
|
| 6675 | + $return.= '<td width="'.ceil(100/$nbbyrow).'%" class="photo">'; |
|
| 6676 | + } |
|
| 6677 | + else if ($nbbyrow < 0) $return .= '<div class="inline-block">'; |
|
| 6678 | + |
|
| 6679 | + $return.= "\n"; |
|
| 6680 | + |
|
| 6681 | + $relativefile=preg_replace('/^\//', '', $pdir.$photo);
|
|
| 6682 | + if (empty($nolink)) |
|
| 6683 | + {
|
|
| 6684 | + $urladvanced=getAdvancedPreviewUrl($modulepart, $relativefile, 0, 'entity='.$this->entity); |
|
| 6685 | + if ($urladvanced) $return.='<a href="'.$urladvanced.'">'; |
|
| 6686 | + else $return.= '<a href="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.$this->entity.'&file='.urlencode($pdir.$photo).'" class="aphoto" target="_blank">'; |
|
| 6687 | + } |
|
| 6688 | + |
|
| 6689 | + // Show image (width height=$maxHeight) |
|
| 6690 | + // Si fichier vignette disponible et image source trop grande, on utilise la vignette, sinon on utilise photo origine |
|
| 6691 | + $alt=$langs->transnoentitiesnoconv('File').': '.$relativefile;
|
|
| 6692 | + $alt.=' - '.$langs->transnoentitiesnoconv('Size').': '.$imgarray['width'].'x'.$imgarray['height'];
|
|
| 6693 | + if ($notitle) $alt=''; |
|
| 6694 | + |
|
| 6695 | + if ($usesharelink) |
|
| 6696 | + {
|
|
| 6697 | + if ($val['share']) |
|
| 6698 | + {
|
|
| 6699 | + if (empty($maxHeight) || $photo_vignette && $imgarray['height'] > $maxHeight) |
|
| 6700 | + {
|
|
| 6701 | + $return.= '<!-- Show original file (thumb not yet available with shared links) -->'; |
|
| 6702 | + $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/viewimage.php?hashp='.urlencode($val['share']).'" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6703 | + } |
|
| 6704 | + else {
|
|
| 6705 | + $return.= '<!-- Show original file -->'; |
|
| 6706 | + $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/viewimage.php?hashp='.urlencode($val['share']).'" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6707 | + } |
|
| 6708 | + } |
|
| 6709 | + else |
|
| 6710 | + {
|
|
| 6711 | + $return.= '<!-- Show nophoto file (because file is not shared) -->'; |
|
| 6712 | + $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/public/theme/common/nophoto.png" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6713 | + } |
|
| 6714 | + } |
|
| 6715 | + else |
|
| 6716 | + {
|
|
| 6717 | + if (empty($maxHeight) || $photo_vignette && $imgarray['height'] > $maxHeight) |
|
| 6718 | + {
|
|
| 6719 | + $return.= '<!-- Show thumb -->'; |
|
| 6720 | + $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.$this->entity.'&file='.urlencode($pdirthumb.$photo_vignette).'" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6721 | + } |
|
| 6722 | + else {
|
|
| 6723 | + $return.= '<!-- Show original file -->'; |
|
| 6724 | + $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.$this->entity.'&file='.urlencode($pdir.$photo).'" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6725 | + } |
|
| 6726 | + } |
|
| 6727 | + |
|
| 6728 | + if (empty($nolink)) $return.= '</a>'; |
|
| 6729 | + $return.="\n"; |
|
| 6730 | + |
|
| 6731 | + if ($showfilename) $return.= '<br>'.$viewfilename; |
|
| 6732 | + if ($showaction) |
|
| 6733 | + {
|
|
| 6734 | + $return.= '<br>'; |
|
| 6735 | + // On propose la generation de la vignette si elle n'existe pas et si la taille est superieure aux limites |
|
| 6736 | + if ($photo_vignette && (image_format_supported($photo) > 0) && ($this->imgWidth > $maxWidth || $this->imgHeight > $maxHeight)) |
|
| 6737 | + {
|
|
| 6738 | + $return.= '<a href="'.$_SERVER["PHP_SELF"].'?id='.$this->id.'&action=addthumb&file='.urlencode($pdir.$viewfilename).'">'.img_picto($langs->trans('GenerateThumb'),'refresh').' </a>';
|
|
| 6739 | + } |
|
| 6740 | + // Special cas for product |
|
| 6741 | + if ($modulepart == 'product' && ($user->rights->produit->creer || $user->rights->service->creer)) |
|
| 6742 | + {
|
|
| 6743 | + // Link to resize |
|
| 6744 | + $return.= '<a href="'.DOL_URL_ROOT.'/core/photos_resize.php?modulepart='.urlencode('produit|service').'&id='.$this->id.'&file='.urlencode($pdir.$viewfilename).'" title="'.dol_escape_htmltag($langs->trans("Resize")).'">'.img_picto($langs->trans("Resize"), 'resize', '').'</a> ';
|
|
| 6745 | + |
|
| 6746 | + // Link to delete |
|
| 6747 | + $return.= '<a href="'.$_SERVER["PHP_SELF"].'?id='.$this->id.'&action=delete&file='.urlencode($pdir.$viewfilename).'">'; |
|
| 6748 | + $return.= img_delete().'</a>'; |
|
| 6749 | + } |
|
| 6750 | + } |
|
| 6751 | + $return.= "\n"; |
|
| 6752 | + |
|
| 6753 | + if ($nbbyrow > 0) |
|
| 6754 | + {
|
|
| 6755 | + $return.= '</td>'; |
|
| 6756 | + if (($nbphoto % $nbbyrow) == 0) $return.= '</tr>'; |
|
| 6757 | + } |
|
| 6758 | + else if ($nbbyrow < 0) $return.='</div>'; |
|
| 6759 | + } |
|
| 6760 | + |
|
| 6761 | + if (empty($size)) { // Format origine
|
|
| 6762 | + $return.= '<img class="photo photowithmargin" border="0" src="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.$this->entity.'&file='.urlencode($pdir.$photo).'">'; |
|
| 6763 | + |
|
| 6764 | + if ($showfilename) $return.= '<br>'.$viewfilename; |
|
| 6765 | + if ($showaction) |
|
| 6766 | + {
|
|
| 6767 | + // Special case for product |
|
| 6768 | + if ($modulepart == 'product' && ($user->rights->produit->creer || $user->rights->service->creer)) |
|
| 6769 | + {
|
|
| 6770 | + // Link to resize |
|
| 6771 | + $return.= '<a href="'.DOL_URL_ROOT.'/core/photos_resize.php?modulepart='.urlencode('produit|service').'&id='.$this->id.'&file='.urlencode($pdir.$viewfilename).'" title="'.dol_escape_htmltag($langs->trans("Resize")).'">'.img_picto($langs->trans("Resize"), 'resize', '').'</a> ';
|
|
| 6772 | + |
|
| 6773 | + // Link to delete |
|
| 6774 | + $return.= '<a href="'.$_SERVER["PHP_SELF"].'?id='.$this->id.'&action=delete&file='.urlencode($pdir.$viewfilename).'">'; |
|
| 6775 | + $return.= img_delete().'</a>'; |
|
| 6776 | + } |
|
| 6777 | + } |
|
| 6778 | + } |
|
| 6779 | + |
|
| 6780 | + // On continue ou on arrete de boucler ? |
|
| 6781 | + if ($nbmax && $nbphoto >= $nbmax) break; |
|
| 6782 | + } |
|
| 6783 | + } |
|
| 6784 | + |
|
| 6785 | + if ($size==1 || $size=='small') |
|
| 6786 | + {
|
|
| 6787 | + if ($nbbyrow > 0) |
|
| 6788 | + {
|
|
| 6789 | + // Ferme tableau |
|
| 6790 | + while ($nbphoto % $nbbyrow) |
|
| 6791 | + {
|
|
| 6792 | + $return.= '<td width="'.ceil(100/$nbbyrow).'%"> </td>'; |
|
| 6793 | + $nbphoto++; |
|
| 6794 | + } |
|
| 6795 | + |
|
| 6796 | + if ($nbphoto) $return.= '</table>'; |
|
| 6797 | + } |
|
| 6798 | + } |
|
| 6799 | + } |
|
| 6800 | + |
|
| 6801 | + $this->nbphoto = $nbphoto; |
|
| 6802 | + |
|
| 6803 | + return $return; |
|
| 6804 | + } |
|
| 6805 | + |
|
| 6806 | + |
|
| 6807 | + /** |
|
| 6808 | + * Function test if type is array |
|
| 6809 | + * |
|
| 6810 | + * @param array $info content informations of field |
|
| 6811 | + * @return bool |
|
| 6812 | + */ |
|
| 6813 | + protected function isArray($info) |
|
| 6814 | + {
|
|
| 6815 | + if(is_array($info)) |
|
| 6816 | + {
|
|
| 6817 | + if(isset($info['type']) && $info['type']=='array') return true; |
|
| 6818 | + else return false; |
|
| 6819 | + } |
|
| 6820 | + else return false; |
|
| 6821 | + } |
|
| 6822 | + |
|
| 6823 | + /** |
|
| 6824 | + * Function test if type is null |
|
| 6825 | + * |
|
| 6826 | + * @param array $info content informations of field |
|
| 6827 | + * @return bool |
|
| 6828 | + */ |
|
| 6829 | + protected function isNull($info) |
|
| 6830 | + {
|
|
| 6831 | + if(is_array($info)) |
|
| 6832 | + {
|
|
| 6833 | + if(isset($info['type']) && $info['type']=='null') return true; |
|
| 6834 | + else return false; |
|
| 6835 | + } |
|
| 6836 | + else return false; |
|
| 6837 | + } |
|
| 6838 | + |
|
| 6839 | + /** |
|
| 6840 | + * Function test if type is date |
|
| 6841 | + * |
|
| 6842 | + * @param array $info content informations of field |
|
| 6843 | + * @return bool |
|
| 6844 | + */ |
|
| 6845 | + public function isDate($info) |
|
| 6846 | + {
|
|
| 6847 | + if(isset($info['type']) && ($info['type']=='date' || $info['type']=='datetime' || $info['type']=='timestamp')) return true; |
|
| 6848 | + else return false; |
|
| 6849 | + } |
|
| 6850 | + |
|
| 6851 | + /** |
|
| 6852 | + * Function test if type is integer |
|
| 6853 | + * |
|
| 6854 | + * @param array $info content informations of field |
|
| 6855 | + * @return bool |
|
| 6856 | + */ |
|
| 6857 | + public function isInt($info) |
|
| 6858 | + {
|
|
| 6859 | + if(is_array($info)) |
|
| 6860 | + {
|
|
| 6861 | + if(isset($info['type']) && ($info['type']=='int' || preg_match('/^integer/i',$info['type']) ) ) return true;
|
|
| 6862 | + else return false; |
|
| 6863 | + } |
|
| 6864 | + else return false; |
|
| 6865 | + } |
|
| 6866 | + |
|
| 6867 | + /** |
|
| 6868 | + * Function test if type is float |
|
| 6869 | + * |
|
| 6870 | + * @param array $info content informations of field |
|
| 6871 | + * @return bool |
|
| 6872 | + */ |
|
| 6873 | + public function isFloat($info) |
|
| 6874 | + {
|
|
| 6875 | + if(is_array($info)) |
|
| 6876 | + {
|
|
| 6877 | + if (isset($info['type']) && (preg_match('/^(double|real)/i', $info['type']))) return true;
|
|
| 6878 | + else return false; |
|
| 6879 | + } |
|
| 6880 | + else return false; |
|
| 6881 | + } |
|
| 6882 | + |
|
| 6883 | + /** |
|
| 6884 | + * Function test if type is text |
|
| 6885 | + * |
|
| 6886 | + * @param array $info content informations of field |
|
| 6887 | + * @return bool |
|
| 6888 | + */ |
|
| 6889 | + public function isText($info) |
|
| 6890 | + {
|
|
| 6891 | + if(is_array($info)) |
|
| 6892 | + {
|
|
| 6893 | + if(isset($info['type']) && $info['type']=='text') return true; |
|
| 6894 | + else return false; |
|
| 6895 | + } |
|
| 6896 | + else return false; |
|
| 6897 | + } |
|
| 6898 | + |
|
| 6899 | + /** |
|
| 6900 | + * Function test if is indexed |
|
| 6901 | + * |
|
| 6902 | + * @param array $info content informations of field |
|
| 6903 | + * @return bool |
|
| 6904 | + */ |
|
| 6905 | + protected function isIndex($info) |
|
| 6906 | + {
|
|
| 6907 | + if(is_array($info)) |
|
| 6908 | + {
|
|
| 6909 | + if(isset($info['index']) && $info['index']==true) return true; |
|
| 6910 | + else return false; |
|
| 6911 | + } |
|
| 6912 | + else return false; |
|
| 6913 | + } |
|
| 6914 | + |
|
| 6915 | + /** |
|
| 6916 | + * Function to prepare the values to insert. |
|
| 6917 | + * Note $this->${field} are set by the page that make the createCommon or the updateCommon.
|
|
| 6918 | + * |
|
| 6919 | + * @return array |
|
| 6920 | + */ |
|
| 6921 | + protected function setSaveQuery() |
|
| 6922 | + {
|
|
| 6923 | + global $conf; |
|
| 6924 | + |
|
| 6925 | + $queryarray=array(); |
|
| 6926 | + foreach ($this->fields as $field=>$info) // Loop on definition of fields |
|
| 6927 | + {
|
|
| 6928 | + // Depending on field type ('datetime', ...)
|
|
| 6929 | + if($this->isDate($info)) |
|
| 6930 | + {
|
|
| 6931 | + if(empty($this->{$field}))
|
|
| 6932 | + {
|
|
| 6933 | + $queryarray[$field] = null; |
|
| 6934 | + } |
|
| 6935 | + else |
|
| 6936 | + {
|
|
| 6937 | + $queryarray[$field] = $this->db->idate($this->{$field});
|
|
| 6938 | + } |
|
| 6939 | + } |
|
| 6940 | + else if($this->isArray($info)) |
|
| 6941 | + {
|
|
| 6942 | + if(! empty($this->{$field})) {
|
|
| 6943 | + if(! is_array($this->{$field})) {
|
|
| 6944 | + $this->{$field} = array($this->{$field});
|
|
| 6945 | + } |
|
| 6946 | + $queryarray[$field] = serialize($this->{$field});
|
|
| 6947 | + } else {
|
|
| 6948 | + $queryarray[$field] = null; |
|
| 6949 | + } |
|
| 6950 | + } |
|
| 6951 | + else if($this->isInt($info)) |
|
| 6952 | + {
|
|
| 6953 | + if ($field == 'entity' && is_null($this->{$field}))
|
|
| 6954 | + $queryarray[$field] = Globals::$conf->entity; |
|
| 6955 | + else |
|
| 6956 | + {
|
|
| 6957 | + $queryarray[$field] = (int) price2num($this->{$field});
|
|
| 6958 | + if (empty($queryarray[$field])) $queryarray[$field]=0; // May be reset to null later if property 'notnull' is -1 for this field. |
|
| 6959 | + } |
|
| 6960 | + } |
|
| 6961 | + else if($this->isFloat($info)) |
|
| 6962 | + {
|
|
| 6963 | + $queryarray[$field] = (double) price2num($this->{$field});
|
|
| 6964 | + if (empty($queryarray[$field])) $queryarray[$field]=0; |
|
| 6965 | + } |
|
| 6966 | + else |
|
| 6967 | + {
|
|
| 6968 | + $queryarray[$field] = $this->{$field};
|
|
| 6969 | + } |
|
| 6970 | + |
|
| 6971 | + if ($info['type'] == 'timestamp' && empty($queryarray[$field])) unset($queryarray[$field]); |
|
| 6972 | + if (! empty($info['notnull']) && $info['notnull'] == -1 && empty($queryarray[$field])) $queryarray[$field] = null; |
|
| 6973 | + } |
|
| 6974 | + |
|
| 6975 | + return $queryarray; |
|
| 6976 | + } |
|
| 6977 | + |
|
| 6978 | + /** |
|
| 6979 | + * Function to load data from a SQL pointer into properties of current object $this |
|
| 6980 | + * |
|
| 6981 | + * @param stdClass $obj Contain data of object from database |
|
| 6982 | + * @return void |
|
| 6983 | + */ |
|
| 6984 | + protected function setVarsFromFetchObj(&$obj) |
|
| 6985 | + {
|
|
| 6986 | + foreach ($this->fields as $field => $info) |
|
| 6987 | + {
|
|
| 6988 | + if($this->isDate($info)) |
|
| 6989 | + {
|
|
| 6990 | + if(empty($obj->{$field}) || $obj->{$field} === '0000-00-00 00:00:00' || $obj->{$field} === '1000-01-01 00:00:00') $this->{$field} = 0;
|
|
| 6991 | + else $this->{$field} = strtotime($obj->{$field});
|
|
| 6992 | + } |
|
| 6993 | + elseif($this->isArray($info)) |
|
| 6994 | + {
|
|
| 6995 | + if(! empty($obj->{$field})) {
|
|
| 6996 | + $this->{$field} = @unserialize($obj->{$field});
|
|
| 6997 | + // Hack for data not in UTF8 |
|
| 6998 | + if($this->{$field } === false) @unserialize(utf8_decode($obj->{$field}));
|
|
| 6999 | + } else {
|
|
| 7000 | + $this->{$field} = array();
|
|
| 7001 | + } |
|
| 7002 | + } |
|
| 7003 | + elseif($this->isInt($info)) |
|
| 7004 | + {
|
|
| 7005 | + if ($field == 'rowid') $this->id = (int) $obj->{$field};
|
|
| 7006 | + else $this->{$field} = (int) $obj->{$field};
|
|
| 7007 | + } |
|
| 7008 | + elseif($this->isFloat($info)) |
|
| 7009 | + {
|
|
| 7010 | + $this->{$field} = (double) $obj->{$field};
|
|
| 7011 | + } |
|
| 7012 | + elseif($this->isNull($info)) |
|
| 7013 | + {
|
|
| 7014 | + $val = $obj->{$field};
|
|
| 7015 | + // zero is not null |
|
| 7016 | + $this->{$field} = (is_null($val) || (empty($val) && $val!==0 && $val!=='0') ? null : $val);
|
|
| 7017 | + } |
|
| 7018 | + else |
|
| 7019 | + {
|
|
| 7020 | + $this->{$field} = $obj->{$field};
|
|
| 7021 | + } |
|
| 7022 | + } |
|
| 7023 | + |
|
| 7024 | + // If there is no 'ref' field, we force property ->ref to ->id for a better compatibility with common functions. |
|
| 7025 | + if (! isset($this->fields['ref']) && isset($this->id)) $this->ref = $this->id; |
|
| 7026 | + } |
|
| 7027 | + |
|
| 7028 | + /** |
|
| 7029 | + * Function to concat keys of fields |
|
| 7030 | + * |
|
| 7031 | + * @return string |
|
| 7032 | + */ |
|
| 7033 | + protected function getFieldList() |
|
| 7034 | + {
|
|
| 7035 | + $keys = array_keys($this->fields); |
|
| 7036 | + return implode(',', $keys);
|
|
| 7037 | + } |
|
| 7038 | + |
|
| 7039 | + /** |
|
| 7040 | + * Add quote to field value if necessary |
|
| 7041 | + * |
|
| 7042 | + * @param string|int $value Value to protect |
|
| 7043 | + * @param array $fieldsentry Properties of field |
|
| 7044 | + * @return string |
|
| 7045 | + */ |
|
| 7046 | + protected function quote($value, $fieldsentry) |
|
| 7047 | + {
|
|
| 7048 | + if (is_null($value)) return 'NULL'; |
|
| 7049 | + else if (preg_match('/^(int|double|real)/i', $fieldsentry['type'])) return $this->db->escape("$value");
|
|
| 7050 | + else return "'".$this->db->escape($value)."'"; |
|
| 7051 | + } |
|
| 7052 | + |
|
| 7053 | + |
|
| 7054 | + /** |
|
| 7055 | + * Create object into database |
|
| 7056 | + * |
|
| 7057 | + * @param User $user User that creates |
|
| 7058 | + * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 7059 | + * @return int <0 if KO, Id of created object if OK |
|
| 7060 | + */ |
|
| 7061 | + public function createCommon(User $user, $notrigger = false) |
|
| 7062 | + {
|
|
| 7063 | + global $langs; |
|
| 6161 | 7064 | |
| 6162 | - dol_syslog(get_class($this) . ':showOutputField:$type=chkbxlst',LOG_DEBUG); |
|
| 6163 | - $resql = $this->db->query($sql); |
|
| 6164 | - if ($resql) {
|
|
| 6165 | - $value = ''; // value was used, so now we reste it to use it to build final output |
|
| 6166 | - $toprint=array(); |
|
| 6167 | - while ( $obj = $this->db->fetch_object($resql) ) {
|
|
| 6168 | - |
|
| 6169 | - // Several field into label (eq table:code|libelle:rowid) |
|
| 6170 | - $fields_label = explode('|', $InfoFieldList[1]);
|
|
| 6171 | - if (is_array($value_arr) && in_array($obj->rowid, $value_arr)) {
|
|
| 6172 | - if (is_array($fields_label) && count($fields_label) > 1) {
|
|
| 6173 | - foreach ( $fields_label as $field_toshow ) {
|
|
| 6174 | - $translabel = ''; |
|
| 6175 | - if (! empty($obj->$field_toshow)) {
|
|
| 6176 | - $translabel = $langs->trans($obj->$field_toshow); |
|
| 6177 | - } |
|
| 6178 | - if ($translabel != $field_toshow) {
|
|
| 6179 | - $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.dol_trunc($translabel, 18).'</li>'; |
|
| 6180 | - } else {
|
|
| 6181 | - $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.$obj->$field_toshow.'</li>'; |
|
| 6182 | - } |
|
| 6183 | - } |
|
| 6184 | - } else {
|
|
| 6185 | - $translabel = ''; |
|
| 6186 | - if (! empty($obj->{$InfoFieldList[1]})) {
|
|
| 6187 | - $translabel = $langs->trans($obj->{$InfoFieldList[1]});
|
|
| 6188 | - } |
|
| 6189 | - if ($translabel != $obj->{$InfoFieldList[1]}) {
|
|
| 6190 | - $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.dol_trunc($translabel, 18).'</li>'; |
|
| 6191 | - } else {
|
|
| 6192 | - $toprint[]='<li class="select2-search-choice-dolibarr noborderoncategories" style="background: #aaa">'.$obj->{$InfoFieldList[1]}.'</li>';
|
|
| 6193 | - } |
|
| 6194 | - } |
|
| 6195 | - } |
|
| 6196 | - } |
|
| 6197 | - $value='<div class="select2-container-multi-dolibarr" style="width: 90%;"><ul class="select2-choices-dolibarr">'.implode(' ', $toprint).'</ul></div>';
|
|
| 6198 | - } else {
|
|
| 6199 | - dol_syslog(get_class($this) . '::showOutputField error ' . $this->db->lasterror(), LOG_WARNING); |
|
| 6200 | - } |
|
| 6201 | - } |
|
| 6202 | - elseif ($type == 'link') |
|
| 6203 | - {
|
|
| 6204 | - $out=''; |
|
| 6205 | - |
|
| 6206 | - // only if something to display (perf) |
|
| 6207 | - if ($value) |
|
| 6208 | - {
|
|
| 6209 | - $param_list=array_keys($param['options']); // $param_list='ObjectName:classPath' |
|
| 7065 | + $error = 0; |
|
| 6210 | 7066 | |
| 6211 | - $InfoFieldList = explode(":", $param_list[0]);
|
|
| 6212 | - $classname=$InfoFieldList[0]; |
|
| 6213 | - $classpath=$InfoFieldList[1]; |
|
| 6214 | - $getnomurlparam=(empty($InfoFieldList[2]) ? 3 : $InfoFieldList[2]); |
|
| 6215 | - if (! empty($classpath)) |
|
| 6216 | - {
|
|
| 6217 | - dol_include_once($InfoFieldList[1]); |
|
| 6218 | - if ($classname && class_exists($classname)) |
|
| 6219 | - {
|
|
| 6220 | - $object = new $classname($this->db); |
|
| 6221 | - $object->fetch($value); |
|
| 6222 | - $value=$object->getNomUrl($getnomurlparam); |
|
| 6223 | - } |
|
| 6224 | - } |
|
| 6225 | - else |
|
| 6226 | - {
|
|
| 6227 | - dol_syslog('Error bad setup of extrafield', LOG_WARNING);
|
|
| 6228 | - return 'Error bad setup of extrafield'; |
|
| 6229 | - } |
|
| 6230 | - } |
|
| 6231 | - else $value=''; |
|
| 6232 | - } |
|
| 6233 | - elseif ($type == 'text' || $type == 'html') |
|
| 6234 | - {
|
|
| 6235 | - $value=dol_htmlentitiesbr($value); |
|
| 6236 | - } |
|
| 6237 | - elseif ($type == 'password') |
|
| 6238 | - {
|
|
| 6239 | - $value=preg_replace('/./i','*',$value);
|
|
| 6240 | - } |
|
| 6241 | - elseif ($type == 'array') |
|
| 6242 | - {
|
|
| 6243 | - $value = implode('<br>', $value);
|
|
| 6244 | - } |
|
| 6245 | - |
|
| 6246 | - //print $type.'-'.$size; |
|
| 6247 | - $out=$value; |
|
| 6248 | - |
|
| 6249 | - return $out; |
|
| 6250 | - } |
|
| 6251 | - |
|
| 6252 | - |
|
| 6253 | - /** |
|
| 6254 | - * Function to show lines of extrafields with output datas |
|
| 6255 | - * |
|
| 6256 | - * @param Extrafields $extrafields Extrafield Object |
|
| 6257 | - * @param string $mode Show output (view) or input (edit) for extrafield |
|
| 6258 | - * @param array $params Optional parameters. Example: array('style'=>'class="oddeven"', 'colspan'=>$colspan)
|
|
| 6259 | - * @param string $keysuffix Suffix string to add after name and id of field (can be used to avoid duplicate names) |
|
| 6260 | - * @param string $keyprefix Prefix string to add before name and id of field (can be used to avoid duplicate names) |
|
| 6261 | - * @param string $onetrtd All fields in same tr td |
|
| 6262 | - * @return string |
|
| 6263 | - */ |
|
| 6264 | - function showOptionals($extrafields, $mode='view', $params=null, $keysuffix='', $keyprefix='', $onetrtd=0) |
|
| 6265 | - {
|
|
| 6266 | - global $db, $conf, $langs, $action, $form; |
|
| 6267 | - |
|
| 6268 | - if (! is_object($form)) $form=new Form($db); |
|
| 6269 | - |
|
| 6270 | - $out = ''; |
|
| 6271 | - |
|
| 6272 | - if (is_array($extrafields->attributes[$this->table_element]['label']) && count($extrafields->attributes[$this->table_element]['label']) > 0) |
|
| 6273 | - {
|
|
| 6274 | - $out .= "\n"; |
|
| 6275 | - $out .= '<!-- showOptionalsInput --> '; |
|
| 6276 | - $out .= "\n"; |
|
| 6277 | - |
|
| 6278 | - $e = 0; |
|
| 6279 | - foreach($extrafields->attributes[$this->table_element]['label'] as $key=>$label) |
|
| 6280 | - {
|
|
| 6281 | - // Show only the key field in params |
|
| 6282 | - if (is_array($params) && array_key_exists('onlykey',$params) && $key != $params['onlykey']) continue;
|
|
| 7067 | + $now=dol_now(); |
|
| 6283 | 7068 | |
| 6284 | - $enabled = 1; |
|
| 6285 | - if ($enabled && isset($extrafields->attributes[$this->table_element]['list'][$key])) |
|
| 6286 | - {
|
|
| 6287 | - $enabled = dol_eval($extrafields->attributes[$this->table_element]['list'][$key], 1); |
|
| 6288 | - } |
|
| 7069 | + $fieldvalues = $this->setSaveQuery(); |
|
| 7070 | + if (array_key_exists('date_creation', $fieldvalues) && empty($fieldvalues['date_creation'])) $fieldvalues['date_creation']=$this->db->idate($now);
|
|
| 7071 | + if (array_key_exists('fk_user_creat', $fieldvalues) && ! ($fieldvalues['fk_user_creat'] > 0)) $fieldvalues['fk_user_creat']=$user->id;
|
|
| 7072 | + unset($fieldvalues['rowid']); // The field 'rowid' is reserved field name for autoincrement field so we don't need it into insert. |
|
| 6289 | 7073 | |
| 6290 | - $perms = 1; |
|
| 6291 | - if ($perms && isset($extrafields->attributes[$this->table_element]['perms'][$key])) |
|
| 6292 | - {
|
|
| 6293 | - $perms = dol_eval($extrafields->attributes[$this->table_element]['perms'][$key], 1); |
|
| 6294 | - } |
|
| 7074 | + $keys=array(); |
|
| 7075 | + $values = array(); |
|
| 7076 | + foreach ($fieldvalues as $k => $v) {
|
|
| 7077 | + $keys[$k] = $k; |
|
| 7078 | + $value = $this->fields[$k]; |
|
| 7079 | + $values[$k] = $this->quote($v, $value); |
|
| 7080 | + } |
|
| 6295 | 7081 | |
| 6296 | - if (($mode == 'create' || $mode == 'edit') && abs($enabled) != 1 && abs($enabled) != 3) continue; // <> -1 and <> 1 and <> 3 = not visible on forms, only on list |
|
| 6297 | - if (empty($perms)) continue; |
|
| 7082 | + // Clean and check mandatory |
|
| 7083 | + foreach($keys as $key) |
|
| 7084 | + {
|
|
| 7085 | + // If field is an implicit foreign key field |
|
| 7086 | + if (preg_match('/^integer:/i', $this->fields[$key]['type']) && $values[$key] == '-1') $values[$key]='';
|
|
| 7087 | + if (! empty($this->fields[$key]['foreignkey']) && $values[$key] == '-1') $values[$key]=''; |
|
| 6298 | 7088 | |
| 6299 | - // Load language if required |
|
| 6300 | - if (! empty($extrafields->attributes[$this->table_element]['langfile'][$key])) $langs->load($extrafields->attributes[$this->table_element]['langfile'][$key]); |
|
| 7089 | + //var_dump($key.'-'.$values[$key].'-'.($this->fields[$key]['notnull'] == 1)); |
|
| 7090 | + if (isset($this->fields[$key]['notnull']) && $this->fields[$key]['notnull'] == 1 && ! isset($values[$key]) && is_null($val['default'])) |
|
| 7091 | + {
|
|
| 7092 | + $error++; |
|
| 7093 | + $this->errors[]=$langs->trans("ErrorFieldRequired", $this->fields[$key]['label']);
|
|
| 7094 | + } |
|
| 6301 | 7095 | |
| 6302 | - $colspan='3'; |
|
| 6303 | - if (is_array($params) && count($params)>0) {
|
|
| 6304 | - if (array_key_exists('colspan',$params)) {
|
|
| 6305 | - $colspan=$params['colspan']; |
|
| 6306 | - } |
|
| 6307 | - } |
|
| 7096 | + // If field is an implicit foreign key field |
|
| 7097 | + if (preg_match('/^integer:/i', $this->fields[$key]['type']) && empty($values[$key])) $values[$key]='null';
|
|
| 7098 | + if (! empty($this->fields[$key]['foreignkey']) && empty($values[$key])) $values[$key]='null'; |
|
| 7099 | + } |
|
| 6308 | 7100 | |
| 6309 | - switch($mode) {
|
|
| 6310 | - case "view": |
|
| 6311 | - $value=$this->array_options["options_".$key.$keysuffix]; |
|
| 6312 | - break; |
|
| 6313 | - case "edit": |
|
| 6314 | - $getposttemp = GETPOST($keyprefix.'options_'.$key.$keysuffix, 'none'); // GETPOST can get value from GET, POST or setup of default values. |
|
| 6315 | - // GETPOST("options_" . $key) can be 'abc' or array(0=>'abc')
|
|
| 6316 | - if (is_array($getposttemp) || $getposttemp != '' || GETPOSTISSET($keyprefix.'options_'.$key.$keysuffix)) |
|
| 6317 | - {
|
|
| 6318 | - if (is_array($getposttemp)) {
|
|
| 6319 | - // $getposttemp is an array but following code expects a comma separated string |
|
| 6320 | - $value = implode(",", $getposttemp);
|
|
| 6321 | - } else {
|
|
| 6322 | - $value = $getposttemp; |
|
| 6323 | - } |
|
| 6324 | - } else {
|
|
| 6325 | - $value = $this->array_options["options_" . $key]; // No GET, no POST, no default value, so we take value of object. |
|
| 6326 | - } |
|
| 6327 | - //var_dump($keyprefix.' - '.$key.' - '.$keysuffix.' - '.$keyprefix.'options_'.$key.$keysuffix.' - '.$this->array_options["options_".$key.$keysuffix].' - '.$getposttemp.' - '.$value); |
|
| 6328 | - break; |
|
| 6329 | - } |
|
| 7101 | + if ($error) return -1; |
|
| 6330 | 7102 | |
| 6331 | - if ($extrafields->attributes[$this->table_element]['type'][$key] == 'separate') |
|
| 6332 | - {
|
|
| 6333 | - $out .= $extrafields->showSeparator($key, $this); |
|
| 6334 | - } |
|
| 6335 | - else |
|
| 6336 | - {
|
|
| 6337 | - $csstyle=''; |
|
| 6338 | - $class=(!empty($extrafields->attributes[$this->table_element]['hidden'][$key]) ? 'hideobject ' : ''); |
|
| 6339 | - if (is_array($params) && count($params)>0) {
|
|
| 6340 | - if (array_key_exists('style',$params)) {
|
|
| 6341 | - $csstyle=$params['style']; |
|
| 6342 | - } |
|
| 6343 | - } |
|
| 7103 | + $this->db->begin(); |
|
| 6344 | 7104 | |
| 6345 | - // add html5 elements |
|
| 6346 | - $domData = ' data-element="extrafield"'; |
|
| 6347 | - $domData .= ' data-targetelement="'.$this->element.'"'; |
|
| 6348 | - $domData .= ' data-targetid="'.$this->id.'"'; |
|
| 7105 | + if (! $error) |
|
| 7106 | + {
|
|
| 7107 | + $sql = 'INSERT INTO '.MAIN_DB_PREFIX.$this->table_element; |
|
| 7108 | + $sql.= ' ('.implode( ", ", $keys ).')';
|
|
| 7109 | + $sql.= ' VALUES ('.implode( ", ", $values ).')';
|
|
| 7110 | + |
|
| 7111 | + $res = $this->db->query($sql); |
|
| 7112 | + if ($res===false) {
|
|
| 7113 | + $error++; |
|
| 7114 | + $this->errors[] = $this->db->lasterror(); |
|
| 7115 | + } |
|
| 7116 | + } |
|
| 6349 | 7117 | |
| 6350 | - $html_id = !empty($this->id) ? 'extrarow-'.$this->element.'_'.$key.'_'.$this->id : ''; |
|
| 7118 | + if (! $error) |
|
| 7119 | + {
|
|
| 7120 | + $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX . $this->table_element); |
|
| 7121 | + } |
|
| 6351 | 7122 | |
| 6352 | - $out .= '<tr id="'.$html_id.'" '.$csstyle.' class="'.$class.$this->element.'_extras_'.$key.'" '.$domData.' >'; |
|
| 7123 | + // Create extrafields |
|
| 7124 | + if (! $error) |
|
| 7125 | + {
|
|
| 7126 | + $result=$this->insertExtraFields(); |
|
| 7127 | + if ($result < 0) $error++; |
|
| 7128 | + } |
|
| 6353 | 7129 | |
| 6354 | - if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_TWO_COLUMS) && ($e % 2) == 0) {
|
|
| 6355 | - if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_TWO_COLUMS) && ($e % 2) == 0) {
|
|
| 6356 | - $colspan = '0'; |
|
| 6357 | - } |
|
| 6358 | - } |
|
| 7130 | + // Triggers |
|
| 7131 | + if (! $error && ! $notrigger) |
|
| 7132 | + {
|
|
| 7133 | + // Call triggers |
|
| 7134 | + $result=$this->call_trigger(strtoupper(get_class($this)).'_CREATE',$user); |
|
| 7135 | + if ($result < 0) { $error++; }
|
|
| 7136 | + // End call triggers |
|
| 7137 | + } |
|
| 6359 | 7138 | |
| 6360 | - if ($action == 'selectlines') { $colspan++; }
|
|
| 7139 | + // Commit or rollback |
|
| 7140 | + if ($error) {
|
|
| 7141 | + $this->db->rollback(); |
|
| 7142 | + return -1; |
|
| 7143 | + } else {
|
|
| 7144 | + $this->db->commit(); |
|
| 7145 | + return $this->id; |
|
| 7146 | + } |
|
| 7147 | + } |
|
| 6361 | 7148 | |
| 6362 | - // Convert date into timestamp format (value in memory must be a timestamp) |
|
| 6363 | - if (in_array($extrafields->attributes[$this->table_element]['type'][$key],array('date','datetime')))
|
|
| 6364 | - {
|
|
| 6365 | - $datenotinstring = $this->array_options['options_' . $key]; |
|
| 6366 | - if (! is_numeric($this->array_options['options_' . $key])) // For backward compatibility |
|
| 6367 | - {
|
|
| 6368 | - $datenotinstring = $this->db->jdate($datenotinstring); |
|
| 6369 | - } |
|
| 6370 | - $value = GETPOSTISSET($keyprefix.'options_'.$key.$keysuffix)?dol_mktime(GETPOST($keyprefix.'options_'.$key.$keysuffix."hour", 'int', 3), GETPOST($keyprefix.'options_'.$key.$keysuffix."min",'int',3), 0, GETPOST($keyprefix.'options_'.$key.$keysuffix."month",'int',3), GETPOST($keyprefix.'options_'.$key.$keysuffix."day",'int',3), GETPOST($keyprefix.'options_'.$key.$keysuffix."year",'int',3)):$datenotinstring; |
|
| 6371 | - } |
|
| 6372 | - // Convert float submited string into real php numeric (value in memory must be a php numeric) |
|
| 6373 | - if (in_array($extrafields->attributes[$this->table_element]['type'][$key],array('price','double')))
|
|
| 6374 | - {
|
|
| 6375 | - $value = GETPOSTISSET($keyprefix.'options_'.$key.$keysuffix)?price2num(GETPOST($keyprefix.'options_'.$key.$keysuffix, 'alpha', 3)):$this->array_options['options_'.$key]; |
|
| 6376 | - } |
|
| 6377 | - |
|
| 6378 | - $labeltoshow = $langs->trans($label); |
|
| 6379 | - |
|
| 6380 | - $out .= '<td class="titlefield'; |
|
| 6381 | - if (GETPOST('action','none') == 'create') $out.='create';
|
|
| 6382 | - if ($mode != 'view' && ! empty($extrafields->attributes[$this->table_element]['required'][$key])) $out .= ' fieldrequired'; |
|
| 6383 | - $out .= '">'; |
|
| 6384 | - if (! empty($extrafields->attributes[$object->table_element]['help'][$key])) $out .= $form->textwithpicto($labeltoshow, $extrafields->attributes[$object->table_element]['help'][$key]); |
|
| 6385 | - else $out .= $labeltoshow; |
|
| 6386 | - $out .= '</td>'; |
|
| 6387 | - |
|
| 6388 | - $html_id = !empty($this->id) ? $this->element.'_extras_'.$key.'_'.$this->id : ''; |
|
| 6389 | - $out .='<td id="'.$html_id.'" class="'.$this->element.'_extras_'.$key.'" '.($colspan?' colspan="'.$colspan.'"':'').'>'; |
|
| 6390 | - |
|
| 6391 | - switch($mode) {
|
|
| 6392 | - case "view": |
|
| 6393 | - $out .= $extrafields->showOutputField($key, $value); |
|
| 6394 | - break; |
|
| 6395 | - case "edit": |
|
| 6396 | - $out .= $extrafields->showInputField($key, $value, '', $keysuffix, '', 0, $this->id); |
|
| 6397 | - break; |
|
| 6398 | - } |
|
| 6399 | - |
|
| 6400 | - $out .= '</td>'; |
|
| 6401 | - |
|
| 6402 | - if (!empty(Globals::$conf->global->MAIN_EXTRAFIELDS_USE_TWO_COLUMS) && (($e % 2) == 1)) |
|
| 6403 | - $out .= '</tr>'; |
|
| 6404 | - else $out .= '</tr>'; |
|
| 6405 | - $e++; |
|
| 6406 | - } |
|
| 6407 | - } |
|
| 6408 | - $out .= "\n"; |
|
| 6409 | - // Add code to manage list depending on others |
|
| 6410 | - if (!empty(Globals::$conf->use_javascript_ajax)) {
|
|
| 6411 | - $out .= ' |
|
| 6412 | - <script type="text/javascript"> |
|
| 6413 | - jQuery(document).ready(function() {
|
|
| 6414 | - function showOptions(child_list, parent_list) |
|
| 6415 | - {
|
|
| 6416 | - var val = $("select[name=\"options_"+parent_list+"\"]").val();
|
|
| 6417 | - var parentVal = parent_list + ":" + val; |
|
| 6418 | - if(val > 0) {
|
|
| 6419 | - $("select[name=\""+child_list+"\"] option[parent]").hide();
|
|
| 6420 | - $("select[name=\""+child_list+"\"] option[parent=\""+parentVal+"\"]").show();
|
|
| 6421 | - } else {
|
|
| 6422 | - $("select[name=\""+child_list+"\"] option").show();
|
|
| 6423 | - } |
|
| 6424 | - } |
|
| 6425 | - function setListDependencies() {
|
|
| 6426 | - jQuery("select option[parent]").parent().each(function() {
|
|
| 6427 | - var child_list = $(this).attr("name");
|
|
| 6428 | - var parent = $(this).find("option[parent]:first").attr("parent");
|
|
| 6429 | - var infos = parent.split(":");
|
|
| 6430 | - var parent_list = infos[0]; |
|
| 6431 | - $("select[name=\""+parent_list+"\"]").change(function() {
|
|
| 6432 | - showOptions(child_list, parent_list); |
|
| 6433 | - }); |
|
| 6434 | - }); |
|
| 6435 | - } |
|
| 6436 | 7149 | |
| 6437 | - setListDependencies(); |
|
| 6438 | - }); |
|
| 6439 | - </script>'."\n"; |
|
| 6440 | - $out .= '<!-- /showOptionalsInput --> '."\n"; |
|
| 6441 | - } |
|
| 6442 | - } |
|
| 6443 | - return $out; |
|
| 6444 | - } |
|
| 6445 | - |
|
| 6446 | - |
|
| 6447 | - /** |
|
| 6448 | - * Returns the rights used for this class |
|
| 6449 | - * @return stdClass |
|
| 6450 | - */ |
|
| 6451 | - public function getRights() |
|
| 6452 | - {
|
|
| 6453 | - global $user; |
|
| 6454 | - |
|
| 6455 | - $element = $this->element; |
|
| 6456 | - if ($element == 'facturerec') $element='facture'; |
|
| 6457 | - |
|
| 6458 | - return $user->rights->{$element};
|
|
| 6459 | - } |
|
| 6460 | - |
|
| 6461 | - /** |
|
| 6462 | - * Function used to replace a thirdparty id with another one. |
|
| 6463 | - * This function is meant to be called from replaceThirdparty with the appropiate tables |
|
| 6464 | - * Column name fk_soc MUST be used to identify thirdparties |
|
| 6465 | - * |
|
| 6466 | - * @param DoliDB $db Database handler |
|
| 6467 | - * @param int $origin_id Old thirdparty id (the thirdparty to delete) |
|
| 6468 | - * @param int $dest_id New thirdparty id (the thirdparty that will received element of the other) |
|
| 6469 | - * @param string[] $tables Tables that need to be changed |
|
| 6470 | - * @param int $ignoreerrors Ignore errors. Return true even if errors. We need this when replacement can fails like for categories (categorie of old thirdparty may already exists on new one) |
|
| 6471 | - * @return bool True if success, False if error |
|
| 6472 | - */ |
|
| 6473 | - public static function commonReplaceThirdparty(DoliDB $db, $origin_id, $dest_id, array $tables, $ignoreerrors=0) |
|
| 6474 | - {
|
|
| 6475 | - foreach ($tables as $table) |
|
| 6476 | - {
|
|
| 6477 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$table.' SET fk_soc = '.$dest_id.' WHERE fk_soc = '.$origin_id; |
|
| 6478 | - |
|
| 6479 | - if (! $db->query($sql)) |
|
| 6480 | - {
|
|
| 6481 | - if ($ignoreerrors) return true; // TODO Not enough. If there is A-B on kept thirdarty and B-C on old one, we must get A-B-C after merge. Not A-B. |
|
| 6482 | - //$this->errors = $db->lasterror(); |
|
| 6483 | - return false; |
|
| 6484 | - } |
|
| 6485 | - } |
|
| 6486 | - |
|
| 6487 | - return true; |
|
| 6488 | - } |
|
| 6489 | - |
|
| 6490 | - /** |
|
| 6491 | - * Get buy price to use for margin calculation. This function is called when buy price is unknown. |
|
| 6492 | - * Set buy price = sell price if ForceBuyingPriceIfNull configured, |
|
| 6493 | - * else if calculation MARGIN_TYPE = 'costprice' and costprice is defined, use costprice as buyprice |
|
| 6494 | - * else if calculation MARGIN_TYPE = 'pmp' and pmp is calculated, use pmp as buyprice |
|
| 6495 | - * else set min buy price as buy price |
|
| 6496 | - * |
|
| 6497 | - * @param float $unitPrice Product unit price |
|
| 6498 | - * @param float $discountPercent Line discount percent |
|
| 6499 | - * @param int $fk_product Product id |
|
| 6500 | - * @return float <0 if KO, buyprice if OK |
|
| 6501 | - */ |
|
| 6502 | - public function defineBuyPrice($unitPrice = 0.0, $discountPercent = 0.0, $fk_product = 0) |
|
| 6503 | - {
|
|
| 6504 | - global $conf; |
|
| 6505 | - |
|
| 6506 | - $buyPrice = 0; |
|
| 6507 | - |
|
| 6508 | - if (($unitPrice > 0) && (isset(Globals::$conf->global->ForceBuyingPriceIfNull) && Globals::$conf->global->ForceBuyingPriceIfNull == 1)) { // In most cases, test here is false{
|
|
| 6509 | - $buyPrice = $unitPrice * (1 - $discountPercent / 100); |
|
| 6510 | - } |
|
| 6511 | - else |
|
| 6512 | - {
|
|
| 6513 | - // Get cost price for margin calculation |
|
| 6514 | - if (! empty($fk_product)) |
|
| 6515 | - {
|
|
| 6516 | - if (isset(Globals::$conf->global->MARGIN_TYPE) && Globals::$conf->global->MARGIN_TYPE == 'costprice') {
|
|
| 6517 | - require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php'; |
|
| 6518 | - $product = new Product($this->db); |
|
| 6519 | - $result = $product->fetch($fk_product); |
|
| 6520 | - if ($result <= 0) |
|
| 6521 | - {
|
|
| 6522 | - $this->errors[] = 'ErrorProductIdDoesNotExists'; |
|
| 6523 | - return -1; |
|
| 6524 | - } |
|
| 6525 | - if ($product->cost_price > 0) |
|
| 6526 | - {
|
|
| 6527 | - $buyPrice = $product->cost_price; |
|
| 6528 | - } |
|
| 6529 | - else if ($product->pmp > 0) |
|
| 6530 | - {
|
|
| 6531 | - $buyPrice = $product->pmp; |
|
| 6532 | - } |
|
| 6533 | - } |
|
| 6534 | - else if (isset(Globals::$conf->global->MARGIN_TYPE) && Globals::$conf->global->MARGIN_TYPE == 'pmp') {
|
|
| 6535 | - require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php'; |
|
| 6536 | - $product = new Product($this->db); |
|
| 6537 | - $result = $product->fetch($fk_product); |
|
| 6538 | - if ($result <= 0) |
|
| 6539 | - {
|
|
| 6540 | - $this->errors[] = 'ErrorProductIdDoesNotExists'; |
|
| 6541 | - return -1; |
|
| 6542 | - } |
|
| 6543 | - if ($product->pmp > 0) |
|
| 6544 | - {
|
|
| 6545 | - $buyPrice = $product->pmp; |
|
| 6546 | - } |
|
| 6547 | - } |
|
| 7150 | + /** |
|
| 7151 | + * Load object in memory from the database |
|
| 7152 | + * |
|
| 7153 | + * @param int $id Id object |
|
| 7154 | + * @param string $ref Ref |
|
| 7155 | + * @param string $morewhere More SQL filters (' AND ...')
|
|
| 7156 | + * @return int <0 if KO, 0 if not found, >0 if OK |
|
| 7157 | + */ |
|
| 7158 | + public function fetchCommon($id, $ref = null, $morewhere = '') |
|
| 7159 | + {
|
|
| 7160 | + if (empty($id) && empty($ref) && empty($morewhere)) return -1; |
|
| 6548 | 7161 | |
| 6549 | - if (empty($buyPrice) && isset(Globals::$conf->global->MARGIN_TYPE) && in_array(Globals::$conf->global->MARGIN_TYPE, array('1', 'pmp', 'costprice'))) {
|
|
| 6550 | - require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.product.class.php'; |
|
| 6551 | - $productFournisseur = new ProductFournisseur($this->db); |
|
| 6552 | - if (($result = $productFournisseur->find_min_price_product_fournisseur($fk_product)) > 0) |
|
| 6553 | - {
|
|
| 6554 | - $buyPrice = $productFournisseur->fourn_unitprice; |
|
| 6555 | - } |
|
| 6556 | - else if ($result < 0) |
|
| 6557 | - {
|
|
| 6558 | - $this->errors[] = $productFournisseur->error; |
|
| 6559 | - return -2; |
|
| 6560 | - } |
|
| 6561 | - } |
|
| 6562 | - } |
|
| 6563 | - } |
|
| 6564 | - return $buyPrice; |
|
| 6565 | - } |
|
| 7162 | + $sql = 'SELECT '.$this->getFieldList(); |
|
| 7163 | + $sql.= ' FROM '.MAIN_DB_PREFIX.$this->table_element; |
|
| 6566 | 7164 | |
| 6567 | - // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps |
|
| 6568 | - /** |
|
| 6569 | - * Show photos of an object (nbmax maximum), into several columns |
|
| 6570 | - * |
|
| 6571 | - * @param string $modulepart 'product', 'ticket', ... |
|
| 6572 | - * @param string $sdir Directory to scan (full absolute path) |
|
| 6573 | - * @param int $size 0=original size, 1='small' use thumbnail if possible |
|
| 6574 | - * @param int $nbmax Nombre maximum de photos (0=pas de max) |
|
| 6575 | - * @param int $nbbyrow Number of image per line or -1 to use div. Used only if size=1. |
|
| 6576 | - * @param int $showfilename 1=Show filename |
|
| 6577 | - * @param int $showaction 1=Show icon with action links (resize, delete) |
|
| 6578 | - * @param int $maxHeight Max height of original image when size='small' (so we can use original even if small requested). If 0, always use 'small' thumb image. |
|
| 6579 | - * @param int $maxWidth Max width of original image when size='small' |
|
| 6580 | - * @param int $nolink Do not add a href link to view enlarged imaged into a new tab |
|
| 6581 | - * @param int $notitle Do not add title tag on image |
|
| 6582 | - * @param int $usesharelink Use the public shared link of image (if not available, the 'nophoto' image will be shown instead) |
|
| 6583 | - * @return string Html code to show photo. Number of photos shown is saved in this->nbphoto |
|
| 6584 | - */ |
|
| 6585 | - function show_photos($modulepart, $sdir, $size=0, $nbmax=0, $nbbyrow=5, $showfilename=0, $showaction=0, $maxHeight=120, $maxWidth=160, $nolink=0, $notitle=0, $usesharelink=0) |
|
| 6586 | - {
|
|
| 6587 | - // phpcs:enable |
|
| 6588 | - global $conf,$user,$langs; |
|
| 6589 | - |
|
| 6590 | - include_once DOL_DOCUMENT_ROOT .'/core/lib/files.lib.php'; |
|
| 6591 | - include_once DOL_DOCUMENT_ROOT .'/core/lib/images.lib.php'; |
|
| 6592 | - |
|
| 6593 | - $sortfield='position_name'; |
|
| 6594 | - $sortorder='asc'; |
|
| 6595 | - |
|
| 6596 | - $dir = $sdir . '/'; |
|
| 6597 | - $pdir = '/'; |
|
| 6598 | - if ($modulepart == 'ticket') |
|
| 6599 | - {
|
|
| 6600 | - $dir .= get_exdir(0, 0, 0, 0, $this, $modulepart).$this->track_id.'/'; |
|
| 6601 | - $pdir .= get_exdir(0, 0, 0, 0, $this, $modulepart).$this->track_id.'/'; |
|
| 6602 | - } |
|
| 6603 | - else |
|
| 6604 | - {
|
|
| 6605 | - $dir .= get_exdir(0, 0, 0, 0, $this, $modulepart).$this->ref.'/'; |
|
| 6606 | - $pdir .= get_exdir(0, 0, 0, 0, $this, $modulepart).$this->ref.'/'; |
|
| 6607 | - } |
|
| 6608 | - |
|
| 6609 | - // For backward compatibility |
|
| 6610 | - if ($modulepart == 'product' && !empty(Globals::$conf->global->PRODUCT_USE_OLD_PATH_FOR_PHOTO)) {
|
|
| 6611 | - $dir = $sdir . '/'. get_exdir($this->id,2,0,0,$this,$modulepart) . $this->id ."/photos/"; |
|
| 6612 | - $pdir = '/' . get_exdir($this->id,2,0,0,$this,$modulepart) . $this->id ."/photos/"; |
|
| 6613 | - } |
|
| 6614 | - |
|
| 6615 | - // Defined relative dir to DOL_DATA_ROOT |
|
| 6616 | - $relativedir = ''; |
|
| 6617 | - if ($dir) |
|
| 6618 | - {
|
|
| 6619 | - $relativedir = preg_replace('/^'.preg_quote(DOL_DATA_ROOT,'/').'/', '', $dir);
|
|
| 6620 | - $relativedir = preg_replace('/^[\\/]/','',$relativedir);
|
|
| 6621 | - $relativedir = preg_replace('/[\\/]$/','',$relativedir);
|
|
| 6622 | - } |
|
| 6623 | - |
|
| 6624 | - $dirthumb = $dir.'thumbs/'; |
|
| 6625 | - $pdirthumb = $pdir.'thumbs/'; |
|
| 6626 | - |
|
| 6627 | - $return ='<!-- Photo -->'."\n"; |
|
| 6628 | - $nbphoto=0; |
|
| 6629 | - |
|
| 6630 | - $filearray=dol_dir_list($dir,"files",0,'','(\.meta|_preview.*\.png)$',$sortfield,(strtolower($sortorder)=='desc'?SORT_DESC:SORT_ASC),1); |
|
| 6631 | - |
|
| 6632 | - /* if (! empty(Globals::$conf->global->PRODUCT_USE_OLD_PATH_FOR_PHOTO)) // For backward compatiblity, we scan also old dirs |
|
| 6633 | - {
|
|
| 6634 | - $filearrayold=dol_dir_list($dirold,"files",0,'','(\.meta|_preview.*\.png)$',$sortfield,(strtolower($sortorder)=='desc'?SORT_DESC:SORT_ASC),1); |
|
| 6635 | - $filearray=array_merge($filearray, $filearrayold); |
|
| 6636 | - } */ |
|
| 7165 | + if (!empty($id)) $sql.= ' WHERE rowid = '.$id; |
|
| 7166 | + elseif (!empty($ref)) $sql.= " WHERE ref = ".$this->quote($ref, $this->fields['ref']); |
|
| 7167 | + else $sql.=' WHERE 1 = 1'; // usage with empty id and empty ref is very rare |
|
| 7168 | + if ($morewhere) $sql.= $morewhere; |
|
| 7169 | + $sql.=' LIMIT 1'; // This is a fetch, to be sure to get only one record |
|
| 6637 | 7170 | |
| 6638 | - completeFileArrayWithDatabaseInfo($filearray, $relativedir); |
|
| 7171 | + $res = $this->db->query($sql); |
|
| 7172 | + if ($res) |
|
| 7173 | + {
|
|
| 7174 | + $obj = $this->db->fetch_object($res); |
|
| 7175 | + if ($obj) |
|
| 7176 | + {
|
|
| 7177 | + $this->setVarsFromFetchObj($obj); |
|
| 7178 | + return $this->id; |
|
| 7179 | + } |
|
| 7180 | + else |
|
| 7181 | + {
|
|
| 7182 | + return 0; |
|
| 7183 | + } |
|
| 7184 | + } |
|
| 7185 | + else |
|
| 7186 | + {
|
|
| 7187 | + $this->error = $this->db->lasterror(); |
|
| 7188 | + $this->errors[] = $this->error; |
|
| 7189 | + return -1; |
|
| 7190 | + } |
|
| 7191 | + } |
|
| 6639 | 7192 | |
| 6640 | - if (count($filearray)) |
|
| 6641 | - {
|
|
| 6642 | - if ($sortfield && $sortorder) |
|
| 6643 | - {
|
|
| 6644 | - $filearray=dol_sort_array($filearray, $sortfield, $sortorder); |
|
| 6645 | - } |
|
| 7193 | + /** |
|
| 7194 | + * Update object into database |
|
| 7195 | + * |
|
| 7196 | + * @param User $user User that modifies |
|
| 7197 | + * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 7198 | + * @return int <0 if KO, >0 if OK |
|
| 7199 | + */ |
|
| 7200 | + public function updateCommon(User $user, $notrigger = false) |
|
| 7201 | + {
|
|
| 7202 | + global $conf, $langs; |
|
| 6646 | 7203 | |
| 6647 | - foreach($filearray as $key => $val) |
|
| 6648 | - {
|
|
| 6649 | - $photo=''; |
|
| 6650 | - $file = $val['name']; |
|
| 7204 | + $error = 0; |
|
| 6651 | 7205 | |
| 6652 | - //if (! utf8_check($file)) $file=utf8_encode($file); // To be sure file is stored in UTF8 in memory |
|
| 7206 | + $now=dol_now(); |
|
| 6653 | 7207 | |
| 6654 | - //if (dol_is_file($dir.$file) && image_format_supported($file) >= 0) |
|
| 6655 | - if (image_format_supported($file) >= 0) |
|
| 6656 | - {
|
|
| 6657 | - $nbphoto++; |
|
| 6658 | - $photo = $file; |
|
| 6659 | - $viewfilename = $file; |
|
| 7208 | + $fieldvalues = $this->setSaveQuery(); |
|
| 7209 | + if (array_key_exists('date_modification', $fieldvalues) && empty($fieldvalues['date_modification'])) $fieldvalues['date_modification']=$this->db->idate($now);
|
|
| 7210 | + if (array_key_exists('fk_user_modif', $fieldvalues) && ! ($fieldvalues['fk_user_modif'] > 0)) $fieldvalues['fk_user_modif']=$user->id;
|
|
| 7211 | + unset($fieldvalues['rowid']); // The field 'rowid' is reserved field name for autoincrement field so we don't need it into update. |
|
| 6660 | 7212 | |
| 6661 | - if ($size == 1 || $size == 'small') { // Format vignette
|
|
| 7213 | + $keys=array(); |
|
| 7214 | + $values = array(); |
|
| 7215 | + foreach ($fieldvalues as $k => $v) {
|
|
| 7216 | + $keys[$k] = $k; |
|
| 7217 | + $value = $this->fields[$k]; |
|
| 7218 | + $values[$k] = $this->quote($v, $value); |
|
| 7219 | + $tmp[] = $k.'='.$this->quote($v, $this->fields[$k]); |
|
| 7220 | + } |
|
| 6662 | 7221 | |
| 6663 | - // Find name of thumb file |
|
| 6664 | - $photo_vignette=basename(getImageFileNameForSize($dir.$file, '_small')); |
|
| 6665 | - if (! dol_is_file($dirthumb.$photo_vignette)) $photo_vignette=''; |
|
| 7222 | + // Clean and check mandatory |
|
| 7223 | + foreach($keys as $key) |
|
| 7224 | + {
|
|
| 7225 | + if (preg_match('/^integer:/i', $this->fields[$key]['type']) && $values[$key] == '-1') $values[$key]=''; // This is an implicit foreign key field
|
|
| 7226 | + if (! empty($this->fields[$key]['foreignkey']) && $values[$key] == '-1') $values[$key]=''; // This is an explicit foreign key field |
|
| 6666 | 7227 | |
| 6667 | - // Get filesize of original file |
|
| 6668 | - $imgarray=dol_getImageSize($dir.$photo); |
|
| 7228 | + //var_dump($key.'-'.$values[$key].'-'.($this->fields[$key]['notnull'] == 1)); |
|
| 7229 | + /* |
|
| 7230 | + if ($this->fields[$key]['notnull'] == 1 && empty($values[$key])) |
|
| 7231 | + {
|
|
| 7232 | + $error++; |
|
| 7233 | + $this->errors[]=$langs->trans("ErrorFieldRequired", $this->fields[$key]['label']);
|
|
| 7234 | + }*/ |
|
| 7235 | + } |
|
| 6669 | 7236 | |
| 6670 | - if ($nbbyrow > 0) |
|
| 6671 | - {
|
|
| 6672 | - if ($nbphoto == 1) $return.= '<table width="100%" valign="top" align="center" border="0" cellpadding="2" cellspacing="2">'; |
|
| 7237 | + $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element.' SET '.implode( ',', $tmp ).' WHERE rowid='.$this->id ; |
|
| 6673 | 7238 | |
| 6674 | - if ($nbphoto % $nbbyrow == 1) $return.= '<tr align=center valign=middle border=1>'; |
|
| 6675 | - $return.= '<td width="'.ceil(100/$nbbyrow).'%" class="photo">'; |
|
| 6676 | - } |
|
| 6677 | - else if ($nbbyrow < 0) $return .= '<div class="inline-block">'; |
|
| 7239 | + $this->db->begin(); |
|
| 7240 | + if (! $error) |
|
| 7241 | + {
|
|
| 7242 | + $res = $this->db->query($sql); |
|
| 7243 | + if ($res===false) |
|
| 7244 | + {
|
|
| 7245 | + $error++; |
|
| 7246 | + $this->errors[] = $this->db->lasterror(); |
|
| 7247 | + } |
|
| 7248 | + } |
|
| 6678 | 7249 | |
| 6679 | - $return.= "\n"; |
|
| 7250 | + // Update extrafield |
|
| 7251 | + if (!$error && empty(Globals::$conf->global->MAIN_EXTRAFIELDS_DISABLED) && is_array($this->array_options) && count($this->array_options) > 0) {
|
|
| 7252 | + $result=$this->insertExtraFields(); |
|
| 7253 | + if ($result < 0) |
|
| 7254 | + {
|
|
| 7255 | + $error++; |
|
| 7256 | + } |
|
| 7257 | + } |
|
| 6680 | 7258 | |
| 6681 | - $relativefile=preg_replace('/^\//', '', $pdir.$photo);
|
|
| 6682 | - if (empty($nolink)) |
|
| 6683 | - {
|
|
| 6684 | - $urladvanced=getAdvancedPreviewUrl($modulepart, $relativefile, 0, 'entity='.$this->entity); |
|
| 6685 | - if ($urladvanced) $return.='<a href="'.$urladvanced.'">'; |
|
| 6686 | - else $return.= '<a href="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.$this->entity.'&file='.urlencode($pdir.$photo).'" class="aphoto" target="_blank">'; |
|
| 6687 | - } |
|
| 7259 | + // Triggers |
|
| 7260 | + if (! $error && ! $notrigger) |
|
| 7261 | + {
|
|
| 7262 | + // Call triggers |
|
| 7263 | + $result=$this->call_trigger(strtoupper(get_class($this)).'_MODIFY',$user); |
|
| 7264 | + if ($result < 0) { $error++; } //Do also here what you must do to rollback action if trigger fail
|
|
| 7265 | + // End call triggers |
|
| 7266 | + } |
|
| 6688 | 7267 | |
| 6689 | - // Show image (width height=$maxHeight) |
|
| 6690 | - // Si fichier vignette disponible et image source trop grande, on utilise la vignette, sinon on utilise photo origine |
|
| 6691 | - $alt=$langs->transnoentitiesnoconv('File').': '.$relativefile;
|
|
| 6692 | - $alt.=' - '.$langs->transnoentitiesnoconv('Size').': '.$imgarray['width'].'x'.$imgarray['height'];
|
|
| 6693 | - if ($notitle) $alt=''; |
|
| 6694 | - |
|
| 6695 | - if ($usesharelink) |
|
| 6696 | - {
|
|
| 6697 | - if ($val['share']) |
|
| 6698 | - {
|
|
| 6699 | - if (empty($maxHeight) || $photo_vignette && $imgarray['height'] > $maxHeight) |
|
| 6700 | - {
|
|
| 6701 | - $return.= '<!-- Show original file (thumb not yet available with shared links) -->'; |
|
| 6702 | - $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/viewimage.php?hashp='.urlencode($val['share']).'" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6703 | - } |
|
| 6704 | - else {
|
|
| 6705 | - $return.= '<!-- Show original file -->'; |
|
| 6706 | - $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/viewimage.php?hashp='.urlencode($val['share']).'" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6707 | - } |
|
| 6708 | - } |
|
| 6709 | - else |
|
| 6710 | - {
|
|
| 6711 | - $return.= '<!-- Show nophoto file (because file is not shared) -->'; |
|
| 6712 | - $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/public/theme/common/nophoto.png" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6713 | - } |
|
| 6714 | - } |
|
| 6715 | - else |
|
| 6716 | - {
|
|
| 6717 | - if (empty($maxHeight) || $photo_vignette && $imgarray['height'] > $maxHeight) |
|
| 6718 | - {
|
|
| 6719 | - $return.= '<!-- Show thumb -->'; |
|
| 6720 | - $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.$this->entity.'&file='.urlencode($pdirthumb.$photo_vignette).'" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6721 | - } |
|
| 6722 | - else {
|
|
| 6723 | - $return.= '<!-- Show original file -->'; |
|
| 6724 | - $return.= '<img class="photo photowithmargin" border="0" height="'.$maxHeight.'" src="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.$this->entity.'&file='.urlencode($pdir.$photo).'" title="'.dol_escape_htmltag($alt).'">'; |
|
| 6725 | - } |
|
| 6726 | - } |
|
| 7268 | + // Commit or rollback |
|
| 7269 | + if ($error) {
|
|
| 7270 | + $this->db->rollback(); |
|
| 7271 | + return -1; |
|
| 7272 | + } else {
|
|
| 7273 | + $this->db->commit(); |
|
| 7274 | + return $this->id; |
|
| 7275 | + } |
|
| 7276 | + } |
|
| 6727 | 7277 | |
| 6728 | - if (empty($nolink)) $return.= '</a>'; |
|
| 6729 | - $return.="\n"; |
|
| 6730 | - |
|
| 6731 | - if ($showfilename) $return.= '<br>'.$viewfilename; |
|
| 6732 | - if ($showaction) |
|
| 6733 | - {
|
|
| 6734 | - $return.= '<br>'; |
|
| 6735 | - // On propose la generation de la vignette si elle n'existe pas et si la taille est superieure aux limites |
|
| 6736 | - if ($photo_vignette && (image_format_supported($photo) > 0) && ($this->imgWidth > $maxWidth || $this->imgHeight > $maxHeight)) |
|
| 6737 | - {
|
|
| 6738 | - $return.= '<a href="'.$_SERVER["PHP_SELF"].'?id='.$this->id.'&action=addthumb&file='.urlencode($pdir.$viewfilename).'">'.img_picto($langs->trans('GenerateThumb'),'refresh').' </a>';
|
|
| 6739 | - } |
|
| 6740 | - // Special cas for product |
|
| 6741 | - if ($modulepart == 'product' && ($user->rights->produit->creer || $user->rights->service->creer)) |
|
| 6742 | - {
|
|
| 6743 | - // Link to resize |
|
| 6744 | - $return.= '<a href="'.DOL_URL_ROOT.'/core/photos_resize.php?modulepart='.urlencode('produit|service').'&id='.$this->id.'&file='.urlencode($pdir.$viewfilename).'" title="'.dol_escape_htmltag($langs->trans("Resize")).'">'.img_picto($langs->trans("Resize"), 'resize', '').'</a> ';
|
|
| 6745 | - |
|
| 6746 | - // Link to delete |
|
| 6747 | - $return.= '<a href="'.$_SERVER["PHP_SELF"].'?id='.$this->id.'&action=delete&file='.urlencode($pdir.$viewfilename).'">'; |
|
| 6748 | - $return.= img_delete().'</a>'; |
|
| 6749 | - } |
|
| 6750 | - } |
|
| 6751 | - $return.= "\n"; |
|
| 7278 | + /** |
|
| 7279 | + * Delete object in database |
|
| 7280 | + * |
|
| 7281 | + * @param User $user User that deletes |
|
| 7282 | + * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 7283 | + * @param int $forcechilddeletion 0=no, 1=Force deletion of children |
|
| 7284 | + * @return int <=0 if KO, >0 if OK |
|
| 7285 | + */ |
|
| 7286 | + public function deleteCommon(User $user, $notrigger=false, $forcechilddeletion=0) |
|
| 7287 | + {
|
|
| 7288 | + $error=0; |
|
| 6752 | 7289 | |
| 6753 | - if ($nbbyrow > 0) |
|
| 6754 | - {
|
|
| 6755 | - $return.= '</td>'; |
|
| 6756 | - if (($nbphoto % $nbbyrow) == 0) $return.= '</tr>'; |
|
| 6757 | - } |
|
| 6758 | - else if ($nbbyrow < 0) $return.='</div>'; |
|
| 6759 | - } |
|
| 6760 | - |
|
| 6761 | - if (empty($size)) { // Format origine
|
|
| 6762 | - $return.= '<img class="photo photowithmargin" border="0" src="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.$this->entity.'&file='.urlencode($pdir.$photo).'">'; |
|
| 6763 | - |
|
| 6764 | - if ($showfilename) $return.= '<br>'.$viewfilename; |
|
| 6765 | - if ($showaction) |
|
| 6766 | - {
|
|
| 6767 | - // Special case for product |
|
| 6768 | - if ($modulepart == 'product' && ($user->rights->produit->creer || $user->rights->service->creer)) |
|
| 6769 | - {
|
|
| 6770 | - // Link to resize |
|
| 6771 | - $return.= '<a href="'.DOL_URL_ROOT.'/core/photos_resize.php?modulepart='.urlencode('produit|service').'&id='.$this->id.'&file='.urlencode($pdir.$viewfilename).'" title="'.dol_escape_htmltag($langs->trans("Resize")).'">'.img_picto($langs->trans("Resize"), 'resize', '').'</a> ';
|
|
| 6772 | - |
|
| 6773 | - // Link to delete |
|
| 6774 | - $return.= '<a href="'.$_SERVER["PHP_SELF"].'?id='.$this->id.'&action=delete&file='.urlencode($pdir.$viewfilename).'">'; |
|
| 6775 | - $return.= img_delete().'</a>'; |
|
| 6776 | - } |
|
| 6777 | - } |
|
| 6778 | - } |
|
| 7290 | + $this->db->begin(); |
|
| 6779 | 7291 | |
| 6780 | - // On continue ou on arrete de boucler ? |
|
| 6781 | - if ($nbmax && $nbphoto >= $nbmax) break; |
|
| 6782 | - } |
|
| 6783 | - } |
|
| 7292 | + if ($forcechilddeletion) |
|
| 7293 | + {
|
|
| 7294 | + foreach($this->childtables as $table) |
|
| 7295 | + {
|
|
| 7296 | + $sql = 'DELETE FROM '.MAIN_DB_PREFIX.$table.' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 7297 | + $resql = $this->db->query($sql); |
|
| 7298 | + if (! $resql) |
|
| 7299 | + {
|
|
| 7300 | + $this->error=$this->db->lasterror(); |
|
| 7301 | + $this->errors[]=$this->error; |
|
| 7302 | + $this->db->rollback(); |
|
| 7303 | + return -1; |
|
| 7304 | + } |
|
| 7305 | + } |
|
| 7306 | + } |
|
| 7307 | + elseif (! empty($this->fk_element) && ! empty($this->childtables)) // If object has childs linked with a foreign key field, we check all child tables. |
|
| 7308 | + {
|
|
| 7309 | + $objectisused = $this->isObjectUsed($this->id); |
|
| 7310 | + if (! empty($objectisused)) |
|
| 7311 | + {
|
|
| 7312 | + dol_syslog(get_class($this)."::deleteCommon Can't delete record as it has some child", LOG_WARNING); |
|
| 7313 | + $this->error='ErrorRecordHasChildren'; |
|
| 7314 | + $this->errors[]=$this->error; |
|
| 7315 | + $this->db->rollback(); |
|
| 7316 | + return 0; |
|
| 7317 | + } |
|
| 7318 | + } |
|
| 6784 | 7319 | |
| 6785 | - if ($size==1 || $size=='small') |
|
| 6786 | - {
|
|
| 6787 | - if ($nbbyrow > 0) |
|
| 6788 | - {
|
|
| 6789 | - // Ferme tableau |
|
| 6790 | - while ($nbphoto % $nbbyrow) |
|
| 6791 | - {
|
|
| 6792 | - $return.= '<td width="'.ceil(100/$nbbyrow).'%"> </td>'; |
|
| 6793 | - $nbphoto++; |
|
| 6794 | - } |
|
| 6795 | - |
|
| 6796 | - if ($nbphoto) $return.= '</table>'; |
|
| 6797 | - } |
|
| 6798 | - } |
|
| 6799 | - } |
|
| 6800 | - |
|
| 6801 | - $this->nbphoto = $nbphoto; |
|
| 6802 | - |
|
| 6803 | - return $return; |
|
| 6804 | - } |
|
| 6805 | - |
|
| 6806 | - |
|
| 6807 | - /** |
|
| 6808 | - * Function test if type is array |
|
| 6809 | - * |
|
| 6810 | - * @param array $info content informations of field |
|
| 6811 | - * @return bool |
|
| 6812 | - */ |
|
| 6813 | - protected function isArray($info) |
|
| 6814 | - {
|
|
| 6815 | - if(is_array($info)) |
|
| 6816 | - {
|
|
| 6817 | - if(isset($info['type']) && $info['type']=='array') return true; |
|
| 6818 | - else return false; |
|
| 6819 | - } |
|
| 6820 | - else return false; |
|
| 6821 | - } |
|
| 6822 | - |
|
| 6823 | - /** |
|
| 6824 | - * Function test if type is null |
|
| 6825 | - * |
|
| 6826 | - * @param array $info content informations of field |
|
| 6827 | - * @return bool |
|
| 6828 | - */ |
|
| 6829 | - protected function isNull($info) |
|
| 6830 | - {
|
|
| 6831 | - if(is_array($info)) |
|
| 6832 | - {
|
|
| 6833 | - if(isset($info['type']) && $info['type']=='null') return true; |
|
| 6834 | - else return false; |
|
| 6835 | - } |
|
| 6836 | - else return false; |
|
| 6837 | - } |
|
| 6838 | - |
|
| 6839 | - /** |
|
| 6840 | - * Function test if type is date |
|
| 6841 | - * |
|
| 6842 | - * @param array $info content informations of field |
|
| 6843 | - * @return bool |
|
| 6844 | - */ |
|
| 6845 | - public function isDate($info) |
|
| 6846 | - {
|
|
| 6847 | - if(isset($info['type']) && ($info['type']=='date' || $info['type']=='datetime' || $info['type']=='timestamp')) return true; |
|
| 6848 | - else return false; |
|
| 6849 | - } |
|
| 6850 | - |
|
| 6851 | - /** |
|
| 6852 | - * Function test if type is integer |
|
| 6853 | - * |
|
| 6854 | - * @param array $info content informations of field |
|
| 6855 | - * @return bool |
|
| 6856 | - */ |
|
| 6857 | - public function isInt($info) |
|
| 6858 | - {
|
|
| 6859 | - if(is_array($info)) |
|
| 6860 | - {
|
|
| 6861 | - if(isset($info['type']) && ($info['type']=='int' || preg_match('/^integer/i',$info['type']) ) ) return true;
|
|
| 6862 | - else return false; |
|
| 6863 | - } |
|
| 6864 | - else return false; |
|
| 6865 | - } |
|
| 6866 | - |
|
| 6867 | - /** |
|
| 6868 | - * Function test if type is float |
|
| 6869 | - * |
|
| 6870 | - * @param array $info content informations of field |
|
| 6871 | - * @return bool |
|
| 6872 | - */ |
|
| 6873 | - public function isFloat($info) |
|
| 6874 | - {
|
|
| 6875 | - if(is_array($info)) |
|
| 6876 | - {
|
|
| 6877 | - if (isset($info['type']) && (preg_match('/^(double|real)/i', $info['type']))) return true;
|
|
| 6878 | - else return false; |
|
| 6879 | - } |
|
| 6880 | - else return false; |
|
| 6881 | - } |
|
| 6882 | - |
|
| 6883 | - /** |
|
| 6884 | - * Function test if type is text |
|
| 6885 | - * |
|
| 6886 | - * @param array $info content informations of field |
|
| 6887 | - * @return bool |
|
| 6888 | - */ |
|
| 6889 | - public function isText($info) |
|
| 6890 | - {
|
|
| 6891 | - if(is_array($info)) |
|
| 6892 | - {
|
|
| 6893 | - if(isset($info['type']) && $info['type']=='text') return true; |
|
| 6894 | - else return false; |
|
| 6895 | - } |
|
| 6896 | - else return false; |
|
| 6897 | - } |
|
| 6898 | - |
|
| 6899 | - /** |
|
| 6900 | - * Function test if is indexed |
|
| 6901 | - * |
|
| 6902 | - * @param array $info content informations of field |
|
| 6903 | - * @return bool |
|
| 6904 | - */ |
|
| 6905 | - protected function isIndex($info) |
|
| 6906 | - {
|
|
| 6907 | - if(is_array($info)) |
|
| 6908 | - {
|
|
| 6909 | - if(isset($info['index']) && $info['index']==true) return true; |
|
| 6910 | - else return false; |
|
| 6911 | - } |
|
| 6912 | - else return false; |
|
| 6913 | - } |
|
| 6914 | - |
|
| 6915 | - /** |
|
| 6916 | - * Function to prepare the values to insert. |
|
| 6917 | - * Note $this->${field} are set by the page that make the createCommon or the updateCommon.
|
|
| 6918 | - * |
|
| 6919 | - * @return array |
|
| 6920 | - */ |
|
| 6921 | - protected function setSaveQuery() |
|
| 6922 | - {
|
|
| 6923 | - global $conf; |
|
| 6924 | - |
|
| 6925 | - $queryarray=array(); |
|
| 6926 | - foreach ($this->fields as $field=>$info) // Loop on definition of fields |
|
| 6927 | - {
|
|
| 6928 | - // Depending on field type ('datetime', ...)
|
|
| 6929 | - if($this->isDate($info)) |
|
| 6930 | - {
|
|
| 6931 | - if(empty($this->{$field}))
|
|
| 6932 | - {
|
|
| 6933 | - $queryarray[$field] = null; |
|
| 6934 | - } |
|
| 6935 | - else |
|
| 6936 | - {
|
|
| 6937 | - $queryarray[$field] = $this->db->idate($this->{$field});
|
|
| 6938 | - } |
|
| 6939 | - } |
|
| 6940 | - else if($this->isArray($info)) |
|
| 6941 | - {
|
|
| 6942 | - if(! empty($this->{$field})) {
|
|
| 6943 | - if(! is_array($this->{$field})) {
|
|
| 6944 | - $this->{$field} = array($this->{$field});
|
|
| 6945 | - } |
|
| 6946 | - $queryarray[$field] = serialize($this->{$field});
|
|
| 6947 | - } else {
|
|
| 6948 | - $queryarray[$field] = null; |
|
| 6949 | - } |
|
| 6950 | - } |
|
| 6951 | - else if($this->isInt($info)) |
|
| 6952 | - {
|
|
| 6953 | - if ($field == 'entity' && is_null($this->{$field}))
|
|
| 6954 | - $queryarray[$field] = Globals::$conf->entity; |
|
| 6955 | - else |
|
| 6956 | - {
|
|
| 6957 | - $queryarray[$field] = (int) price2num($this->{$field});
|
|
| 6958 | - if (empty($queryarray[$field])) $queryarray[$field]=0; // May be reset to null later if property 'notnull' is -1 for this field. |
|
| 6959 | - } |
|
| 6960 | - } |
|
| 6961 | - else if($this->isFloat($info)) |
|
| 6962 | - {
|
|
| 6963 | - $queryarray[$field] = (double) price2num($this->{$field});
|
|
| 6964 | - if (empty($queryarray[$field])) $queryarray[$field]=0; |
|
| 6965 | - } |
|
| 6966 | - else |
|
| 6967 | - {
|
|
| 6968 | - $queryarray[$field] = $this->{$field};
|
|
| 6969 | - } |
|
| 7320 | + if (! $error) {
|
|
| 7321 | + if (! $notrigger) {
|
|
| 7322 | + // Call triggers |
|
| 7323 | + $result=$this->call_trigger(strtoupper(get_class($this)).'_DELETE', $user); |
|
| 7324 | + if ($result < 0) { $error++; } // Do also here what you must do to rollback action if trigger fail
|
|
| 7325 | + // End call triggers |
|
| 7326 | + } |
|
| 7327 | + } |
|
| 6970 | 7328 | |
| 6971 | - if ($info['type'] == 'timestamp' && empty($queryarray[$field])) unset($queryarray[$field]); |
|
| 6972 | - if (! empty($info['notnull']) && $info['notnull'] == -1 && empty($queryarray[$field])) $queryarray[$field] = null; |
|
| 6973 | - } |
|
| 7329 | + if (! $error && ! empty($this->isextrafieldmanaged)) |
|
| 7330 | + {
|
|
| 7331 | + $sql = "DELETE FROM " . MAIN_DB_PREFIX . $this->table_element."_extrafields"; |
|
| 7332 | + $sql.= " WHERE fk_object=" . $this->id; |
|
| 6974 | 7333 | |
| 6975 | - return $queryarray; |
|
| 6976 | - } |
|
| 7334 | + $resql = $this->db->query($sql); |
|
| 7335 | + if (! $resql) |
|
| 7336 | + {
|
|
| 7337 | + $this->errors[] = $this->db->lasterror(); |
|
| 7338 | + $error++; |
|
| 7339 | + } |
|
| 7340 | + } |
|
| 6977 | 7341 | |
| 6978 | - /** |
|
| 6979 | - * Function to load data from a SQL pointer into properties of current object $this |
|
| 6980 | - * |
|
| 6981 | - * @param stdClass $obj Contain data of object from database |
|
| 6982 | - * @return void |
|
| 6983 | - */ |
|
| 6984 | - protected function setVarsFromFetchObj(&$obj) |
|
| 6985 | - {
|
|
| 6986 | - foreach ($this->fields as $field => $info) |
|
| 6987 | - {
|
|
| 6988 | - if($this->isDate($info)) |
|
| 6989 | - {
|
|
| 6990 | - if(empty($obj->{$field}) || $obj->{$field} === '0000-00-00 00:00:00' || $obj->{$field} === '1000-01-01 00:00:00') $this->{$field} = 0;
|
|
| 6991 | - else $this->{$field} = strtotime($obj->{$field});
|
|
| 6992 | - } |
|
| 6993 | - elseif($this->isArray($info)) |
|
| 6994 | - {
|
|
| 6995 | - if(! empty($obj->{$field})) {
|
|
| 6996 | - $this->{$field} = @unserialize($obj->{$field});
|
|
| 6997 | - // Hack for data not in UTF8 |
|
| 6998 | - if($this->{$field } === false) @unserialize(utf8_decode($obj->{$field}));
|
|
| 6999 | - } else {
|
|
| 7000 | - $this->{$field} = array();
|
|
| 7001 | - } |
|
| 7002 | - } |
|
| 7003 | - elseif($this->isInt($info)) |
|
| 7004 | - {
|
|
| 7005 | - if ($field == 'rowid') $this->id = (int) $obj->{$field};
|
|
| 7006 | - else $this->{$field} = (int) $obj->{$field};
|
|
| 7007 | - } |
|
| 7008 | - elseif($this->isFloat($info)) |
|
| 7009 | - {
|
|
| 7010 | - $this->{$field} = (double) $obj->{$field};
|
|
| 7011 | - } |
|
| 7012 | - elseif($this->isNull($info)) |
|
| 7013 | - {
|
|
| 7014 | - $val = $obj->{$field};
|
|
| 7015 | - // zero is not null |
|
| 7016 | - $this->{$field} = (is_null($val) || (empty($val) && $val!==0 && $val!=='0') ? null : $val);
|
|
| 7017 | - } |
|
| 7018 | - else |
|
| 7019 | - {
|
|
| 7020 | - $this->{$field} = $obj->{$field};
|
|
| 7021 | - } |
|
| 7022 | - } |
|
| 7023 | - |
|
| 7024 | - // If there is no 'ref' field, we force property ->ref to ->id for a better compatibility with common functions. |
|
| 7025 | - if (! isset($this->fields['ref']) && isset($this->id)) $this->ref = $this->id; |
|
| 7026 | - } |
|
| 7027 | - |
|
| 7028 | - /** |
|
| 7029 | - * Function to concat keys of fields |
|
| 7030 | - * |
|
| 7031 | - * @return string |
|
| 7032 | - */ |
|
| 7033 | - protected function getFieldList() |
|
| 7034 | - {
|
|
| 7035 | - $keys = array_keys($this->fields); |
|
| 7036 | - return implode(',', $keys);
|
|
| 7037 | - } |
|
| 7038 | - |
|
| 7039 | - /** |
|
| 7040 | - * Add quote to field value if necessary |
|
| 7041 | - * |
|
| 7042 | - * @param string|int $value Value to protect |
|
| 7043 | - * @param array $fieldsentry Properties of field |
|
| 7044 | - * @return string |
|
| 7045 | - */ |
|
| 7046 | - protected function quote($value, $fieldsentry) |
|
| 7047 | - {
|
|
| 7048 | - if (is_null($value)) return 'NULL'; |
|
| 7049 | - else if (preg_match('/^(int|double|real)/i', $fieldsentry['type'])) return $this->db->escape("$value");
|
|
| 7050 | - else return "'".$this->db->escape($value)."'"; |
|
| 7051 | - } |
|
| 7052 | - |
|
| 7053 | - |
|
| 7054 | - /** |
|
| 7055 | - * Create object into database |
|
| 7056 | - * |
|
| 7057 | - * @param User $user User that creates |
|
| 7058 | - * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 7059 | - * @return int <0 if KO, Id of created object if OK |
|
| 7060 | - */ |
|
| 7061 | - public function createCommon(User $user, $notrigger = false) |
|
| 7062 | - {
|
|
| 7063 | - global $langs; |
|
| 7064 | - |
|
| 7065 | - $error = 0; |
|
| 7066 | - |
|
| 7067 | - $now=dol_now(); |
|
| 7068 | - |
|
| 7069 | - $fieldvalues = $this->setSaveQuery(); |
|
| 7070 | - if (array_key_exists('date_creation', $fieldvalues) && empty($fieldvalues['date_creation'])) $fieldvalues['date_creation']=$this->db->idate($now);
|
|
| 7071 | - if (array_key_exists('fk_user_creat', $fieldvalues) && ! ($fieldvalues['fk_user_creat'] > 0)) $fieldvalues['fk_user_creat']=$user->id;
|
|
| 7072 | - unset($fieldvalues['rowid']); // The field 'rowid' is reserved field name for autoincrement field so we don't need it into insert. |
|
| 7073 | - |
|
| 7074 | - $keys=array(); |
|
| 7075 | - $values = array(); |
|
| 7076 | - foreach ($fieldvalues as $k => $v) {
|
|
| 7077 | - $keys[$k] = $k; |
|
| 7078 | - $value = $this->fields[$k]; |
|
| 7079 | - $values[$k] = $this->quote($v, $value); |
|
| 7080 | - } |
|
| 7081 | - |
|
| 7082 | - // Clean and check mandatory |
|
| 7083 | - foreach($keys as $key) |
|
| 7084 | - {
|
|
| 7085 | - // If field is an implicit foreign key field |
|
| 7086 | - if (preg_match('/^integer:/i', $this->fields[$key]['type']) && $values[$key] == '-1') $values[$key]='';
|
|
| 7087 | - if (! empty($this->fields[$key]['foreignkey']) && $values[$key] == '-1') $values[$key]=''; |
|
| 7088 | - |
|
| 7089 | - //var_dump($key.'-'.$values[$key].'-'.($this->fields[$key]['notnull'] == 1)); |
|
| 7090 | - if (isset($this->fields[$key]['notnull']) && $this->fields[$key]['notnull'] == 1 && ! isset($values[$key]) && is_null($val['default'])) |
|
| 7091 | - {
|
|
| 7092 | - $error++; |
|
| 7093 | - $this->errors[]=$langs->trans("ErrorFieldRequired", $this->fields[$key]['label']);
|
|
| 7094 | - } |
|
| 7342 | + if (! $error) |
|
| 7343 | + {
|
|
| 7344 | + $sql = 'DELETE FROM '.MAIN_DB_PREFIX.$this->table_element.' WHERE rowid='.$this->id; |
|
| 7095 | 7345 | |
| 7096 | - // If field is an implicit foreign key field |
|
| 7097 | - if (preg_match('/^integer:/i', $this->fields[$key]['type']) && empty($values[$key])) $values[$key]='null';
|
|
| 7098 | - if (! empty($this->fields[$key]['foreignkey']) && empty($values[$key])) $values[$key]='null'; |
|
| 7099 | - } |
|
| 7346 | + $res = $this->db->query($sql); |
|
| 7347 | + if($res===false) {
|
|
| 7348 | + $error++; |
|
| 7349 | + $this->errors[] = $this->db->lasterror(); |
|
| 7350 | + } |
|
| 7351 | + } |
|
| 7100 | 7352 | |
| 7101 | - if ($error) return -1; |
|
| 7353 | + // Commit or rollback |
|
| 7354 | + if ($error) {
|
|
| 7355 | + $this->db->rollback(); |
|
| 7356 | + return -1; |
|
| 7357 | + } else {
|
|
| 7358 | + $this->db->commit(); |
|
| 7359 | + return 1; |
|
| 7360 | + } |
|
| 7361 | + } |
|
| 7102 | 7362 | |
| 7103 | - $this->db->begin(); |
|
| 7363 | + /** |
|
| 7364 | + * Initialise object with example values |
|
| 7365 | + * Id must be 0 if object instance is a specimen |
|
| 7366 | + * |
|
| 7367 | + * @return void |
|
| 7368 | + */ |
|
| 7369 | + public function initAsSpecimenCommon() |
|
| 7370 | + {
|
|
| 7371 | + $this->id = 0; |
|
| 7104 | 7372 | |
| 7105 | - if (! $error) |
|
| 7106 | - {
|
|
| 7107 | - $sql = 'INSERT INTO '.MAIN_DB_PREFIX.$this->table_element; |
|
| 7108 | - $sql.= ' ('.implode( ", ", $keys ).')';
|
|
| 7109 | - $sql.= ' VALUES ('.implode( ", ", $values ).')';
|
|
| 7373 | + // TODO... |
|
| 7374 | + } |
|
| 7110 | 7375 | |
| 7111 | - $res = $this->db->query($sql); |
|
| 7112 | - if ($res===false) {
|
|
| 7113 | - $error++; |
|
| 7114 | - $this->errors[] = $this->db->lasterror(); |
|
| 7115 | - } |
|
| 7116 | - } |
|
| 7117 | - |
|
| 7118 | - if (! $error) |
|
| 7119 | - {
|
|
| 7120 | - $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX . $this->table_element); |
|
| 7121 | - } |
|
| 7122 | - |
|
| 7123 | - // Create extrafields |
|
| 7124 | - if (! $error) |
|
| 7125 | - {
|
|
| 7126 | - $result=$this->insertExtraFields(); |
|
| 7127 | - if ($result < 0) $error++; |
|
| 7128 | - } |
|
| 7129 | - |
|
| 7130 | - // Triggers |
|
| 7131 | - if (! $error && ! $notrigger) |
|
| 7132 | - {
|
|
| 7133 | - // Call triggers |
|
| 7134 | - $result=$this->call_trigger(strtoupper(get_class($this)).'_CREATE',$user); |
|
| 7135 | - if ($result < 0) { $error++; }
|
|
| 7136 | - // End call triggers |
|
| 7137 | - } |
|
| 7138 | - |
|
| 7139 | - // Commit or rollback |
|
| 7140 | - if ($error) {
|
|
| 7141 | - $this->db->rollback(); |
|
| 7142 | - return -1; |
|
| 7143 | - } else {
|
|
| 7144 | - $this->db->commit(); |
|
| 7145 | - return $this->id; |
|
| 7146 | - } |
|
| 7147 | - } |
|
| 7148 | - |
|
| 7149 | - |
|
| 7150 | - /** |
|
| 7151 | - * Load object in memory from the database |
|
| 7152 | - * |
|
| 7153 | - * @param int $id Id object |
|
| 7154 | - * @param string $ref Ref |
|
| 7155 | - * @param string $morewhere More SQL filters (' AND ...')
|
|
| 7156 | - * @return int <0 if KO, 0 if not found, >0 if OK |
|
| 7157 | - */ |
|
| 7158 | - public function fetchCommon($id, $ref = null, $morewhere = '') |
|
| 7159 | - {
|
|
| 7160 | - if (empty($id) && empty($ref) && empty($morewhere)) return -1; |
|
| 7161 | - |
|
| 7162 | - $sql = 'SELECT '.$this->getFieldList(); |
|
| 7163 | - $sql.= ' FROM '.MAIN_DB_PREFIX.$this->table_element; |
|
| 7164 | - |
|
| 7165 | - if (!empty($id)) $sql.= ' WHERE rowid = '.$id; |
|
| 7166 | - elseif (!empty($ref)) $sql.= " WHERE ref = ".$this->quote($ref, $this->fields['ref']); |
|
| 7167 | - else $sql.=' WHERE 1 = 1'; // usage with empty id and empty ref is very rare |
|
| 7168 | - if ($morewhere) $sql.= $morewhere; |
|
| 7169 | - $sql.=' LIMIT 1'; // This is a fetch, to be sure to get only one record |
|
| 7170 | - |
|
| 7171 | - $res = $this->db->query($sql); |
|
| 7172 | - if ($res) |
|
| 7173 | - {
|
|
| 7174 | - $obj = $this->db->fetch_object($res); |
|
| 7175 | - if ($obj) |
|
| 7176 | - {
|
|
| 7177 | - $this->setVarsFromFetchObj($obj); |
|
| 7178 | - return $this->id; |
|
| 7179 | - } |
|
| 7180 | - else |
|
| 7181 | - {
|
|
| 7182 | - return 0; |
|
| 7183 | - } |
|
| 7184 | - } |
|
| 7185 | - else |
|
| 7186 | - {
|
|
| 7187 | - $this->error = $this->db->lasterror(); |
|
| 7188 | - $this->errors[] = $this->error; |
|
| 7189 | - return -1; |
|
| 7190 | - } |
|
| 7191 | - } |
|
| 7192 | - |
|
| 7193 | - /** |
|
| 7194 | - * Update object into database |
|
| 7195 | - * |
|
| 7196 | - * @param User $user User that modifies |
|
| 7197 | - * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 7198 | - * @return int <0 if KO, >0 if OK |
|
| 7199 | - */ |
|
| 7200 | - public function updateCommon(User $user, $notrigger = false) |
|
| 7201 | - {
|
|
| 7202 | - global $conf, $langs; |
|
| 7203 | - |
|
| 7204 | - $error = 0; |
|
| 7205 | - |
|
| 7206 | - $now=dol_now(); |
|
| 7207 | - |
|
| 7208 | - $fieldvalues = $this->setSaveQuery(); |
|
| 7209 | - if (array_key_exists('date_modification', $fieldvalues) && empty($fieldvalues['date_modification'])) $fieldvalues['date_modification']=$this->db->idate($now);
|
|
| 7210 | - if (array_key_exists('fk_user_modif', $fieldvalues) && ! ($fieldvalues['fk_user_modif'] > 0)) $fieldvalues['fk_user_modif']=$user->id;
|
|
| 7211 | - unset($fieldvalues['rowid']); // The field 'rowid' is reserved field name for autoincrement field so we don't need it into update. |
|
| 7212 | - |
|
| 7213 | - $keys=array(); |
|
| 7214 | - $values = array(); |
|
| 7215 | - foreach ($fieldvalues as $k => $v) {
|
|
| 7216 | - $keys[$k] = $k; |
|
| 7217 | - $value = $this->fields[$k]; |
|
| 7218 | - $values[$k] = $this->quote($v, $value); |
|
| 7219 | - $tmp[] = $k.'='.$this->quote($v, $this->fields[$k]); |
|
| 7220 | - } |
|
| 7221 | - |
|
| 7222 | - // Clean and check mandatory |
|
| 7223 | - foreach($keys as $key) |
|
| 7224 | - {
|
|
| 7225 | - if (preg_match('/^integer:/i', $this->fields[$key]['type']) && $values[$key] == '-1') $values[$key]=''; // This is an implicit foreign key field
|
|
| 7226 | - if (! empty($this->fields[$key]['foreignkey']) && $values[$key] == '-1') $values[$key]=''; // This is an explicit foreign key field |
|
| 7227 | - |
|
| 7228 | - //var_dump($key.'-'.$values[$key].'-'.($this->fields[$key]['notnull'] == 1)); |
|
| 7229 | - /* |
|
| 7230 | - if ($this->fields[$key]['notnull'] == 1 && empty($values[$key])) |
|
| 7231 | - {
|
|
| 7232 | - $error++; |
|
| 7233 | - $this->errors[]=$langs->trans("ErrorFieldRequired", $this->fields[$key]['label']);
|
|
| 7234 | - }*/ |
|
| 7235 | - } |
|
| 7236 | 7376 | |
| 7237 | - $sql = 'UPDATE '.MAIN_DB_PREFIX.$this->table_element.' SET '.implode( ',', $tmp ).' WHERE rowid='.$this->id ; |
|
| 7377 | + /* Part for comments */ |
|
| 7238 | 7378 | |
| 7239 | - $this->db->begin(); |
|
| 7240 | - if (! $error) |
|
| 7241 | - {
|
|
| 7242 | - $res = $this->db->query($sql); |
|
| 7243 | - if ($res===false) |
|
| 7244 | - {
|
|
| 7245 | - $error++; |
|
| 7246 | - $this->errors[] = $this->db->lasterror(); |
|
| 7247 | - } |
|
| 7248 | - } |
|
| 7249 | - |
|
| 7250 | - // Update extrafield |
|
| 7251 | - if (!$error && empty(Globals::$conf->global->MAIN_EXTRAFIELDS_DISABLED) && is_array($this->array_options) && count($this->array_options) > 0) {
|
|
| 7252 | - $result=$this->insertExtraFields(); |
|
| 7253 | - if ($result < 0) |
|
| 7254 | - {
|
|
| 7255 | - $error++; |
|
| 7256 | - } |
|
| 7257 | - } |
|
| 7258 | - |
|
| 7259 | - // Triggers |
|
| 7260 | - if (! $error && ! $notrigger) |
|
| 7261 | - {
|
|
| 7262 | - // Call triggers |
|
| 7263 | - $result=$this->call_trigger(strtoupper(get_class($this)).'_MODIFY',$user); |
|
| 7264 | - if ($result < 0) { $error++; } //Do also here what you must do to rollback action if trigger fail
|
|
| 7265 | - // End call triggers |
|
| 7266 | - } |
|
| 7267 | - |
|
| 7268 | - // Commit or rollback |
|
| 7269 | - if ($error) {
|
|
| 7270 | - $this->db->rollback(); |
|
| 7271 | - return -1; |
|
| 7272 | - } else {
|
|
| 7273 | - $this->db->commit(); |
|
| 7274 | - return $this->id; |
|
| 7275 | - } |
|
| 7276 | - } |
|
| 7277 | - |
|
| 7278 | - /** |
|
| 7279 | - * Delete object in database |
|
| 7280 | - * |
|
| 7281 | - * @param User $user User that deletes |
|
| 7282 | - * @param bool $notrigger false=launch triggers after, true=disable triggers |
|
| 7283 | - * @param int $forcechilddeletion 0=no, 1=Force deletion of children |
|
| 7284 | - * @return int <=0 if KO, >0 if OK |
|
| 7285 | - */ |
|
| 7286 | - public function deleteCommon(User $user, $notrigger=false, $forcechilddeletion=0) |
|
| 7287 | - {
|
|
| 7288 | - $error=0; |
|
| 7289 | - |
|
| 7290 | - $this->db->begin(); |
|
| 7291 | - |
|
| 7292 | - if ($forcechilddeletion) |
|
| 7293 | - {
|
|
| 7294 | - foreach($this->childtables as $table) |
|
| 7295 | - {
|
|
| 7296 | - $sql = 'DELETE FROM '.MAIN_DB_PREFIX.$table.' WHERE '.$this->fk_element.' = '.$this->id; |
|
| 7297 | - $resql = $this->db->query($sql); |
|
| 7298 | - if (! $resql) |
|
| 7299 | - {
|
|
| 7300 | - $this->error=$this->db->lasterror(); |
|
| 7301 | - $this->errors[]=$this->error; |
|
| 7302 | - $this->db->rollback(); |
|
| 7303 | - return -1; |
|
| 7304 | - } |
|
| 7305 | - } |
|
| 7306 | - } |
|
| 7307 | - elseif (! empty($this->fk_element) && ! empty($this->childtables)) // If object has childs linked with a foreign key field, we check all child tables. |
|
| 7308 | - {
|
|
| 7309 | - $objectisused = $this->isObjectUsed($this->id); |
|
| 7310 | - if (! empty($objectisused)) |
|
| 7311 | - {
|
|
| 7312 | - dol_syslog(get_class($this)."::deleteCommon Can't delete record as it has some child", LOG_WARNING); |
|
| 7313 | - $this->error='ErrorRecordHasChildren'; |
|
| 7314 | - $this->errors[]=$this->error; |
|
| 7315 | - $this->db->rollback(); |
|
| 7316 | - return 0; |
|
| 7317 | - } |
|
| 7318 | - } |
|
| 7319 | - |
|
| 7320 | - if (! $error) {
|
|
| 7321 | - if (! $notrigger) {
|
|
| 7322 | - // Call triggers |
|
| 7323 | - $result=$this->call_trigger(strtoupper(get_class($this)).'_DELETE', $user); |
|
| 7324 | - if ($result < 0) { $error++; } // Do also here what you must do to rollback action if trigger fail
|
|
| 7325 | - // End call triggers |
|
| 7326 | - } |
|
| 7327 | - } |
|
| 7328 | - |
|
| 7329 | - if (! $error && ! empty($this->isextrafieldmanaged)) |
|
| 7330 | - {
|
|
| 7331 | - $sql = "DELETE FROM " . MAIN_DB_PREFIX . $this->table_element."_extrafields"; |
|
| 7332 | - $sql.= " WHERE fk_object=" . $this->id; |
|
| 7333 | - |
|
| 7334 | - $resql = $this->db->query($sql); |
|
| 7335 | - if (! $resql) |
|
| 7336 | - {
|
|
| 7337 | - $this->errors[] = $this->db->lasterror(); |
|
| 7338 | - $error++; |
|
| 7339 | - } |
|
| 7340 | - } |
|
| 7379 | + /** |
|
| 7380 | + * Load comments linked with current task |
|
| 7381 | + * @return boolean 1 if ok |
|
| 7382 | + */ |
|
| 7383 | + public function fetchComments() |
|
| 7384 | + {
|
|
| 7385 | + require_once DOL_DOCUMENT_ROOT.'/core/class/comment.class.php'; |
|
| 7341 | 7386 | |
| 7342 | - if (! $error) |
|
| 7343 | - {
|
|
| 7344 | - $sql = 'DELETE FROM '.MAIN_DB_PREFIX.$this->table_element.' WHERE rowid='.$this->id; |
|
| 7387 | + $comment = new Comment($this->db); |
|
| 7388 | + $result=$comment->fetchAllFor($this->element, $this->id); |
|
| 7389 | + if ($result<0) {
|
|
| 7390 | + $this->errors=array_merge($this->errors, $comment->errors); |
|
| 7391 | + return -1; |
|
| 7392 | + } else {
|
|
| 7393 | + $this->comments = $comment->comments; |
|
| 7394 | + } |
|
| 7395 | + return count($this->comments); |
|
| 7396 | + } |
|
| 7345 | 7397 | |
| 7346 | - $res = $this->db->query($sql); |
|
| 7347 | - if($res===false) {
|
|
| 7348 | - $error++; |
|
| 7349 | - $this->errors[] = $this->db->lasterror(); |
|
| 7350 | - } |
|
| 7351 | - } |
|
| 7352 | - |
|
| 7353 | - // Commit or rollback |
|
| 7354 | - if ($error) {
|
|
| 7355 | - $this->db->rollback(); |
|
| 7356 | - return -1; |
|
| 7357 | - } else {
|
|
| 7358 | - $this->db->commit(); |
|
| 7359 | - return 1; |
|
| 7360 | - } |
|
| 7361 | - } |
|
| 7362 | - |
|
| 7363 | - /** |
|
| 7364 | - * Initialise object with example values |
|
| 7365 | - * Id must be 0 if object instance is a specimen |
|
| 7366 | - * |
|
| 7367 | - * @return void |
|
| 7368 | - */ |
|
| 7369 | - public function initAsSpecimenCommon() |
|
| 7370 | - {
|
|
| 7371 | - $this->id = 0; |
|
| 7372 | - |
|
| 7373 | - // TODO... |
|
| 7374 | - } |
|
| 7375 | - |
|
| 7376 | - |
|
| 7377 | - /* Part for comments */ |
|
| 7378 | - |
|
| 7379 | - /** |
|
| 7380 | - * Load comments linked with current task |
|
| 7381 | - * @return boolean 1 if ok |
|
| 7382 | - */ |
|
| 7383 | - public function fetchComments() |
|
| 7384 | - {
|
|
| 7385 | - require_once DOL_DOCUMENT_ROOT.'/core/class/comment.class.php'; |
|
| 7386 | - |
|
| 7387 | - $comment = new Comment($this->db); |
|
| 7388 | - $result=$comment->fetchAllFor($this->element, $this->id); |
|
| 7389 | - if ($result<0) {
|
|
| 7390 | - $this->errors=array_merge($this->errors, $comment->errors); |
|
| 7391 | - return -1; |
|
| 7392 | - } else {
|
|
| 7393 | - $this->comments = $comment->comments; |
|
| 7394 | - } |
|
| 7395 | - return count($this->comments); |
|
| 7396 | - } |
|
| 7397 | - |
|
| 7398 | - /** |
|
| 7399 | - * Return nb comments already posted |
|
| 7400 | - * |
|
| 7401 | - * @return int |
|
| 7402 | - */ |
|
| 7403 | - public function getNbComments() |
|
| 7404 | - {
|
|
| 7405 | - return count($this->comments); |
|
| 7406 | - } |
|
| 7398 | + /** |
|
| 7399 | + * Return nb comments already posted |
|
| 7400 | + * |
|
| 7401 | + * @return int |
|
| 7402 | + */ |
|
| 7403 | + public function getNbComments() |
|
| 7404 | + {
|
|
| 7405 | + return count($this->comments); |
|
| 7406 | + } |
|
| 7407 | 7407 | |
| 7408 | 7408 | /** |
| 7409 | 7409 | * Trim object parameters |
@@ -51,70 +51,70 @@ discard block |
||
| 51 | 51 | */ |
| 52 | 52 | function checkLoginPassEntity($usertotest,$passwordtotest,$entitytotest,$authmode) |
| 53 | 53 | { |
| 54 | - global $conf,$langs; |
|
| 54 | + global $conf,$langs; |
|
| 55 | 55 | //global $dolauthmode; // To return authentication finally used |
| 56 | 56 | |
| 57 | - // Check parameters |
|
| 58 | - if ($entitytotest == '') $entitytotest=1; |
|
| 57 | + // Check parameters |
|
| 58 | + if ($entitytotest == '') $entitytotest=1; |
|
| 59 | 59 | |
| 60 | 60 | dol_syslog("checkLoginPassEntity usertotest=".$usertotest." entitytotest=".$entitytotest." authmode=".join(',',$authmode)); |
| 61 | - $login = ''; |
|
| 62 | - |
|
| 63 | - // Validation of login/pass/entity with standard modules |
|
| 64 | - if (empty($login)) |
|
| 65 | - { |
|
| 66 | - $test=true; |
|
| 67 | - foreach($authmode as $mode) |
|
| 68 | - { |
|
| 69 | - if ($test && $mode && ! $login) |
|
| 70 | - { |
|
| 71 | - // Validation of login/pass/entity for mode $mode |
|
| 72 | - $mode=trim($mode); |
|
| 73 | - $authfile='functions_'.$mode.'.php'; |
|
| 74 | - $fullauthfile=''; |
|
| 75 | - |
|
| 76 | - $dirlogin=array_merge(array("/core/login"),(array) $conf->modules_parts['login']); |
|
| 77 | - foreach($dirlogin as $reldir) |
|
| 78 | - { |
|
| 79 | - $dir=dol_buildpath($reldir,0); |
|
| 80 | - $newdir=dol_osencode($dir); |
|
| 81 | - |
|
| 82 | - // Check if file found (do not use dol_is_file to avoid loading files.lib.php) |
|
| 83 | - $tmpnewauthfile = $newdir.(preg_match('/\/$/',$newdir)?'':'/').$authfile; |
|
| 84 | - if (is_file($tmpnewauthfile)) $fullauthfile=$tmpnewauthfile; |
|
| 85 | - } |
|
| 86 | - |
|
| 87 | - $result=false; |
|
| 88 | - if ($fullauthfile) $result=include_once $fullauthfile; |
|
| 89 | - if ($fullauthfile && $result) |
|
| 90 | - { |
|
| 91 | - // Call function to check user/password |
|
| 92 | - $function='check_user_password_'.$mode; |
|
| 93 | - $login=call_user_func($function, $usertotest, $passwordtotest, $entitytotest); |
|
| 94 | - if ($login) // Login is successfull |
|
| 95 | - { |
|
| 96 | - $test=false; // To stop once at first login success |
|
| 97 | - $conf->authmode=$mode; // This properties is defined only when logged to say what mode was successfully used |
|
| 98 | - $dol_tz=GETPOST('tz'); |
|
| 99 | - $dol_dst=GETPOST('dst'); |
|
| 100 | - $dol_screenwidth=GETPOST('screenwidth'); |
|
| 101 | - $dol_screenheight=GETPOST('screenheight'); |
|
| 102 | - } |
|
| 103 | - } |
|
| 104 | - else |
|
| 105 | - { |
|
| 106 | - dol_syslog("Authentification ko - failed to load file '".$authfile."'", LOG_ERR); |
|
| 107 | - sleep(1); |
|
| 108 | - // Load translation files required by the page |
|
| 61 | + $login = ''; |
|
| 62 | + |
|
| 63 | + // Validation of login/pass/entity with standard modules |
|
| 64 | + if (empty($login)) |
|
| 65 | + { |
|
| 66 | + $test=true; |
|
| 67 | + foreach($authmode as $mode) |
|
| 68 | + { |
|
| 69 | + if ($test && $mode && ! $login) |
|
| 70 | + { |
|
| 71 | + // Validation of login/pass/entity for mode $mode |
|
| 72 | + $mode=trim($mode); |
|
| 73 | + $authfile='functions_'.$mode.'.php'; |
|
| 74 | + $fullauthfile=''; |
|
| 75 | + |
|
| 76 | + $dirlogin=array_merge(array("/core/login"),(array) $conf->modules_parts['login']); |
|
| 77 | + foreach($dirlogin as $reldir) |
|
| 78 | + { |
|
| 79 | + $dir=dol_buildpath($reldir,0); |
|
| 80 | + $newdir=dol_osencode($dir); |
|
| 81 | + |
|
| 82 | + // Check if file found (do not use dol_is_file to avoid loading files.lib.php) |
|
| 83 | + $tmpnewauthfile = $newdir.(preg_match('/\/$/',$newdir)?'':'/').$authfile; |
|
| 84 | + if (is_file($tmpnewauthfile)) $fullauthfile=$tmpnewauthfile; |
|
| 85 | + } |
|
| 86 | + |
|
| 87 | + $result=false; |
|
| 88 | + if ($fullauthfile) $result=include_once $fullauthfile; |
|
| 89 | + if ($fullauthfile && $result) |
|
| 90 | + { |
|
| 91 | + // Call function to check user/password |
|
| 92 | + $function='check_user_password_'.$mode; |
|
| 93 | + $login=call_user_func($function, $usertotest, $passwordtotest, $entitytotest); |
|
| 94 | + if ($login) // Login is successfull |
|
| 95 | + { |
|
| 96 | + $test=false; // To stop once at first login success |
|
| 97 | + $conf->authmode=$mode; // This properties is defined only when logged to say what mode was successfully used |
|
| 98 | + $dol_tz=GETPOST('tz'); |
|
| 99 | + $dol_dst=GETPOST('dst'); |
|
| 100 | + $dol_screenwidth=GETPOST('screenwidth'); |
|
| 101 | + $dol_screenheight=GETPOST('screenheight'); |
|
| 102 | + } |
|
| 103 | + } |
|
| 104 | + else |
|
| 105 | + { |
|
| 106 | + dol_syslog("Authentification ko - failed to load file '".$authfile."'", LOG_ERR); |
|
| 107 | + sleep(1); |
|
| 108 | + // Load translation files required by the page |
|
| 109 | 109 | $langs->loadLangs(array('other', 'main', 'errors')); |
| 110 | 110 | |
| 111 | - $_SESSION["dol_loginmesg"]=$langs->trans("ErrorFailedToLoadLoginFileForMode", $mode); |
|
| 112 | - } |
|
| 113 | - } |
|
| 114 | - } |
|
| 115 | - } |
|
| 111 | + $_SESSION["dol_loginmesg"]=$langs->trans("ErrorFailedToLoadLoginFileForMode", $mode); |
|
| 112 | + } |
|
| 113 | + } |
|
| 114 | + } |
|
| 115 | + } |
|
| 116 | 116 | |
| 117 | - return $login; |
|
| 117 | + return $login; |
|
| 118 | 118 | } |
| 119 | 119 | |
| 120 | 120 | |
@@ -130,9 +130,9 @@ discard block |
||
| 130 | 130 | * @return void |
| 131 | 131 | */ |
| 132 | 132 | function dol_loginfunction($langs,$conf,$mysoc) |
| 133 | - { |
|
| 134 | - global $dolibarr_main_demo,$db; |
|
| 135 | - global $smartphone,$hookmanager; |
|
| 133 | + { |
|
| 134 | + global $dolibarr_main_demo,$db; |
|
| 135 | + global $smartphone,$hookmanager; |
|
| 136 | 136 | |
| 137 | 137 | $langs->loadLangs(array("main", "other", "help", "admin")); |
| 138 | 138 | |
@@ -143,16 +143,16 @@ discard block |
||
| 143 | 143 | |
| 144 | 144 | $session_name=session_name(); // Get current session name |
| 145 | 145 | |
| 146 | - $dol_url_root = DOL_URL_ROOT; |
|
| 146 | + $dol_url_root = DOL_URL_ROOT; |
|
| 147 | 147 | |
| 148 | - // Title |
|
| 149 | - $appli=constant('DOL_APPLICATION_TITLE'); |
|
| 150 | - $title=$appli.' '.constant('DOL_VERSION'); |
|
| 151 | - if (! empty($conf->global->MAIN_APPLICATION_TITLE)) $title=$conf->global->MAIN_APPLICATION_TITLE; |
|
| 152 | - $titletruedolibarrversion=constant('DOL_VERSION'); // $title used by login template after the @ to inform of true Dolibarr version |
|
| 148 | + // Title |
|
| 149 | + $appli=constant('DOL_APPLICATION_TITLE'); |
|
| 150 | + $title=$appli.' '.constant('DOL_VERSION'); |
|
| 151 | + if (! empty($conf->global->MAIN_APPLICATION_TITLE)) $title=$conf->global->MAIN_APPLICATION_TITLE; |
|
| 152 | + $titletruedolibarrversion=constant('DOL_VERSION'); // $title used by login template after the @ to inform of true Dolibarr version |
|
| 153 | 153 | |
| 154 | - // Note: $conf->css looks like '/theme/eldy/style.css.php' |
|
| 155 | - /* |
|
| 154 | + // Note: $conf->css looks like '/theme/eldy/style.css.php' |
|
| 155 | + /* |
|
| 156 | 156 | $conf->css = "/theme/".(GETPOST('theme','alpha')?GETPOST('theme','alpha'):$conf->theme)."/style.css.php"; |
| 157 | 157 | $themepath=dol_buildpath($conf->css,1); |
| 158 | 158 | if (! empty($conf->modules_parts['theme'])) // Using this feature slow down application |
@@ -169,138 +169,138 @@ discard block |
||
| 169 | 169 | $conf_css = $themepath."?lang=".$langs->defaultlang; |
| 170 | 170 | */ |
| 171 | 171 | |
| 172 | - // Select templates dir |
|
| 173 | - if (! empty($conf->modules_parts['tpl'])) // Using this feature slow down application |
|
| 174 | - { |
|
| 175 | - $dirtpls=array_merge($conf->modules_parts['tpl'],array('/core/tpl/')); |
|
| 176 | - foreach($dirtpls as $reldir) |
|
| 177 | - { |
|
| 178 | - $tmp=dol_buildpath($reldir.'login.tpl.php'); |
|
| 179 | - if (file_exists($tmp)) { $template_dir=preg_replace('/login\.tpl\.php$/','',$tmp); break; } |
|
| 180 | - } |
|
| 181 | - } |
|
| 182 | - else |
|
| 183 | - { |
|
| 184 | - $template_dir = DOL_DOCUMENT_ROOT."/core/tpl/"; |
|
| 185 | - } |
|
| 172 | + // Select templates dir |
|
| 173 | + if (! empty($conf->modules_parts['tpl'])) // Using this feature slow down application |
|
| 174 | + { |
|
| 175 | + $dirtpls=array_merge($conf->modules_parts['tpl'],array('/core/tpl/')); |
|
| 176 | + foreach($dirtpls as $reldir) |
|
| 177 | + { |
|
| 178 | + $tmp=dol_buildpath($reldir.'login.tpl.php'); |
|
| 179 | + if (file_exists($tmp)) { $template_dir=preg_replace('/login\.tpl\.php$/','',$tmp); break; } |
|
| 180 | + } |
|
| 181 | + } |
|
| 182 | + else |
|
| 183 | + { |
|
| 184 | + $template_dir = DOL_DOCUMENT_ROOT."/core/tpl/"; |
|
| 185 | + } |
|
| 186 | 186 | |
| 187 | - // Set cookie for timeout management |
|
| 188 | - $prefix=dol_getprefix(''); |
|
| 189 | - $sessiontimeout='DOLSESSTIMEOUT_'.$prefix; |
|
| 190 | - if (! empty($conf->global->MAIN_SESSION_TIMEOUT)) setcookie($sessiontimeout, $conf->global->MAIN_SESSION_TIMEOUT, 0, "/", null, false, true); |
|
| 187 | + // Set cookie for timeout management |
|
| 188 | + $prefix=dol_getprefix(''); |
|
| 189 | + $sessiontimeout='DOLSESSTIMEOUT_'.$prefix; |
|
| 190 | + if (! empty($conf->global->MAIN_SESSION_TIMEOUT)) setcookie($sessiontimeout, $conf->global->MAIN_SESSION_TIMEOUT, 0, "/", null, false, true); |
|
| 191 | 191 | |
| 192 | - if (GETPOST('urlfrom','alpha')) $_SESSION["urlfrom"]=GETPOST('urlfrom','alpha'); |
|
| 193 | - else unset($_SESSION["urlfrom"]); |
|
| 192 | + if (GETPOST('urlfrom','alpha')) $_SESSION["urlfrom"]=GETPOST('urlfrom','alpha'); |
|
| 193 | + else unset($_SESSION["urlfrom"]); |
|
| 194 | 194 | |
| 195 | - if (! GETPOST("username",'alpha')) $focus_element='username'; |
|
| 196 | - else $focus_element='password'; |
|
| 195 | + if (! GETPOST("username",'alpha')) $focus_element='username'; |
|
| 196 | + else $focus_element='password'; |
|
| 197 | 197 | |
| 198 | - $demologin=''; |
|
| 199 | - $demopassword=''; |
|
| 200 | - if (! empty($dolibarr_main_demo)) |
|
| 201 | - { |
|
| 202 | - $tab=explode(',',$dolibarr_main_demo); |
|
| 203 | - $demologin=$tab[0]; |
|
| 204 | - $demopassword=$tab[1]; |
|
| 205 | - } |
|
| 198 | + $demologin=''; |
|
| 199 | + $demopassword=''; |
|
| 200 | + if (! empty($dolibarr_main_demo)) |
|
| 201 | + { |
|
| 202 | + $tab=explode(',',$dolibarr_main_demo); |
|
| 203 | + $demologin=$tab[0]; |
|
| 204 | + $demopassword=$tab[1]; |
|
| 205 | + } |
|
| 206 | 206 | |
| 207 | - // Execute hook getLoginPageOptions (for table) |
|
| 208 | - $parameters=array('entity' => GETPOST('entity','int')); |
|
| 209 | - $reshook = $hookmanager->executeHooks('getLoginPageOptions',$parameters); // Note that $action and $object may have been modified by some hooks. |
|
| 210 | - if (is_array($hookmanager->resArray) && ! empty($hookmanager->resArray)) { |
|
| 211 | - $morelogincontent = $hookmanager->resArray; // (deprecated) For compatibility |
|
| 212 | - } else { |
|
| 213 | - $morelogincontent = $hookmanager->resPrint; |
|
| 214 | - } |
|
| 207 | + // Execute hook getLoginPageOptions (for table) |
|
| 208 | + $parameters=array('entity' => GETPOST('entity','int')); |
|
| 209 | + $reshook = $hookmanager->executeHooks('getLoginPageOptions',$parameters); // Note that $action and $object may have been modified by some hooks. |
|
| 210 | + if (is_array($hookmanager->resArray) && ! empty($hookmanager->resArray)) { |
|
| 211 | + $morelogincontent = $hookmanager->resArray; // (deprecated) For compatibility |
|
| 212 | + } else { |
|
| 213 | + $morelogincontent = $hookmanager->resPrint; |
|
| 214 | + } |
|
| 215 | 215 | |
| 216 | - // Execute hook getLoginPageExtraOptions (eg for js) |
|
| 217 | - $parameters=array('entity' => GETPOST('entity','int')); |
|
| 218 | - $reshook = $hookmanager->executeHooks('getLoginPageExtraOptions',$parameters); // Note that $action and $object may have been modified by some hooks. |
|
| 219 | - $moreloginextracontent = $hookmanager->resPrint; |
|
| 216 | + // Execute hook getLoginPageExtraOptions (eg for js) |
|
| 217 | + $parameters=array('entity' => GETPOST('entity','int')); |
|
| 218 | + $reshook = $hookmanager->executeHooks('getLoginPageExtraOptions',$parameters); // Note that $action and $object may have been modified by some hooks. |
|
| 219 | + $moreloginextracontent = $hookmanager->resPrint; |
|
| 220 | 220 | |
| 221 | - // Login |
|
| 222 | - $login = (! empty($hookmanager->resArray['username']) ? $hookmanager->resArray['username'] : (GETPOST("username","alpha") ? GETPOST("username","alpha") : $demologin)); |
|
| 223 | - $password = $demopassword; |
|
| 221 | + // Login |
|
| 222 | + $login = (! empty($hookmanager->resArray['username']) ? $hookmanager->resArray['username'] : (GETPOST("username","alpha") ? GETPOST("username","alpha") : $demologin)); |
|
| 223 | + $password = $demopassword; |
|
| 224 | 224 | |
| 225 | - // Show logo (search in order: small company logo, large company logo, theme logo, common logo) |
|
| 226 | - $width=0; |
|
| 227 | - $urllogo = DOL_BASE_URI . '/theme/login_logo.png'; |
|
| 225 | + // Show logo (search in order: small company logo, large company logo, theme logo, common logo) |
|
| 226 | + $width=0; |
|
| 227 | + $urllogo = DOL_BASE_URI . '/theme/login_logo.png'; |
|
| 228 | 228 | |
| 229 | 229 | if (! empty($mysoc->logo_small) && is_readable($conf->mycompany->dir_output.'/logos/thumbs/'.$mysoc->logo_small)) |
| 230 | - { |
|
| 231 | - $urllogo=DOL_URL_ROOT.'/viewimage.php?cache=1&modulepart=mycompany&file='.urlencode('logos/thumbs/'.$mysoc->logo_small); |
|
| 232 | - } |
|
| 233 | - elseif (! empty($mysoc->logo) && is_readable($conf->mycompany->dir_output.'/logos/'.$mysoc->logo)) |
|
| 234 | - { |
|
| 235 | - $urllogo=DOL_URL_ROOT.'/viewimage.php?cache=1&modulepart=mycompany&file='.urlencode('logos/'.$mysoc->logo); |
|
| 236 | - $width=128; |
|
| 237 | - } |
|
| 238 | - elseif (is_readable(DOL_BASE_URI . '/theme/' . $conf->theme . '/img/dolibarr_logo.png')) { |
|
| 239 | - $urllogo = DOL_BASE_URI . '/theme/' . $conf->theme . '/img/dolibarr_logo.png'; |
|
| 230 | + { |
|
| 231 | + $urllogo=DOL_URL_ROOT.'/viewimage.php?cache=1&modulepart=mycompany&file='.urlencode('logos/thumbs/'.$mysoc->logo_small); |
|
| 240 | 232 | } |
| 241 | - elseif (is_readable(DOL_BASE_URI . '/theme/dolibarr_logo.png')) { |
|
| 242 | - $urllogo = DOL_BASE_URI . '/theme/dolibarr_logo.png'; |
|
| 233 | + elseif (! empty($mysoc->logo) && is_readable($conf->mycompany->dir_output.'/logos/'.$mysoc->logo)) |
|
| 234 | + { |
|
| 235 | + $urllogo=DOL_URL_ROOT.'/viewimage.php?cache=1&modulepart=mycompany&file='.urlencode('logos/'.$mysoc->logo); |
|
| 236 | + $width=128; |
|
| 237 | + } |
|
| 238 | + elseif (is_readable(DOL_BASE_URI . '/theme/' . $conf->theme . '/img/dolibarr_logo.png')) { |
|
| 239 | + $urllogo = DOL_BASE_URI . '/theme/' . $conf->theme . '/img/dolibarr_logo.png'; |
|
| 240 | + } |
|
| 241 | + elseif (is_readable(DOL_BASE_URI . '/theme/dolibarr_logo.png')) { |
|
| 242 | + $urllogo = DOL_BASE_URI . '/theme/dolibarr_logo.png'; |
|
| 243 | 243 | } |
| 244 | 244 | |
| 245 | - // Security graphical code |
|
| 246 | - $captcha=0; |
|
| 247 | - $captcha_refresh=''; |
|
| 248 | - if (function_exists("imagecreatefrompng") && ! empty($conf->global->MAIN_SECURITY_ENABLECAPTCHA)) |
|
| 249 | - { |
|
| 250 | - $captcha=1; |
|
| 251 | - $captcha_refresh=img_picto($langs->trans("Refresh"),'refresh','id="captcha_refresh_img"'); |
|
| 252 | - } |
|
| 253 | - |
|
| 254 | - // Extra link |
|
| 255 | - $forgetpasslink=0; |
|
| 256 | - $helpcenterlink=0; |
|
| 257 | - if (empty($conf->global->MAIN_SECURITY_DISABLEFORGETPASSLINK) || empty($conf->global->MAIN_HELPCENTER_DISABLELINK)) |
|
| 258 | - { |
|
| 259 | - if (empty($conf->global->MAIN_SECURITY_DISABLEFORGETPASSLINK)) |
|
| 260 | - { |
|
| 261 | - $forgetpasslink=1; |
|
| 262 | - } |
|
| 245 | + // Security graphical code |
|
| 246 | + $captcha=0; |
|
| 247 | + $captcha_refresh=''; |
|
| 248 | + if (function_exists("imagecreatefrompng") && ! empty($conf->global->MAIN_SECURITY_ENABLECAPTCHA)) |
|
| 249 | + { |
|
| 250 | + $captcha=1; |
|
| 251 | + $captcha_refresh=img_picto($langs->trans("Refresh"),'refresh','id="captcha_refresh_img"'); |
|
| 252 | + } |
|
| 263 | 253 | |
| 264 | - if (empty($conf->global->MAIN_HELPCENTER_DISABLELINK)) |
|
| 265 | - { |
|
| 266 | - $helpcenterlink=1; |
|
| 267 | - } |
|
| 268 | - } |
|
| 254 | + // Extra link |
|
| 255 | + $forgetpasslink=0; |
|
| 256 | + $helpcenterlink=0; |
|
| 257 | + if (empty($conf->global->MAIN_SECURITY_DISABLEFORGETPASSLINK) || empty($conf->global->MAIN_HELPCENTER_DISABLELINK)) |
|
| 258 | + { |
|
| 259 | + if (empty($conf->global->MAIN_SECURITY_DISABLEFORGETPASSLINK)) |
|
| 260 | + { |
|
| 261 | + $forgetpasslink=1; |
|
| 262 | + } |
|
| 263 | + |
|
| 264 | + if (empty($conf->global->MAIN_HELPCENTER_DISABLELINK)) |
|
| 265 | + { |
|
| 266 | + $helpcenterlink=1; |
|
| 267 | + } |
|
| 268 | + } |
|
| 269 | 269 | |
| 270 | - // Home message |
|
| 271 | - $main_home=''; |
|
| 272 | - if (! empty($conf->global->MAIN_HOME)) |
|
| 273 | - { |
|
| 274 | - $substitutionarray=getCommonSubstitutionArray($langs); |
|
| 275 | - complete_substitutions_array($substitutionarray, $langs); |
|
| 276 | - $texttoshow = make_substitutions($conf->global->MAIN_HOME, $substitutionarray, $langs); |
|
| 270 | + // Home message |
|
| 271 | + $main_home=''; |
|
| 272 | + if (! empty($conf->global->MAIN_HOME)) |
|
| 273 | + { |
|
| 274 | + $substitutionarray=getCommonSubstitutionArray($langs); |
|
| 275 | + complete_substitutions_array($substitutionarray, $langs); |
|
| 276 | + $texttoshow = make_substitutions($conf->global->MAIN_HOME, $substitutionarray, $langs); |
|
| 277 | 277 | |
| 278 | - $main_home=dol_htmlcleanlastbr($texttoshow); |
|
| 279 | - } |
|
| 278 | + $main_home=dol_htmlcleanlastbr($texttoshow); |
|
| 279 | + } |
|
| 280 | 280 | |
| 281 | - // Google AD |
|
| 282 | - $main_google_ad_client = ((! empty($conf->global->MAIN_GOOGLE_AD_CLIENT) && ! empty($conf->global->MAIN_GOOGLE_AD_SLOT))?1:0); |
|
| 281 | + // Google AD |
|
| 282 | + $main_google_ad_client = ((! empty($conf->global->MAIN_GOOGLE_AD_CLIENT) && ! empty($conf->global->MAIN_GOOGLE_AD_SLOT))?1:0); |
|
| 283 | 283 | |
| 284 | - // Set jquery theme |
|
| 285 | - $dol_loginmesg = (! empty($_SESSION["dol_loginmesg"])?$_SESSION["dol_loginmesg"]:''); |
|
| 286 | - $favicon=dol_buildpath('/theme/'.$conf->theme.'/img/favicon.ico',1); |
|
| 287 | - if (! empty($conf->global->MAIN_FAVICON_URL)) $favicon=$conf->global->MAIN_FAVICON_URL; |
|
| 288 | - $jquerytheme = 'base'; |
|
| 289 | - if (! empty($conf->global->MAIN_USE_JQUERY_THEME)) $jquerytheme = $conf->global->MAIN_USE_JQUERY_THEME; |
|
| 284 | + // Set jquery theme |
|
| 285 | + $dol_loginmesg = (! empty($_SESSION["dol_loginmesg"])?$_SESSION["dol_loginmesg"]:''); |
|
| 286 | + $favicon=dol_buildpath('/theme/'.$conf->theme.'/img/favicon.ico',1); |
|
| 287 | + if (! empty($conf->global->MAIN_FAVICON_URL)) $favicon=$conf->global->MAIN_FAVICON_URL; |
|
| 288 | + $jquerytheme = 'base'; |
|
| 289 | + if (! empty($conf->global->MAIN_USE_JQUERY_THEME)) $jquerytheme = $conf->global->MAIN_USE_JQUERY_THEME; |
|
| 290 | 290 | |
| 291 | - // Set dol_hide_topmenu, dol_hide_leftmenu, dol_optimize_smallscreen, dol_no_mouse_hover |
|
| 292 | - $dol_hide_topmenu=GETPOST('dol_hide_topmenu','int'); |
|
| 293 | - $dol_hide_leftmenu=GETPOST('dol_hide_leftmenu','int'); |
|
| 294 | - $dol_optimize_smallscreen=GETPOST('dol_optimize_smallscreen','int'); |
|
| 295 | - $dol_no_mouse_hover=GETPOST('dol_no_mouse_hover','int'); |
|
| 296 | - $dol_use_jmobile=GETPOST('dol_use_jmobile','int'); |
|
| 291 | + // Set dol_hide_topmenu, dol_hide_leftmenu, dol_optimize_smallscreen, dol_no_mouse_hover |
|
| 292 | + $dol_hide_topmenu=GETPOST('dol_hide_topmenu','int'); |
|
| 293 | + $dol_hide_leftmenu=GETPOST('dol_hide_leftmenu','int'); |
|
| 294 | + $dol_optimize_smallscreen=GETPOST('dol_optimize_smallscreen','int'); |
|
| 295 | + $dol_no_mouse_hover=GETPOST('dol_no_mouse_hover','int'); |
|
| 296 | + $dol_use_jmobile=GETPOST('dol_use_jmobile','int'); |
|
| 297 | 297 | |
| 298 | - // Include login page template |
|
| 299 | - include $template_dir.'login.tpl.php'; |
|
| 298 | + // Include login page template |
|
| 299 | + include $template_dir.'login.tpl.php'; |
|
| 300 | 300 | |
| 301 | 301 | |
| 302 | - $_SESSION["dol_loginmesg"] = ''; |
|
| 303 | - } |
|
| 302 | + $_SESSION["dol_loginmesg"] = ''; |
|
| 303 | + } |
|
| 304 | 304 | } |
| 305 | 305 | |
| 306 | 306 | /** |
@@ -313,23 +313,23 @@ discard block |
||
| 313 | 313 | */ |
| 314 | 314 | function makesalt($type=CRYPT_SALT_LENGTH) |
| 315 | 315 | { |
| 316 | - dol_syslog("makesalt type=".$type); |
|
| 317 | - switch($type) |
|
| 318 | - { |
|
| 319 | - case 12: // 8 + 4 |
|
| 320 | - $saltlen=8; $saltprefix='$1$'; $saltsuffix='$'; break; |
|
| 321 | - case 8: // 8 (Pour compatibilite, ne devrait pas etre utilise) |
|
| 322 | - $saltlen=8; $saltprefix='$1$'; $saltsuffix='$'; break; |
|
| 323 | - case 2: // 2 |
|
| 324 | - default: // by default, fall back on Standard DES (should work everywhere) |
|
| 325 | - $saltlen=2; $saltprefix=''; $saltsuffix=''; break; |
|
| 326 | - } |
|
| 327 | - $salt=''; |
|
| 328 | - while(dol_strlen($salt) < $saltlen) $salt.=chr(mt_rand(64,126)); |
|
| 329 | - |
|
| 330 | - $result=$saltprefix.$salt.$saltsuffix; |
|
| 331 | - dol_syslog("makesalt return=".$result); |
|
| 332 | - return $result; |
|
| 316 | + dol_syslog("makesalt type=".$type); |
|
| 317 | + switch($type) |
|
| 318 | + { |
|
| 319 | + case 12: // 8 + 4 |
|
| 320 | + $saltlen=8; $saltprefix='$1$'; $saltsuffix='$'; break; |
|
| 321 | + case 8: // 8 (Pour compatibilite, ne devrait pas etre utilise) |
|
| 322 | + $saltlen=8; $saltprefix='$1$'; $saltsuffix='$'; break; |
|
| 323 | + case 2: // 2 |
|
| 324 | + default: // by default, fall back on Standard DES (should work everywhere) |
|
| 325 | + $saltlen=2; $saltprefix=''; $saltsuffix=''; break; |
|
| 326 | + } |
|
| 327 | + $salt=''; |
|
| 328 | + while(dol_strlen($salt) < $saltlen) $salt.=chr(mt_rand(64,126)); |
|
| 329 | + |
|
| 330 | + $result=$saltprefix.$salt.$saltsuffix; |
|
| 331 | + dol_syslog("makesalt return=".$result); |
|
| 332 | + return $result; |
|
| 333 | 333 | } |
| 334 | 334 | |
| 335 | 335 | /** |
@@ -340,102 +340,102 @@ discard block |
||
| 340 | 340 | */ |
| 341 | 341 | function encodedecode_dbpassconf($level=0) |
| 342 | 342 | { |
| 343 | - dol_syslog("encodedecode_dbpassconf level=".$level, LOG_DEBUG); |
|
| 344 | - $config = ''; |
|
| 345 | - $passwd=''; |
|
| 346 | - $passwd_crypted=''; |
|
| 347 | - |
|
| 348 | - if ($fp = fopen(DOL_DOCUMENT_ROOT.'/conf/conf.php','r')) |
|
| 349 | - { |
|
| 350 | - while(!feof($fp)) |
|
| 351 | - { |
|
| 352 | - $buffer = fgets($fp,4096); |
|
| 353 | - |
|
| 354 | - $lineofpass=0; |
|
| 355 | - |
|
| 356 | - if (preg_match('/^[^#]*dolibarr_main_db_encrypted_pass[\s]*=[\s]*(.*)/i',$buffer,$reg)) // Old way to save crypted value |
|
| 357 | - { |
|
| 358 | - $val = trim($reg[1]); // This also remove CR/LF |
|
| 359 | - $val=preg_replace('/^["\']/','',$val); |
|
| 360 | - $val=preg_replace('/["\'][\s;]*$/','',$val); |
|
| 361 | - if (! empty($val)) |
|
| 362 | - { |
|
| 363 | - $passwd_crypted = $val; |
|
| 364 | - $val = dol_decode($val); |
|
| 365 | - $passwd = $val; |
|
| 366 | - $lineofpass=1; |
|
| 367 | - } |
|
| 368 | - } |
|
| 369 | - elseif (preg_match('/^[^#]*dolibarr_main_db_pass[\s]*=[\s]*(.*)/i',$buffer,$reg)) |
|
| 370 | - { |
|
| 371 | - $val = trim($reg[1]); // This also remove CR/LF |
|
| 372 | - $val=preg_replace('/^["\']/','',$val); |
|
| 373 | - $val=preg_replace('/["\'][\s;]*$/','',$val); |
|
| 374 | - if (preg_match('/crypted:/i',$buffer)) |
|
| 375 | - { |
|
| 376 | - $val = preg_replace('/crypted:/i','',$val); |
|
| 377 | - $passwd_crypted = $val; |
|
| 378 | - $val = dol_decode($val); |
|
| 379 | - $passwd = $val; |
|
| 380 | - } |
|
| 381 | - else |
|
| 382 | - { |
|
| 383 | - $passwd = $val; |
|
| 384 | - $val = dol_encode($val); |
|
| 385 | - $passwd_crypted = $val; |
|
| 386 | - } |
|
| 387 | - $lineofpass=1; |
|
| 388 | - } |
|
| 389 | - |
|
| 390 | - // Output line |
|
| 391 | - if ($lineofpass) |
|
| 392 | - { |
|
| 393 | - // Add value at end of file |
|
| 394 | - if ($level == 0) |
|
| 395 | - { |
|
| 396 | - $config .= '$dolibarr_main_db_pass=\''.$passwd.'\';'."\n"; |
|
| 397 | - } |
|
| 398 | - if ($level == 1) |
|
| 399 | - { |
|
| 400 | - $config .= '$dolibarr_main_db_pass=\'crypted:'.$passwd_crypted.'\';'."\n"; |
|
| 401 | - } |
|
| 402 | - |
|
| 403 | - //print 'passwd = '.$passwd.' - passwd_crypted = '.$passwd_crypted; |
|
| 404 | - //exit; |
|
| 405 | - } |
|
| 406 | - else |
|
| 407 | - { |
|
| 408 | - $config .= $buffer; |
|
| 409 | - } |
|
| 410 | - } |
|
| 411 | - fclose($fp); |
|
| 412 | - |
|
| 413 | - // Write new conf file |
|
| 414 | - $file=DOL_DOCUMENT_ROOT.'/conf/conf.php'; |
|
| 415 | - if ($fp = @fopen($file,'w')) |
|
| 416 | - { |
|
| 417 | - fputs($fp, $config); |
|
| 418 | - fflush($fp); |
|
| 419 | - fclose($fp); |
|
| 420 | - clearstatcache(); |
|
| 421 | - |
|
| 422 | - // It's config file, so we set read permission for creator only. |
|
| 423 | - // Should set permission to web user and groups for users used by batch |
|
| 424 | - //@chmod($file, octdec('0600')); |
|
| 425 | - |
|
| 426 | - return 1; |
|
| 427 | - } |
|
| 428 | - else |
|
| 429 | - { |
|
| 430 | - dol_syslog("encodedecode_dbpassconf Failed to open conf.php file for writing", LOG_WARNING); |
|
| 431 | - return -1; |
|
| 432 | - } |
|
| 433 | - } |
|
| 434 | - else |
|
| 435 | - { |
|
| 436 | - dol_syslog("encodedecode_dbpassconf Failed to read conf.php", LOG_ERR); |
|
| 437 | - return -2; |
|
| 438 | - } |
|
| 343 | + dol_syslog("encodedecode_dbpassconf level=".$level, LOG_DEBUG); |
|
| 344 | + $config = ''; |
|
| 345 | + $passwd=''; |
|
| 346 | + $passwd_crypted=''; |
|
| 347 | + |
|
| 348 | + if ($fp = fopen(DOL_DOCUMENT_ROOT.'/conf/conf.php','r')) |
|
| 349 | + { |
|
| 350 | + while(!feof($fp)) |
|
| 351 | + { |
|
| 352 | + $buffer = fgets($fp,4096); |
|
| 353 | + |
|
| 354 | + $lineofpass=0; |
|
| 355 | + |
|
| 356 | + if (preg_match('/^[^#]*dolibarr_main_db_encrypted_pass[\s]*=[\s]*(.*)/i',$buffer,$reg)) // Old way to save crypted value |
|
| 357 | + { |
|
| 358 | + $val = trim($reg[1]); // This also remove CR/LF |
|
| 359 | + $val=preg_replace('/^["\']/','',$val); |
|
| 360 | + $val=preg_replace('/["\'][\s;]*$/','',$val); |
|
| 361 | + if (! empty($val)) |
|
| 362 | + { |
|
| 363 | + $passwd_crypted = $val; |
|
| 364 | + $val = dol_decode($val); |
|
| 365 | + $passwd = $val; |
|
| 366 | + $lineofpass=1; |
|
| 367 | + } |
|
| 368 | + } |
|
| 369 | + elseif (preg_match('/^[^#]*dolibarr_main_db_pass[\s]*=[\s]*(.*)/i',$buffer,$reg)) |
|
| 370 | + { |
|
| 371 | + $val = trim($reg[1]); // This also remove CR/LF |
|
| 372 | + $val=preg_replace('/^["\']/','',$val); |
|
| 373 | + $val=preg_replace('/["\'][\s;]*$/','',$val); |
|
| 374 | + if (preg_match('/crypted:/i',$buffer)) |
|
| 375 | + { |
|
| 376 | + $val = preg_replace('/crypted:/i','',$val); |
|
| 377 | + $passwd_crypted = $val; |
|
| 378 | + $val = dol_decode($val); |
|
| 379 | + $passwd = $val; |
|
| 380 | + } |
|
| 381 | + else |
|
| 382 | + { |
|
| 383 | + $passwd = $val; |
|
| 384 | + $val = dol_encode($val); |
|
| 385 | + $passwd_crypted = $val; |
|
| 386 | + } |
|
| 387 | + $lineofpass=1; |
|
| 388 | + } |
|
| 389 | + |
|
| 390 | + // Output line |
|
| 391 | + if ($lineofpass) |
|
| 392 | + { |
|
| 393 | + // Add value at end of file |
|
| 394 | + if ($level == 0) |
|
| 395 | + { |
|
| 396 | + $config .= '$dolibarr_main_db_pass=\''.$passwd.'\';'."\n"; |
|
| 397 | + } |
|
| 398 | + if ($level == 1) |
|
| 399 | + { |
|
| 400 | + $config .= '$dolibarr_main_db_pass=\'crypted:'.$passwd_crypted.'\';'."\n"; |
|
| 401 | + } |
|
| 402 | + |
|
| 403 | + //print 'passwd = '.$passwd.' - passwd_crypted = '.$passwd_crypted; |
|
| 404 | + //exit; |
|
| 405 | + } |
|
| 406 | + else |
|
| 407 | + { |
|
| 408 | + $config .= $buffer; |
|
| 409 | + } |
|
| 410 | + } |
|
| 411 | + fclose($fp); |
|
| 412 | + |
|
| 413 | + // Write new conf file |
|
| 414 | + $file=DOL_DOCUMENT_ROOT.'/conf/conf.php'; |
|
| 415 | + if ($fp = @fopen($file,'w')) |
|
| 416 | + { |
|
| 417 | + fputs($fp, $config); |
|
| 418 | + fflush($fp); |
|
| 419 | + fclose($fp); |
|
| 420 | + clearstatcache(); |
|
| 421 | + |
|
| 422 | + // It's config file, so we set read permission for creator only. |
|
| 423 | + // Should set permission to web user and groups for users used by batch |
|
| 424 | + //@chmod($file, octdec('0600')); |
|
| 425 | + |
|
| 426 | + return 1; |
|
| 427 | + } |
|
| 428 | + else |
|
| 429 | + { |
|
| 430 | + dol_syslog("encodedecode_dbpassconf Failed to open conf.php file for writing", LOG_WARNING); |
|
| 431 | + return -1; |
|
| 432 | + } |
|
| 433 | + } |
|
| 434 | + else |
|
| 435 | + { |
|
| 436 | + dol_syslog("encodedecode_dbpassconf Failed to read conf.php", LOG_ERR); |
|
| 437 | + return -2; |
|
| 438 | + } |
|
| 439 | 439 | } |
| 440 | 440 | |
| 441 | 441 | /** |
@@ -448,72 +448,72 @@ discard block |
||
| 448 | 448 | */ |
| 449 | 449 | function getRandomPassword($generic=false, $replaceambiguouschars=null) |
| 450 | 450 | { |
| 451 | - global $db,$conf,$langs,$user; |
|
| 452 | - |
|
| 453 | - $generated_password=''; |
|
| 454 | - if ($generic) |
|
| 455 | - { |
|
| 456 | - $length = 32; |
|
| 457 | - $lowercase = "qwertyuiopasdfghjklzxcvbnm"; |
|
| 458 | - $uppercase = "ASDFGHJKLZXCVBNMQWERTYUIOP"; |
|
| 459 | - $numbers = "1234567890"; |
|
| 460 | - $randomCode = ""; |
|
| 461 | - $nbofchar = round($length/3); |
|
| 462 | - $nbofcharlast = ($length - 2*$nbofchar); |
|
| 463 | - //var_dump($nbofchar.'-'.$nbofcharlast); |
|
| 464 | - if (function_exists('random_int')) // Cryptographic random |
|
| 465 | - { |
|
| 466 | - $max = strlen($lowercase) - 1; |
|
| 467 | - for ($x = 0; $x < $nbofchar; $x++) { |
|
| 468 | - $randomCode .= $lowercase{random_int(0, $max)}; |
|
| 469 | - } |
|
| 470 | - $max = strlen($uppercase) - 1; |
|
| 471 | - for ($x = 0; $x < $nbofchar; $x++) { |
|
| 472 | - $randomCode .= $uppercase{random_int(0, $max)}; |
|
| 473 | - } |
|
| 474 | - $max = strlen($numbers) - 1; |
|
| 475 | - for ($x = 0; $x < $nbofcharlast; $x++) { |
|
| 476 | - $randomCode .= $numbers{random_int(0, $max)}; |
|
| 477 | - } |
|
| 478 | - |
|
| 479 | - $generated_password=str_shuffle($randomCode); |
|
| 480 | - } |
|
| 481 | - else // Old platform, non cryptographic random |
|
| 482 | - { |
|
| 483 | - $max = strlen($lowercase) - 1; |
|
| 484 | - for ($x = 0; $x < $nbofchar; $x++) { |
|
| 485 | - $randomCode .= $lowercase{mt_rand(0, $max)}; |
|
| 486 | - } |
|
| 487 | - $max = strlen($uppercase) - 1; |
|
| 488 | - for ($x = 0; $x < $nbofchar; $x++) { |
|
| 489 | - $randomCode .= $uppercase{mt_rand(0, $max)}; |
|
| 490 | - } |
|
| 491 | - $max = strlen($numbers) - 1; |
|
| 492 | - for ($x = 0; $x < $nbofcharlast; $x++) { |
|
| 493 | - $randomCode .= $numbers{mt_rand(0, $max)}; |
|
| 494 | - } |
|
| 495 | - |
|
| 496 | - $generated_password=str_shuffle($randomCode); |
|
| 497 | - } |
|
| 498 | - } |
|
| 499 | - else if (! empty($conf->global->USER_PASSWORD_GENERATED)) |
|
| 500 | - { |
|
| 501 | - $nomclass="modGeneratePass".ucfirst($conf->global->USER_PASSWORD_GENERATED); |
|
| 502 | - $nomfichier=$nomclass.".class.php"; |
|
| 503 | - //print DOL_DOCUMENT_ROOT."/core/modules/security/generate/".$nomclass; |
|
| 504 | - require_once DOL_DOCUMENT_ROOT."/core/modules/security/generate/".$nomfichier; |
|
| 505 | - $genhandler=new $nomclass($db,$conf,$langs,$user); |
|
| 506 | - $generated_password=$genhandler->getNewGeneratedPassword(); |
|
| 507 | - unset($genhandler); |
|
| 508 | - } |
|
| 509 | - |
|
| 510 | - // Do we have to discard some alphabetic characters ? |
|
| 511 | - if (is_array($replaceambiguouschars) && count($replaceambiguouschars) > 0) |
|
| 512 | - { |
|
| 513 | - $numbers = "ABCDEF"; |
|
| 514 | - $max = strlen($numbers) - 1; |
|
| 515 | - $generated_password=str_replace($replaceambiguouschars, $numbers{random_int(0, $max)}, $generated_password); |
|
| 516 | - } |
|
| 517 | - |
|
| 518 | - return $generated_password; |
|
| 451 | + global $db,$conf,$langs,$user; |
|
| 452 | + |
|
| 453 | + $generated_password=''; |
|
| 454 | + if ($generic) |
|
| 455 | + { |
|
| 456 | + $length = 32; |
|
| 457 | + $lowercase = "qwertyuiopasdfghjklzxcvbnm"; |
|
| 458 | + $uppercase = "ASDFGHJKLZXCVBNMQWERTYUIOP"; |
|
| 459 | + $numbers = "1234567890"; |
|
| 460 | + $randomCode = ""; |
|
| 461 | + $nbofchar = round($length/3); |
|
| 462 | + $nbofcharlast = ($length - 2*$nbofchar); |
|
| 463 | + //var_dump($nbofchar.'-'.$nbofcharlast); |
|
| 464 | + if (function_exists('random_int')) // Cryptographic random |
|
| 465 | + { |
|
| 466 | + $max = strlen($lowercase) - 1; |
|
| 467 | + for ($x = 0; $x < $nbofchar; $x++) { |
|
| 468 | + $randomCode .= $lowercase{random_int(0, $max)}; |
|
| 469 | + } |
|
| 470 | + $max = strlen($uppercase) - 1; |
|
| 471 | + for ($x = 0; $x < $nbofchar; $x++) { |
|
| 472 | + $randomCode .= $uppercase{random_int(0, $max)}; |
|
| 473 | + } |
|
| 474 | + $max = strlen($numbers) - 1; |
|
| 475 | + for ($x = 0; $x < $nbofcharlast; $x++) { |
|
| 476 | + $randomCode .= $numbers{random_int(0, $max)}; |
|
| 477 | + } |
|
| 478 | + |
|
| 479 | + $generated_password=str_shuffle($randomCode); |
|
| 480 | + } |
|
| 481 | + else // Old platform, non cryptographic random |
|
| 482 | + { |
|
| 483 | + $max = strlen($lowercase) - 1; |
|
| 484 | + for ($x = 0; $x < $nbofchar; $x++) { |
|
| 485 | + $randomCode .= $lowercase{mt_rand(0, $max)}; |
|
| 486 | + } |
|
| 487 | + $max = strlen($uppercase) - 1; |
|
| 488 | + for ($x = 0; $x < $nbofchar; $x++) { |
|
| 489 | + $randomCode .= $uppercase{mt_rand(0, $max)}; |
|
| 490 | + } |
|
| 491 | + $max = strlen($numbers) - 1; |
|
| 492 | + for ($x = 0; $x < $nbofcharlast; $x++) { |
|
| 493 | + $randomCode .= $numbers{mt_rand(0, $max)}; |
|
| 494 | + } |
|
| 495 | + |
|
| 496 | + $generated_password=str_shuffle($randomCode); |
|
| 497 | + } |
|
| 498 | + } |
|
| 499 | + else if (! empty($conf->global->USER_PASSWORD_GENERATED)) |
|
| 500 | + { |
|
| 501 | + $nomclass="modGeneratePass".ucfirst($conf->global->USER_PASSWORD_GENERATED); |
|
| 502 | + $nomfichier=$nomclass.".class.php"; |
|
| 503 | + //print DOL_DOCUMENT_ROOT."/core/modules/security/generate/".$nomclass; |
|
| 504 | + require_once DOL_DOCUMENT_ROOT."/core/modules/security/generate/".$nomfichier; |
|
| 505 | + $genhandler=new $nomclass($db,$conf,$langs,$user); |
|
| 506 | + $generated_password=$genhandler->getNewGeneratedPassword(); |
|
| 507 | + unset($genhandler); |
|
| 508 | + } |
|
| 509 | + |
|
| 510 | + // Do we have to discard some alphabetic characters ? |
|
| 511 | + if (is_array($replaceambiguouschars) && count($replaceambiguouschars) > 0) |
|
| 512 | + { |
|
| 513 | + $numbers = "ABCDEF"; |
|
| 514 | + $max = strlen($numbers) - 1; |
|
| 515 | + $generated_password=str_replace($replaceambiguouschars, $numbers{random_int(0, $max)}, $generated_password); |
|
| 516 | + } |
|
| 517 | + |
|
| 518 | + return $generated_password; |
|
| 519 | 519 | } |
@@ -70,25 +70,25 @@ discard block |
||
| 70 | 70 | $result = $db->query($sql); |
| 71 | 71 | if ($result) |
| 72 | 72 | {
|
| 73 | - $num = $db->num_rows($result); |
|
| 74 | - $i = 0; |
|
| 75 | - while ($i < $num) |
|
| 76 | - {
|
|
| 77 | - $objp = $db->fetch_object($result); |
|
| 78 | - |
|
| 79 | - $adhtype=new AdherentType($db); |
|
| 80 | - $adhtype->id=$objp->rowid; |
|
| 81 | - $adhtype->subscription=$objp->subscription; |
|
| 82 | - $adhtype->label=$objp->label; |
|
| 83 | - $AdherentType[$objp->rowid]=$adhtype; |
|
| 84 | - |
|
| 85 | - if ($objp->statut == -1) { $MemberToValidate[$objp->rowid]=$objp->somme; }
|
|
| 86 | - if ($objp->statut == 1) { $MembersValidated[$objp->rowid]=$objp->somme; }
|
|
| 87 | - if ($objp->statut == 0) { $MembersResiliated[$objp->rowid]=$objp->somme; }
|
|
| 88 | - |
|
| 89 | - $i++; |
|
| 90 | - } |
|
| 91 | - $db->free($result); |
|
| 73 | + $num = $db->num_rows($result); |
|
| 74 | + $i = 0; |
|
| 75 | + while ($i < $num) |
|
| 76 | + {
|
|
| 77 | + $objp = $db->fetch_object($result); |
|
| 78 | + |
|
| 79 | + $adhtype=new AdherentType($db); |
|
| 80 | + $adhtype->id=$objp->rowid; |
|
| 81 | + $adhtype->subscription=$objp->subscription; |
|
| 82 | + $adhtype->label=$objp->label; |
|
| 83 | + $AdherentType[$objp->rowid]=$adhtype; |
|
| 84 | + |
|
| 85 | + if ($objp->statut == -1) { $MemberToValidate[$objp->rowid]=$objp->somme; }
|
|
| 86 | + if ($objp->statut == 1) { $MembersValidated[$objp->rowid]=$objp->somme; }
|
|
| 87 | + if ($objp->statut == 0) { $MembersResiliated[$objp->rowid]=$objp->somme; }
|
|
| 88 | + |
|
| 89 | + $i++; |
|
| 90 | + } |
|
| 91 | + $db->free($result); |
|
| 92 | 92 | } |
| 93 | 93 | |
| 94 | 94 | $now=dol_now(); |
@@ -108,15 +108,15 @@ discard block |
||
| 108 | 108 | $result = $db->query($sql); |
| 109 | 109 | if ($result) |
| 110 | 110 | {
|
| 111 | - $num = $db->num_rows($result); |
|
| 112 | - $i = 0; |
|
| 113 | - while ($i < $num) |
|
| 114 | - {
|
|
| 115 | - $objp = $db->fetch_object($result); |
|
| 116 | - $MemberUpToDate[$objp->fk_adherent_type]=$objp->somme; |
|
| 117 | - $i++; |
|
| 118 | - } |
|
| 119 | - $db->free(); |
|
| 111 | + $num = $db->num_rows($result); |
|
| 112 | + $i = 0; |
|
| 113 | + while ($i < $num) |
|
| 114 | + {
|
|
| 115 | + $objp = $db->fetch_object($result); |
|
| 116 | + $MemberUpToDate[$objp->fk_adherent_type]=$objp->somme; |
|
| 117 | + $i++; |
|
| 118 | + } |
|
| 119 | + $db->free(); |
|
| 120 | 120 | } |
| 121 | 121 | |
| 122 | 122 | |
@@ -129,27 +129,27 @@ discard block |
||
| 129 | 129 | // Search contact/address |
| 130 | 130 | if (! empty($conf->adherent->enabled) && $user->rights->adherent->lire) |
| 131 | 131 | {
|
| 132 | - $listofsearchfields['search_member']=array('text'=>'Member');
|
|
| 132 | + $listofsearchfields['search_member']=array('text'=>'Member');
|
|
| 133 | 133 | } |
| 134 | 134 | |
| 135 | 135 | if (count($listofsearchfields)) |
| 136 | 136 | {
|
| 137 | - print '<form method="post" action="'.BASE_URI.'?controller=core&method=search">'; |
|
| 138 | - print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 139 | - print '<table class="noborder nohover centpercent">'; |
|
| 140 | - $i=0; |
|
| 141 | - foreach($listofsearchfields as $key => $value) |
|
| 142 | - {
|
|
| 143 | - if ($i == 0) print '<tr class="liste_titre"><td colspan="3">'.$langs->trans("Search").'</td></tr>';
|
|
| 144 | - print '<tr class="oddeven">'; |
|
| 145 | - print '<td class="nowrap"><label for="'.$key.'">'.$langs->trans($value["text"]).'</label>:</td><td><input type="text" class="flat inputsearch" name="'.$key.'" id="'.$key.'" size="18"></td>'; |
|
| 146 | - if ($i == 0) print '<td rowspan="'.count($listofsearchfields).'"><input type="submit" value="'.$langs->trans("Search").'" class="button"></td>';
|
|
| 147 | - print '</tr>'; |
|
| 148 | - $i++; |
|
| 149 | - } |
|
| 150 | - print '</table>'; |
|
| 151 | - print '</form>'; |
|
| 152 | - print '<br>'; |
|
| 137 | + print '<form method="post" action="'.BASE_URI.'?controller=core&method=search">'; |
|
| 138 | + print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; |
|
| 139 | + print '<table class="noborder nohover centpercent">'; |
|
| 140 | + $i=0; |
|
| 141 | + foreach($listofsearchfields as $key => $value) |
|
| 142 | + {
|
|
| 143 | + if ($i == 0) print '<tr class="liste_titre"><td colspan="3">'.$langs->trans("Search").'</td></tr>';
|
|
| 144 | + print '<tr class="oddeven">'; |
|
| 145 | + print '<td class="nowrap"><label for="'.$key.'">'.$langs->trans($value["text"]).'</label>:</td><td><input type="text" class="flat inputsearch" name="'.$key.'" id="'.$key.'" size="18"></td>'; |
|
| 146 | + if ($i == 0) print '<td rowspan="'.count($listofsearchfields).'"><input type="submit" value="'.$langs->trans("Search").'" class="button"></td>';
|
|
| 147 | + print '</tr>'; |
|
| 148 | + $i++; |
|
| 149 | + } |
|
| 150 | + print '</table>'; |
|
| 151 | + print '</form>'; |
|
| 152 | + print '<br>'; |
|
| 153 | 153 | } |
| 154 | 154 | } |
| 155 | 155 | |
@@ -160,8 +160,8 @@ discard block |
||
| 160 | 160 | |
| 161 | 161 | if ($conf->use_javascript_ajax) |
| 162 | 162 | {
|
| 163 | - print '<div class="div-table-responsive-no-min">'; |
|
| 164 | - print '<table class="noborder nohover" width="100%">'; |
|
| 163 | + print '<div class="div-table-responsive-no-min">'; |
|
| 164 | + print '<table class="noborder nohover" width="100%">'; |
|
| 165 | 165 | print '<tr class="liste_titre"><th colspan="2">'.$langs->trans("Statistics").'</th></tr>';
|
| 166 | 166 | print '<tr><td align="center" colspan="2">'; |
| 167 | 167 | |
@@ -294,49 +294,49 @@ discard block |
||
| 294 | 294 | $resql=$db->query($sql); |
| 295 | 295 | if ($resql) |
| 296 | 296 | {
|
| 297 | - print '<div class="div-table-responsive-no-min">'; |
|
| 298 | - print '<table class="noborder" width="100%">'; |
|
| 299 | - print '<tr class="liste_titre">'; |
|
| 300 | - print '<th colspan="4">'.$langs->trans("LastMembersModified",$max).'</th></tr>';
|
|
| 301 | - |
|
| 302 | - $num = $db->num_rows($resql); |
|
| 303 | - if ($num) |
|
| 304 | - {
|
|
| 305 | - $i = 0; |
|
| 306 | - while ($i < $num) |
|
| 307 | - {
|
|
| 308 | - $obj = $db->fetch_object($resql); |
|
| 309 | - print '<tr class="oddeven">'; |
|
| 310 | - $staticmember->id=$obj->rowid; |
|
| 311 | - $staticmember->lastname=$obj->lastname; |
|
| 312 | - $staticmember->firstname=$obj->firstname; |
|
| 313 | - if (! empty($obj->fk_soc)) |
|
| 314 | - {
|
|
| 315 | - $staticmember->fk_soc = $obj->fk_soc; |
|
| 316 | - $staticmember->fetch_thirdparty(); |
|
| 317 | - $staticmember->name=$staticmember->thirdparty->name; |
|
| 318 | - } |
|
| 319 | - else |
|
| 320 | - {
|
|
| 321 | - $staticmember->name=$obj->company; |
|
| 322 | - } |
|
| 323 | - $staticmember->ref=$staticmember->getFullName($langs); |
|
| 324 | - $statictype->id=$obj->typeid; |
|
| 325 | - $statictype->label=$obj->label; |
|
| 326 | - print '<td>'.$staticmember->getNomUrl(1,32).'</td>'; |
|
| 327 | - print '<td>'.$statictype->getNomUrl(1,32).'</td>'; |
|
| 328 | - print '<td>'.dol_print_date($db->jdate($obj->datem),'dayhour').'</td>'; |
|
| 329 | - print '<td align="right">'.$staticmember->LibStatut($obj->statut,($obj->subscription=='yes'?1:0),$db->jdate($obj->date_end_subscription),5).'</td>'; |
|
| 330 | - print '</tr>'; |
|
| 331 | - $i++; |
|
| 332 | - } |
|
| 333 | - } |
|
| 334 | - print "</table></div>"; |
|
| 335 | - print "<br>"; |
|
| 297 | + print '<div class="div-table-responsive-no-min">'; |
|
| 298 | + print '<table class="noborder" width="100%">'; |
|
| 299 | + print '<tr class="liste_titre">'; |
|
| 300 | + print '<th colspan="4">'.$langs->trans("LastMembersModified",$max).'</th></tr>';
|
|
| 301 | + |
|
| 302 | + $num = $db->num_rows($resql); |
|
| 303 | + if ($num) |
|
| 304 | + {
|
|
| 305 | + $i = 0; |
|
| 306 | + while ($i < $num) |
|
| 307 | + {
|
|
| 308 | + $obj = $db->fetch_object($resql); |
|
| 309 | + print '<tr class="oddeven">'; |
|
| 310 | + $staticmember->id=$obj->rowid; |
|
| 311 | + $staticmember->lastname=$obj->lastname; |
|
| 312 | + $staticmember->firstname=$obj->firstname; |
|
| 313 | + if (! empty($obj->fk_soc)) |
|
| 314 | + {
|
|
| 315 | + $staticmember->fk_soc = $obj->fk_soc; |
|
| 316 | + $staticmember->fetch_thirdparty(); |
|
| 317 | + $staticmember->name=$staticmember->thirdparty->name; |
|
| 318 | + } |
|
| 319 | + else |
|
| 320 | + {
|
|
| 321 | + $staticmember->name=$obj->company; |
|
| 322 | + } |
|
| 323 | + $staticmember->ref=$staticmember->getFullName($langs); |
|
| 324 | + $statictype->id=$obj->typeid; |
|
| 325 | + $statictype->label=$obj->label; |
|
| 326 | + print '<td>'.$staticmember->getNomUrl(1,32).'</td>'; |
|
| 327 | + print '<td>'.$statictype->getNomUrl(1,32).'</td>'; |
|
| 328 | + print '<td>'.dol_print_date($db->jdate($obj->datem),'dayhour').'</td>'; |
|
| 329 | + print '<td align="right">'.$staticmember->LibStatut($obj->statut,($obj->subscription=='yes'?1:0),$db->jdate($obj->date_end_subscription),5).'</td>'; |
|
| 330 | + print '</tr>'; |
|
| 331 | + $i++; |
|
| 332 | + } |
|
| 333 | + } |
|
| 334 | + print "</table></div>"; |
|
| 335 | + print "<br>"; |
|
| 336 | 336 | } |
| 337 | 337 | else |
| 338 | 338 | {
|
| 339 | - dol_print_error($db); |
|
| 339 | + dol_print_error($db); |
|
| 340 | 340 | } |
| 341 | 341 | |
| 342 | 342 | |
@@ -357,48 +357,48 @@ discard block |
||
| 357 | 357 | $resql=$db->query($sql); |
| 358 | 358 | if ($resql) |
| 359 | 359 | {
|
| 360 | - print '<div class="div-table-responsive-no-min">'; |
|
| 361 | - print '<table class="noborder" width="100%">'; |
|
| 362 | - print '<tr class="liste_titre">'; |
|
| 363 | - print '<th colspan="5">'.$langs->trans("LastSubscriptionsModified",$max).'</th></tr>';
|
|
| 364 | - |
|
| 365 | - $num = $db->num_rows($resql); |
|
| 366 | - if ($num) |
|
| 367 | - {
|
|
| 368 | - $i = 0; |
|
| 369 | - while ($i < $num) |
|
| 370 | - {
|
|
| 371 | - $obj = $db->fetch_object($resql); |
|
| 372 | - print '<tr class="oddeven">'; |
|
| 373 | - $subscriptionstatic->id=$obj->cid; |
|
| 374 | - $subscriptionstatic->ref=$obj->cid; |
|
| 375 | - $staticmember->id=$obj->rowid; |
|
| 376 | - $staticmember->lastname=$obj->lastname; |
|
| 377 | - $staticmember->firstname=$obj->firstname; |
|
| 378 | - if (! empty($obj->fk_soc)) {
|
|
| 379 | - $staticmember->fk_soc = $obj->fk_soc; |
|
| 380 | - $staticmember->fetch_thirdparty(); |
|
| 381 | - $staticmember->name=$staticmember->thirdparty->name; |
|
| 382 | - } else {
|
|
| 383 | - $staticmember->name=$obj->company; |
|
| 384 | - } |
|
| 385 | - $staticmember->ref=$staticmember->getFullName($langs); |
|
| 386 | - print '<td>'.$subscriptionstatic->getNomUrl(1).'</td>'; |
|
| 387 | - print '<td>'.$staticmember->getNomUrl(1,32,'subscription').'</td>'; |
|
| 388 | - print '<td>'.get_date_range($db->jdate($obj->date_start),$db->jdate($obj->date_end)).'</td>'; |
|
| 389 | - print '<td align="right">'.price($obj->subscription).'</td>'; |
|
| 390 | - //print '<td align="right">'.$staticmember->LibStatut($obj->statut,($obj->subscription=='yes'?1:0),$db->jdate($obj->date_end_subscription),5).'</td>'; |
|
| 391 | - print '<td align="right">'.dol_print_date($db->jdate($obj->datem?$obj->datem:$obj->datec),'dayhour').'</td>'; |
|
| 392 | - print '</tr>'; |
|
| 393 | - $i++; |
|
| 394 | - } |
|
| 395 | - } |
|
| 396 | - print "</table></div>"; |
|
| 397 | - print "<br>"; |
|
| 360 | + print '<div class="div-table-responsive-no-min">'; |
|
| 361 | + print '<table class="noborder" width="100%">'; |
|
| 362 | + print '<tr class="liste_titre">'; |
|
| 363 | + print '<th colspan="5">'.$langs->trans("LastSubscriptionsModified",$max).'</th></tr>';
|
|
| 364 | + |
|
| 365 | + $num = $db->num_rows($resql); |
|
| 366 | + if ($num) |
|
| 367 | + {
|
|
| 368 | + $i = 0; |
|
| 369 | + while ($i < $num) |
|
| 370 | + {
|
|
| 371 | + $obj = $db->fetch_object($resql); |
|
| 372 | + print '<tr class="oddeven">'; |
|
| 373 | + $subscriptionstatic->id=$obj->cid; |
|
| 374 | + $subscriptionstatic->ref=$obj->cid; |
|
| 375 | + $staticmember->id=$obj->rowid; |
|
| 376 | + $staticmember->lastname=$obj->lastname; |
|
| 377 | + $staticmember->firstname=$obj->firstname; |
|
| 378 | + if (! empty($obj->fk_soc)) {
|
|
| 379 | + $staticmember->fk_soc = $obj->fk_soc; |
|
| 380 | + $staticmember->fetch_thirdparty(); |
|
| 381 | + $staticmember->name=$staticmember->thirdparty->name; |
|
| 382 | + } else {
|
|
| 383 | + $staticmember->name=$obj->company; |
|
| 384 | + } |
|
| 385 | + $staticmember->ref=$staticmember->getFullName($langs); |
|
| 386 | + print '<td>'.$subscriptionstatic->getNomUrl(1).'</td>'; |
|
| 387 | + print '<td>'.$staticmember->getNomUrl(1,32,'subscription').'</td>'; |
|
| 388 | + print '<td>'.get_date_range($db->jdate($obj->date_start),$db->jdate($obj->date_end)).'</td>'; |
|
| 389 | + print '<td align="right">'.price($obj->subscription).'</td>'; |
|
| 390 | + //print '<td align="right">'.$staticmember->LibStatut($obj->statut,($obj->subscription=='yes'?1:0),$db->jdate($obj->date_end_subscription),5).'</td>'; |
|
| 391 | + print '<td align="right">'.dol_print_date($db->jdate($obj->datem?$obj->datem:$obj->datec),'dayhour').'</td>'; |
|
| 392 | + print '</tr>'; |
|
| 393 | + $i++; |
|
| 394 | + } |
|
| 395 | + } |
|
| 396 | + print "</table></div>"; |
|
| 397 | + print "<br>"; |
|
| 398 | 398 | } |
| 399 | 399 | else |
| 400 | 400 | {
|
| 401 | - dol_print_error($db); |
|
| 401 | + dol_print_error($db); |
|
| 402 | 402 | } |
| 403 | 403 | |
| 404 | 404 | |
@@ -415,13 +415,13 @@ discard block |
||
| 415 | 415 | |
| 416 | 416 | foreach ($AdherentType as $key => $adhtype) |
| 417 | 417 | {
|
| 418 | - print '<tr class="oddeven">'; |
|
| 419 | - print '<td>'.$adhtype->getNomUrl(1, dol_size(32)).'</td>'; |
|
| 420 | - print '<td align="right">'.(isset($MemberToValidate[$key]) && $MemberToValidate[$key] > 0?$MemberToValidate[$key]:'').' '.$staticmember->LibStatut(-1,$adhtype->subscription,0,3).'</td>'; |
|
| 421 | - print '<td align="right">'.(isset($MembersValidated[$key]) && ($MembersValidated[$key]-(isset($MemberUpToDate[$key])?$MemberUpToDate[$key]:0) > 0) ? $MembersValidated[$key]-(isset($MemberUpToDate[$key])?$MemberUpToDate[$key]:0):'').' '.$staticmember->LibStatut(1,$adhtype->subscription,0,3).'</td>'; |
|
| 422 | - print '<td align="right">'.(isset($MemberUpToDate[$key]) && $MemberUpToDate[$key] > 0 ? $MemberUpToDate[$key]:'').' '.$staticmember->LibStatut(1,$adhtype->subscription,$now,3).'</td>'; |
|
| 423 | - print '<td align="right">'.(isset($MembersResiliated[$key]) && $MembersResiliated[$key]> 0 ?$MembersResiliated[$key]:'').' '.$staticmember->LibStatut(0,$adhtype->subscription,0,3).'</td>'; |
|
| 424 | - print "</tr>\n"; |
|
| 418 | + print '<tr class="oddeven">'; |
|
| 419 | + print '<td>'.$adhtype->getNomUrl(1, dol_size(32)).'</td>'; |
|
| 420 | + print '<td align="right">'.(isset($MemberToValidate[$key]) && $MemberToValidate[$key] > 0?$MemberToValidate[$key]:'').' '.$staticmember->LibStatut(-1,$adhtype->subscription,0,3).'</td>'; |
|
| 421 | + print '<td align="right">'.(isset($MembersValidated[$key]) && ($MembersValidated[$key]-(isset($MemberUpToDate[$key])?$MemberUpToDate[$key]:0) > 0) ? $MembersValidated[$key]-(isset($MemberUpToDate[$key])?$MemberUpToDate[$key]:0):'').' '.$staticmember->LibStatut(1,$adhtype->subscription,0,3).'</td>'; |
|
| 422 | + print '<td align="right">'.(isset($MemberUpToDate[$key]) && $MemberUpToDate[$key] > 0 ? $MemberUpToDate[$key]:'').' '.$staticmember->LibStatut(1,$adhtype->subscription,$now,3).'</td>'; |
|
| 423 | + print '<td align="right">'.(isset($MembersResiliated[$key]) && $MembersResiliated[$key]> 0 ?$MembersResiliated[$key]:'').' '.$staticmember->LibStatut(0,$adhtype->subscription,0,3).'</td>'; |
|
| 424 | + print "</tr>\n"; |
|
| 425 | 425 | } |
| 426 | 426 | print '<tr class="liste_total">'; |
| 427 | 427 | print '<td class="liste_total">'.$langs->trans("Total").'</td>';
|
@@ -114,30 +114,30 @@ discard block |
||
| 114 | 114 | */ |
| 115 | 115 | if ($catname || $id > 0) |
| 116 | 116 | {
|
| 117 | - $cats = $categstatic->rechercher($id, $catname, $typetext); |
|
| 118 | - |
|
| 119 | - print '<table class="noborder" width="100%">'; |
|
| 120 | - print '<tr class="liste_titre"><td colspan="2">'.$langs->trans("FoundCats").'</td></tr>';
|
|
| 121 | - |
|
| 122 | - foreach ($cats as $cat) |
|
| 123 | - {
|
|
| 124 | - print "\t".'<tr class="oddeven">'."\n"; |
|
| 125 | - print "\t\t<td>"; |
|
| 126 | - $categstatic->id=$cat->id; |
|
| 127 | - $categstatic->ref=$cat->label; |
|
| 128 | - $categstatic->label=$cat->label; |
|
| 129 | - $categstatic->type=$cat->type; |
|
| 130 | - $categstatic->color=$cat->color; |
|
| 131 | - print '<span class="noborderoncategories" '.($categstatic->color?' style="background: #'.$categstatic->color.';"':' style="background: #aaa"').'>'; |
|
| 132 | - print $categstatic->getNomUrl(1,''); |
|
| 133 | - print '</span>'; |
|
| 134 | - print "</td>\n"; |
|
| 135 | - print "\t\t<td>"; |
|
| 136 | - print dolGetFirstLineOfText($cat->description); |
|
| 137 | - print "</td>\n"; |
|
| 138 | - print "\t</tr>\n"; |
|
| 139 | - } |
|
| 140 | - print "</table>"; |
|
| 117 | + $cats = $categstatic->rechercher($id, $catname, $typetext); |
|
| 118 | + |
|
| 119 | + print '<table class="noborder" width="100%">'; |
|
| 120 | + print '<tr class="liste_titre"><td colspan="2">'.$langs->trans("FoundCats").'</td></tr>';
|
|
| 121 | + |
|
| 122 | + foreach ($cats as $cat) |
|
| 123 | + {
|
|
| 124 | + print "\t".'<tr class="oddeven">'."\n"; |
|
| 125 | + print "\t\t<td>"; |
|
| 126 | + $categstatic->id=$cat->id; |
|
| 127 | + $categstatic->ref=$cat->label; |
|
| 128 | + $categstatic->label=$cat->label; |
|
| 129 | + $categstatic->type=$cat->type; |
|
| 130 | + $categstatic->color=$cat->color; |
|
| 131 | + print '<span class="noborderoncategories" '.($categstatic->color?' style="background: #'.$categstatic->color.';"':' style="background: #aaa"').'>'; |
|
| 132 | + print $categstatic->getNomUrl(1,''); |
|
| 133 | + print '</span>'; |
|
| 134 | + print "</td>\n"; |
|
| 135 | + print "\t\t<td>"; |
|
| 136 | + print dolGetFirstLineOfText($cat->description); |
|
| 137 | + print "</td>\n"; |
|
| 138 | + print "\t</tr>\n"; |
|
| 139 | + } |
|
| 140 | + print "</table>"; |
|
| 141 | 141 | } |
| 142 | 142 | else print ' '; |
| 143 | 143 | |
@@ -159,21 +159,21 @@ discard block |
||
| 159 | 159 | $data[] = array('rowid'=>0,'fk_menu'=>-1,'title'=>"racine",'mainmenu'=>'','leftmenu'=>'','fk_mainmenu'=>'','fk_leftmenu'=>'');
|
| 160 | 160 | foreach($fulltree as $key => $val) |
| 161 | 161 | {
|
| 162 | - $categstatic->id=$val['id']; |
|
| 163 | - $categstatic->ref=$val['label']; |
|
| 164 | - $categstatic->color=$val['color']; |
|
| 165 | - $categstatic->type=$type; |
|
| 166 | - $li=$categstatic->getNomUrl(1,'',60); |
|
| 167 | - $desc=dol_htmlcleanlastbr($val['description']); |
|
| 168 | - |
|
| 169 | - $data[] = array( |
|
| 170 | - 'rowid'=>$val['rowid'], |
|
| 171 | - 'fk_menu'=>$val['fk_parent'], |
|
| 172 | - 'entry'=>'<table class="nobordernopadding centpercent"><tr><td><span class="noborderoncategories" '.($categstatic->color?' style="background: #'.$categstatic->color.';"':' style="background: #aaa"').'>'.$li.'</span></td>'. |
|
| 173 | - //'<td width="50%">'.dolGetFirstLineOfText($desc).'</td>'. |
|
| 174 | - '<td align="right" width="20px;"><a href="'.DOL_URL_ROOT.'/categories/viewcat.php?id='.$val['id'].'&type='.$type.'">'.img_view().'</a></td>'. |
|
| 175 | - '</tr></table>' |
|
| 176 | - ); |
|
| 162 | + $categstatic->id=$val['id']; |
|
| 163 | + $categstatic->ref=$val['label']; |
|
| 164 | + $categstatic->color=$val['color']; |
|
| 165 | + $categstatic->type=$type; |
|
| 166 | + $li=$categstatic->getNomUrl(1,'',60); |
|
| 167 | + $desc=dol_htmlcleanlastbr($val['description']); |
|
| 168 | + |
|
| 169 | + $data[] = array( |
|
| 170 | + 'rowid'=>$val['rowid'], |
|
| 171 | + 'fk_menu'=>$val['fk_parent'], |
|
| 172 | + 'entry'=>'<table class="nobordernopadding centpercent"><tr><td><span class="noborderoncategories" '.($categstatic->color?' style="background: #'.$categstatic->color.';"':' style="background: #aaa"').'>'.$li.'</span></td>'. |
|
| 173 | + //'<td width="50%">'.dolGetFirstLineOfText($desc).'</td>'. |
|
| 174 | + '<td align="right" width="20px;"><a href="'.DOL_URL_ROOT.'/categories/viewcat.php?id='.$val['id'].'&type='.$type.'">'.img_view().'</a></td>'. |
|
| 175 | + '</tr></table>' |
|
| 176 | + ); |
|
| 177 | 177 | } |
| 178 | 178 | |
| 179 | 179 | |
@@ -183,7 +183,7 @@ discard block |
||
| 183 | 183 | print '<tr class="liste_titre"><td>'.$langs->trans("Categories").'</td><td></td><td align="right">';
|
| 184 | 184 | if (! empty($conf->use_javascript_ajax)) |
| 185 | 185 | {
|
| 186 | - print '<div id="iddivjstreecontrol"><a class="notasortlink" href="#">'.img_picto('','object_category').' '.$langs->trans("UndoExpandAll").'</a> | <a class="notasortlink" href="#">'.img_picto('','object_category-expanded').' '.$langs->trans("ExpandAll").'</a></div>';
|
|
| 186 | + print '<div id="iddivjstreecontrol"><a class="notasortlink" href="#">'.img_picto('','object_category').' '.$langs->trans("UndoExpandAll").'</a> | <a class="notasortlink" href="#">'.img_picto('','object_category-expanded').' '.$langs->trans("ExpandAll").'</a></div>';
|
|
| 187 | 187 | } |
| 188 | 188 | print '</td></tr>'; |
| 189 | 189 | |
@@ -191,20 +191,20 @@ discard block |
||
| 191 | 191 | |
| 192 | 192 | if ($nbofentries > 0) |
| 193 | 193 | {
|
| 194 | - print '<tr class="pair"><td colspan="3">'; |
|
| 195 | - tree_recur($data,$data[0],0); |
|
| 196 | - print '</td></tr>'; |
|
| 194 | + print '<tr class="pair"><td colspan="3">'; |
|
| 195 | + tree_recur($data,$data[0],0); |
|
| 196 | + print '</td></tr>'; |
|
| 197 | 197 | } |
| 198 | 198 | else |
| 199 | 199 | {
|
| 200 | - print '<tr class="pair">'; |
|
| 201 | - print '<td colspan="3"><table class="nobordernopadding"><tr class="nobordernopadding"><td>'.img_picto_common('','treemenu/branchbottom.gif').'</td>';
|
|
| 202 | - print '<td valign="middle">'; |
|
| 203 | - print $langs->trans("NoCategoryYet");
|
|
| 204 | - print '</td>'; |
|
| 205 | - print '<td> </td>'; |
|
| 206 | - print '</table></td>'; |
|
| 207 | - print '</tr>'; |
|
| 200 | + print '<tr class="pair">'; |
|
| 201 | + print '<td colspan="3"><table class="nobordernopadding"><tr class="nobordernopadding"><td>'.img_picto_common('','treemenu/branchbottom.gif').'</td>';
|
|
| 202 | + print '<td valign="middle">'; |
|
| 203 | + print $langs->trans("NoCategoryYet");
|
|
| 204 | + print '</td>'; |
|
| 205 | + print '<td> </td>'; |
|
| 206 | + print '</table></td>'; |
|
| 207 | + print '</tr>'; |
|
| 208 | 208 | } |
| 209 | 209 | |
| 210 | 210 | print "</table>"; |
@@ -150,11 +150,11 @@ discard block |
||
| 150 | 150 | name="main_dir" |
| 151 | 151 | value="<?php print $dolibarr_main_document_root ?>" |
| 152 | 152 | <?php |
| 153 | - if (!empty($force_install_noedit)) {
|
|
| 154 | - print ' disabled'; |
|
| 155 | - } |
|
| 153 | + if (!empty($force_install_noedit)) {
|
|
| 154 | + print ' disabled'; |
|
| 155 | + } |
|
| 156 | 156 | |
| 157 | - ?> |
|
| 157 | + ?> |
|
| 158 | 158 | > |
| 159 | 159 | </td> |
| 160 | 160 | <td class="comment"><?php |
@@ -187,11 +187,11 @@ discard block |
||
| 187 | 187 | name="main_data_dir" |
| 188 | 188 | value="<?php print $dolibarr_main_data_root ?>" |
| 189 | 189 | <?php |
| 190 | - if (!empty($force_install_noedit)) {
|
|
| 191 | - print ' disabled'; |
|
| 192 | - } |
|
| 190 | + if (!empty($force_install_noedit)) {
|
|
| 191 | + print ' disabled'; |
|
| 192 | + } |
|
| 193 | 193 | |
| 194 | - ?> |
|
| 194 | + ?> |
|
| 195 | 195 | > |
| 196 | 196 | </td> |
| 197 | 197 | <td class="comment"><?php |
@@ -225,11 +225,11 @@ discard block |
||
| 225 | 225 | name="main_url" |
| 226 | 226 | value="<?php print $dolibarr_main_url_root; ?> " |
| 227 | 227 | <?php |
| 228 | - if (!empty($force_install_noedit)) {
|
|
| 229 | - print ' disabled'; |
|
| 230 | - } |
|
| 228 | + if (!empty($force_install_noedit)) {
|
|
| 229 | + print ' disabled'; |
|
| 230 | + } |
|
| 231 | 231 | |
| 232 | - ?> |
|
| 232 | + ?> |
|
| 233 | 233 | > |
| 234 | 234 | </td> |
| 235 | 235 | <td class="comment"><?php print $langs->trans("Examples") . ":<br>"; ?>
|
@@ -252,17 +252,17 @@ discard block |
||
| 252 | 252 | id="main_force_https" |
| 253 | 253 | name="main_force_https" |
| 254 | 254 | <?php |
| 255 | - if (!empty($force_install_mainforcehttps)) {
|
|
| 256 | - print ' checked'; |
|
| 257 | - } |
|
| 255 | + if (!empty($force_install_mainforcehttps)) {
|
|
| 256 | + print ' checked'; |
|
| 257 | + } |
|
| 258 | 258 | |
| 259 | - ?> |
|
| 259 | + ?> |
|
| 260 | 260 | <?php |
| 261 | - if ($force_install_noedit == 2 && $force_install_mainforcehttps !== null) {
|
|
| 262 | - print ' disabled'; |
|
| 263 | - } |
|
| 261 | + if ($force_install_noedit == 2 && $force_install_mainforcehttps !== null) {
|
|
| 262 | + print ' disabled'; |
|
| 263 | + } |
|
| 264 | 264 | |
| 265 | - ?> |
|
| 265 | + ?> |
|
| 266 | 266 | > |
| 267 | 267 | </td> |
| 268 | 268 | <td class="comment"><?php echo $langs->trans("CheckToForceHttps"); ?>
|
@@ -290,11 +290,11 @@ discard block |
||
| 290 | 290 | name="db_name" |
| 291 | 291 | value="<?php echo (!empty($dolibarr_main_db_name)) ? $dolibarr_main_db_name : ($force_install_database ? $force_install_database : 'dolibarr'); ?>" |
| 292 | 292 | <?php |
| 293 | - if ($force_install_noedit == 2 && $force_install_database !== null) {
|
|
| 294 | - print ' disabled'; |
|
| 295 | - } |
|
| 293 | + if ($force_install_noedit == 2 && $force_install_database !== null) {
|
|
| 294 | + print ' disabled'; |
|
| 295 | + } |
|
| 296 | 296 | |
| 297 | - ?> |
|
| 297 | + ?> |
|
| 298 | 298 | > |
| 299 | 299 | </td> |
| 300 | 300 | <td class="comment"><?php echo $langs->trans("DatabaseName"); ?></td>
|
@@ -428,11 +428,11 @@ discard block |
||
| 428 | 428 | name="db_host" |
| 429 | 429 | value="<?php print (!empty($force_install_dbserver) ? $force_install_dbserver : (!empty($dolibarr_main_db_host) ? $dolibarr_main_db_host : 'localhost')); ?>" |
| 430 | 430 | <?php |
| 431 | - if ($force_install_noedit == 2 && $force_install_dbserver !== null) {
|
|
| 432 | - print ' disabled'; |
|
| 433 | - } |
|
| 431 | + if ($force_install_noedit == 2 && $force_install_dbserver !== null) {
|
|
| 432 | + print ' disabled'; |
|
| 433 | + } |
|
| 434 | 434 | |
| 435 | - ?> |
|
| 435 | + ?> |
|
| 436 | 436 | > |
| 437 | 437 | </td> |
| 438 | 438 | <td class="comment"><?php echo $langs->trans("ServerAddressDescription"); ?>
|
@@ -448,11 +448,11 @@ discard block |
||
| 448 | 448 | id="db_port" |
| 449 | 449 | value="<?php print (!empty($force_install_port)) ? $force_install_port : $dolibarr_main_db_port; ?>" |
| 450 | 450 | <?php |
| 451 | - if ($force_install_noedit == 2 && $force_install_port !== null) {
|
|
| 452 | - print ' disabled'; |
|
| 453 | - } |
|
| 451 | + if ($force_install_noedit == 2 && $force_install_port !== null) {
|
|
| 452 | + print ' disabled'; |
|
| 453 | + } |
|
| 454 | 454 | |
| 455 | - ?> |
|
| 455 | + ?> |
|
| 456 | 456 | > |
| 457 | 457 | </td> |
| 458 | 458 | <td class="comment"><?php echo $langs->trans("ServerPortDescription"); ?>
|
@@ -468,11 +468,11 @@ discard block |
||
| 468 | 468 | name="db_prefix" |
| 469 | 469 | value="<?php echo(!empty($force_install_prefix) ? $force_install_prefix : (!empty($dolibarr_main_db_prefix) ? $dolibarr_main_db_prefix : 'llx_')); ?>" |
| 470 | 470 | <?php |
| 471 | - if ($force_install_noedit == 2 && $force_install_prefix !== null) {
|
|
| 472 | - print ' disabled'; |
|
| 473 | - } |
|
| 471 | + if ($force_install_noedit == 2 && $force_install_prefix !== null) {
|
|
| 472 | + print ' disabled'; |
|
| 473 | + } |
|
| 474 | 474 | |
| 475 | - ?> |
|
| 475 | + ?> |
|
| 476 | 476 | > |
| 477 | 477 | </td> |
| 478 | 478 | <td class="comment"><?php echo $langs->trans("DatabasePrefixDescription"); ?></td>
|
@@ -485,17 +485,17 @@ discard block |
||
| 485 | 485 | id="db_create_database" |
| 486 | 486 | name="db_create_database" |
| 487 | 487 | <?php |
| 488 | - if ($force_install_createdatabase) {
|
|
| 489 | - print ' checked'; |
|
| 490 | - } |
|
| 488 | + if ($force_install_createdatabase) {
|
|
| 489 | + print ' checked'; |
|
| 490 | + } |
|
| 491 | 491 | |
| 492 | - ?> |
|
| 492 | + ?> |
|
| 493 | 493 | <?php |
| 494 | - if ($force_install_noedit == 2 && $force_install_createdatabase !== null) {
|
|
| 495 | - print ' disabled'; |
|
| 496 | - } |
|
| 494 | + if ($force_install_noedit == 2 && $force_install_createdatabase !== null) {
|
|
| 495 | + print ' disabled'; |
|
| 496 | + } |
|
| 497 | 497 | |
| 498 | - ?> |
|
| 498 | + ?> |
|
| 499 | 499 | > |
| 500 | 500 | </td> |
| 501 | 501 | <td class="comment"><?php echo $langs->trans("CheckToCreateDatabase"); ?>
|
@@ -510,11 +510,11 @@ discard block |
||
| 510 | 510 | name="db_user" |
| 511 | 511 | value="<?php print (!empty($force_install_databaselogin)) ? $force_install_databaselogin : $dolibarr_main_db_user; ?>" |
| 512 | 512 | <?php |
| 513 | - if ($force_install_noedit == 2 && $force_install_databaselogin !== null) {
|
|
| 514 | - print ' disabled'; |
|
| 515 | - } |
|
| 513 | + if ($force_install_noedit == 2 && $force_install_databaselogin !== null) {
|
|
| 514 | + print ' disabled'; |
|
| 515 | + } |
|
| 516 | 516 | |
| 517 | - ?> |
|
| 517 | + ?> |
|
| 518 | 518 | > |
| 519 | 519 | </td> |
| 520 | 520 | <td class="comment"><?php echo $langs->trans("AdminLogin"); ?></td>
|
@@ -527,20 +527,20 @@ discard block |
||
| 527 | 527 | id="db_pass" autocomplete="off" |
| 528 | 528 | name="db_pass" |
| 529 | 529 | value="<?php |
| 530 | - // If $force_install_databasepass is on, we don't want to set password, we just show '***'. Real value will be extracted from the forced install file at step1. |
|
| 531 | - $autofill = ((!empty($_SESSION['dol_save_pass'])) ? $_SESSION['dol_save_pass'] : str_pad('', strlen($force_install_databasepass), '*'));
|
|
| 532 | - if (!empty($dolibarr_main_prod)) {
|
|
| 533 | - $autofill = ''; |
|
| 534 | - } |
|
| 535 | - print dol_escape_htmltag($autofill); |
|
| 536 | - |
|
| 537 | - ?>" |
|
| 530 | + // If $force_install_databasepass is on, we don't want to set password, we just show '***'. Real value will be extracted from the forced install file at step1. |
|
| 531 | + $autofill = ((!empty($_SESSION['dol_save_pass'])) ? $_SESSION['dol_save_pass'] : str_pad('', strlen($force_install_databasepass), '*'));
|
|
| 532 | + if (!empty($dolibarr_main_prod)) {
|
|
| 533 | + $autofill = ''; |
|
| 534 | + } |
|
| 535 | + print dol_escape_htmltag($autofill); |
|
| 536 | + |
|
| 537 | + ?>" |
|
| 538 | 538 | <?php |
| 539 | - if ($force_install_noedit == 2 && $force_install_databasepass !== null) {
|
|
| 540 | - print ' disabled'; |
|
| 541 | - } |
|
| 539 | + if ($force_install_noedit == 2 && $force_install_databasepass !== null) {
|
|
| 540 | + print ' disabled'; |
|
| 541 | + } |
|
| 542 | 542 | |
| 543 | - ?> |
|
| 543 | + ?> |
|
| 544 | 544 | > |
| 545 | 545 | </td> |
| 546 | 546 | <td class="comment"><?php echo $langs->trans("AdminPassword"); ?></td>
|
@@ -553,17 +553,17 @@ discard block |
||
| 553 | 553 | id="db_create_user" |
| 554 | 554 | name="db_create_user" |
| 555 | 555 | <?php |
| 556 | - if (!empty($force_install_createuser)) {
|
|
| 557 | - print ' checked'; |
|
| 558 | - } |
|
| 556 | + if (!empty($force_install_createuser)) {
|
|
| 557 | + print ' checked'; |
|
| 558 | + } |
|
| 559 | 559 | |
| 560 | - ?> |
|
| 560 | + ?> |
|
| 561 | 561 | <?php |
| 562 | - if ($force_install_noedit == 2 && $force_install_createuser !== null) {
|
|
| 563 | - print ' disabled'; |
|
| 564 | - } |
|
| 562 | + if ($force_install_noedit == 2 && $force_install_createuser !== null) {
|
|
| 563 | + print ' disabled'; |
|
| 564 | + } |
|
| 565 | 565 | |
| 566 | - ?> |
|
| 566 | + ?> |
|
| 567 | 567 | > |
| 568 | 568 | </td> |
| 569 | 569 | <td class="comment"><?php echo $langs->trans("CheckToCreateUser"); ?>
|
@@ -592,11 +592,11 @@ discard block |
||
| 592 | 592 | class="needroot" |
| 593 | 593 | value="<?php print (!empty($force_install_databaserootlogin)) ? $force_install_databaserootlogin : @$db_user_root; ?>" |
| 594 | 594 | <?php |
| 595 | - if ($force_install_noedit > 0 && !empty($force_install_databaserootlogin)) {
|
|
| 596 | - print ' disabled'; |
|
| 597 | - } |
|
| 595 | + if ($force_install_noedit > 0 && !empty($force_install_databaserootlogin)) {
|
|
| 596 | + print ' disabled'; |
|
| 597 | + } |
|
| 598 | 598 | |
| 599 | - ?> |
|
| 599 | + ?> |
|
| 600 | 600 | > |
| 601 | 601 | </td> |
| 602 | 602 | <td class="comment"><?php echo $langs->trans("DatabaseRootLoginDescription"); ?>
|
@@ -620,24 +620,24 @@ discard block |
||
| 620 | 620 | class="needroot" |
| 621 | 621 | value="<?php |
| 622 | 622 | // If $force_install_databaserootpass is on, we don't want to set password here, we just show '***'. Real value will be extracted from the forced install file at step1. |
| 623 | - $autofill = ((!empty($force_install_databaserootpass)) ? str_pad('', strlen($force_install_databaserootpass), '*') : @$db_pass_root);
|
|
| 624 | - if (!empty($dolibarr_main_prod)) {
|
|
| 625 | - $autofill = ''; |
|
| 626 | - } |
|
| 623 | + $autofill = ((!empty($force_install_databaserootpass)) ? str_pad('', strlen($force_install_databaserootpass), '*') : @$db_pass_root);
|
|
| 624 | + if (!empty($dolibarr_main_prod)) {
|
|
| 625 | + $autofill = ''; |
|
| 626 | + } |
|
| 627 | 627 | // Do not autofill password if instance is a production instance |
| 628 | - if (!empty($_SERVER["SERVER_NAME"]) && !in_array($_SERVER["SERVER_NAME"], array('127.0.0.1', 'localhost', 'localhostgit'))
|
|
| 629 | - ) {
|
|
| 630 | - $autofill = ''; |
|
| 631 | - } // Do not autofill password for remote access |
|
| 632 | - print dol_escape_htmltag($autofill); |
|
| 628 | + if (!empty($_SERVER["SERVER_NAME"]) && !in_array($_SERVER["SERVER_NAME"], array('127.0.0.1', 'localhost', 'localhostgit'))
|
|
| 629 | + ) {
|
|
| 630 | + $autofill = ''; |
|
| 631 | + } // Do not autofill password for remote access |
|
| 632 | + print dol_escape_htmltag($autofill); |
|
| 633 | 633 | |
| 634 | - ?>" |
|
| 634 | + ?>" |
|
| 635 | 635 | <?php |
| 636 | - if ($force_install_noedit > 0 && !empty($force_install_databaserootpass)) {
|
|
| 637 | - print ' disabled'; // May be removed by javascript |
|
| 638 | - } |
|
| 636 | + if ($force_install_noedit > 0 && !empty($force_install_databaserootpass)) {
|
|
| 637 | + print ' disabled'; // May be removed by javascript |
|
| 638 | + } |
|
| 639 | 639 | |
| 640 | - ?> |
|
| 640 | + ?> |
|
| 641 | 641 | > |
| 642 | 642 | </td> |
| 643 | 643 | <td class="comment"><?php echo $langs->trans("KeepEmptyIfNoPassword"); ?>
|
@@ -12,13 +12,13 @@ |
||
| 12 | 12 | */ |
| 13 | 13 | function check_user_password_http($usertotest,$passwordtotest,$entitytotest) |
| 14 | 14 | {
|
| 15 | - AlDolUtils::dol_syslog("functions_http::check_user_password_http _SERVER[REMOTE_USER]=" . (empty($_SERVER["REMOTE_USER"]) ? '' : $_SERVER["REMOTE_USER"]));
|
|
| 15 | + AlDolUtils::dol_syslog("functions_http::check_user_password_http _SERVER[REMOTE_USER]=" . (empty($_SERVER["REMOTE_USER"]) ? '' : $_SERVER["REMOTE_USER"]));
|
|
| 16 | 16 | |
| 17 | 17 | $login=''; |
| 18 | - if (! empty($_SERVER["REMOTE_USER"])) |
|
| 19 | - {
|
|
| 20 | - $login=$_SERVER["REMOTE_USER"]; |
|
| 21 | - } |
|
| 18 | + if (! empty($_SERVER["REMOTE_USER"])) |
|
| 19 | + {
|
|
| 20 | + $login=$_SERVER["REMOTE_USER"]; |
|
| 21 | + } |
|
| 22 | 22 | |
| 23 | - return $login; |
|
| 23 | + return $login; |
|
| 24 | 24 | } |
