28 require_once DOL_DOCUMENT_ROOT.
'/core/class/commonobject.class.php';
29 require_once DOL_DOCUMENT_ROOT.
'/core/class/commonobjectline.class.php';
30 require_once DOL_DOCUMENT_ROOT.
'/expensereport/class/expensereport_ik.class.php';
31 require_once DOL_DOCUMENT_ROOT.
'/expensereport/class/expensereport_rule.class.php';
41 public $element =
'expensereport';
46 public $table_element =
'expensereport';
51 public $table_element_line =
'expensereport_det';
56 public $fk_element =
'fk_expensereport';
61 public $picto =
'trip';
63 public $lines = array();
84 public $fk_c_paiement;
87 public $user_author_infos;
88 public $user_validator_infos;
90 public $rule_warning_message;
96 public $fk_user_author;
100 public $fk_user_modif;
104 public $detail_refuse;
105 public $fk_user_refuse;
109 public $detail_cancel;
110 public $fk_user_cancel;
112 public $fk_user_validator;
119 public $fk_user_valid;
120 public $user_valid_infos;
123 public $date_approve;
124 public $fk_user_approve;
127 public $user_paid_infos;
132 public $statuts = array();
133 public $statuts_short = array();
134 public $statuts_logo;
168 public $fields = array(
169 'rowid' =>array(
'type'=>
'integer',
'label'=>
'ID',
'enabled'=>1,
'visible'=>-1,
'notnull'=>1,
'position'=>10),
170 'ref' =>array(
'type'=>
'varchar(50)',
'label'=>
'Ref',
'enabled'=>1,
'visible'=>-1,
'notnull'=>1,
'showoncombobox'=>1,
'position'=>15),
171 'entity' =>array(
'type'=>
'integer',
'label'=>
'Entity',
'default'=>1,
'enabled'=>1,
'visible'=>-2,
'notnull'=>1,
'position'=>20),
172 'ref_number_int' =>array(
'type'=>
'integer',
'label'=>
'Ref number int',
'enabled'=>1,
'visible'=>-1,
'position'=>25),
173 'ref_ext' =>array(
'type'=>
'integer',
'label'=>
'Ref ext',
'enabled'=>1,
'visible'=>-1,
'position'=>30),
174 'total_ht' =>array(
'type'=>
'double(24,8)',
'label'=>
'Total ht',
'enabled'=>1,
'visible'=>-1,
'position'=>35),
175 'total_tva' =>array(
'type'=>
'double(24,8)',
'label'=>
'Total tva',
'enabled'=>1,
'visible'=>-1,
'position'=>40),
176 'localtax1' =>array(
'type'=>
'double(24,8)',
'label'=>
'Localtax1',
'enabled'=>1,
'visible'=>-1,
'position'=>45),
177 'localtax2' =>array(
'type'=>
'double(24,8)',
'label'=>
'Localtax2',
'enabled'=>1,
'visible'=>-1,
'position'=>50),
178 'total_ttc' =>array(
'type'=>
'double(24,8)',
'label'=>
'Total ttc',
'enabled'=>1,
'visible'=>-1,
'position'=>55),
179 'date_debut' =>array(
'type'=>
'date',
'label'=>
'Date debut',
'enabled'=>1,
'visible'=>-1,
'notnull'=>1,
'position'=>60),
180 'date_fin' =>array(
'type'=>
'date',
'label'=>
'Date fin',
'enabled'=>1,
'visible'=>-1,
'notnull'=>1,
'position'=>65),
181 'date_valid' =>array(
'type'=>
'datetime',
'label'=>
'Date valid',
'enabled'=>1,
'visible'=>-1,
'position'=>75),
182 'date_approve' =>array(
'type'=>
'datetime',
'label'=>
'Date approve',
'enabled'=>1,
'visible'=>-1,
'position'=>80),
183 'date_refuse' =>array(
'type'=>
'datetime',
'label'=>
'Date refuse',
'enabled'=>1,
'visible'=>-1,
'position'=>85),
184 'date_cancel' =>array(
'type'=>
'datetime',
'label'=>
'Date cancel',
'enabled'=>1,
'visible'=>-1,
'position'=>90),
185 'fk_user_author' =>array(
'type'=>
'integer',
'label'=>
'Fk user author',
'enabled'=>1,
'visible'=>-1,
'notnull'=>1,
'position'=>100),
186 'fk_user_modif' =>array(
'type'=>
'integer',
'label'=>
'Fk user modif',
'enabled'=>1,
'visible'=>-1,
'position'=>105),
187 'fk_user_valid' =>array(
'type'=>
'integer',
'label'=>
'Fk user valid',
'enabled'=>1,
'visible'=>-1,
'position'=>110),
188 'fk_user_validator' =>array(
'type'=>
'integer',
'label'=>
'Fk user validator',
'enabled'=>1,
'visible'=>-1,
'position'=>115),
189 'fk_user_approve' =>array(
'type'=>
'integer',
'label'=>
'Fk user approve',
'enabled'=>1,
'visible'=>-1,
'position'=>120),
190 'fk_user_refuse' =>array(
'type'=>
'integer',
'label'=>
'Fk user refuse',
'enabled'=>1,
'visible'=>-1,
'position'=>125),
191 'fk_user_cancel' =>array(
'type'=>
'integer',
'label'=>
'Fk user cancel',
'enabled'=>1,
'visible'=>-1,
'position'=>130),
192 'fk_c_paiement' =>array(
'type'=>
'integer',
'label'=>
'Fk c paiement',
'enabled'=>1,
'visible'=>-1,
'position'=>140),
193 'paid' =>array(
'type'=>
'integer',
'label'=>
'Paid',
'enabled'=>1,
'visible'=>-1,
'notnull'=>1,
'position'=>145),
194 'note_public' =>array(
'type'=>
'text',
'label'=>
'Note public',
'enabled'=>1,
'visible'=>0,
'position'=>150),
195 'note_private' =>array(
'type'=>
'text',
'label'=>
'Note private',
'enabled'=>1,
'visible'=>0,
'position'=>155),
196 'detail_refuse' =>array(
'type'=>
'varchar(255)',
'label'=>
'Detail refuse',
'enabled'=>1,
'visible'=>-1,
'position'=>160),
197 'detail_cancel' =>array(
'type'=>
'varchar(255)',
'label'=>
'Detail cancel',
'enabled'=>1,
'visible'=>-1,
'position'=>165),
198 'integration_compta' =>array(
'type'=>
'integer',
'label'=>
'Integration compta',
'enabled'=>1,
'visible'=>-1,
'position'=>170),
199 'fk_bank_account' =>array(
'type'=>
'integer',
'label'=>
'Fk bank account',
'enabled'=>1,
'visible'=>-1,
'position'=>175),
200 'fk_multicurrency' =>array(
'type'=>
'integer',
'label'=>
'Fk multicurrency',
'enabled'=>1,
'visible'=>-1,
'position'=>185),
201 'multicurrency_code' =>array(
'type'=>
'varchar(255)',
'label'=>
'Multicurrency code',
'enabled'=>1,
'visible'=>-1,
'position'=>190),
202 'multicurrency_tx' =>array(
'type'=>
'double(24,8)',
'label'=>
'Multicurrency tx',
'enabled'=>1,
'visible'=>-1,
'position'=>195),
203 'multicurrency_total_ht' =>array(
'type'=>
'double(24,8)',
'label'=>
'Multicurrency total ht',
'enabled'=>1,
'visible'=>-1,
'position'=>200),
204 'multicurrency_total_tva' =>array(
'type'=>
'double(24,8)',
'label'=>
'Multicurrency total tva',
'enabled'=>1,
'visible'=>-1,
'position'=>205),
205 'multicurrency_total_ttc' =>array(
'type'=>
'double(24,8)',
'label'=>
'Multicurrency total ttc',
'enabled'=>1,
'visible'=>-1,
'position'=>210),
206 'extraparams' =>array(
'type'=>
'varchar(255)',
'label'=>
'Extraparams',
'enabled'=>1,
'visible'=>-1,
'position'=>220),
207 'date_create' =>array(
'type'=>
'datetime',
'label'=>
'Date create',
'enabled'=>1,
'visible'=>-1,
'notnull'=>1,
'position'=>300),
208 'tms' =>array(
'type'=>
'timestamp',
'label'=>
'Tms',
'enabled'=>1,
'visible'=>-1,
'notnull'=>1,
'position'=>305),
209 'import_key' =>array(
'type'=>
'varchar(14)',
'label'=>
'ImportId',
'enabled'=>1,
'visible'=>-1,
'position'=>1000),
210 'model_pdf' =>array(
'type'=>
'varchar(255)',
'label'=>
'Model pdf',
'enabled'=>1,
'visible'=>0,
'position'=>1010),
211 'fk_statut' =>array(
'type'=>
'integer',
'label'=>
'Fk statut',
'enabled'=>1,
'visible'=>-1,
'notnull'=>1,
'position'=>500),
223 $this->total_ttc = 0;
224 $this->total_tva = 0;
225 $this->total_localtax1 = 0;
226 $this->total_localtax2 = 0;
227 $this->localtax1 = 0;
228 $this->localtax2 = 0;
229 $this->modepaymentid = 0;
232 $this->statuts_short = array(0 =>
'Draft', 2 =>
'Validated', 4 =>
'Canceled', 5 =>
'Approved', 6 =>
'Paid', 99 =>
'Refused');
233 $this->statuts = array(0 =>
'Draft', 2 =>
'ValidatedWaitingApproval', 4 =>
'Canceled', 5 =>
'Approved', 6 =>
'Paid', 99 =>
'Refused');
234 $this->statuts_logo = array(0 =>
'status0', 2 =>
'status1', 4 =>
'status6', 5 =>
'status4', 6 =>
'status6', 99 =>
'status5');
244 public function create($user, $notrigger = 0)
246 global $conf, $langs;
253 if (empty($this->date_debut) || empty($this->date_fin)) {
254 $this->error = $langs->trans(
'ErrorFieldRequired', $langs->transnoentitiesnoconv(
'Date'));
258 $fuserid = $this->fk_user_author;
259 if (empty($fuserid)) {
260 $fuserid = $user->id;
265 $sql =
"INSERT INTO ".MAIN_DB_PREFIX.$this->table_element.
" (";
268 $sql .=
",total_ttc";
269 $sql .=
",total_tva";
270 $sql .=
",date_debut";
272 $sql .=
",date_create";
273 $sql .=
",fk_user_creat";
274 $sql .=
",fk_user_author";
275 $sql .=
",fk_user_validator";
276 $sql .=
",fk_user_approve";
277 $sql .=
",fk_user_modif";
278 $sql .=
",fk_statut";
279 $sql .=
",fk_c_paiement";
281 $sql .=
",note_public";
282 $sql .=
",note_private";
286 $sql .=
", ".price2num($this->total_ht,
'MT');
287 $sql .=
", ".price2num($this->total_ttc,
'MT');
288 $sql .=
", ".price2num($this->total_tva,
'MT');
289 $sql .=
", '".$this->db->idate($this->date_debut).
"'";
290 $sql .=
", '".$this->db->idate($this->date_fin).
"'";
291 $sql .=
", '".$this->db->idate($now).
"'";
292 $sql .=
", ".((int) $user->id);
293 $sql .=
", ".((int) $fuserid);
294 $sql .=
", ".($this->fk_user_validator > 0 ? ((int) $this->fk_user_validator) :
"null");
295 $sql .=
", ".($this->fk_user_approve > 0 ? ((int) $this->fk_user_approve) :
"null");
296 $sql .=
", ".($this->fk_user_modif > 0 ? ((int) $this->fk_user_modif) :
"null");
297 $sql .=
", ".($this->fk_statut > 1 ? ((int) $this->fk_statut) : 0);
298 $sql .=
", ".($this->modepaymentid ? ((int) $this->modepaymentid) :
"null");
300 $sql .=
", ".($this->note_public ?
"'".$this->db->escape($this->note_public).
"'" :
"null");
301 $sql .=
", ".($this->note_private ?
"'".$this->db->escape($this->note_private).
"'" :
"null");
302 $sql .=
", ".((int) $conf->entity);
305 $result = $this->
db->query($sql);
307 $this->
id = $this->
db->last_insert_id(MAIN_DB_PREFIX.$this->table_element);
308 $this->
ref =
'(PROV'.$this->id.
')';
310 $sql =
'UPDATE '.MAIN_DB_PREFIX.$this->table_element.
" SET ref='".$this->
db->escape($this->
ref).
"' WHERE rowid=".((int) $this->
id);
313 $this->error = $this->
db->lasterror();
318 if (is_array($this->lines) && count($this->lines) > 0) {
319 foreach ($this->lines as $line) {
322 if (!is_object($line)) {
323 $line = (object) $line;
325 $newndfline->fk_expensereport = $line->fk_expensereport;
326 $newndfline->fk_c_type_fees = $line->fk_c_type_fees;
327 $newndfline->fk_project = $line->fk_project;
328 $newndfline->vatrate = $line->vatrate;
329 $newndfline->vat_src_code = $line->vat_src_code;
330 $newndfline->localtax1_tx = $line->localtax1_tx;
331 $newndfline->localtax2_tx = $line->localtax2_tx;
332 $newndfline->localtax1_type = $line->localtax1_type;
333 $newndfline->localtax2_type = $line->localtax2_type;
334 $newndfline->comments = $line->comments;
335 $newndfline->qty = $line->qty;
336 $newndfline->value_unit = $line->value_unit;
337 $newndfline->total_ht = $line->total_ht;
338 $newndfline->total_ttc = $line->total_ttc;
339 $newndfline->total_tva = $line->total_tva;
340 $newndfline->total_localtax1 = $line->total_localtax1;
341 $newndfline->total_localtax2 = $line->total_localtax2;
342 $newndfline->date = $line->date;
343 $newndfline->rule_warning_message = $line->rule_warning_message;
344 $newndfline->fk_c_exp_tax_cat = $line->fk_c_exp_tax_cat;
345 $newndfline->fk_ecm_files = $line->fk_ecm_files;
350 $newndfline->fk_expensereport = $this->id;
351 $result = $newndfline->insert();
353 $this->error = $newndfline->error;
354 $this->errors = $newndfline->errors;
374 $result = $this->
call_trigger(
'EXPENSE_REPORT_CREATE', $user);
386 $this->
db->rollback();
390 $this->
db->rollback();
394 dol_syslog(get_class($this).
"::create error ".$this->error, LOG_ERR);
395 $this->
db->rollback();
399 $this->error = $this->
db->lasterror().
" sql=".$sql;
400 $this->
db->rollback();
418 if (empty($fk_user_author)) {
419 $fk_user_author = $user->id;
429 $objFrom = clone $this;
434 $this->fk_statut = 0;
437 $this->fk_user_creat = $user->id;
438 $this->fk_user_author = $fk_user_author;
439 $this->fk_user_valid =
'';
440 $this->date_create =
'';
441 $this->date_creation =
'';
442 $this->date_validation =
'';
445 if (is_array($this->lines) && count($this->lines) > 0) {
446 foreach ($this->lines as $key => $line) {
447 $this->lines[$key]->fk_ecm_files = 0;
452 $this->context[
'createfromclone'] =
'createfromclone';
453 $result = $this->
create($user);
460 if (is_object($hookmanager)) {
461 $parameters = array(
'objFrom'=>$objFrom);
463 $reshook = $hookmanager->executeHooks(
'createFrom', $parameters, $this, $action);
465 $this->errors += $hookmanager->errors;
466 $this->error = $hookmanager->error;
472 unset($this->context[
'createfromclone']);
479 $this->
db->rollback();
493 public function update($user, $notrigger = 0, $userofexpensereport =
null)
500 $sql =
"UPDATE ".MAIN_DB_PREFIX.$this->table_element.
" SET";
501 $sql .=
" total_ht = ".$this->total_ht;
502 $sql .=
" , total_ttc = ".$this->total_ttc;
503 $sql .=
" , total_tva = ".$this->total_tva;
504 $sql .=
" , date_debut = '".$this->db->idate($this->date_debut).
"'";
505 $sql .=
" , date_fin = '".$this->db->idate($this->date_fin).
"'";
506 if ($userofexpensereport && is_object($userofexpensereport)) {
507 $sql .=
" , fk_user_author = ".($userofexpensereport->id > 0 ? $userofexpensereport->id :
"null");
509 $sql .=
" , fk_user_validator = ".($this->fk_user_validator > 0 ? $this->fk_user_validator :
"null");
510 $sql .=
" , fk_user_valid = ".($this->fk_user_valid > 0 ? $this->fk_user_valid :
"null");
511 $sql .=
" , fk_user_approve = ".($this->fk_user_approve > 0 ? $this->fk_user_approve :
"null");
512 $sql .=
" , fk_user_modif = ".$user->id;
513 $sql .=
" , fk_statut = ".($this->fk_statut >= 0 ? $this->fk_statut :
'0');
514 $sql .=
" , fk_c_paiement = ".($this->fk_c_paiement > 0 ? $this->fk_c_paiement :
"null");
515 $sql .=
" , note_public = ".(!empty($this->note_public) ?
"'".$this->db->escape($this->note_public).
"'" :
"''");
516 $sql .=
" , note_private = ".(!empty($this->note_private) ?
"'".$this->db->escape($this->note_private).
"'" :
"''");
517 $sql .=
" , detail_refuse = ".(!empty($this->detail_refuse) ?
"'".$this->db->escape($this->detail_refuse).
"'" :
"''");
518 $sql .=
" WHERE rowid = ".((int) $this->
id);
520 dol_syslog(get_class($this).
"::update", LOG_DEBUG);
521 $result = $this->
db->query($sql);
525 $result = $this->
call_trigger(
'EXPENSE_REPORT_MODIFY', $user);
537 $this->
db->rollback();
538 $this->error = $this->
db->error();
542 $this->
db->rollback();
543 $this->error = $this->
db->error();
555 public function fetch($id, $ref =
'')
559 $sql =
"SELECT d.rowid, d.entity, d.ref, d.note_public, d.note_private,";
560 $sql .=
" d.detail_refuse, d.detail_cancel, d.fk_user_refuse, d.fk_user_cancel,";
561 $sql .=
" d.date_refuse, d.date_cancel,";
562 $sql .=
" d.total_ht, d.total_ttc, d.total_tva,";
563 $sql .=
" d.localtax1 as total_localtax1, d.localtax2 as total_localtax2,";
564 $sql .=
" d.date_debut, d.date_fin, d.date_create, d.tms as date_modif, d.date_valid, d.date_approve,";
565 $sql .=
" d.fk_user_creat, d.fk_user_author, d.fk_user_modif, d.fk_user_validator,";
566 $sql .=
" d.fk_user_valid, d.fk_user_approve,";
567 $sql .=
" d.fk_statut as status, d.fk_c_paiement, d.paid";
568 $sql .=
" FROM ".MAIN_DB_PREFIX.$this->table_element.
" as d";
570 $sql .=
" WHERE d.ref = '".$this->db->escape($ref).
"'";
572 $sql .=
" WHERE d.rowid = ".((int) $id);
576 dol_syslog(get_class($this).
"::fetch", LOG_DEBUG);
579 $obj = $this->
db->fetch_object(
$resql);
581 $this->
id = $obj->rowid;
582 $this->
ref = $obj->ref;
584 $this->entity = $obj->entity;
586 $this->total_ht = $obj->total_ht;
587 $this->total_tva = $obj->total_tva;
588 $this->total_ttc = $obj->total_ttc;
589 $this->localtax1 = $obj->total_localtax1;
590 $this->localtax2 = $obj->total_localtax2;
591 $this->total_localtax1 = $obj->total_localtax1;
592 $this->total_localtax2 = $obj->total_localtax2;
594 $this->note_public = $obj->note_public;
595 $this->note_private = $obj->note_private;
596 $this->detail_refuse = $obj->detail_refuse;
597 $this->detail_cancel = $obj->detail_cancel;
599 $this->date_debut = $this->
db->jdate($obj->date_debut);
600 $this->date_fin = $this->
db->jdate($obj->date_fin);
601 $this->date_valid = $this->
db->jdate($obj->date_valid);
602 $this->date_approve = $this->
db->jdate($obj->date_approve);
603 $this->date_create = $this->
db->jdate($obj->date_create);
604 $this->date_modif = $this->
db->jdate($obj->date_modif);
605 $this->date_refuse = $this->
db->jdate($obj->date_refuse);
606 $this->date_cancel = $this->
db->jdate($obj->date_cancel);
608 $this->fk_user_creat = $obj->fk_user_creat;
609 $this->fk_user_author = $obj->fk_user_author;
610 $this->fk_user_modif = $obj->fk_user_modif;
611 $this->fk_user_validator = $obj->fk_user_validator;
612 $this->fk_user_valid = $obj->fk_user_valid;
613 $this->fk_user_refuse = $obj->fk_user_refuse;
614 $this->fk_user_cancel = $obj->fk_user_cancel;
615 $this->fk_user_approve = $obj->fk_user_approve;
617 $user_author =
new User($this->
db);
618 if ($this->fk_user_author > 0) {
619 $user_author->fetch($this->fk_user_author);
622 $this->user_author_infos =
dolGetFirstLastname($user_author->firstname, $user_author->lastname);
624 $user_approver =
new User($this->
db);
625 if ($this->fk_user_approve > 0) {
626 $user_approver->fetch($this->fk_user_approve);
627 } elseif ($this->fk_user_validator > 0) {
628 $user_approver->fetch($this->fk_user_validator);
630 $this->user_validator_infos =
dolGetFirstLastname($user_approver->firstname, $user_approver->lastname);
632 $this->fk_statut = $obj->status;
633 $this->status = $obj->status;
634 $this->fk_c_paiement = $obj->fk_c_paiement;
635 $this->paid = $obj->paid;
637 if ($this->status == self::STATUS_APPROVED || $this->status == self::STATUS_CLOSED) {
638 $user_valid =
new User($this->
db);
639 if ($this->fk_user_valid > 0) {
640 $user_valid->fetch($this->fk_user_valid);
642 $this->user_valid_infos =
dolGetFirstLastname($user_valid->firstname, $user_valid->lastname);
654 $this->error = $this->
db->lasterror();
670 public function set_paid($id, $fuser, $notrigger = 0)
673 dol_syslog(get_class($this).
"::set_paid is deprecated, use setPaid instead", LOG_NOTICE);
674 return $this->
setPaid($id, $fuser, $notrigger);
685 public function setPaid($id, $fuser, $notrigger = 0)
690 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"expensereport";
691 $sql .=
" SET fk_statut = ".self::STATUS_CLOSED.
", paid=1";
694 dol_syslog(get_class($this).
"::set_paid", LOG_DEBUG);
697 if ($this->
db->affected_rows(
$resql)) {
700 $result = $this->
call_trigger(
'EXPENSE_REPORT_PAID', $fuser);
712 $this->
db->rollback();
713 $this->error = $this->
db->error();
721 $this->
db->rollback();
735 return $this->
LibStatut($this->status, $mode);
751 $labelStatus = $langs->transnoentitiesnoconv($this->statuts[$status]);
752 $labelStatusShort = $langs->transnoentitiesnoconv($this->statuts_short[$status]);
754 $statusType = $this->statuts_logo[$status];
756 return dolGetStatus($labelStatus, $labelStatusShort,
'', $statusType, $mode);
770 $sql =
"SELECT f.rowid,";
771 $sql .=
" f.date_create as datec,";
772 $sql .=
" f.tms as date_modification,";
773 $sql .=
" f.date_valid as datev,";
774 $sql .=
" f.date_approve as datea,";
775 $sql .=
" f.fk_user_creat as fk_user_creation,";
776 $sql .=
" f.fk_user_modif as fk_user_modification,";
777 $sql .=
" f.fk_user_valid,";
778 $sql .=
" f.fk_user_approve";
779 $sql .=
" FROM ".MAIN_DB_PREFIX.
"expensereport as f";
780 $sql .=
" WHERE f.rowid = ".((int) $id);
781 $sql .=
" AND f.entity = ".$conf->entity;
786 $obj = $this->
db->fetch_object(
$resql);
788 $this->
id = $obj->rowid;
790 $this->date_creation = $this->
db->jdate($obj->datec);
791 $this->date_modification = $this->
db->jdate($obj->date_modification);
792 $this->date_validation = $this->
db->jdate($obj->datev);
793 $this->date_approbation = $this->
db->jdate($obj->datea);
795 $cuser =
new User($this->
db);
796 $cuser->fetch($obj->fk_user_author);
797 $this->user_creation = $cuser;
799 if ($obj->fk_user_creation) {
800 $cuser =
new User($this->
db);
801 $cuser->fetch($obj->fk_user_creation);
802 $this->user_creation = $cuser;
804 if ($obj->fk_user_valid) {
805 $vuser =
new User($this->
db);
806 $vuser->fetch($obj->fk_user_valid);
807 $this->user_validation = $vuser;
809 if ($obj->fk_user_modification) {
810 $muser =
new User($this->
db);
811 $muser->fetch($obj->fk_user_modification);
812 $this->user_modification = $muser;
814 if ($obj->fk_user_approve) {
815 $auser =
new User($this->
db);
816 $auser->fetch($obj->fk_user_approve);
817 $this->user_approve = $auser;
837 global $user, $langs, $conf;
843 $this->
ref =
'SPECIMEN';
846 $this->date_create = $now;
847 $this->date_debut = $now;
848 $this->date_fin = $now;
849 $this->date_valid = $now;
850 $this->date_approve = $now;
855 $this->fk_statut = 5;
857 $this->fk_user_author = $user->id;
858 $this->fk_user_validator = $user->id;
859 $this->fk_user_valid = $user->id;
860 $this->fk_user_approve = $user->id;
862 $this->note_private =
'Private note';
863 $this->note_public =
'SPECIMEN';
866 while ($xnbp < $nbp) {
868 $line->comments = $langs->trans(
"Comment").
" ".$xnbp;
869 $line->date = ($now - 3600 * (1 + $xnbp));
870 $line->total_ht = 100;
871 $line->total_tva = 20;
872 $line->total_ttc = 120;
875 $line->value_unit = 120;
876 $line->fk_expensereport = 0;
877 $line->type_fees_code =
'TRA';
878 $line->fk_c_type_fees = $type_fees_id;
880 $line->projet_ref =
'ABC';
882 $this->lines[$xnbp] = $line;
885 $this->total_ht += $line->total_ht;
886 $this->total_tva += $line->total_tva;
887 $this->total_ttc += $line->total_ttc;
902 global $conf, $db, $langs;
904 $langs->load(
'trips');
906 if ($user->rights->expensereport->lire) {
907 $sql =
"SELECT de.fk_expensereport, de.date, de.comments, de.total_ht, de.total_ttc";
908 $sql .=
" FROM ".MAIN_DB_PREFIX.
"expensereport_det as de";
909 $sql .=
" WHERE de.fk_projet = ".((int) $projectid);
911 dol_syslog(get_class($this).
"::fetch", LOG_DEBUG);
912 $result = $this->
db->query($sql);
914 $num = $this->
db->num_rows($result);
920 $objp = $this->
db->fetch_object($result);
922 $sql2 =
"SELECT d.rowid, d.fk_user_author, d.ref, d.fk_statut as status";
923 $sql2 .=
" FROM ".MAIN_DB_PREFIX.
"expensereport as d";
924 $sql2 .=
" WHERE d.rowid = ".((int) $objp->fk_expensereport);
926 $result2 = $this->
db->query($sql2);
927 $obj = $this->
db->fetch_object($result2);
929 $objp->fk_user_author = $obj->fk_user_author;
930 $objp->ref = $obj->ref;
931 $objp->fk_c_expensereport_status = $obj->status;
932 $objp->rowid = $obj->rowid;
934 $total_HT = $total_HT + $objp->total_ht;
935 $total_TTC = $total_TTC + $objp->total_ttc;
936 $author =
new User($this->
db);
937 $author->fetch($objp->fk_user_author);
940 print
'<td><a href="'.DOL_URL_ROOT.
'/expensereport/card.php?id='.$objp->rowid.
'">'.$objp->ref_num.
'</a></td>';
941 print
'<td class="center">'.dol_print_date($objp->date,
'day').
'</td>';
942 print
'<td>'.$author->getNomUrl(1).
'</td>';
943 print
'<td>'.$objp->comments.
'</td>';
944 print
'<td class="right">'.price($objp->total_ht).
'</td>';
945 print
'<td class="right">'.price($objp->total_ttc).
'</td>';
946 print
'<td class="right">';
948 switch ($objp->fk_c_expensereport_status) {
950 print
img_picto($langs->trans(
'StatusOrderCanceled'),
'statut5');
953 print $langs->trans(
'Draft').
' '.
img_picto($langs->trans(
'Draft'),
'statut0');
956 print $langs->trans(
'TripForValid').
' '.
img_picto($langs->trans(
'TripForValid'),
'statut3');
959 print $langs->trans(
'TripForPaid').
' '.
img_picto($langs->trans(
'TripForPaid'),
'statut3');
962 print $langs->trans(
'TripPaid').
' '.
img_picto($langs->trans(
'TripPaid'),
'statut4');
979 print
'<tr class="liste_total"><td colspan="4">'.$langs->trans(
"Number").
': '.$i.
'</td>';
980 print
'<td class="right" width="100">'.$langs->trans(
"TotalHT").
' : '.
price($total_HT).
'</td>';
981 print
'<td class="right" width="100">'.$langs->trans(
"TotalTTC").
' : '.
price($total_TTC).
'</td>';
982 print
'<td> </td>';
985 $this->error = $this->
db->lasterror();
1002 $this->lines = array();
1004 $sql =
' SELECT de.rowid, de.comments, de.qty, de.value_unit, de.date, de.rang,';
1005 $sql .=
" de.".$this->fk_element.
", de.fk_c_type_fees, de.fk_c_exp_tax_cat, de.fk_projet as fk_project,";
1006 $sql .=
' de.tva_tx, de.vat_src_code,';
1007 $sql .=
' de.localtax1_tx, de.localtax2_tx, de.localtax1_type, de.localtax2_type,';
1008 $sql .=
' de.fk_ecm_files,';
1009 $sql .=
' de.total_ht, de.total_tva, de.total_ttc,';
1010 $sql .=
' de.total_localtax1, de.total_localtax2, de.rule_warning_message,';
1011 $sql .=
' ctf.code as code_type_fees, ctf.label as libelle_type_fees, ctf.accountancy_code as accountancy_code_type_fees,';
1012 $sql .=
' p.ref as ref_projet, p.title as title_projet';
1013 $sql .=
' FROM '.MAIN_DB_PREFIX.$this->table_element_line.
' as de';
1014 $sql .=
' LEFT JOIN '.MAIN_DB_PREFIX.
'c_type_fees as ctf ON de.fk_c_type_fees = ctf.id';
1015 $sql .=
' LEFT JOIN '.MAIN_DB_PREFIX.
'projet as p ON de.fk_projet = p.rowid';
1016 $sql .=
" WHERE de.".$this->fk_element.
" = ".((int) $this->
id);
1017 if (!empty($conf->global->EXPENSEREPORT_LINES_SORTED_BY_ROWID)) {
1018 $sql .=
' ORDER BY de.rang ASC, de.rowid ASC';
1020 $sql .=
' ORDER BY de.rang ASC, de.date ASC';
1025 $num = $this->
db->num_rows(
$resql);
1028 $objp = $this->
db->fetch_object(
$resql);
1032 $deplig->rowid = $objp->rowid;
1033 $deplig->id = $objp->rowid;
1034 $deplig->comments = $objp->comments;
1035 $deplig->qty = $objp->qty;
1036 $deplig->value_unit = $objp->value_unit;
1037 $deplig->date = $objp->date;
1038 $deplig->dates = $this->
db->jdate($objp->date);
1040 $deplig->fk_expensereport = $objp->fk_expensereport;
1041 $deplig->fk_c_type_fees = $objp->fk_c_type_fees;
1042 $deplig->fk_c_exp_tax_cat = $objp->fk_c_exp_tax_cat;
1043 $deplig->fk_projet = $objp->fk_project;
1044 $deplig->fk_project = $objp->fk_project;
1045 $deplig->fk_ecm_files = $objp->fk_ecm_files;
1047 $deplig->total_ht = $objp->total_ht;
1048 $deplig->total_tva = $objp->total_tva;
1049 $deplig->total_ttc = $objp->total_ttc;
1050 $deplig->total_localtax1 = $objp->total_localtax1;
1051 $deplig->total_localtax2 = $objp->total_localtax2;
1053 $deplig->type_fees_code = empty($objp->code_type_fees) ?
'TF_OTHER' : $objp->code_type_fees;
1054 $deplig->type_fees_libelle = $objp->libelle_type_fees;
1055 $deplig->type_fees_accountancy_code = $objp->accountancy_code_type_fees;
1057 $deplig->tva_tx = $objp->tva_tx;
1058 $deplig->vatrate = $objp->tva_tx;
1059 $deplig->vat_src_code = $objp->vat_src_code;
1060 $deplig->localtax1_tx = $objp->localtax1_tx;
1061 $deplig->localtax2_tx = $objp->localtax2_tx;
1062 $deplig->localtax1_type = $objp->localtax1_type;
1063 $deplig->localtax2_type = $objp->localtax2_type;
1065 $deplig->projet_ref = $objp->ref_projet;
1066 $deplig->projet_title = $objp->title_projet;
1068 $deplig->rule_warning_message = $objp->rule_warning_message;
1070 $deplig->rang = $objp->rang;
1072 $this->lines[$i] = $deplig;
1079 $this->error = $this->
db->lasterror();
1080 dol_syslog(get_class($this).
"::fetch_lines: Error ".$this->error, LOG_ERR);
1093 public function delete(
User $user =
null, $notrigger =
false)
1096 require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
1104 $result = $this->
call_trigger(
'EXPENSE_REPORT_DELETE', $user);
1112 if (!$error && !empty($this->table_element_line)) {
1113 $tabletodelete = $this->table_element_line;
1115 $sql =
"DELETE FROM ".MAIN_DB_PREFIX.$tabletodelete.
" WHERE ".$this->fk_element.
" = ".((int) $this->
id);
1116 if (!$this->
db->query($sql)) {
1118 $this->error = $this->
db->lasterror();
1119 $this->errors[] = $this->error;
1120 dol_syslog(get_class($this).
"::delete error ".$this->error, LOG_ERR);
1145 dol_syslog(get_class($this).
"::delete error ".$this->error, LOG_ERR);
1151 $sql =
"DELETE FROM ".MAIN_DB_PREFIX.$this->table_element.
" WHERE rowid = ".((int) $this->
id);
1152 $res = $this->
db->query($sql);
1155 $this->error = $this->
db->lasterror();
1156 $this->errors[] = $this->error;
1157 dol_syslog(get_class($this).
"::delete error ".$this->error, LOG_ERR);
1172 if ($conf->expensereport->multidir_output[$this->entity] && !empty($this->
ref)) {
1173 $dir = $conf->expensereport->multidir_output[$this->entity].
"/".$ref;
1174 $file = $dir.
"/".$ref.
".pdf";
1175 if (file_exists($file)) {
1179 $this->error =
'ErrorFailToDeleteFile';
1180 $this->errors[] = $this->error;
1181 $this->
db->rollback();
1185 if (file_exists($dir)) {
1188 $this->error =
'ErrorFailToDeleteDir';
1189 $this->errors[] = $this->error;
1190 $this->
db->rollback();
1198 dol_syslog(get_class($this).
"::delete ".$this->
id.
" by ".$user->id, LOG_DEBUG);
1199 $this->
db->commit();
1202 $this->
db->rollback();
1216 global $conf, $langs, $user;
1222 if ($this->status == self::STATUS_VALIDATED) {
1223 dol_syslog(get_class($this).
"::valid action abandonned: already validated", LOG_WARNING);
1227 $this->date_valid = $now;
1230 if (!$error && (preg_match(
'/^[\(]?PROV/i', $this->
ref) || empty($this->
ref))) {
1235 if (empty($num) || $num < 0) {
1244 $sql =
"UPDATE ".MAIN_DB_PREFIX.$this->table_element;
1245 $sql .=
" SET ref = '".$this->db->escape($num).
"',";
1246 $sql .=
" fk_statut = ".self::STATUS_VALIDATED.
",";
1247 $sql .=
" date_valid='".$this->db->idate($this->date_valid).
"',";
1248 $sql .=
" fk_user_valid = ".$user->id;
1249 $sql .=
" WHERE rowid = ".((int) $this->
id);
1253 if (!$error && !$notrigger) {
1255 $result = $this->
call_trigger(
'EXPENSE_REPORT_VALIDATE', $fuser);
1263 $this->oldref = $this->ref;
1266 if (preg_match(
'/^[\(]?PROV/i', $this->
ref)) {
1267 require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
1270 $sql =
'UPDATE '.MAIN_DB_PREFIX.
"ecm_files set filename = CONCAT('".$this->
db->escape($this->newref).
"', SUBSTR(filename, ".(strlen($this->
ref) + 1).
")), filepath = 'expensereport/".$this->
db->escape($this->newref).
"'";
1271 $sql .=
" WHERE filename LIKE '".$this->db->escape($this->
ref).
"%' AND filepath = 'expensereport/".$this->
db->escape($this->
ref).
"' and entity = ".$conf->entity;
1274 $error++; $this->error = $this->
db->lasterror();
1280 $dirsource = $conf->expensereport->dir_output.
'/'.$oldref;
1281 $dirdest = $conf->expensereport->dir_output.
'/'.$newref;
1282 if (!$error && file_exists($dirsource)) {
1283 dol_syslog(get_class($this).
"::setValidate() rename dir ".$dirsource.
" into ".$dirdest);
1285 if (@rename($dirsource, $dirdest)) {
1288 $listoffiles =
dol_dir_list($conf->expensereport->dir_output.
'/'.$newref,
'files', 1,
'^'.preg_quote($oldref,
'/'));
1289 foreach ($listoffiles as $fileentry) {
1290 $dirsource = $fileentry[
'name'];
1291 $dirdest = preg_replace(
'/^'.preg_quote($oldref,
'/').
'/', $newref, $dirsource);
1292 $dirsource = $fileentry[
'path'].
'/'.$dirsource;
1293 $dirdest = $fileentry[
'path'].
'/'.$dirdest;
1294 @rename($dirsource, $dirdest);
1307 if (empty($error)) {
1308 $this->
db->commit();
1311 $this->
db->rollback();
1312 $this->error = $this->
db->error();
1316 $this->
db->rollback();
1317 $this->error = $this->
db->lasterror();
1332 global $conf, $langs;
1335 $sql =
'SELECT date_debut';
1336 $sql .=
' FROM '.MAIN_DB_PREFIX.$this->table_element;
1337 $sql .=
" WHERE rowid = ".((int) $this->
id);
1339 $result = $this->
db->query($sql);
1341 $objp = $this->
db->fetch_object($result);
1343 $this->date_debut = $this->
db->jdate($objp->date_debut);
1345 if ($this->status != self::STATUS_VALIDATED) {
1346 $sql =
'UPDATE '.MAIN_DB_PREFIX.$this->table_element;
1347 $sql .=
" SET fk_statut = ".self::STATUS_VALIDATED;
1348 $sql .=
" WHERE rowid = ".((int) $this->
id);
1350 dol_syslog(get_class($this).
"::set_save_from_refuse", LOG_DEBUG);
1352 if ($this->
db->query($sql)) {
1355 $this->error = $this->
db->lasterror();
1359 dol_syslog(get_class($this).
"::set_save_from_refuse expensereport already with save status", LOG_WARNING);
1376 $this->date_approve = $now;
1377 if ($this->status != self::STATUS_APPROVED) {
1380 $sql =
'UPDATE '.MAIN_DB_PREFIX.$this->table_element;
1381 $sql .=
" SET ref = '".$this->db->escape($this->
ref).
"', fk_statut = ".self::STATUS_APPROVED.
", fk_user_approve = ".((int) $fuser->id).
",";
1382 $sql .=
" date_approve='".$this->db->idate($this->date_approve).
"'";
1383 $sql .=
" WHERE rowid = ".((int) $this->
id);
1384 if ($this->
db->query($sql)) {
1387 $result = $this->
call_trigger(
'EXPENSE_REPORT_APPROVE', $fuser);
1395 if (empty($error)) {
1396 $this->
db->commit();
1399 $this->
db->rollback();
1400 $this->error = $this->
db->error();
1404 $this->
db->rollback();
1405 $this->error = $this->
db->lasterror();
1409 dol_syslog(get_class($this).
"::setApproved expensereport already with approve status", LOG_WARNING);
1423 public function setDeny($fuser, $details, $notrigger = 0)
1429 if ($this->status != self::STATUS_REFUSED) {
1430 $sql =
'UPDATE '.MAIN_DB_PREFIX.$this->table_element;
1431 $sql .=
" SET ref = '".$this->db->escape($this->
ref).
"', fk_statut = ".self::STATUS_REFUSED.
", fk_user_refuse = ".((int) $fuser->id).
",";
1432 $sql .=
" date_refuse='".$this->db->idate($now).
"',";
1433 $sql .=
" detail_refuse='".$this->db->escape($details).
"',";
1434 $sql .=
" fk_user_approve = NULL";
1435 $sql .=
" WHERE rowid = ".((int) $this->
id);
1436 if ($this->
db->query($sql)) {
1437 $this->fk_statut = 99;
1439 $this->fk_user_refuse = $fuser->id;
1440 $this->detail_refuse = $details;
1441 $this->date_refuse = $now;
1445 $result = $this->
call_trigger(
'EXPENSE_REPORT_DENY', $fuser);
1453 if (empty($error)) {
1454 $this->
db->commit();
1457 $this->
db->rollback();
1458 $this->error = $this->
db->error();
1462 $this->
db->rollback();
1463 $this->error = $this->
db->lasterror();
1467 dol_syslog(get_class($this).
"::setDeny expensereport already with refuse status", LOG_WARNING);
1484 dol_syslog(get_class($this).
"::set_unpaid is deprecated, use setUnpaid instead", LOG_NOTICE);
1485 return $this->
setUnpaid($fuser, $notrigger);
1502 $sql =
'UPDATE '.MAIN_DB_PREFIX.$this->table_element;
1503 $sql .=
" SET paid = 0, fk_statut = ".self::STATUS_APPROVED;
1504 $sql .=
" WHERE rowid = ".((int) $this->
id);
1506 dol_syslog(get_class($this).
"::set_unpaid", LOG_DEBUG);
1508 if ($this->
db->query($sql)) {
1511 $result = $this->
call_trigger(
'EXPENSE_REPORT_UNPAID', $fuser);
1519 if (empty($error)) {
1520 $this->
db->commit();
1523 $this->
db->rollback();
1524 $this->error = $this->
db->error();
1528 $this->
db->rollback();
1529 $this->error = $this->
db->error();
1533 dol_syslog(get_class($this).
"::set_unpaid expensereport already with unpaid status", LOG_WARNING);
1550 $this->date_cancel = $this->
db->idate(
dol_now());
1551 if ($this->status != self::STATUS_CANCELED) {
1554 $sql =
'UPDATE '.MAIN_DB_PREFIX.$this->table_element;
1555 $sql .=
" SET fk_statut = ".self::STATUS_CANCELED.
", fk_user_cancel = ".((int) $fuser->id);
1556 $sql .=
", date_cancel='".$this->db->idate($this->date_cancel).
"'";
1557 $sql .=
" ,detail_cancel='".$this->db->escape($detail).
"'";
1558 $sql .=
" WHERE rowid = ".((int) $this->
id);
1560 dol_syslog(get_class($this).
"::set_cancel", LOG_DEBUG);
1562 if ($this->
db->query($sql)) {
1565 $result = $this->
call_trigger(
'EXPENSE_REPORT_CANCEL', $fuser);
1573 if (empty($error)) {
1574 $this->
db->commit();
1577 $this->
db->rollback();
1578 $this->error = $this->
db->error();
1582 $this->
db->rollback();
1583 $this->error = $this->
db->error();
1587 dol_syslog(get_class($this).
"::set_cancel expensereport already with cancel status", LOG_WARNING);
1598 global $langs, $conf;
1599 $langs->load(
"trips");
1601 if (!empty($conf->global->EXPENSEREPORT_ADDON)) {
1604 $file = $conf->global->EXPENSEREPORT_ADDON.
".php";
1605 $classname = $conf->global->EXPENSEREPORT_ADDON;
1608 $dirmodels = array_merge(array(
'/'), (array) $conf->modules_parts[
'models']);
1609 foreach ($dirmodels as $reldir) {
1610 $dir =
dol_buildpath($reldir.
"core/modules/expensereport/");
1613 $mybool |= @include_once $dir.$file;
1616 if ($mybool ===
false) {
1621 $obj =
new $classname();
1622 $numref = $obj->getNextValue($this);
1624 if ($numref !=
"") {
1627 $this->error = $obj->error;
1628 $this->errors = $obj->errors;
1633 $this->error =
"Error_EXPENSEREPORT_ADDON_NotDefined";
1650 public function getNomUrl($withpicto = 0, $option =
'', $max = 0, $short = 0, $moretitle =
'', $notooltip = 0, $save_lastsearch_value = -1)
1652 global $langs, $conf, $hookmanager;
1656 $url = DOL_URL_ROOT.
'/expensereport/card.php?id='.$this->id;
1662 $label =
img_picto(
'', $this->picto).
' <u class="paddingrightonly">'.$langs->trans(
"ExpenseReport").
'</u>';
1663 if (isset($this->status)) {
1664 $label .=
' '.$this->getLibStatut(5);
1666 if (!empty($this->
ref)) {
1667 $label .=
'<br><b>'.$langs->trans(
'Ref').
':</b> '.$this->ref;
1669 if (!empty($this->total_ht)) {
1670 $label .=
'<br><b>'.$langs->trans(
'AmountHT').
':</b> '.
price($this->total_ht, 0, $langs, 0, -1, -1, $conf->currency);
1672 if (!empty($this->total_tva)) {
1673 $label .=
'<br><b>'.$langs->trans(
'VAT').
':</b> '.
price($this->total_tva, 0, $langs, 0, -1, -1, $conf->currency);
1675 if (!empty($this->total_ttc)) {
1676 $label .=
'<br><b>'.$langs->trans(
'AmountTTC').
':</b> '.
price($this->total_ttc, 0, $langs, 0, -1, -1, $conf->currency);
1679 $label .=
' - '.$moretitle;
1682 if ($option !=
'nolink') {
1684 $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
1685 if ($save_lastsearch_value == -1 && preg_match(
'/list\.php/', $_SERVER[
"PHP_SELF"])) {
1686 $add_save_lastsearch_values = 1;
1688 if ($add_save_lastsearch_values) {
1689 $url .=
'&save_lastsearch_values=1';
1699 if (empty($notooltip)) {
1700 if (!empty($conf->global->MAIN_OPTIMIZEFORTEXTBROWSER)) {
1701 $label = $langs->trans(
"ShowExpenseReport");
1702 $linkclose .=
' alt="'.dol_escape_htmltag($label, 1).
'"';
1704 $linkclose .=
' title="'.dol_escape_htmltag($label, 1).
'"';
1705 $linkclose .=
' class="classfortooltip"';
1708 $linkstart =
'<a href="'.$url.
'"';
1709 $linkstart .= $linkclose.
'>';
1712 $result .= $linkstart;
1714 $result .=
img_object(($notooltip ?
'' : $label), $this->picto, ($notooltip ? (($withpicto != 2) ?
'class="paddingright"' :
'') :
'class="'.(($withpicto != 2) ?
'paddingright ' :
'').
'classfortooltip"'), 0, 0, $notooltip ? 0 : 1);
1716 if ($withpicto != 2) {
1717 $result .= ($max ?
dol_trunc($ref, $max) : $ref);
1719 $result .= $linkend;
1722 $hookmanager->initHooks(array($this->element .
'dao'));
1723 $parameters = array(
'id'=>$this->
id,
'getnomurl' => &$result);
1724 $reshook = $hookmanager->executeHooks(
'getNomUrl', $parameters, $this, $action);
1726 $result = $hookmanager->resPrint;
1728 $result .= $hookmanager->resPrint;
1744 $this->total_ht = $this->total_ht + $ligne_total_ht;
1745 $this->total_tva = $this->total_tva + $ligne_total_tva;
1746 $this->total_ttc = $this->total_ht + $this->total_tva;
1748 $sql =
"UPDATE ".MAIN_DB_PREFIX.$this->table_element.
" SET";
1749 $sql .=
" total_ht = ".$this->total_ht;
1750 $sql .=
" , total_ttc = ".$this->total_ttc;
1751 $sql .=
" , total_tva = ".$this->total_tva;
1752 $sql .=
" WHERE rowid = ".((int) $this->
id);
1754 $result = $this->
db->query($sql);
1758 $this->error = $this->
db->error();
1778 public function addline($qty = 0, $up = 0, $fk_c_type_fees = 0, $vatrate = 0, $date =
'', $comments =
'', $fk_project = 0, $fk_c_exp_tax_cat = 0, $type = 0, $fk_ecm_files = 0)
1780 global $conf, $langs, $mysoc;
1782 dol_syslog(get_class($this).
"::addline qty=$qty, up=$up, fk_c_type_fees=$fk_c_type_fees, vatrate=$vatrate, date=$date, fk_project=$fk_project, type=$type, comments=$comments", LOG_DEBUG);
1784 if ($this->status == self::STATUS_DRAFT) {
1788 if (empty($fk_c_type_fees) || $fk_c_type_fees < 0) {
1789 $fk_c_type_fees = 0;
1791 if (empty($fk_c_exp_tax_cat) || $fk_c_exp_tax_cat < 0) {
1792 $fk_c_exp_tax_cat = 0;
1794 if (empty($vatrate) || $vatrate < 0) {
1800 if (empty($fk_project)) {
1805 if (!preg_match(
'/\s*\((.*)\)/', $vatrate)) {
1816 $seller->tva_assuj = 1;
1823 if (preg_match(
'/\s*\((.*)\)/', $vatrate, $reg)) {
1824 $vat_src_code = $reg[1];
1825 $vatrate = preg_replace(
'/\s*\(.*\)/',
'', $vatrate);
1827 $vatrate = preg_replace(
'/\*/',
'', $vatrate);
1829 $tmp =
calcul_price_total($qty, $up, 0, $vatrate, -1, -1, 0,
'TTC', 0, $type, $seller, $localtaxes_type);
1831 $this->line->value_unit = $up;
1833 $this->line->vat_src_code = $vat_src_code;
1834 $this->line->vatrate =
price2num($vatrate);
1835 $this->line->localtax1_tx = $localtaxes_type[1];
1836 $this->line->localtax2_tx = $localtaxes_type[3];
1837 $this->line->localtax1_type = $localtaxes_type[0];
1838 $this->line->localtax2_type = $localtaxes_type[2];
1840 $this->line->total_ttc = $tmp[2];
1841 $this->line->total_ht = $tmp[0];
1842 $this->line->total_tva = $tmp[1];
1843 $this->line->total_localtax1 = $tmp[9];
1844 $this->line->total_localtax2 = $tmp[10];
1846 $this->line->fk_expensereport = $this->id;
1847 $this->line->qty = $qty;
1848 $this->line->date = $date;
1849 $this->line->fk_c_type_fees = $fk_c_type_fees;
1850 $this->line->fk_c_exp_tax_cat = $fk_c_exp_tax_cat;
1851 $this->line->comments = $comments;
1852 $this->line->fk_projet = $fk_project;
1853 $this->line->fk_project = $fk_project;
1855 $this->line->fk_ecm_files = $fk_ecm_files;
1860 $result = $this->line->insert(0,
true);
1864 $this->
db->commit();
1865 return $this->line->id;
1867 $this->
db->rollback();
1871 $this->error = $this->line->error;
1872 dol_syslog(get_class($this).
"::addline error=".$this->error, LOG_ERR);
1873 $this->
db->rollback();
1877 dol_syslog(get_class($this).
"::addline status of expense report must be Draft to allow use of ->addline()", LOG_ERR);
1878 $this->error =
'ErrorExpenseNotDraft';
1892 global $user, $conf, $db, $langs, $mysoc;
1894 $langs->load(
'trips');
1897 if (!is_object($seller)) {
1899 $seller->tva_assuj = 1;
1903 $rulestocheck = $expensereportrule->getAllRule($this->line->fk_c_type_fees, $this->line->date, $this->fk_user_author);
1906 $rule_warning_message_tab = array();
1908 $current_total_ttc = $this->line->total_ttc;
1909 $new_current_total_ttc = $this->line->total_ttc;
1912 foreach ($rulestocheck as $rule) {
1913 if (in_array($rule->code_expense_rules_type, array(
'EX_DAY',
'EX_MON',
'EX_YEA'))) {
1914 $amount_to_test = $this->line->getExpAmount($rule, $this->fk_user_author, $rule->code_expense_rules_type);
1916 $amount_to_test = $current_total_ttc;
1919 $amount_to_test = $amount_to_test - $current_total_ttc + $new_current_total_ttc;
1921 if ($amount_to_test > $rule->amount) {
1924 if ($rule->restrictive) {
1925 $this->error =
'ExpenseReportConstraintViolationError';
1926 $this->errors[] = $this->error;
1928 $new_current_total_ttc -= $amount_to_test - $rule->amount;
1929 $rule_warning_message_tab[] = $langs->trans(
'ExpenseReportConstraintViolationError', $rule->id,
price($amount_to_test, 0, $langs, 1, -1, -1, $conf->currency),
price($rule->amount, 0, $langs, 1, -1, -1, $conf->currency));
1931 $this->error =
'ExpenseReportConstraintViolationWarning';
1932 $this->errors[] = $this->error;
1934 $rule_warning_message_tab[] = $langs->trans(
'ExpenseReportConstraintViolationWarning', $rule->id,
price($amount_to_test, 0, $langs, 1, -1, -1, $conf->currency),
price($rule->amount, 0, $langs, 1, -1, -1, $conf->currency));
1941 $this->line->rule_warning_message = implode(
'\n', $rule_warning_message_tab);
1943 if ($violation > 0) {
1944 $tmp =
calcul_price_total($this->line->qty, $new_current_total_ttc / $this->line->qty, 0, $this->line->vatrate, 0, 0, 0,
'TTC', 0, $type, $seller);
1946 $this->line->value_unit = $tmp[5];
1947 $this->line->total_ttc = $tmp[2];
1948 $this->line->total_ht = $tmp[0];
1949 $this->line->total_tva = $tmp[1];
1950 $this->line->total_localtax1 = $tmp[9];
1951 $this->line->total_localtax2 = $tmp[10];
1968 global $conf, $mysoc;
1970 if (empty($conf->global->MAIN_USE_EXPENSE_IK)) {
1974 $userauthor =
new User($this->
db);
1975 if ($userauthor->fetch($this->fk_user_author) <= 0) {
1976 $this->error =
'ErrorCantFetchUser';
1977 $this->errors[] =
'ErrorCantFetchUser';
1982 if (!is_object($seller)) {
1984 $seller->tva_assuj = 1;
1988 $range = $expenseik->getRangeByUser($userauthor, $this->line->fk_c_exp_tax_cat);
1990 if (empty($range)) {
1991 $this->error =
'ErrorNoRangeAvailable';
1992 $this->errors[] =
'ErrorNoRangeAvailable';
1996 if (!empty($conf->global->MAIN_EXPENSE_APPLY_ENTIRE_OFFSET)) {
1997 $ikoffset = $range->ikoffset;
1999 $ikoffset = $range->ikoffset / 12;
2004 $new_up = $range->coef + ($ikoffset / $this->line->qty);
2005 $tmp =
calcul_price_total($this->line->qty, $new_up, 0, $this->line->vatrate, 0, 0, 0,
'TTC', 0, $type, $seller);
2007 $this->line->value_unit = $tmp[5];
2008 $this->line->total_ttc = $tmp[2];
2009 $this->line->total_ht = $tmp[0];
2010 $this->line->total_tva = $tmp[1];
2011 $this->line->total_localtax1 = $tmp[9];
2012 $this->line->total_localtax2 = $tmp[10];
2027 $sql =
'SELECT e.rowid FROM '.MAIN_DB_PREFIX.
'expensereport e';
2028 $sql .=
" INNER JOIN ".MAIN_DB_PREFIX.
"expensereport_det d ON (e.rowid = d.fk_expensereport)";
2029 $sql .=
" INNER JOIN ".MAIN_DB_PREFIX.
"c_type_fees f ON (d.fk_c_type_fees = f.id AND f.code = 'EX_KME')";
2030 $sql .=
" WHERE e.fk_user_author = ".(int) $this->fk_user_author;
2031 $sql .=
" AND YEAR(d.date) = '".dol_print_date($this->line->date,
'%Y').
"' AND MONTH(d.date) = '".
dol_print_date($this->line->date,
'%m').
"'";
2032 if (!empty($this->line->id)) {
2033 $sql .=
' AND d.rowid <> '.((int) $this->line->id);
2036 dol_syslog(get_class($this).
"::offsetAlreadyGiven");
2039 $num = $this->
db->num_rows(
$resql);
2067 public function updateline($rowid, $type_fees_id, $projet_id, $vatrate, $comments, $qty, $value_unit, $date, $expensereport_id, $fk_c_exp_tax_cat = 0, $fk_ecm_files = 0, $notrigger = 0)
2069 global $user, $mysoc;
2071 if ($this->status == self::STATUS_DRAFT || $this->status == self::STATUS_REFUSED) {
2079 $seller->tva_assuj = 1;
2080 $seller->localtax1_assuj = $mysoc->localtax1_assuj;
2081 $seller->localtax2_assuj = $mysoc->localtax1_assuj;
2089 if (preg_match(
'/\((.*)\)/', $vatrate, $reg)) {
2090 $vat_src_code = $reg[1];
2091 $vatrate = preg_replace(
'/\s*\(.*\)/',
'', $vatrate);
2093 $vatrate = preg_replace(
'/\*/',
'', $vatrate);
2095 $tmp =
calcul_price_total($qty, $value_unit, 0, $vatrate, -1, -1, 0,
'TTC', 0, $type, $seller, $localtaxes_type);
2100 $tx_tva = $vatrate / 100;
2101 $tx_tva = $tx_tva + 1;
2104 $this->line->comments = $comments;
2105 $this->line->qty = $qty;
2106 $this->line->value_unit = $value_unit;
2107 $this->line->date = $date;
2109 $this->line->fk_expensereport = $expensereport_id;
2110 $this->line->fk_c_type_fees = $type_fees_id;
2111 $this->line->fk_c_exp_tax_cat = $fk_c_exp_tax_cat;
2112 $this->line->fk_projet = $projet_id;
2113 $this->line->fk_project = $projet_id;
2115 $this->line->vat_src_code = $vat_src_code;
2116 $this->line->vatrate =
price2num($vatrate);
2117 $this->line->localtax1_tx = $localtaxes_type[1];
2118 $this->line->localtax2_tx = $localtaxes_type[3];
2119 $this->line->localtax1_type = $localtaxes_type[0];
2120 $this->line->localtax2_type = $localtaxes_type[2];
2122 $this->line->total_ttc = $tmp[2];
2123 $this->line->total_ht = $tmp[0];
2124 $this->line->total_tva = $tmp[1];
2125 $this->line->total_localtax1 = $tmp[9];
2126 $this->line->total_localtax2 = $tmp[10];
2128 $this->line->fk_ecm_files = $fk_ecm_files;
2130 $this->line->id = ((int) $rowid);
2133 $sql =
"SELECT c.code as code_type_fees, c.label as libelle_type_fees";
2134 $sql .=
" FROM ".MAIN_DB_PREFIX.
"c_type_fees as c";
2135 $sql .=
" WHERE c.id = ".((int) $type_fees_id);
2138 $objp_fees = $this->
db->fetch_object(
$resql);
2139 $this->line->type_fees_code = $objp_fees->code_type_fees;
2140 $this->line->type_fees_libelle = $objp_fees->libelle_type_fees;
2145 $sql =
"SELECT p.ref as ref_projet, p.title as title_projet";
2146 $sql .=
" FROM ".MAIN_DB_PREFIX.
"projet as p";
2147 $sql .=
" WHERE p.rowid = ".((int) $projet_id);
2150 $objp_projet = $this->
db->fetch_object(
$resql);
2151 $this->line->projet_ref = $objp_projet->ref_projet;
2152 $this->line->projet_title = $objp_projet->title_projet;
2159 $result = $this->line->update($user);
2164 if (!$error && !$notrigger) {
2166 $result = $this->
call_trigger(
'EXPENSE_REPORT_DET_MODIFY', $user);
2174 $this->
db->commit();
2177 $this->error = $this->line->error;
2178 $this->errors = $this->line->errors;
2179 $this->
db->rollback();
2201 $result = $this->
call_trigger(
'EXPENSE_REPORT_DET_DELETE', $fuser);
2208 $sql =
' DELETE FROM '.MAIN_DB_PREFIX.$this->table_element_line;
2209 $sql .=
' WHERE rowid = '.((int) $rowid);
2211 dol_syslog(get_class($this).
"::deleteline sql=".$sql);
2212 $result = $this->
db->query($sql);
2214 if (!$result || $error > 0 ) {
2215 $this->error = $this->
db->error();
2216 dol_syslog(get_class($this).
"::deleteline Error ".$this->error, LOG_ERR);
2217 $this->
db->rollback();
2223 $this->
db->commit();
2240 $sql =
"SELECT rowid, date_debut, date_fin";
2241 $sql .=
" FROM ".MAIN_DB_PREFIX.$this->table_element;
2242 $sql .=
" WHERE fk_user_author = '{$fuser->id}'";
2244 dol_syslog(get_class($this).
"::periode_existe sql=".$sql);
2245 $result = $this->
db->query($sql);
2247 $num_rows = $this->
db->num_rows($result); $i = 0;
2249 if ($num_rows > 0) {
2250 $date_d_form = $date_debut;
2251 $date_f_form = $date_fin;
2253 while ($i < $num_rows) {
2254 $objp = $this->
db->fetch_object($result);
2256 $date_d_req = $this->
db->jdate($objp->date_debut);
2257 $date_f_req = $this->
db->jdate($objp->date_fin);
2259 if (!($date_f_form < $date_d_req || $date_d_form > $date_f_req)) {
2260 return $objp->rowid;
2271 $this->error = $this->
db->lasterror();
2272 dol_syslog(get_class($this).
"::periode_existe Error ".$this->error, LOG_ERR);
2288 $users_validator = array();
2290 $sql =
"SELECT DISTINCT ur.fk_user";
2291 $sql .=
" FROM ".MAIN_DB_PREFIX.
"user_rights as ur, ".MAIN_DB_PREFIX.
"rights_def as rd";
2292 $sql .=
" WHERE ur.fk_id = rd.id and rd.module = 'expensereport' AND rd.perms = 'approve'";
2294 $sql .=
" SELECT DISTINCT ugu.fk_user";
2295 $sql .=
" FROM ".MAIN_DB_PREFIX.
"usergroup_user as ugu, ".MAIN_DB_PREFIX.
"usergroup_rights as ur, ".MAIN_DB_PREFIX.
"rights_def as rd";
2296 $sql .=
" WHERE ugu.fk_usergroup = ur.fk_usergroup AND ur.fk_id = rd.id and rd.module = 'expensereport' AND rd.perms = 'approve'";
2299 dol_syslog(get_class($this).
"::fetch_users_approver_expensereport sql=".$sql);
2300 $result = $this->
db->query($sql);
2302 $num_rows = $this->
db->num_rows($result); $i = 0;
2303 while ($i < $num_rows) {
2304 $objp = $this->
db->fetch_object($result);
2305 array_push($users_validator, $objp->fk_user);
2308 return $users_validator;
2310 $this->error = $this->
db->lasterror();
2311 dol_syslog(get_class($this).
"::fetch_users_approver_expensereport Error ".$this->error, LOG_ERR);
2327 public function generateDocument($modele, $outputlangs, $hidedetails = 0, $hidedesc = 0, $hideref = 0, $moreparams =
null)
2331 $outputlangs->load(
"trips");
2334 if (!empty($this->model_pdf)) {
2335 $modele = $this->model_pdf;
2336 } elseif (!empty($this->modelpdf)) {
2337 $modele = $this->modelpdf;
2338 } elseif (!empty($conf->global->EXPENSEREPORT_ADDON_PDF)) {
2339 $modele = $conf->global->EXPENSEREPORT_ADDON_PDF;
2343 if (!empty($modele)) {
2344 $modelpath =
"core/modules/expensereport/doc/";
2346 return $this->
commonGenerateDocument($modelpath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams);
2362 $sql =
"SELECT id, code, label";
2363 $sql .=
" FROM ".MAIN_DB_PREFIX.
"c_type_fees";
2364 $sql .=
" WHERE active = ".((int) $active);
2365 dol_syslog(get_class($this).
"::listOfTypes", LOG_DEBUG);
2366 $result = $this->
db->query($sql);
2368 $num = $this->
db->num_rows($result);
2371 $obj = $this->
db->fetch_object($result);
2372 $ret[$obj->code] = (($langs->transnoentitiesnoconv($obj->code) != $obj->code) ? $langs->transnoentitiesnoconv($obj->code) : $obj->label);
2390 global $conf, $user;
2392 $this->nb = array();
2394 $sql =
"SELECT count(ex.rowid) as nb";
2395 $sql .=
" FROM ".MAIN_DB_PREFIX.
"expensereport as ex";
2396 $sql .=
" WHERE ex.fk_statut > 0";
2397 $sql .=
" AND ex.entity IN (".getEntity(
'expensereport').
")";
2398 if (empty($user->rights->expensereport->readall)) {
2399 $userchildids = $user->getAllChildIds(1);
2400 $sql .=
" AND (ex.fk_user_author IN (".$this->db->sanitize(join(
',', $userchildids)).
")";
2401 $sql .=
" OR ex.fk_user_validator IN (".$this->db->sanitize(join(
',', $userchildids)).
"))";
2406 while ($obj = $this->
db->fetch_object(
$resql)) {
2407 $this->nb[
"expensereports"] = $obj->nb;
2413 $this->error = $this->
db->error();
2429 global $conf, $langs;
2437 $sql =
"SELECT ex.rowid, ex.date_valid";
2438 $sql .=
" FROM ".MAIN_DB_PREFIX.
"expensereport as ex";
2439 if ($option ==
'toapprove') {
2440 $sql .=
" WHERE ex.fk_statut = ".self::STATUS_VALIDATED;
2442 $sql .=
" WHERE ex.fk_statut = ".self::STATUS_APPROVED;
2444 $sql .=
" AND ex.entity IN (".getEntity(
'expensereport').
")";
2445 if (empty($user->rights->expensereport->readall)) {
2446 $userchildids = $user->getAllChildIds(1);
2447 $sql .=
" AND (ex.fk_user_author IN (".$this->db->sanitize(join(
',', $userchildids)).
")";
2448 $sql .=
" OR ex.fk_user_validator IN (".$this->db->sanitize(join(
',', $userchildids)).
"))";
2453 $langs->load(
"trips");
2456 if ($option ==
'toapprove') {
2457 $response->warning_delay = $conf->expensereport->approve->warning_delay / 60 / 60 / 24;
2458 $response->label = $langs->trans(
"ExpenseReportsToApprove");
2459 $response->labelShort = $langs->trans(
"ToApprove");
2462 $response->warning_delay = $conf->expensereport->payment->warning_delay / 60 / 60 / 24;
2463 $response->label = $langs->trans(
"ExpenseReportsToPay");
2464 $response->labelShort = $langs->trans(
"StatusToPay");
2465 $response->url = DOL_URL_ROOT.
'/expensereport/list.php?mainmenu=hrm&statut='.
self::STATUS_APPROVED;
2469 while ($obj = $this->
db->fetch_object(
$resql)) {
2470 $response->nbtodo++;
2472 if ($option ==
'toapprove') {
2473 if ($this->
db->jdate($obj->date_valid) < ($now - $conf->expensereport->approve->warning_delay)) {
2474 $response->nbtodolate++;
2477 if ($this->
db->jdate($obj->date_valid) < ($now - $conf->expensereport->payment->warning_delay)) {
2478 $response->nbtodolate++;
2486 $this->error = $this->
db->error();
2502 if ($option ==
'toapprove' && $this->status != 2) {
2505 if ($option ==
'topay' && $this->status != 5) {
2510 if ($option ==
'toapprove') {
2511 return (!empty($this->datevalid) ? $this->datevalid : $this->date_valid) < ($now - $conf->expensereport->approve->warning_delay);
2513 return (!empty($this->datevalid) ? $this->datevalid : $this->date_valid) < ($now - $conf->expensereport->payment->warning_delay);
2524 $alreadydispatched = 0;
2526 $type =
'expense_report';
2528 $sql =
" SELECT COUNT(ab.rowid) as nb FROM ".MAIN_DB_PREFIX.
"accounting_bookkeeping as ab WHERE ab.doc_type='".$this->
db->escape($type).
"' AND ab.fk_doc = ".((int) $this->
id);
2531 $obj = $this->
db->fetch_object(
$resql);
2533 $alreadydispatched = $obj->nb;
2536 $this->error = $this->
db->lasterror();
2540 if ($alreadydispatched) {
2553 $table =
'payment_expensereport';
2554 $field =
'fk_expensereport';
2556 $sql =
'SELECT sum(amount) as amount';
2557 $sql .=
' FROM '.MAIN_DB_PREFIX.$table;
2558 $sql .=
" WHERE ".$field.
" = ".((int) $this->
id);
2560 dol_syslog(get_class($this).
"::getSumPayments", LOG_DEBUG);
2563 $obj = $this->
db->fetch_object(
$resql);
2565 return (empty($obj->amount) ? 0 : $obj->amount);
2567 $this->error = $this->
db->lasterror();
2582 global $langs,$user,$db,$conf;
2591 $this->error = $langs->trans(
'ErrorBadParameterCat');
2596 $this->error = $langs->trans(
'ErrorBadParameterQty');
2600 $currentUser =
new User($db);
2601 $currentUser->fetch($this->fk_user);
2602 $currentUser->getrights(
'expensereport');
2606 $sql =
" SELECT r.range_ik, t.ikoffset as offset, t.coef";
2607 $sql .=
" FROM ".MAIN_DB_PREFIX.
"expensereport_ik t";
2608 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"c_exp_tax_range r ON r.rowid = t.fk_range";
2609 $sql .=
" WHERE t.fk_c_exp_tax_cat = ".(int) $fk_cat;
2610 $sql .=
" ORDER BY r.range_ik ASC";
2612 dol_syslog(
"expenseReport::computeTotalkm sql=".$sql, LOG_DEBUG);
2614 $result = $this->
db->query($sql);
2617 if ($conf->global->EXPENSEREPORT_CALCULATE_MILEAGE_EXPENSE_COEFFICIENT_ON_CURRENT_YEAR) {
2619 $sql =
" SELECT count(n.qty) as cumul FROM ".MAIN_DB_PREFIX.
"expensereport_det n";
2620 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"expensereport e ON e.rowid = n.fk_expensereport";
2621 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"c_type_fees tf ON tf.id = n.fk_c_type_fees";
2622 $sql.=
" WHERE e.fk_user_author = ".(int) $this->fk_user_author;
2623 $sql.=
" AND YEAR(n.date) = ".(int) $arrayDate[
'year'];
2624 $sql.=
" AND tf.code = 'EX_KME' ";
2630 $obj = $this->
db->fetch_object(
$resql);
2631 $cumulYearQty = $obj->cumul;
2633 $qty = $cumulYearQty + $qty;
2636 $num = $this->
db->num_rows($result);
2639 for ($i = 0; $i < $num; $i++) {
2640 $obj = $this->
db->fetch_object($result);
2646 for ($i = 0; $i < $num; $i++) {
2647 if ($i < ($num - 1)) {
2648 if ($qty > $ranges[$i]->range_ik && $qty < $ranges[$i+1]->range_ik) {
2649 $coef = $ranges[$i]->coef;
2650 $offset = $ranges[$i]->offset;
2653 if ($qty > $ranges[$i]->range_ik) {
2654 $coef = $ranges[$i]->coef;
2655 $offset = $ranges[$i]->offset;
2662 $this->error = $langs->trans(
'TaxUndefinedForThisCategory');
2666 $this->error = $this->
db->error().
" sql=".$sql;
2687 public $table_element =
'expensereport_det';
2707 public $fk_c_type_fees;
2712 public $fk_c_exp_tax_cat;
2722 public $fk_expensereport;
2724 public $type_fees_code;
2725 public $type_fees_libelle;
2726 public $type_fees_accountancy_code;
2729 public $projet_title;
2733 public $vat_src_code;
2735 public $localtax1_tx;
2736 public $localtax2_tx;
2737 public $localtax1_type;
2738 public $localtax2_type;
2743 public $total_localtax1;
2744 public $total_localtax2;
2749 public $fk_ecm_files;
2751 public $rule_warning_message;
2772 $sql =
'SELECT fde.rowid, fde.fk_expensereport, fde.fk_c_type_fees, fde.fk_c_exp_tax_cat, fde.fk_projet as fk_project, fde.date,';
2773 $sql .=
' fde.tva_tx as vatrate, fde.vat_src_code, fde.comments, fde.qty, fde.value_unit, fde.total_ht, fde.total_tva, fde.total_ttc, fde.fk_ecm_files,';
2774 $sql .=
' fde.localtax1_tx, fde.localtax2_tx, fde.localtax1_type, fde.localtax2_type, fde.total_localtax1, fde.total_localtax2, fde.rule_warning_message,';
2775 $sql .=
' ctf.code as type_fees_code, ctf.label as type_fees_libelle,';
2776 $sql .=
' pjt.rowid as projet_id, pjt.title as projet_title, pjt.ref as projet_ref';
2777 $sql .=
' FROM '.MAIN_DB_PREFIX.
'expensereport_det as fde';
2778 $sql .=
' LEFT JOIN '.MAIN_DB_PREFIX.
'c_type_fees as ctf ON fde.fk_c_type_fees=ctf.id';
2779 $sql .=
' LEFT JOIN '.MAIN_DB_PREFIX.
'projet as pjt ON fde.fk_projet=pjt.rowid';
2780 $sql .=
' WHERE fde.rowid = '.((int) $rowid);
2782 $result = $this->
db->query($sql);
2785 $objp = $this->
db->fetch_object($result);
2787 $this->
rowid = $objp->rowid;
2788 $this->
id = $objp->rowid;
2789 $this->
ref = $objp->ref;
2790 $this->fk_expensereport = $objp->fk_expensereport;
2791 $this->comments = $objp->comments;
2792 $this->qty = $objp->qty;
2793 $this->date = $objp->date;
2794 $this->dates = $this->
db->jdate($objp->date);
2795 $this->value_unit = $objp->value_unit;
2796 $this->fk_c_type_fees = $objp->fk_c_type_fees;
2797 $this->fk_c_exp_tax_cat = $objp->fk_c_exp_tax_cat;
2798 $this->fk_projet = $objp->fk_project;
2799 $this->fk_project = $objp->fk_project;
2800 $this->type_fees_code = $objp->type_fees_code;
2801 $this->type_fees_libelle = $objp->type_fees_libelle;
2802 $this->projet_ref = $objp->projet_ref;
2803 $this->projet_title = $objp->projet_title;
2805 $this->
vatrate = $objp->vatrate;
2806 $this->vat_src_code = $objp->vat_src_code;
2807 $this->localtax1_tx = $objp->localtax1_tx;
2808 $this->localtax2_tx = $objp->localtax2_tx;
2809 $this->localtax1_type = $objp->localtax1_type;
2810 $this->localtax2_type = $objp->localtax2_type;
2812 $this->total_ht = $objp->total_ht;
2813 $this->total_tva = $objp->total_tva;
2814 $this->total_ttc = $objp->total_ttc;
2815 $this->total_localtax1 = $objp->total_localtax1;
2816 $this->total_localtax2 = $objp->total_localtax2;
2818 $this->fk_ecm_files = $objp->fk_ecm_files;
2820 $this->rule_warning_message = $objp->rule_warning_message;
2822 $this->
db->free($result);
2835 public function insert($notrigger = 0, $fromaddline =
false)
2837 global $langs, $user, $conf;
2841 dol_syslog(
"ExpenseReportLine::Insert", LOG_DEBUG);
2844 $this->comments = trim($this->comments);
2845 if (empty($this->value_unit)) {
2846 $this->value_unit = 0;
2850 if (empty($this->fk_c_exp_tax_cat)) {
2851 $this->fk_c_exp_tax_cat = 0;
2856 $sql =
'INSERT INTO '.MAIN_DB_PREFIX.
'expensereport_det';
2857 $sql .=
' (fk_expensereport, fk_c_type_fees, fk_projet,';
2858 $sql .=
' tva_tx, vat_src_code,';
2859 $sql .=
' localtax1_tx, localtax2_tx, localtax1_type, localtax2_type,';
2860 $sql .=
' comments, qty, value_unit,';
2861 $sql .=
' total_ht, total_tva, total_ttc,';
2862 $sql .=
' total_localtax1, total_localtax2,';
2863 $sql .=
' date, rule_warning_message, fk_c_exp_tax_cat, fk_ecm_files)';
2864 $sql .=
" VALUES (".$this->db->escape($this->fk_expensereport).
",";
2865 $sql .=
" ".((int) $this->fk_c_type_fees).
",";
2866 $sql .=
" ".((int) (!empty($this->fk_project) && $this->fk_project > 0) ? $this->fk_project : ((!empty($this->fk_projet) && $this->fk_projet > 0) ? $this->fk_projet :
'null')).
",";
2867 $sql .=
" ".((float) $this->
vatrate).
",";
2868 $sql .=
" '".$this->db->escape(empty($this->vat_src_code) ?
'' : $this->vat_src_code).
"',";
2869 $sql .=
" ".((float)
price2num($this->localtax1_tx)).
",";
2870 $sql .=
" ".((float)
price2num($this->localtax2_tx)).
",";
2871 $sql .=
" '".$this->db->escape($this->localtax1_type).
"',";
2872 $sql .=
" '".$this->db->escape($this->localtax2_type).
"',";
2873 $sql .=
" '".$this->db->escape($this->comments).
"',";
2874 $sql .=
" ".((float) $this->qty).
",";
2875 $sql .=
" ".((float) $this->value_unit).
",";
2876 $sql .=
" ".((float)
price2num($this->total_ht)).
",";
2877 $sql .=
" ".((float)
price2num($this->total_tva)).
",";
2878 $sql .=
" ".((float)
price2num($this->total_ttc)).
",";
2879 $sql .=
" ".((float)
price2num($this->total_localtax1)).
",";
2880 $sql .=
" ".((float)
price2num($this->total_localtax2)).
",";
2881 $sql .=
" '".$this->db->idate($this->date).
"',";
2882 $sql .=
" ".(empty($this->rule_warning_message) ?
'null' :
"'".$this->db->escape($this->rule_warning_message).
"'").
",";
2883 $sql .=
" ".((int) $this->fk_c_exp_tax_cat).
",";
2884 $sql .=
" ".($this->fk_ecm_files > 0 ? ((int) $this->fk_ecm_files) :
'null');
2889 $this->
id = $this->
db->last_insert_id(MAIN_DB_PREFIX.
'expensereport_det');
2892 if (!$error && !$notrigger) {
2894 $result = $this->
call_trigger(
'EXPENSE_REPORT_DET_CREATE', $user);
2902 if (!$fromaddline) {
2904 $tmpparent->fetch($this->fk_expensereport);
2905 $result = $tmpparent->update_price();
2908 $this->error = $tmpparent->error;
2909 $this->errors = $tmpparent->errors;
2917 $this->
db->commit();
2920 $this->error = $this->
db->lasterror();
2921 dol_syslog(
"ExpenseReportLine::insert Error ".$this->error, LOG_ERR);
2922 $this->
db->rollback();
2939 $sql =
'SELECT SUM(d.total_ttc) as total_amount';
2940 $sql .=
' FROM '.MAIN_DB_PREFIX.
'expensereport_det d';
2941 $sql .=
' INNER JOIN '.MAIN_DB_PREFIX.
'expensereport e ON (d.fk_expensereport = e.rowid)';
2942 $sql .=
' WHERE e.fk_user_author = '.((int) $fk_user);
2943 if (!empty($this->
id)) {
2944 $sql .=
' AND d.rowid <> '.((int) $this->
id);
2946 $sql .=
' AND d.fk_c_type_fees = '.((int) $rule->fk_c_type_fees);
2947 if ($mode ==
'day' || $mode ==
'EX_DAY') {
2948 $sql .=
" AND d.date = '".dol_print_date($this->date,
'%Y-%m-%d').
"'";
2949 } elseif ($mode ==
'mon' || $mode ==
'EX_MON') {
2950 $sql .=
" AND DATE_FORMAT(d.date, '%Y-%m') = '".dol_print_date($this->date,
'%Y-%m').
"'";
2951 } elseif ($mode ==
'year' || $mode ==
'EX_YEA') {
2952 $sql .=
" AND DATE_FORMAT(d.date, '%Y') = '".dol_print_date($this->date,
'%Y').
"'";
2955 dol_syslog(
'ExpenseReportLine::getExpAmount');
2959 $num = $this->
db->num_rows(
$resql);
2961 $obj = $this->
db->fetch_object(
$resql);
2962 $amount = (double) $obj->total_amount;
2968 return $amount + $this->total_ttc;
2979 global $langs, $conf;
2984 $this->comments = trim($this->comments);
2986 $this->value_unit =
price2num($this->value_unit);
2987 if (empty($this->fk_c_exp_tax_cat)) {
2988 $this->fk_c_exp_tax_cat = 0;
2994 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"expensereport_det SET";
2995 $sql .=
" comments='".$this->db->escape($this->comments).
"'";
2996 $sql .=
", value_unit = ".((float) $this->value_unit);
2997 $sql .=
", qty=".((float) $this->qty);
2998 $sql .=
", date='".$this->db->idate($this->date).
"'";
2999 $sql .=
", total_ht=".((float)
price2num($this->total_ht,
'MT'));
3000 $sql .=
", total_tva=".((float)
price2num($this->total_tva,
'MT'));
3001 $sql .=
", total_ttc=".((float)
price2num($this->total_ttc,
'MT'));
3002 $sql .=
", total_localtax1=".((float)
price2num($this->total_localtax1,
'MT'));
3003 $sql .=
", total_localtax2=".((float)
price2num($this->total_localtax2,
'MT'));
3004 $sql .=
", tva_tx=".((float) $this->
vatrate);
3005 $sql .=
", vat_src_code='".$this->db->escape($this->vat_src_code).
"'";
3006 $sql .=
", localtax1_tx=".((float) $this->localtax1_tx);
3007 $sql .=
", localtax2_tx=".((float) $this->localtax2_tx);
3008 $sql .=
", localtax1_type='".$this->db->escape($this->localtax1_type).
"'";
3009 $sql .=
", localtax2_type='".$this->db->escape($this->localtax2_type).
"'";
3010 $sql .=
", rule_warning_message='".$this->db->escape($this->rule_warning_message).
"'";
3011 $sql .=
", fk_c_exp_tax_cat=".$this->db->escape($this->fk_c_exp_tax_cat);
3012 $sql .=
", fk_ecm_files=".($this->fk_ecm_files > 0 ? ((int) $this->fk_ecm_files) :
'null');
3013 if ($this->fk_c_type_fees) {
3014 $sql .=
", fk_c_type_fees = ".((int) $this->fk_c_type_fees);
3016 $sql .=
", fk_c_type_fees=null";
3018 if ($this->fk_project > 0) {
3019 $sql .=
", fk_projet=".((int) $this->fk_project);
3021 $sql .=
", fk_projet=null";
3023 $sql .=
" WHERE rowid = ".((int) ($this->
rowid ? $this->
rowid : $this->
id));
3030 $result = $tmpparent->fetch($this->fk_expensereport);
3032 $result = $tmpparent->update_price();
3035 $this->error = $tmpparent->error;
3036 $this->errors = $tmpparent->errors;
3040 $this->error = $tmpparent->error;
3041 $this->errors = $tmpparent->errors;
3049 $this->
db->commit();
3052 $this->error = $this->
db->lasterror();
3053 dol_syslog(
"ExpenseReportLine::update Error ".$this->error, LOG_ERR);
3054 $this->
db->rollback();