203 public function write_file(
$object, $outputlangs, $srctemplatepath =
'', $hidedetails = 0, $hidedesc = 0, $hideref = 0)
206 global $user, $langs, $conf,
$mysoc, $hookmanager, $nblines;
208 dol_syslog(
"write_file outputlangs->defaultlang=".(is_object($outputlangs) ? $outputlangs->defaultlang :
'null'));
210 if (!is_object($outputlangs)) {
211 $outputlangs = $langs;
215 $outputlangs->charset_output =
'ISO-8859-1';
219 $outputlangs->loadLangs(array(
"main",
"bills",
"products",
"dict",
"companies",
"compta"));
221 global $outputlangsbis;
222 $outputlangsbis =
null;
224 $outputlangsbis =
new Translate(
'', $conf);
226 $outputlangsbis->loadLangs(array(
"main",
"bills",
"products",
"dict",
"companies",
"compta"));
234 $nblines = count(
$object->lines);
242 $realpatharray = array();
243 $this->atleastonephoto =
false;
245 $objphoto =
new Product($this->db);
247 for ($i = 0; $i < $nblines; $i++) {
248 if (empty(
$object->lines[$i]->fk_product)) {
252 $objphoto->fetch(
$object->lines[$i]->fk_product);
256 $pdir[0] =
get_exdir($objphoto->id, 2, 0, 0, $objphoto,
'product').$objphoto->id.
"/photos/";
257 $pdir[1] =
get_exdir(0, 0, 0, 0, $objphoto,
'product').dol_sanitizeFileName($objphoto->ref).
'/';
259 $pdir[0] =
get_exdir(0, 0, 0, 0, $objphoto,
'product');
260 $pdir[1] =
get_exdir($objphoto->id, 2, 0, 0, $objphoto,
'product').$objphoto->id.
"/photos/";
265 foreach ($pdir as $midir) {
267 $entity = $objphoto->entity;
268 if ($entity !==
null && $conf->entity != $entity) {
269 $dir = $conf->product->multidir_output[$entity].
'/'.$midir;
271 $dir = $conf->product->dir_output.
'/'.$midir;
274 foreach ($objphoto->liste_photos($dir, 1) as $key => $obj) {
276 if ($obj[
'photo_vignette']) {
277 $filename = $obj[
'photo_vignette'];
279 $filename = $obj[
'photo'];
282 $filename = $obj[
'photo'];
285 $realpath = $dir.$filename;
287 $this->atleastonephoto =
true;
292 if (!empty($realpath) && $arephoto) {
293 $realpatharray[$i] = $realpath;
300 if ($conf->facture->multidir_output[$conf->entity]) {
304 $amount_credit_notes_included =
$object->getSumCreditNotesUsed((
isModEnabled(
"multicurrency") &&
$object->multicurrency_tx != 1) ? 1 : 0);
305 $amount_deposits_included =
$object->getSumDepositsUsed((
isModEnabled(
"multicurrency") &&
$object->multicurrency_tx != 1) ? 1 : 0);
309 $dir = $conf->facture->multidir_output[$conf->entity];
310 $file = $dir.
"/SPECIMEN.pdf";
313 $dir = $conf->facture->multidir_output[
$object->entity ?? $conf->entity].
"/".$objectref;
314 $file = $dir.
"/".$objectref.
".pdf";
316 if (!file_exists($dir)) {
318 $this->error = $langs->transnoentities(
"ErrorCanNotCreateDir", $dir);
323 if (file_exists($dir)) {
325 if (!is_object($hookmanager)) {
326 include_once DOL_DOCUMENT_ROOT.
'/core/class/hookmanager.class.php';
329 $hookmanager->initHooks(array(
'pdfgeneration'));
330 $parameters = array(
'file' => $file,
'object' =>
$object,
'outputlangs' => $outputlangs);
332 $reshook = $hookmanager->executeHooks(
'beforePDFCreation', $parameters,
$object, $action);
335 $nblines = count(
$object->lines);
336 $nbpayments = count(
$object->getListOfPayments());
341 $pdf->setAutoPageBreak(
true, 0);
344 $this->heightforinfotot = 50;
346 $this->heightforinfotot += (4 * $nbpayments);
348 $this->heightforfreetext =
getDolGlobalInt(
'MAIN_PDF_FREETEXT_HEIGHT', 5);
349 $this->heightforfooter = $this->marge_basse + (!
getDolGlobalString(
'MAIN_GENERATE_DOCUMENTS_SHOW_FOOT_DETAILS') ? 12 : 22);
351 $heightforqrinvoice = 0;
355 $this->heightforinfotot = 30 + (4 * $nbpayments);
359 if (class_exists(
'TCPDF')) {
360 $pdf->setPrintHeader(
false);
361 $pdf->setPrintFooter(
false);
367 $logodir = $conf->mycompany->dir_output;
368 if (!empty($conf->mycompany->multidir_output[
$object->entity ?? $conf->entity])) {
369 $logodir = $conf->mycompany->multidir_output[
$object->entity ?? $conf->entity];
371 $pagecount = $pdf->setSourceFile($logodir.
'/' .
getDolGlobalString(
'MAIN_ADD_PDF_BACKGROUND'));
372 $tplidx = $pdf->importPage(1);
377 $pdf->SetDrawColor(128, 128, 128);
379 $pdf->SetTitle($outputlangs->convToOutputCharset(
$object->ref));
380 $pdf->SetSubject($outputlangs->transnoentities(
"PdfInvoiceTitle"));
381 $pdf->SetCreator(
"Dolibarr ".DOL_VERSION);
382 $pdf->SetAuthor(
$mysoc->name.($user->id > 0 ?
' - '.$outputlangs->convToOutputCharset($user->getFullName($outputlangs)) :
''));
383 $pdf->SetKeyWords($outputlangs->convToOutputCharset(
$object->ref).
" ".$outputlangs->transnoentities(
"PdfInvoiceTitle").
" ".$outputlangs->convToOutputCharset(
$object->thirdparty->name));
385 $pdf->SetCompression(
false);
389 $cert = empty($user->conf->CERTIFICATE_CRT) ?
'' : $user->conf->CERTIFICATE_CRT;
390 $certprivate = empty($user->conf->CERTIFICATE_CRT_PRIVATE) ?
'' : $user->conf->CERTIFICATE_CRT_PRIVATE;
401 'Name' => $this->emetteur->name,
402 'Location' =>
getCountry($this->emetteur->country_code,
''),
403 'Reason' =>
'INVOICE',
404 'ContactInfo' => $this->emetteur->email
406 $pdf->setSignature($cert, $certprivate, $this->emetteur->name,
'', 2, $info);
410 $pdf->SetMargins($this->marge_gauche, $this->marge_haute, $this->marge_droite);
414 $categoryOfOperation = 0;
417 for ($i = 0; $i < $nblines; $i++) {
418 if (
$object->lines[$i]->remise_percent) {
419 $this->atleastonediscount++;
424 if (preg_match(
'/^\((.*)\)$/',
$object->lines[$i]->desc, $reg)) {
425 if ($reg[1] ==
'DEPOSIT') {
436 if ($categoryOfOperation < 2) {
437 $lineProductType =
$object->lines[$i]->product_type;
443 if ($nbProduct > 0 && $nbService > 0) {
445 $categoryOfOperation = 2;
450 if ($categoryOfOperation <= 0) {
452 if ($nbProduct == 0 && $nbService > 0) {
453 $categoryOfOperation = 1;
456 $this->categoryOfOperation = $categoryOfOperation;
459 if (
$object->situation_cycle_ref) {
460 $this->situationinvoice =
true;
465 if (!empty($tplidx)) {
466 $pdf->useTemplate($tplidx);
471 $pagehead = $this->
_pagehead($pdf,
$object, 1, $outputlangs, $outputlangsbis);
472 $top_shift = $pagehead[
'top_shift'];
473 $shipp_shift = $pagehead[
'shipp_shift'];
474 $pdf->SetFont(
'',
'', $default_font_size - 1);
475 $pdf->MultiCell(0, 3,
'');
476 $pdf->SetTextColor(0, 0, 0);
481 $this->tab_top = 90 + $top_shift + $shipp_shift;
482 $this->tab_top_newpage = (!
getDolGlobalInt(
'MAIN_PDF_DONOTREPEAT_HEAD') ? 42 + $top_shift : 10);
485 $extra_under_address_shift = 0;
488 $qrcodestring =
$object->buildZATCAQRString();
491 $qrcodestring =
$object->buildSwitzerlandQRString();
495 $qrcodestring =
$object->buildEPCQrCodeString();
500 $qrcodecolor = array(
'25',
'25',
'25');
505 'fgcolor' => $qrcodecolor,
510 $pdf->write2DBarcode($qrcodestring,
'QRCODE,M', $this->marge_gauche, $this->tab_top - 5, 25, 25, $styleQr,
'N');
514 $pdf->SetXY($this->marge_gauche + 30, $pdf->GetY() - 15);
515 $pdf->SetFont(
'',
'', $default_font_size - 4);
516 $pdf->MultiCell(40, 3, $langs->transnoentitiesnoconv(
"INVOICE_ADD_EPC_QR_CODEPay"), 0,
'L',
false);
520 $extra_under_address_shift += 25;
528 'outputlangs' => $outputlangs,
529 'hidedetails' => $hidedetails
531 $reshook = $hookmanager->executeHooks(
'printUnderHeaderPDFline', $parameters, $this);
532 if (!empty($hookmanager->resArray[
'extra_under_address_shift'])) {
533 $extra_under_address_shift += $hookmanager->resArray[
'extra_under_address_shift'];
536 $this->tab_top += $extra_under_address_shift;
537 $this->tab_top_newpage += 0;
541 $tab_height = $this->page_hauteur - $this->tab_top - $this->heightforfooter - $this->heightforfreetext - $this->
getHeightForQRInvoice(1,
$object, $langs);
543 $nexY = $this->tab_top - 1;
546 $height_incoterms = 0;
548 $desc_incoterms =
$object->getIncotermsForPDF();
549 if ($desc_incoterms) {
552 $pdf->SetFont(
'',
'', $default_font_size - 1);
553 $pdf->writeHTMLCell(190, 3, $this->posxdesc - 1, $this->tab_top - 1,
dol_htmlentitiesbr($desc_incoterms), 0, 1);
554 $nexY = max($pdf->GetY(), $nexY);
555 $height_incoterms = $nexY - $this->tab_top;
558 $pdf->SetDrawColor(192, 192, 192);
559 $pdf->RoundedRect($this->marge_gauche, $this->tab_top - 1, $this->page_largeur - $this->marge_gauche - $this->marge_droite, $height_incoterms + 3, $this->corner_radius,
'1234',
'D');
561 $this->tab_top = $nexY + 6;
562 $height_incoterms += 4;
567 $notetoshow = empty(
$object->note_public) ?
'' :
$object->note_public;
570 if (is_object(
$object->thirdparty)) {
571 $salereparray =
$object->thirdparty->getSalesRepresentatives($user);
572 $salerepobj =
new User($this->db);
573 $salerepobj->fetch($salereparray[0][
'id']);
574 if (!empty($salerepobj->signature)) {
575 $notetoshow =
dol_concatdesc($notetoshow, $salerepobj->signature);
581 $extranote = $this->getExtrafieldsInHtml(
$object, $outputlangs);
582 if (!empty($extranote)) {
586 $pagenb = $pdf->getPage();
590 $tab_width = $this->page_largeur - $this->marge_gauche - $this->marge_droite;
591 $pageposbeforenote = $pagenb;
598 $pdf->startTransaction();
600 $pdf->SetFont(
'',
'', $default_font_size - 1);
601 $pdf->writeHTMLCell(190, 3, $this->posxdesc - 1, $this->tab_top,
dol_htmlentitiesbr($notetoshow), 0, 1);
603 $pageposafternote = $pdf->getPage();
604 $posyafter = $pdf->GetY();
606 if ($pageposafternote > $pageposbeforenote) {
607 $pdf->rollbackTransaction(
true);
610 while ($pagenb < $pageposafternote) {
613 if (!empty($tplidx)) {
614 $pdf->useTemplate($tplidx);
619 $pdf->setTopMargin($this->tab_top_newpage);
621 $pdf->setPageOrientation(
'',
true, $this->heightforfooter + $this->heightforfreetext);
625 $pdf->setPage($pageposbeforenote);
626 $pdf->setPageOrientation(
'',
true, $this->heightforfooter + $this->heightforfreetext);
627 $pdf->SetFont(
'',
'', $default_font_size - 1);
628 $pdf->writeHTMLCell(190, 3, $this->posxdesc - 1, $this->tab_top,
dol_htmlentitiesbr($notetoshow), 0, 1);
629 $pageposafternote = $pdf->getPage();
631 $posyafter = $pdf->GetY();
633 if ($posyafter > ($this->page_hauteur - ($this->heightforfooter + $this->heightforfreetext + 20))) {
634 $pdf->AddPage(
'',
'',
true);
637 $pdf->setPage($pageposafternote);
638 $pdf->setTopMargin($this->tab_top_newpage);
640 $pdf->setPageOrientation(
'',
true, $this->heightforfooter + $this->heightforfreetext);
646 $i = $pageposbeforenote;
647 while ($i < $pageposafternote) {
651 $pdf->SetDrawColor(128, 128, 128);
653 if ($i > $pageposbeforenote) {
654 $height_note = $this->page_hauteur - ($this->tab_top_newpage + $this->heightforfooter);
655 $pdf->RoundedRect($this->marge_gauche, $this->tab_top_newpage - 1, $tab_width, $height_note + 1, $this->corner_radius,
'1234',
'D');
657 $height_note = $this->page_hauteur - ($this->tab_top + $this->heightforfooter);
658 $pdf->RoundedRect($this->marge_gauche, $this->tab_top - 1, $tab_width, $height_note + 1, $this->corner_radius,
'1234',
'D');
662 $pdf->setPageOrientation(
'',
true, 0);
669 $pdf->setPage($pageposafternote);
670 if (!empty($tplidx)) {
671 $pdf->useTemplate($tplidx);
676 $height_note = $posyafter - $this->tab_top_newpage;
677 $pdf->RoundedRect($this->marge_gauche, $this->tab_top_newpage - 1, $tab_width, $height_note + 1, $this->corner_radius,
'1234',
'D');
680 $pdf->commitTransaction();
681 $posyafter = $pdf->GetY();
682 $height_note = $posyafter - $this->tab_top;
683 $pdf->RoundedRect($this->marge_gauche, $this->tab_top - 1, $tab_width, $height_note + 1, $this->corner_radius,
'1234',
'D');
686 if ($posyafter > ($this->page_hauteur - ($this->heightforfooter + $this->heightforfreetext + 20))) {
688 $pdf->AddPage(
'',
'',
true);
691 $pdf->setPage($pageposafternote);
692 if (!empty($tplidx)) {
693 $pdf->useTemplate($tplidx);
699 $posyafter = $this->tab_top_newpage;
703 $tab_height -= $height_note;
704 $this->tab_top = $posyafter + 6;
713 $pdf->startTransaction();
714 $this->
pdfTabTitles($pdf, $this->tab_top, $tab_height, $outputlangs, $hidetop);
715 $pdf->rollbackTransaction(
true);
717 $nexY = $this->tab_top + $this->tabTitleHeight;
720 $pageposbeforeprintlines = $pdf->getPage();
721 $pagenb = $pageposbeforeprintlines;
723 $pdf_sub_options = array();
724 $pdf_sub_options[
'titleshowuponpdf'] = 1;
725 $pdf_sub_options[
'titleshowtotalexludingvatonpdf'] = 1;
727 for ($i = 0; $i < $nblines; $i++) {
728 $linePosition = $i + 1;
731 $sub_options =
$object->lines[$i]->extraparams[
"subtotal"] ?? array();
733 if (
$object->lines[$i]->special_code == SUBTOTALS_SPECIAL_CODE) {
734 $level =
$object->lines[$i]->qty;
736 if (isset($sub_options[
'titleshowuponpdf'])) {
737 $pdf_sub_options[
'titleshowuponpdf'] = isset($pdf_sub_options[
'titleshowuponpdf']) && $pdf_sub_options[
'titleshowuponpdf'] < $level ? $pdf_sub_options[
'titleshowuponpdf'] : $level;
738 } elseif (isset($pdf_sub_options[
'titleshowuponpdf']) && abs($level) <= $pdf_sub_options[
'titleshowuponpdf']) {
739 unset($pdf_sub_options[
'titleshowuponpdf']);
741 if (isset($sub_options[
'titleshowtotalexludingvatonpdf'])) {
742 $pdf_sub_options[
'titleshowtotalexludingvatonpdf'] = isset($pdf_sub_options[
'titleshowtotalexludingvatonpdf']) && $pdf_sub_options[
'titleshowtotalexludingvatonpdf'] < $level ? $pdf_sub_options[
'titleshowtotalexludingvatonpdf'] : $level;
743 } elseif (isset($pdf_sub_options[
'titleshowtotalexludingvatonpdf']) && abs($level) <= $pdf_sub_options[
'titleshowtotalexludingvatonpdf']) {
744 unset($pdf_sub_options[
'titleshowtotalexludingvatonpdf']);
747 if (isset($pdf_sub_options[
'titleshowuponpdf']) && abs($level) <= $pdf_sub_options[
'titleshowuponpdf']) {
748 unset($pdf_sub_options[
'titleshowuponpdf']);
750 if (isset($pdf_sub_options[
'titleshowtotalexludingvatonpdf']) && abs($level) <= $pdf_sub_options[
'titleshowtotalexludingvatonpdf']) {
751 unset($pdf_sub_options[
'titleshowtotalexludingvatonpdf']);
756 if (($curY + 6) > ($this->page_hauteur - $this->heightforfooter) || isset($sub_options[
'titleforcepagebreak']) && !($pdf->getNumPages() == 1 && $curY == $this->tab_top + $this->tabTitleHeight)) {
757 $object->lines[$i]->pagebreak =
true;
761 if (isset(
$object->lines[$i]->pagebreak) &&
$object->lines[$i]->pagebreak) {
764 if (!empty($tplidx)) {
765 $pdf->useTemplate($tplidx);
768 $pdf->setPage($pdf->getNumPages());
769 $nexY = $curY = $this->tab_top_newpage;
774 $pdf->SetFont(
'',
'', $default_font_size - 1);
775 $pdf->SetTextColor(0, 0, 0);
778 $imglinesize = array();
779 if (!empty($realpatharray[$i])) {
783 $pdf->setTopMargin($this->tab_top_newpage);
784 $pdf->setPageOrientation(
'',
true, $this->heightforfooter);
785 $pageposbefore = $pdf->getPage();
789 $showpricebeforepagebreak =
getDolGlobalInt(
'MAIN_PDF_DATA_ON_FIRST_PAGE');
794 if (isset($imglinesize[
'width']) && isset($imglinesize[
'height']) && ($curY + $imageTopMargin + $imglinesize[
'height']) > ($this->page_hauteur - $this->heightforfooter)) {
795 $pdf->AddPage(
'',
'',
true);
796 if (!empty($tplidx)) {
797 $pdf->useTemplate($tplidx);
799 $pdf->setPage($pageposbefore + 1);
800 $pdf->setPageOrientation(
'',
true, $this->heightforfooter);
801 $curY = $this->tab_top_newpage;
802 $showpricebeforepagebreak = 0;
805 $pdf->setPageOrientation(
'',
false, $this->heightforfooter + $this->heightforfreetext);
807 if (!empty($this->cols[
'photo']) && isset($imglinesize[
'width']) && isset($imglinesize[
'height'])) {
808 $pdf->Image($realpatharray[$i], $this->
getColumnContentXStart(
'photo'), $curY + $imageTopMargin, $imglinesize[
'width'], $imglinesize[
'height'],
'',
'',
'', 2, 300);
810 $posYAfterImage = $curY + $imglinesize[
'height'];
817 $pdf->setPageOrientation(
'',
true, $this->heightforfooter);
821 if (
$object->lines[$i]->special_code != SUBTOTALS_SPECIAL_CODE) {
826 pdf_render_subtotals($pdf, $this, $curY,
$object, $i, $outputlangs, $hideref, $hidedesc, $bg_color,
true,
true);
832 $pdf->setPage($pageposbefore);
833 $pdf->setTopMargin($this->marge_haute);
835 $pdf->setPageOrientation(
'',
false, $this->heightforfooter);
838 if ($afterPosData[
'page'] > $pageposbefore && (empty($showpricebeforepagebreak) || ($curY + 4) > ($this->page_hauteur - $this->heightforfooter))) {
839 $pdf->setPage($afterPosData[
'page']);
840 $curY = $this->tab_top_newpage;
843 $pdf->SetFont(
'',
'', $default_font_size - 1);
857 if ($this->
getColumnStatus(
'subprice') &&
$object->lines[$i]->special_code != SUBTOTALS_SPECIAL_CODE && isset($pdf_sub_options[
'titleshowuponpdf'])) {
882 if ($this->
getColumnStatus(
'discount') &&
$object->lines[$i]->remise_percent &&
$object->lines[$i]->special_code != SUBTOTALS_SPECIAL_CODE) {
889 if (
$object->lines[$i]->special_code != SUBTOTALS_SPECIAL_CODE && isset($pdf_sub_options[
'titleshowtotalexludingvatonpdf'])) {
892 } elseif (
$object->lines[$i]->qty < 0 && isset($sub_options[
'subtotalshowtotalexludingvatonpdf'])) {
894 $total_excl_tax =
$object->getSubtotalLineMulticurrencyAmount(
$object->lines[$i]);
896 $total_excl_tax =
$object->getSubtotalLineAmount(
$object->lines[$i]);
909 if (!empty(
$object->lines[$i]->array_options)) {
910 foreach (
$object->lines[$i]->array_options as $extrafieldColKey => $extrafieldValue) {
926 'nexY' => & $afterPosData[
'y'],
927 'outputlangs' => $outputlangs,
928 'hidedetails' => $hidedetails
930 $reshook = $hookmanager->executeHooks(
'printPDFline', $parameters, $this);
938 $prev_progress =
$object->lines[$i]->get_prev_progress(
$object->id);
939 if ($prev_progress > 0 && !empty(
$object->lines[$i]->situation_percent)) {
941 $tvaligne = $sign *
$object->lines[$i]->multicurrency_total_tva * (
$object->lines[$i]->situation_percent - $prev_progress) /
$object->lines[$i]->situation_percent;
943 $tvaligne = $sign *
$object->lines[$i]->total_tva * (
$object->lines[$i]->situation_percent - $prev_progress) /
$object->lines[$i]->situation_percent;
947 $tvaligne = $sign *
$object->lines[$i]->multicurrency_total_tva;
949 $tvaligne = $sign *
$object->lines[$i]->total_tva;
953 $localtax1ligne =
$object->lines[$i]->total_localtax1;
954 $localtax2ligne =
$object->lines[$i]->total_localtax2;
955 $localtax1_rate =
$object->lines[$i]->localtax1_tx;
956 $localtax2_rate =
$object->lines[$i]->localtax2_tx;
957 $localtax1_type =
$object->lines[$i]->localtax1_type;
958 $localtax2_type =
$object->lines[$i]->localtax2_type;
960 $vatrate = (string)
$object->lines[$i]->tva_tx;
963 if ((!isset($localtax1_type) || $localtax1_type ==
'' || !isset($localtax2_type) || $localtax2_type ==
'')
964 && (!empty($localtax1_rate) || !empty($localtax2_rate))) {
966 $localtax1_type = isset($localtaxtmp_array[0]) ? $localtaxtmp_array[0] :
'';
967 $localtax2_type = isset($localtaxtmp_array[2]) ? $localtaxtmp_array[2] :
'';
971 if ($localtax1_type && $localtax1ligne != 0) {
972 if (empty($this->localtax1[$localtax1_type][$localtax1_rate])) {
973 $this->localtax1[$localtax1_type][$localtax1_rate] = $localtax1ligne;
975 $this->localtax1[$localtax1_type][$localtax1_rate] += $localtax1ligne;
978 if ($localtax2_type && $localtax2ligne != 0) {
979 if (empty($this->localtax2[$localtax2_type][$localtax2_rate])) {
980 $this->localtax2[$localtax2_type][$localtax2_rate] = $localtax2ligne;
982 $this->localtax2[$localtax2_type][$localtax2_rate] += $localtax2ligne;
986 if ((
$object->lines[$i]->info_bits & 0x01) == 0x01) {
991 if (!isset($this->tva[$vatrate])) {
992 $this->tva[$vatrate] = 0;
994 $this->tva[$vatrate] += $tvaligne;
995 $vatcode =
$object->lines[$i]->vat_src_code;
996 if (empty($this->tva_array[$vatrate.($vatcode ?
' ('.$vatcode.
')' :
'')][
'amount'])) {
997 $this->tva_array[$vatrate.($vatcode ?
' ('.$vatcode.
')' :
'')][
'amount'] = 0;
1000 if (empty($this->tva_array[$vatrate.($vatcode ?
' ('.$vatcode.
')' :
'')][
'tot_ht'])) {
1001 $this->tva_array[$vatrate . ($vatcode ?
' (' . $vatcode .
')' :
'')][
'tot_ht'] = 0;
1003 $this->tva_array[$vatrate.($vatcode ?
' ('.$vatcode.
')' :
'')] = array(
'vatrate' => $vatrate,
'vatcode' => $vatcode,
'amount' => $this->tva_array[$vatrate.($vatcode ?
' ('.$vatcode.
')' :
'')][
'amount'] + $tvaligne,
'tot_ht' => $this->tva_array[$vatrate.($vatcode ?
' ('.$vatcode.
')' :
'')][
'tot_ht'] +
$object->lines[$i]->total_ht);
1005 $this->tva_array[$vatrate.($vatcode ?
' ('.$vatcode.
')' :
'')] = array(
'vatrate' => $vatrate,
'vatcode' => $vatcode,
'amount' => $this->tva_array[$vatrate.($vatcode ?
' ('.$vatcode.
')' :
'')][
'amount'] + $tvaligne);
1009 $pdf->setPage($afterPosData[
'page']);
1010 $nexY = $afterPosData[
'y'];
1013 if (
getDolGlobalString(
'MAIN_PDF_DASH_BETWEEN_LINES') && $i < ($nblines - 1) && $afterPosData[
'y'] < $this->page_hauteur - $this->heightforfooter - 5) {
1014 $pdf->SetLineStyle(array(
'dash' =>
'1,1',
'color' => array(80, 80, 80)));
1016 $pdf->line($this->marge_gauche, $nexY, $this->page_largeur - $this->marge_droite, $nexY);
1017 $pdf->SetLineStyle(array(
'dash' => 0));
1025 $page_bottom_margin = $this->heightforfooter + $this->heightforfreetext + $this->heightforinfotot + $this->
getHeightForQRInvoice($pdf->getPage(),
$object, $langs);
1027 if (isset($afterPosData[
'y']) && $afterPosData[
'y'] > $this->page_hauteur - $page_bottom_margin) {
1029 if (!empty($tplidx)) {
1030 $pdf->useTemplate($tplidx);
1033 $pdf->setPage($pagenb);
1037 $drawTabNumbPage = $pdf->getNumPages();
1038 for ($i = $pageposbeforeprintlines; $i <= $drawTabNumbPage; $i++) {
1041 $pdf->setPageOrientation(
'',
false, 0);
1043 $drawTabHideTop = $hidetop;
1044 $drawTabTop = $this->tab_top_newpage;
1045 $drawTabBottom = $this->page_hauteur - $this->heightforfooter;
1048 if ($i == $pageposbeforeprintlines) {
1050 $drawTabTop = $this->tab_top;
1051 } elseif (!$drawTabHideTop) {
1053 $drawTabTop -= $this->tabTitleHeight;
1055 $drawTabHideTop = 1;
1060 if ($i == $pdf->getNumPages()) {
1062 $drawTabBottom -= $this->heightforfreetext + $this->heightforinfotot + $this->
getHeightForQRInvoice($pdf->getPage(),
$object, $outputlangs);
1065 $drawTabHeight = $drawTabBottom - $drawTabTop;
1066 $this->
_tableau($pdf, $drawTabTop, $drawTabHeight, 0, $outputlangs, $drawTabHideTop, $hideBottom,
$object, $outputlangsbis);
1068 $hideFreeText = $i != $pdf->getNumPages() ? 1 : 0;
1075 $pdf->setPageOrientation(
'',
true, 0);
1078 if (!
getDolGlobalInt(
'MAIN_PDF_DONOTREPEAT_HEAD') && $i != $pageposbeforeprintlines) {
1081 if (!empty($tplidx)) {
1082 $pdf->useTemplate($tplidx);
1088 $pdf->SetTextColor(0, 0, 0);
1090 $pdf->setPage($pdf->getNumPages());
1092 $bottomlasttab = $this->page_hauteur - $this->heightforinfotot - $this->heightforfreetext - $this->heightforfooter - $heightforqrinvoice + 1;
1098 $posy = $this->
drawTotalTable($pdf,
$object, $deja_regle, $bottomlasttab, $outputlangs, $outputlangsbis);
1101 $listofpayments =
$object->getListOfPayments(
'', 0, 1);
1102 if ((count($listofpayments) || $amount_credit_notes_included || $amount_deposits_included) && !
getDolGlobalString(
'INVOICE_NO_PAYMENT_DETAILS')) {
1107 if (method_exists($pdf,
'AliasNbPages')) {
1108 $pdf->AliasNbPages();
1113 if (
getDolGlobalInt(
'MAIN_PDF_ADD_TERMSOFSALE_INVOICE') && $termsofsalefilename) {
1114 $termsofsale = $conf->invoice->dir_output.
'/'.$termsofsalefilename;
1115 if (!empty($conf->invoice->multidir_output[
$object->entity ?? $conf->entity])) {
1116 $termsofsale = $conf->invoice->multidir_output[
$object->entity ?? $conf->entity].
'/'.$termsofsalefilename;
1119 if (file_exists($termsofsale) && is_readable($termsofsale)) {
1120 $pagecount = $pdf->setSourceFile($termsofsale);
1121 for ($i = 1; $i <= $pagecount; $i++) {
1122 $tplIdx = $pdf->importPage($i);
1123 if ($tplIdx !==
false) {
1124 $s = $pdf->getTemplatesize($tplIdx);
1125 $pdf->AddPage($s[
'h'] > $s[
'w'] ?
'P' :
'L');
1126 $pdf->useTemplate($tplIdx);
1128 setEventMessages(
null, array($termsofsale.
' cannot be added, probably protected PDF'),
'warnings');
1140 $pdf->Output($file,
'F');
1143 $hookmanager->initHooks(array(
'pdfgeneration'));
1144 $parameters = array(
'file' => $file,
'object' =>
$object,
'outputlangs' => $outputlangs);
1146 $reshook = $hookmanager->executeHooks(
'afterPDFCreation', $parameters, $this, $action);
1147 $this->warnings = $hookmanager->warnings;
1149 $this->error = $hookmanager->error;
1150 $this->errors = $hookmanager->errors;
1157 $this->result = array(
'fullpath' => $file);
1161 $this->error = $langs->transnoentities(
"ErrorCanNotCreateDir", $dir);
1165 $this->error = $langs->transnoentities(
"ErrorConstantNotDefined",
"FAC_OUTPUTDIR");
1188 $tab3_top = $posy + 8;
1191 if ($this->page_largeur < 210) {
1197 $title = $outputlangs->transnoentities(
"PaymentsAlreadyDone");
1199 $title = $outputlangs->transnoentities(
"PaymentsBackAlreadyDone");
1202 $pdf->SetFont(
'',
'', $default_font_size - 3);
1203 $pdf->SetXY($tab3_posx, $tab3_top - 4);
1204 $pdf->MultiCell(60, 3, $title, 0,
'L',
false);
1206 $pdf->line($tab3_posx, $tab3_top, $tab3_posx + $tab3_width, $tab3_top);
1208 $pdf->SetFont(
'',
'', $default_font_size - 4);
1209 $pdf->SetXY($tab3_posx, $tab3_top);
1210 $pdf->MultiCell(20, 3, $outputlangs->transnoentities(
"Payment"), 0,
'L',
false);
1211 $pdf->SetXY($tab3_posx + 21, $tab3_top);
1212 $pdf->MultiCell(20, 3, $outputlangs->transnoentities(
"Amount"), 0,
'L',
false);
1213 $pdf->SetXY($tab3_posx + 40, $tab3_top);
1214 $pdf->MultiCell(20, 3, $outputlangs->transnoentities(
"Type"), 0,
'L',
false);
1215 $pdf->SetXY($tab3_posx + 58, $tab3_top);
1216 $pdf->MultiCell(20, 3, $outputlangs->transnoentities(
"Num"), 0,
'L',
false);
1218 $pdf->line($tab3_posx, $tab3_top - 1 + $tab3_height, $tab3_posx + $tab3_width, $tab3_top - 1 + $tab3_height);
1222 $pdf->SetFont(
'',
'', $default_font_size - 4);
1226 $sql =
"SELECT re.rowid, re.amount_ht, re.multicurrency_amount_ht, re.amount_tva, re.multicurrency_amount_tva, re.amount_ttc, re.multicurrency_amount_ttc,";
1227 $sql .=
" re.description, re.fk_facture_source,";
1228 $sql .=
" f.type, f.datef";
1229 $sql .=
" FROM ".MAIN_DB_PREFIX.
"societe_remise_except as re, ".MAIN_DB_PREFIX.
"facture as f";
1230 $sql .=
" WHERE re.fk_facture_source = f.rowid AND re.fk_facture = ".((int)
$object->id);
1231 $resql = $this->db->query($sql);
1233 $num = $this->db->num_rows($resql);
1235 $invoice =
new Facture($this->db);
1238 $obj = $this->db->fetch_object($resql);
1240 if ($obj->type == 2) {
1241 $text = $outputlangs->transnoentities(
"CreditNote");
1242 } elseif ($obj->type == 3) {
1243 $text = $outputlangs->transnoentities(
"Deposit");
1244 } elseif ($obj->type == 0) {
1245 $text = $outputlangs->transnoentities(
"ExcessReceived");
1247 $text = $outputlangs->transnoentities(
"UnknownType");
1250 $invoice->fetch($obj->fk_facture_source);
1252 $pdf->SetXY($tab3_posx, $tab3_top + $y);
1253 $pdf->MultiCell(20, 3,
dol_print_date($this->db->jdate($obj->datef),
'day',
false, $outputlangs,
true), 0,
'L',
false);
1254 $pdf->SetXY($tab3_posx + 21, $tab3_top + $y);
1255 $pdf->MultiCell(20, 3,
price((
isModEnabled(
"multicurrency") &&
$object->multicurrency_tx != 1) ? $obj->multicurrency_amount_ttc : $obj->amount_ttc, 0, $outputlangs), 0,
'L',
false);
1256 $pdf->SetXY($tab3_posx + 40, $tab3_top + $y);
1257 $pdf->MultiCell(20, 3, $text, 0,
'L',
false);
1258 $pdf->SetXY($tab3_posx + 58, $tab3_top + $y);
1259 $pdf->MultiCell(20, 3, $invoice->ref, 0,
'L',
false);
1261 $pdf->line($tab3_posx, $tab3_top + $y + 3, $tab3_posx + $tab3_width, $tab3_top + $y + 3);
1266 $this->error = $this->db->lasterror();
1272 $sql =
"SELECT p.datep as date, p.fk_paiement, p.num_paiement as num, pf.amount as amount, pf.multicurrency_amount,";
1274 $sql .=
" FROM ".MAIN_DB_PREFIX.
"paiement_facture as pf, ".MAIN_DB_PREFIX.
"paiement as p";
1275 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"c_paiement as cp ON p.fk_paiement = cp.id";
1276 $sql .=
" WHERE pf.fk_paiement = p.rowid AND pf.fk_facture = ".((int)
$object->id);
1278 $sql .=
" ORDER BY p.datep";
1280 $resql = $this->db->query($sql);
1282 $num = $this->db->num_rows($resql);
1287 $row = $this->db->fetch_object($resql);
1288 $pdf->SetXY($tab3_posx, $tab3_top + $y);
1289 $pdf->MultiCell(20, 3,
dol_print_date($this->db->jdate($row->date),
'day',
false, $outputlangs,
true), 0,
'L',
false);
1290 $pdf->SetXY($tab3_posx + 21, $tab3_top + $y);
1291 $pdf->MultiCell(20, 3,
price($sign * ((
isModEnabled(
"multicurrency") &&
$object->multicurrency_tx != 1) ? $row->multicurrency_amount : $row->amount), 0, $outputlangs), 0,
'L',
false);
1292 $pdf->SetXY($tab3_posx + 40, $tab3_top + $y);
1293 $oper = $outputlangs->transnoentitiesnoconv(
"PaymentTypeShort".$row->code);
1295 $pdf->MultiCell(20, 3, $oper, 0,
'L',
false);
1296 $maxY = max($pdf->GetY() - $tab3_top - 3, $maxY);
1297 $pdf->SetXY($tab3_posx + 58, $tab3_top + $y);
1298 $pdf->MultiCell(30, 3, $row->num, 0,
'L',
false);
1299 $y = $maxY = max($pdf->GetY() - 3 - $tab3_top, $maxY);
1300 $pdf->line($tab3_posx, $tab3_top + $y + 3, $tab3_posx + $tab3_width, $tab3_top + $y + 3);
1305 return $tab3_top + $y + 3;
1307 $this->error = $this->db->lasterror();
1329 $pdf->SetFont(
'',
'', $default_font_size - 1);
1331 krsort($this->tva_array);
1338 $pdf->SetFillColor(224, 224, 224);
1340 $pdf->SetFont(
'',
'', $default_font_size - 2);
1341 $pdf->SetXY($this->marge_gauche, $posy);
1342 $titre = $outputlangs->transnoentities(
"VAT");
1343 $pdf->MultiCell(25, 4, $titre, 0,
'L',
true);
1345 $pdf->SetFont(
'',
'', $default_font_size - 2);
1346 $pdf->SetXY($this->marge_gauche + 25, $posy);
1347 $titre = $outputlangs->transnoentities(
"NetTotal");
1348 $pdf->MultiCell(25, 4, $titre, 0,
'L',
true);
1350 $pdf->SetFont(
'',
'', $default_font_size - 2);
1351 $pdf->SetXY($this->marge_gauche + 50, $posy);
1352 $titre = $outputlangs->transnoentities(
"VATAmount");
1353 $pdf->MultiCell(25, 4, $titre, 0,
'L',
true);
1355 $pdf->SetFont(
'',
'', $default_font_size - 2);
1356 $pdf->SetXY($this->marge_gauche + 75, $posy);
1357 $titre = $outputlangs->transnoentities(
"AmountTotal");
1358 $pdf->MultiCell(25, 4, $titre, 0,
'L',
true);
1360 $posy = $pdf->GetY();
1365 foreach ($this->tva_array as $tvakey => $tvaval) {
1366 $pdf->SetFont(
'',
'', $default_font_size - 2);
1367 $pdf->SetXY($this->marge_gauche, $posy);
1368 $titre = round((
float) $tvakey, 2) .
"%";
1369 $pdf->MultiCell(25, 4, $titre, 0,
'L');
1371 $pdf->SetFont(
'',
'', $default_font_size - 2);
1372 $pdf->SetXY($this->marge_gauche + 25, $posy);
1373 $titre =
price($tvaval[
'tot_ht']);
1374 $pdf->MultiCell(25, 4, $titre, 0,
'L');
1375 $tot_ht += $tvaval[
'tot_ht'];
1377 $pdf->SetFont(
'',
'', $default_font_size - 2);
1378 $pdf->SetXY($this->marge_gauche + 50, $posy);
1379 $titre =
price($tvaval[
'amount']);
1380 $pdf->MultiCell(25, 4, $titre, 0,
'L');
1381 $tot_tva += $tvaval[
'amount'];
1383 $pdf->SetFont(
'',
'', $default_font_size - 2);
1384 $pdf->SetXY($this->marge_gauche + 75, $posy);
1385 $titre =
price($tvaval[
'tot_ht'] + $tvaval[
'amount']);
1386 $pdf->MultiCell(25, 4, $titre, 0,
'L');
1387 $tot_ttc += ($tvaval[
'tot_ht'] + $tvaval[
'amount']);
1389 $posy = $pdf->GetY();
1394 $showvatmention = 0;
1395 if (in_array($this->emetteur->country_code, array(
'FR')) && empty(
$object->total_tva)) {
1396 $pdf->SetFont(
'',
'', $default_font_size - 2);
1397 $pdf->SetXY($this->marge_gauche, $posy);
1398 if (empty(
$mysoc->tva_assuj)) {
1399 if (
$mysoc->forme_juridique_code == 92) {
1400 $pdf->MultiCell(100, 3, $outputlangs->transnoentities(
"VATIsNotUsedForInvoiceAsso"), 0,
'L',
false);
1402 $pdf->MultiCell(100, 3, $outputlangs->transnoentities(
"VATIsNotUsedForInvoice"), 0,
'L',
false);
1405 } elseif (
getDolGlobalString(
"INVOICE_VAT_SHOW_REVERSE_CHARGE_MENTION") && $this->emetteur->country_code !=
$object->thirdparty->country_code && $this->emetteur->isInEEC() &&
$object->thirdparty->isInEEC()) {
1406 $pdf->MultiCell(100, 3, $outputlangs->transnoentities(
"VATIsNotUsedReverseChargeProcedure"), 0,
'L',
false);
1409 $posy = $pdf->GetY();
1412 $showvatmention +=
pdfCertifMention($pdf, $outputlangs, $this->emetteur, $default_font_size, $posy, $this);
1414 if ($showvatmention) {
1420 if ($this->page_largeur < 210) {
1427 $sql =
"SELECT f.rowid, f.datef, f.total_ttc";
1428 $sql .=
" FROM " . MAIN_DB_PREFIX .
"facture as f";
1429 $sql .=
" WHERE f.fk_soc = " . ((int)
$object->socid);
1430 $sql .=
" AND f.entity IN (" .
getEntity(
'invoice') .
")";
1431 $sql .=
" AND f.datef <= '" . $this->db->idate(
$object->date) .
"'";
1432 $sql .=
" AND f.rowid < " . ((int)
$object->id);
1433 $sql .=
" AND f.fk_statut > 0";
1434 $sql .=
" ORDER BY f.datef ASC";
1437 $invoices = array();
1438 $resql = $this->db->query($sql);
1440 while ($obj = $this->db->fetch_object($resql)) {
1442 $old_balance += $obj->total_ttc;
1444 $this->db->free($resql);
1448 $sql_payments =
"SELECT p.datep, pf.fk_facture, pf.amount";
1449 $sql_payments .=
" FROM " . MAIN_DB_PREFIX .
"paiement_facture as pf";
1450 $sql_payments .=
" INNER JOIN " . MAIN_DB_PREFIX .
"paiement as p ON p.rowid = pf.fk_paiement";
1451 $sql_payments .=
" INNER JOIN " . MAIN_DB_PREFIX .
"facture as f ON f.rowid = pf.fk_facture";
1452 $sql_payments .=
" WHERE f.fk_soc = " . ((int)
$object->socid);
1453 $sql_payments .=
" AND p.datep < '" . $this->db->idate(
$object->date) .
"'";
1454 $sql_payments .=
" ORDER BY p.datep ASC";
1456 $total_payments = 0;
1457 $resql_payments = $this->db->query($sql_payments);
1458 if ($resql_payments) {
1459 while ($obj_payment = $this->db->fetch_object($resql_payments)) {
1460 $total_payments += $obj_payment->amount;
1462 $this->db->free($resql_payments);
1466 $sql_current_date_payments =
"SELECT p.datep, pf.fk_facture, pf.amount";
1467 $sql_current_date_payments .=
" FROM " . MAIN_DB_PREFIX .
"paiement_facture as pf";
1468 $sql_current_date_payments .=
" INNER JOIN " . MAIN_DB_PREFIX .
"paiement as p ON p.rowid = pf.fk_paiement";
1469 $sql_current_date_payments .=
" INNER JOIN " . MAIN_DB_PREFIX .
"facture as f ON f.rowid = pf.fk_facture";
1470 $sql_current_date_payments .=
" WHERE f.fk_soc = " . ((int)
$object->socid);
1471 $sql_current_date_payments .=
" AND DATE(p.datep) = DATE('" . $this->db->idate(
$object->date) .
"')";
1473 $current_date_payments = 0;
1474 $resql_current_date = $this->db->query($sql_current_date_payments);
1475 if ($resql_current_date) {
1476 while ($obj_current = $this->db->fetch_object($resql_current_date)) {
1477 $current_date_payments += $obj_current->amount;
1479 $this->db->free($resql_current_date);
1483 $old_balance -= $total_payments;
1486 $new_balance = $old_balance +
$object->total_ttc - $current_date_payments;
1488 $pdf->SetFillColor(224, 224, 224);
1489 $pdf->SetFont(
'',
'', $default_font_size - 2);
1490 $pdf->SetXY($this->marge_gauche, $posy);
1491 $titre = $outputlangs->transnoentities(
"PreviousBalance").
' : '.
price($old_balance);
1492 $pdf->MultiCell($posxval - $this->marge_gauche + 8, 4, $titre, 0,
'L',
true);
1494 $pdf->SetFont(
'',
'', $default_font_size - 2);
1495 $pdf->SetXY($posxval + 8, $posy);
1496 $titre = $outputlangs->transnoentities(
"NewBalance").
' : '.
price($new_balance);
1497 $pdf->MultiCell($posxend - $posxval - 8, 4, $titre, 0,
'L',
true);
1499 $posy = $pdf->GetY() + 1;
1504 $pdf->SetFont(
'',
'', $default_font_size - 2);
1505 $pdf->SetXY($this->marge_gauche, $posy);
1506 $titre = $outputlangs->transnoentities(
"PaymentConditions").
':';
1507 $pdf->MultiCell($posxval - $this->marge_gauche, 4, $titre, 0,
'L');
1509 $pdf->SetFont(
'',
'', $default_font_size - 2);
1510 $pdf->SetXY($posxval, $posy);
1511 $lib_condition_paiement = ($outputlangs->transnoentities(
"PaymentCondition".
$object->cond_reglement_code) !=
'PaymentCondition'.$object->cond_reglement_code) ? $outputlangs->transnoentities(
"PaymentCondition".$object->cond_reglement_code) : $outputlangs->convToOutputCharset(
$object->cond_reglement_doc ?
$object->cond_reglement_doc :
$object->cond_reglement_label);
1512 $lib_condition_paiement = str_replace(
'\n',
"\n", $lib_condition_paiement);
1513 $pdf->MultiCell($posxend - $posxval, 4, $lib_condition_paiement, 0,
'L');
1515 $posy = $pdf->GetY() + 3;
1519 if (
getDolGlobalInt(
'INVOICE_CATEGORY_OF_OPERATION') == 2 && $this->categoryOfOperation >= 0) {
1520 $pdf->SetFont(
'',
'', $default_font_size - 2);
1521 $pdf->SetXY($this->marge_gauche, $posy);
1522 $categoryOfOperationTitle = $outputlangs->transnoentities(
"MentionCategoryOfOperations").
' : ';
1523 $pdf->MultiCell($posxval - $this->marge_gauche, 4, $categoryOfOperationTitle, 0,
'L');
1525 $pdf->SetFont(
'',
'', $default_font_size - 2);
1526 $pdf->SetXY($posxval, $posy);
1527 $categoryOfOperationLabel = $outputlangs->transnoentities(
"MentionCategoryOfOperations" . $this->categoryOfOperation);
1528 $pdf->MultiCell($posxend - $posxval, 4, $categoryOfOperationLabel, 0,
'L');
1530 $posy = $pdf->GetY() + 3;
1535 if (empty(
$object->mode_reglement_code)
1538 $this->error = $outputlangs->transnoentities(
"ErrorNoPaiementModeConfigured");
1542 $outputlangs->load(
"errors");
1544 $pdf->SetXY($this->marge_gauche, $posy);
1545 $pdf->SetTextColor(200, 0, 0);
1546 $pdf->SetFont(
'',
'', $default_font_size - 2);
1547 $this->error = $outputlangs->transnoentities(
"ErrorPaymentModeDefinedToWithoutSetup",
$object->mode_reglement_code);
1548 $pdf->MultiCell($posxend - $this->marge_gauche, 3, $this->error, 0,
'L',
false);
1549 $pdf->SetTextColor(0, 0, 0);
1551 $posy = $pdf->GetY() + 1;
1555 if (!empty(
$object->mode_reglement_code)
1556 &&
$object->mode_reglement_code !=
'CHQ'
1557 &&
$object->mode_reglement_code !=
'VIR') {
1558 $pdf->SetFont(
'',
'', $default_font_size - 2);
1559 $pdf->SetXY($this->marge_gauche, $posy);
1560 $titre = $outputlangs->transnoentities(
"PaymentMode").
':';
1561 $pdf->MultiCell($posxend - $this->marge_gauche, 5, $titre, 0,
'L');
1563 $pdf->SetFont(
'',
'', $default_font_size - 2);
1564 $pdf->SetXY($posxval, $posy);
1565 $lib_mode_reg = $outputlangs->transnoentities(
"PaymentType".
$object->mode_reglement_code) !=
'PaymentType'.$object->mode_reglement_code ? $outputlangs->transnoentities(
"PaymentType".
$object->mode_reglement_code) : $outputlangs->convToOutputCharset(
$object->mode_reglement);
1568 if (
$object->mode_reglement_code ==
"PRE") {
1569 require_once DOL_DOCUMENT_ROOT.
'/societe/class/companybankaccount.class.php';
1572 $bac->fetch(0,
'',
$object->thirdparty->id);
1573 $iban = $bac->iban.(($bac->iban && $bac->bic) ?
' / ' :
'').$bac->bic;
1574 $lib_mode_reg .=
' '.$outputlangs->trans(
"PaymentTypePREdetails",
dol_trunc($iban, 6,
'right',
'UTF-8', 1));
1577 $pdf->MultiCell($posxend - $posxval, 5, $lib_mode_reg, 0,
'L');
1579 $posy = $pdf->GetY();
1585 if ($this->emetteur->country_code ==
'FR') {
1587 $pdf->SetXY($this->marge_gauche, $posy);
1588 $pdf->writeHTMLCell(80, 5,
null,
null, $outputlangs->transnoentities(
"MentionVATDebitOptionIsOn"), 0, 1);
1590 $posy = $pdf->GetY() + 1;
1595 if (empty(
$object->mode_reglement_code) ||
$object->mode_reglement_code ==
'CB' ||
$object->mode_reglement_code ==
'VAD') {
1596 $useonlinepayment = 0;
1600 include_once DOL_DOCUMENT_ROOT.
'/core/lib/payments.lib.php';
1601 $validpaymentmethod = getValidOnlinePaymentMethods(
'');
1602 $useonlinepayment = count($validpaymentmethod);
1607 require_once DOL_DOCUMENT_ROOT.
'/core/lib/payments.lib.php';
1610 $langs->loadLangs(array(
'payment',
'stripe'));
1611 $servicename = $langs->transnoentities(
'Online');
1612 $paiement_url = getOnlinePaymentUrl(0,
'invoice',
$object->ref, 0,
'', 0);
1613 $linktopay = $langs->trans(
"ToOfferALinkForOnlinePayment", $servicename).
' <a href="'.$paiement_url.
'">'.$outputlangs->transnoentities(
"ClickHere").
'</a>';
1615 $pdf->SetXY($this->marge_gauche, $posy);
1616 $pdf->writeHTMLCell($posxend - $this->marge_gauche, 5,
null,
null,
dol_htmlentitiesbr($linktopay), 0, 1);
1618 $posy = $pdf->GetY() + 1;
1623 if (empty(
$object->mode_reglement_code) ||
$object->mode_reglement_code ==
'CHQ') {
1629 $account =
new Account($this->db);
1632 $pdf->SetXY($this->marge_gauche, $posy);
1633 $pdf->SetFont(
'',
'B', $default_font_size - $diffsizetitle);
1634 $pdf->MultiCell($posxend - $this->marge_gauche, 3, $outputlangs->transnoentities(
'PaymentByChequeOrderedTo', $account->owner_name), 0,
'L',
false);
1635 $posy = $pdf->GetY() + 1;
1638 $pdf->SetXY($this->marge_gauche, $posy);
1639 $pdf->SetFont(
'',
'', $default_font_size - $diffsizetitle);
1640 $pdf->MultiCell($posxend - $this->marge_gauche, 3, $outputlangs->convToOutputCharset($account->owner_address), 0,
'L',
false);
1641 $posy = $pdf->GetY() + 2;
1645 $pdf->SetXY($this->marge_gauche, $posy);
1646 $pdf->SetFont(
'',
'B', $default_font_size - $diffsizetitle);
1647 $pdf->MultiCell($posxend - $this->marge_gauche, 3, $outputlangs->transnoentities(
'PaymentByChequeOrderedTo', $this->emetteur->name), 0,
'L',
false);
1648 $posy = $pdf->GetY() + 1;
1651 $pdf->SetXY($this->marge_gauche, $posy);
1652 $pdf->SetFont(
'',
'', $default_font_size - $diffsizetitle);
1653 $pdf->MultiCell($posxend - $this->marge_gauche, 3, $outputlangs->convToOutputCharset($this->emetteur->getFullAddress()), 0,
'L',
false);
1654 $posy = $pdf->GetY() + 2;
1661 if (empty(
$object->mode_reglement_code) ||
$object->mode_reglement_code ==
'VIR') {
1667 $account =
new Account($this->db);
1668 $account->fetch($bankid);
1670 $curx = $this->marge_gauche;
1673 $posy =
pdf_bank($pdf, $outputlangs, $curx, $cury, $account, 0, $default_font_size);
1679 $qrPosX = $this->marge_gauche + 5;
1681 $qrCodeColor = array(
'25',
'25',
'25');
1685 'fgcolor' => $qrCodeColor,
1687 'module_width' => 1,
1688 'module_height' => 1
1691 $EPCQrCodeString =
$object->buildEPCQrCodeString();
1692 $pdf->write2DBarcode($EPCQrCodeString,
'QRCODE,M', $qrPosX, $qrPosY, 20, 20, $styleQr,
'N');
1694 $pdf->SetXY($qrPosX + 25, $qrPosY + 5);
1695 $pdf->SetFont(
'',
'', $default_font_size - 5);
1696 $pdf->MultiCell(30, 3, $outputlangs->transnoentitiesnoconv(
"INVOICE_ADD_EPC_QR_CODEPay"), 0,
'L',
false);
1697 $posy = $pdf->GetY() + 2;
1702 include_once DOL_DOCUMENT_ROOT.
'/core/lib/functions_be.lib.php';
1705 $pdf->MultiCell(100, 3, $outputlangs->transnoentities(
'StructuredCommunication').
": " . $outputlangs->convToOutputCharset($invoicePaymentKey), 0,
'L',
false);
1728 global
$mysoc, $hookmanager;
1739 if (is_object($outputlangsbis)) {
1740 $pdf->SetFont(
'',
'', $default_font_size - 2);
1742 $pdf->SetFont(
'',
'', $default_font_size - 1);
1748 if ($this->page_largeur < 210) {
1752 $largcol2 = ($this->page_largeur - $this->marge_droite - $col2x);
1758 $parameters = array(
1760 'outputlangs' => $outputlangs,
1762 $hookmanager->executeHooks(
'beforePercentCalculation', $parameters, $this);
1767 foreach (
$object->lines as $line) {
1768 if ($line->product_type != 9) {
1769 $percent += $line->situation_percent;
1775 $avancementGlobal = $percent / $i;
1777 $avancementGlobal = 0;
1780 $object->fetchPreviousNextSituationInvoice();
1781 $TPreviousIncoice =
$object->tab_previous_situation_invoice;
1784 $total_a_payer_ttc = 0;
1785 foreach ($TPreviousIncoice as &$fac) {
1786 $total_a_payer += $fac->total_ht;
1787 $total_a_payer_ttc += $fac->total_ttc;
1789 $total_a_payer +=
$object->total_ht;
1790 $total_a_payer_ttc +=
$object->total_ttc;
1792 if (!empty($avancementGlobal)) {
1793 $total_a_payer = $total_a_payer * 100 / $avancementGlobal;
1794 $total_a_payer_ttc = $total_a_payer_ttc * 100 / $avancementGlobal;
1797 $total_a_payer_ttc = 0;
1801 if (!empty($TPreviousIncoice)) {
1802 $pdf->setY($tab2_top);
1803 $posy = $pdf->GetY();
1805 foreach ($TPreviousIncoice as &$fac) {
1806 if ($posy > $this->page_hauteur - 4 - $this->heightforfooter) {
1811 $pdf->setY($this->tab_top_newpage);
1813 $pdf->setY($this->marge_haute);
1815 $posy = $pdf->GetY();
1820 $pdf->SetFillColor(255, 255, 255);
1821 $pdf->SetXY($col1x, $posy);
1822 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"PDFSituationTitle", (
string) $fac->situation_counter).
' '.$outputlangs->transnoentities(
"TotalHT"), 0,
'L',
true);
1824 $pdf->SetXY($col2x, $posy);
1828 $facSign = $fac->total_ht >= 0 ?
'+' :
'';
1831 $displayAmount =
' '.$facSign.
' '.
price($fac->total_ht, 0, $outputlangs);
1833 $pdf->MultiCell($largcol2, $tab2_hl, $displayAmount, 0,
'R',
true);
1842 $pdf->SetFillColor(255, 255, 255);
1843 $pdf->SetXY($col1x, $posy);
1844 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"PDFSituationTitle", (
string)
$object->situation_counter).
' '.$outputlangs->transnoentities(
"TotalHT"), 0,
'L',
true);
1846 $pdf->SetXY($col2x, $posy);
1849 $facSign =
$object->total_ht >= 0 ?
'+' :
'';
1857 $displayAmount =
' '.$facSign.
' '.
price(
$object->total_ht, 0, $outputlangs);
1858 $pdf->MultiCell($largcol2, $tab2_hl, $displayAmount, 0,
'R',
true);
1863 $pdf->SetFont(
'',
'', $default_font_size - 1);
1864 $pdf->SetFillColor(255, 255, 255);
1865 $pdf->SetXY($col1x, $posy);
1866 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"SituationTotalProgress", (
string) $avancementGlobal), 0,
'L',
true);
1868 $pdf->SetXY($col2x, $posy);
1869 $pdf->MultiCell($largcol2, $tab2_hl,
price($total_a_payer * $avancementGlobal / 100, 0, $outputlangs), 0,
'R',
true);
1870 $pdf->SetFont(
'',
'', $default_font_size - 2);
1874 if ($posy > $this->page_hauteur - 4 - $this->heightforfooter) {
1878 $pdf->setY($this->tab_top_newpage);
1880 $pdf->setY($this->marge_haute);
1883 $posy = $pdf->GetY();
1897 $total_discount_on_lines = 0;
1898 $multicurrency_total_discount_on_lines = 0;
1899 foreach (
$object->lines as $i => $line) {
1903 $total_discount_on_lines += (is_numeric($resdiscount) ? $resdiscount : 0);
1904 $multicurrency_total_discount_on_lines += (is_numeric($multicurrency_resdiscount) ? $multicurrency_resdiscount : 0);
1906 if ($line->total_ht < 0) {
1907 $total_discount_on_lines += -$line->total_ht;
1908 $multicurrency_total_discount_on_lines += -$line->multicurrency_total_ht;
1913 if ($total_discount_on_lines > 0 && !
$object->isSituationInvoice()) {
1916 $pdf->SetFillColor(255, 255, 255);
1917 $pdf->SetXY($col1x, $tab2_top);
1918 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"TotalHTBeforeDiscount").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"TotalHTBeforeDiscount") :
''), 0,
'L',
true);
1919 $pdf->SetXY($col2x, $tab2_top);
1921 $total_before_discount_to_show = ((
isModEnabled(
"multicurrency") &&
$object->multicurrency_tx != 1) ? (
$object->multicurrency_total_ht + $multicurrency_total_discount_on_lines) : (
$object->total_ht + $total_discount_on_lines));
1922 $pdf->MultiCell($largcol2, $tab2_hl,
price($total_before_discount_to_show, 0, $outputlangs), 0,
'R',
true);
1929 $pdf->SetFillColor(255, 255, 255);
1930 $pdf->SetXY($col1x, $tab2_top + $tab2_hl);
1931 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"TotalDiscount").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"TotalDiscount") :
''), 0,
'L',
true);
1932 $pdf->SetXY($col2x, $tab2_top + $tab2_hl);
1934 $total_discount_to_show = ((
isModEnabled(
"multicurrency") &&
$object->multicurrency_tx != 1) ? $multicurrency_total_discount_on_lines : $total_discount_on_lines);
1935 $pdf->MultiCell($largcol2, $tab2_hl,
price($total_discount_to_show, 0, $outputlangs), 0,
'R',
true);
1942 $pdf->SetFillColor(255, 255, 255);
1943 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
1944 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(!
getDolGlobalString(
'MAIN_GENERATE_DOCUMENTS_WITHOUT_VAT') ?
"TotalHT" :
"Total").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(!
getDolGlobalString(
'MAIN_GENERATE_DOCUMENTS_WITHOUT_VAT') ?
"TotalHT" :
"Total") :
''), 0,
'L',
true);
1947 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
1948 $pdf->MultiCell($largcol2, $tab2_hl,
price($sign * $total_ht, 0, $outputlangs), 0,
'R',
true);
1952 $pdf->SetFillColor(255, 255, 255);
1953 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
1954 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"TotalVAT"), 0,
'L',
true);
1956 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
1957 $pdf->MultiCell($largcol2, $tab2_hl,
price($sign *
$object->total_tva), 0,
'R',
true);
1961 $pdf->SetFillColor(248, 248, 248);
1964 $total_ttc_origin =
$object->total_ttc;
1966 $this->atleastoneratenotnull = 0;
1968 $tvaisnull = (!empty($this->tva) && count($this->tva) == 1 && isset($this->tva[
'0.000']) && is_float($this->tva[
'0.000']));
1969 if (
getDolGlobalString(
'MAIN_GENERATE_DOCUMENTS_WITHOUT_VAT_IFNULL') && $tvaisnull) {
1973 foreach ($this->localtax1 as $localtax_type => $localtax_rate) {
1974 if (in_array((
string) $localtax_type, array(
'1',
'3',
'5'))) {
1978 foreach ($localtax_rate as $tvakey => $tvaval) {
1979 if ($tvakey != 0 ||
getDolGlobalString(
'INVOICE_SHOW_ALSO_LOCALTAX1_LINE_IF_ZERO')) {
1983 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
1986 if (preg_match(
'/\*/', (
string) $tvakey)) {
1987 $tvakey = str_replace(
'*',
'', (
string) $tvakey);
1988 $tvacompl =
" (".$outputlangs->transnoentities(
"NonPercuRecuperable").
")";
1991 $totalvat = $outputlangs->transcountrynoentities(
"TotalLT1",
$mysoc->country_code).(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transcountrynoentities(
"TotalLT1",
$mysoc->country_code) :
'');
1995 $totalvat .= $tvacompl;
1997 $totalvat .=
vatrate((
string) abs((
float) $tvakey),
true).$tvacompl;
2000 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $totalvat, 0,
'L',
true);
2004 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2005 $pdf->MultiCell($largcol2, $tab2_hl,
price($total_localtax, 0, $outputlangs), 0,
'R',
true);
2011 foreach ($this->localtax2 as $localtax_type => $localtax_rate) {
2012 if (in_array((
string) $localtax_type, array(
'1',
'3',
'5'))) {
2016 foreach ($localtax_rate as $tvakey => $tvaval) {
2017 if ($tvakey != 0 ||
getDolGlobalString(
'INVOICE_SHOW_ALSO_LOCALTAX2_LINE_IF_ZERO')) {
2021 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2024 if (preg_match(
'/\*/', (
string) $tvakey)) {
2025 $tvakey = str_replace(
'*',
'', (
string) $tvakey);
2026 $tvacompl =
" (".$outputlangs->transnoentities(
"NonPercuRecuperable").
")";
2028 $totalvat = $outputlangs->transcountrynoentities(
"TotalLT2",
$mysoc->country_code).(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transcountrynoentities(
"TotalLT2",
$mysoc->country_code) :
'');
2032 $totalvat .= $tvacompl;
2034 $totalvat .=
vatrate((
string) abs((
float) $tvakey),
true).$tvacompl;
2037 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $totalvat, 0,
'L',
true);
2041 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2042 $pdf->MultiCell($largcol2, $tab2_hl,
price($total_localtax, 0, $outputlangs), 0,
'R',
true);
2050 foreach ($this->tva as $tvakey => $tvaval) {
2051 $sum_pdf_tva += $tvaval;
2054 if ($sum_pdf_tva !=
$object->total_tva) {
2055 if (!empty($sum_pdf_tva)) {
2056 $coef_fix_tva =
$object->total_tva / $sum_pdf_tva;
2062 foreach ($this->tva as $tvakey => $tvaval) {
2063 $this->tva[$tvakey] = $tvaval * $coef_fix_tva;
2065 foreach ($this->tva_array as $tvakey => $tvaval) {
2066 $this->tva_array[$tvakey][
'amount'] = $tvaval[
'amount'] * $coef_fix_tva;
2073 foreach ($this->tva_array as $tvakey => $tvaval) {
2075 $this->atleastoneratenotnull++;
2078 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2081 if (preg_match(
'/\*/', $tvakey)) {
2082 $tvakey = str_replace(
'*',
'', $tvakey);
2083 $tvacompl =
" (".$outputlangs->transnoentities(
"NonPercuRecuperable").
")";
2085 $totalvat = $outputlangs->transcountrynoentities(
"TotalVAT",
$mysoc->country_code).(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transcountrynoentities(
"TotalVAT",
$mysoc->country_code) :
'');
2088 $totalvat .=
vatrate((
string) $tvaval[
'vatrate'],
true).$tvacompl;
2090 $totalvat .= $tvaval[
'vatcode'].$tvacompl;
2092 $totalvat .= $tvacompl;
2094 $totalvat .=
vatrate((
string) $tvaval[
'vatrate'],
true).($tvaval[
'vatcode'] ?
' ('.$tvaval[
'vatcode'].
')' :
'').$tvacompl;
2096 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $totalvat, 0,
'L',
true);
2098 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2100 $pdf->MultiCell($largcol2, $tab2_hl,
price(
price2num($tvaval[
'amount'],
'MT'), 0, $outputlangs), 0,
'R',
true);
2106 foreach ($this->localtax1 as $localtax_type => $localtax_rate) {
2107 if (in_array((
string) $localtax_type, array(
'2',
'4',
'6'))) {
2111 foreach ($localtax_rate as $tvakey => $tvaval) {
2112 if ($tvakey != 0 ||
getDolGlobalString(
'INVOICE_SHOW_ALSO_LOCALTAX1_LINE_IF_ZERO')) {
2116 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2119 if (preg_match(
'/\*/', (
string) $tvakey)) {
2120 $tvakey = str_replace(
'*',
'', (
string) $tvakey);
2121 $tvacompl =
" (".$outputlangs->transnoentities(
"NonPercuRecuperable").
")";
2123 $totalvat = $outputlangs->transcountrynoentities(
"TotalLT1",
$mysoc->country_code).(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transcountrynoentities(
"TotalLT1",
$mysoc->country_code) :
'');
2127 $totalvat .= $tvacompl;
2129 $totalvat .=
vatrate((
string) abs((
float) $tvakey),
true).$tvacompl;
2132 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $totalvat, 0,
'L',
true);
2136 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2137 $pdf->MultiCell($largcol2, $tab2_hl,
price($total_localtax, 0, $outputlangs), 0,
'R',
true);
2143 foreach ($this->localtax2 as $localtax_type => $localtax_rate) {
2144 if (in_array((
string) $localtax_type, array(
'2',
'4',
'6'))) {
2148 foreach ($localtax_rate as $tvakey => $tvaval) {
2150 if ($tvakey != 0 ||
getDolGlobalString(
'INVOICE_SHOW_ALSO_LOCALTAX2_LINE_IF_ZERO')) {
2154 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2157 if (preg_match(
'/\*/', (
string) $tvakey)) {
2158 $tvakey = str_replace(
'*',
'', (
string) $tvakey);
2159 $tvacompl =
" (".$outputlangs->transnoentities(
"NonPercuRecuperable").
")";
2161 $totalvat = $outputlangs->transcountrynoentities(
"TotalLT2",
$mysoc->country_code).(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transcountrynoentities(
"TotalLT2",
$mysoc->country_code) :
'');
2165 $totalvat .= $tvacompl;
2167 $totalvat .=
vatrate((
string) abs((
float) $tvakey),
true).$tvacompl;
2170 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $totalvat, 0,
'L',
true);
2174 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2175 $pdf->MultiCell($largcol2, $tab2_hl,
price($total_localtax, 0, $outputlangs), 0,
'R',
true);
2183 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2184 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"RevenueStamp").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"RevenueStamp",
$mysoc->country_code) :
''), $useborder,
'L',
true);
2186 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2187 $pdf->MultiCell($largcol2, $tab2_hl,
price($sign *
$object->revenuestamp), $useborder,
'R',
true);
2192 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2193 $pdf->SetTextColor(0, 0, 60);
2194 $pdf->SetFillColor(224, 224, 224);
2195 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"TotalTTC").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"TotalTTC") :
''), $useborder,
'L',
true);
2197 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2199 $pdf->MultiCell($largcol2, $tab2_hl,
price($sign * $total_ttc, 0, $outputlangs), $useborder,
'R',
true);
2201 $pdf->MultiCell($largcol2, $tab2_hl,
price($sign * $total_ttc, 0, $outputlangs), $useborder,
'R',
true);
2205 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2206 $pdf->SetTextColor(0, 0, 60);
2207 $pdf->SetFillColor(224, 224, 224);
2208 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"TotalTTC").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"TotalTTC") :
'').
' ('.$outputlangs->getCurrencySymbol(
$mysoc->currency_code).
')', $useborder,
'L',
true);
2210 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2211 $pdf->MultiCell($largcol2, $tab2_hl,
price($sign * $total_ttc_origin, 0, $outputlangs, 1, -1, -1,
$mysoc->currency_code), $useborder,
'L',
true);
2215 if (
$object->displayRetainedWarranty()) {
2216 $pdf->SetTextColor(40, 40, 40);
2217 $pdf->SetFillColor(255, 255, 255);
2219 $retainedWarranty =
$object->getRetainedWarrantyAmount();
2220 $billedWithRetainedWarranty =
$object->total_ttc - $retainedWarranty;
2224 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2225 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"ToPayOn",
dol_print_date(
$object->date_lim_reglement,
'day')), $useborder,
'L',
true);
2227 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2228 $pdf->MultiCell($largcol2, $tab2_hl,
price($billedWithRetainedWarranty), $useborder,
'R',
true);
2232 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2234 $retainedWarrantyToPayOn = $outputlangs->transnoentities(
"RetainedWarranty").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"RetainedWarranty") :
'').
' ('.
$object->retained_warranty.
'%)';
2235 $retainedWarrantyToPayOn .= !empty(
$object->retained_warranty_date_limit) ?
' '.$outputlangs->transnoentities(
"toPayOn",
dol_print_date(
$object->retained_warranty_date_limit,
'day')) :
'';
2237 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $retainedWarrantyToPayOn, $useborder,
'L',
true);
2238 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2239 $pdf->MultiCell($largcol2, $tab2_hl,
price($retainedWarranty), $useborder,
'R',
true);
2244 $pdf->SetTextColor(0, 0, 0);
2246 $creditnoteamount =
$object->getSumCreditNotesUsed((
isModEnabled(
"multicurrency") &&
$object->multicurrency_tx != 1) ? 1 : 0);
2249 $resteapayer =
price2num($total_ttc - $deja_regle - $creditnoteamount - $depositsamount,
'MT');
2252 $deja_regle_origin = 0;
2253 $creditnoteamount_origin = 0;
2254 $depositsamount_origin = 0;
2255 $resteapayer_origin = 0;
2257 $deja_regle_origin =
$object->getSommePaiement(0);
2258 $creditnoteamount_origin =
$object->getSumCreditNotesUsed(0);
2259 $depositsamount_origin =
$object->getSumDepositsUsed(0);
2260 $resteapayer_origin =
price2num($total_ttc_origin - $deja_regle_origin - $creditnoteamount_origin - $depositsamount_origin,
'MT');
2264 $resteapayer_origin = 0;
2267 if (($deja_regle > 0 || $creditnoteamount > 0 || $depositsamount > 0) && !
getDolGlobalString(
'INVOICE_NO_PAYMENT_DETAILS')) {
2270 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2271 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"Paid").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"Paid") :
''), 0,
'L',
false);
2272 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2274 $pdf->MultiCell($largcol2, $tab2_hl,
price($deja_regle + $depositsamount, 0, $outputlangs), 0,
'R',
false);
2287 if ($creditnoteamount) {
2288 $labeltouse = ($outputlangs->transnoentities(
"CreditNotesOrExcessReceived") !=
"CreditNotesOrExcessReceived") ? $outputlangs->transnoentities(
"CreditNotesOrExcessReceived") : $outputlangs->transnoentities(
"CreditNotes");
2289 $labeltouse .= (is_object($outputlangsbis) ? (
' / '.(($outputlangsbis->transnoentities(
"CreditNotesOrExcessReceived") !=
"CreditNotesOrExcessReceived") ? $outputlangsbis->transnoentities(
"CreditNotesOrExcessReceived") : $outputlangsbis->transnoentities(
"CreditNotes"))) :
'');
2291 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2292 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $labeltouse, 0,
'L',
false);
2293 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2294 $pdf->MultiCell($largcol2, $tab2_hl,
price($creditnoteamount, 0, $outputlangs), 0,
'R',
false);
2297 if (
$object->close_code == Facture::CLOSECODE_DISCOUNTVAT) {
2299 $pdf->SetFillColor(255, 255, 255);
2301 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2302 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"EscompteOfferedShort").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"EscompteOfferedShort") :
''), $useborder,
'L',
true);
2303 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2304 $pdf->MultiCell($largcol2, $tab2_hl,
price(
price2num(
$object->total_ttc - $deja_regle - $creditnoteamount - $depositsamount,
'MT'), 0, $outputlangs), $useborder,
'R',
true);
2307 $resteapayer_origin = 0;
2311 $pdf->SetTextColor(0, 0, 60);
2312 $pdf->SetFillColor(224, 224, 224);
2313 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2314 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"RemainderToPay").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"RemainderToPay") :
''), $useborder,
'L',
true);
2315 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2317 $pdf->MultiCell($largcol2, $tab2_hl,
price($resteapayer, 0, $outputlangs), $useborder,
'R',
true);
2319 $pdf->MultiCell($largcol2, $tab2_hl,
price($resteapayer, 0, $outputlangs), $useborder,
'R',
true);
2323 $pdf->SetXY($col1x, $tab2_top + $tab2_hl * $index);
2324 $pdf->SetTextColor(0, 0, 60);
2325 $pdf->SetFillColor(224, 224, 224);
2326 $pdf->MultiCell($col2x - $col1x, $tab2_hl, $outputlangs->transnoentities(
"RemainderToPay").(is_object($outputlangsbis) ?
' / '.$outputlangsbis->transnoentities(
"RemainderToPay") :
'').
' ('.$outputlangs->getCurrencySymbol(
$mysoc->currency_code).
')', $useborder,
'L',
true);
2328 $pdf->SetXY($col2x, $tab2_top + $tab2_hl * $index);
2329 $pdf->MultiCell($largcol2, $tab2_hl,
price($resteapayer_origin, 0, $outputlangs, 1, -1, -1,
$mysoc->currency_code), $useborder,
'L',
true);
2332 $pdf->SetFont(
'',
'', $default_font_size - 1);
2333 $pdf->SetTextColor(0, 0, 0);
2336 $parameters = array(
'pdf' => &$pdf,
'object' => &
$object,
'outputlangs' => $outputlangs,
'index' => &$index,
'posy' => $posy);
2338 $reshook = $hookmanager->executeHooks(
'afterPDFTotalTable', $parameters, $this);
2340 $this->error = $hookmanager->error;
2341 $this->errors = $hookmanager->errors;
2345 return ($tab2_top + ($tab2_hl * $index));
2455 protected function _pagehead(&$pdf,
$object, $showaddress, $outputlangs, $outputlangsbis =
null)
2458 global $conf, $langs;
2460 $ltrdirection =
'L';
2461 if ($outputlangs->trans(
"DIRECTION") ==
'rtl') {
2462 $ltrdirection =
'R';
2466 $outputlangs->loadLangs(array(
"main",
"bills",
"propal",
"companies"));
2472 $pdf->SetTextColor(0, 0, 60);
2473 $pdf->SetFont(
'',
'B', $default_font_size + 3);
2477 $posy = $this->marge_haute;
2478 $posx = $this->page_largeur - $this->marge_droite - $w;
2480 $pdf->SetXY($this->marge_gauche, $posy);
2484 if ($this->emetteur->logo) {
2485 $logodir = $conf->mycompany->dir_output;
2486 if (!empty($conf->mycompany->multidir_output[
$object->entity ?? $conf->entity])) {
2487 $logodir = $conf->mycompany->multidir_output[
$object->entity ?? $conf->entity];
2490 $logo = $logodir.
'/logos/thumbs/'.$this->emetteur->logo_small;
2492 $logo = $logodir.
'/logos/'.$this->emetteur->logo;
2494 if (is_readable($logo)) {
2496 $pdf->Image($logo, $this->marge_gauche, $posy, 0, $height);
2498 $pdf->SetTextColor(200, 0, 0);
2499 $pdf->SetFont(
'',
'B', $default_font_size - 2);
2500 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"ErrorLogoFileNotFound", $logo), 0,
'L');
2501 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"ErrorGoToGlobalSetup"), 0,
'L');
2504 $text = $this->emetteur->name;
2505 $pdf->MultiCell($w, 4, $outputlangs->convToOutputCharset($text), 0, $ltrdirection);
2509 $pdf->SetFont(
'',
'B', $default_font_size + 3);
2510 $pdf->SetXY($posx, $posy);
2511 $pdf->SetTextColor(0, 0, 60);
2513 $title = $outputlangs->transnoentities(
"PdfInvoiceTitle");
2515 $title = $outputlangs->transnoentities(
"InvoiceReplacement");
2518 $title = $outputlangs->transnoentities(
"InvoiceAvoir");
2521 $title = $outputlangs->transnoentities(
"InvoiceDeposit");
2524 $title = $outputlangs->transnoentities(
"InvoiceProForma");
2526 if ($this->situationinvoice) {
2527 $outputlangs->loadLangs(array(
"other"));
2528 $title = $outputlangs->transnoentities(
"PDFInvoiceSituation") .
" " . $outputlangs->transnoentities(
"NumberingShort") .
$object->situation_counter .
" -";
2529 $subtitle = $outputlangs->transnoentities(
"PDFSituationTitle", (
string)
$object->situation_counter);
2531 if (
getDolGlobalString(
'PDF_USE_ALSO_LANGUAGE_CODE') && is_object($outputlangsbis)) {
2534 if ($this->situationinvoice) {
2535 $title .= $outputlangsbis->transnoentities(
"PDFInvoiceSituation");
2537 $title .= $outputlangsbis->transnoentities(
"PdfInvoiceTitle");
2538 } elseif (
$object->type == 1) {
2539 $title .= $outputlangsbis->transnoentities(
"InvoiceReplacement");
2540 } elseif (
$object->type == 2) {
2541 $title .= $outputlangsbis->transnoentities(
"InvoiceAvoir");
2542 } elseif (
$object->type == 3) {
2543 $title .= $outputlangsbis->transnoentities(
"InvoiceDeposit");
2544 } elseif (
$object->type == 4) {
2545 $title .= $outputlangsbis->transnoentities(
"InvoiceProForma");
2548 $title .=
' '.$outputlangs->convToOutputCharset(
$object->ref);
2549 if (
$object->status == $object::STATUS_DRAFT) {
2550 $pdf->SetTextColor(128, 0, 0);
2551 $title .=
' - '.$outputlangs->transnoentities(
"NotValidated");
2554 $pdf->MultiCell($w, 3, $title,
'',
'R');
2555 if (!empty($subtitle)) {
2556 $pdf->SetFont(
'',
'B', $default_font_size);
2557 $pdf->SetXY($posx, $posy + 5);
2558 $pdf->MultiCell($w, 6, $subtitle,
'',
'R');
2562 $pdf->SetFont(
'',
'', $default_font_size - 2);
2579 $pdf->SetFont(
'',
'', $default_font_size - 2);
2583 $pdf->SetXY($posx, $posy);
2584 $pdf->SetTextColor(0, 0, 60);
2585 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"RefCustomer").
" : ".
dol_trunc($outputlangs->convToOutputCharset(
$object->ref_customer), 65),
'',
'R');
2590 if (!empty(
$object->project->ref)) {
2592 $pdf->SetXY($posx, $posy);
2593 $pdf->SetTextColor(0, 0, 60);
2594 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"Project").
" : ".(empty(
$object->project->title) ?
'' :
$object->project->title),
'',
'R');
2600 if (!empty(
$object->project->ref)) {
2601 $outputlangs->load(
"projects");
2603 $pdf->SetXY($posx, $posy);
2604 $pdf->SetTextColor(0, 0, 60);
2605 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"RefProject").
" : ".(empty(
$object->project->ref) ?
'' :
$object->project->ref),
'',
'R');
2609 $objectidnext =
$object->getIdReplacingInvoice(
'validated');
2610 if (
$object->type == 0 && $objectidnext) {
2611 $objectreplacing =
new Facture($this->db);
2612 $objectreplacing->fetch($objectidnext);
2615 $pdf->SetXY($posx, $posy);
2616 $pdf->SetTextColor(0, 0, 60);
2617 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"ReplacementByInvoice").
' : '.$outputlangs->convToOutputCharset($objectreplacing->ref),
'',
'R');
2620 $objectreplaced =
new Facture($this->db);
2621 $objectreplaced->fetch(
$object->fk_facture_source);
2624 $pdf->SetXY($posx, $posy);
2625 $pdf->SetTextColor(0, 0, 60);
2626 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"ReplacementInvoice").
' : '.$outputlangs->convToOutputCharset($objectreplaced->ref),
'',
'R');
2629 $objectreplaced =
new Facture($this->db);
2630 $objectreplaced->fetch(
$object->fk_facture_source);
2633 $pdf->SetXY($posx, $posy);
2634 $pdf->SetTextColor(0, 0, 60);
2635 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"CorrectionInvoice").
' : '.$outputlangs->convToOutputCharset($objectreplaced->ref),
'',
'R');
2639 $pdf->SetXY($posx, $posy);
2640 $pdf->SetTextColor(0, 0, 60);
2642 $title = $outputlangs->transnoentities(
"DateInvoice");
2643 if (
getDolGlobalString(
'PDF_USE_ALSO_LANGUAGE_CODE') && is_object($outputlangsbis)) {
2644 $title .=
' - '.$outputlangsbis->transnoentities(
"DateInvoice");
2646 $pdf->MultiCell($w, 3, $title.
" : ".
dol_print_date(
$object->date,
"day",
false, $outputlangs,
true),
'',
'R');
2650 $pdf->SetXY($posx, $posy);
2651 $pdf->SetTextColor(0, 0, 60);
2652 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"DatePointOfTax").
" : ".
dol_print_date(
$object->date_pointoftax,
"day",
false, $outputlangs),
'',
'R');
2657 $pdf->SetXY($posx, $posy);
2658 $pdf->SetTextColor(0, 0, 60);
2659 $title = $outputlangs->transnoentities(
"DateDue");
2660 if (
getDolGlobalString(
'PDF_USE_ALSO_LANGUAGE_CODE') && is_object($outputlangsbis)) {
2661 $title .=
' - '.$outputlangsbis->transnoentities(
"DateDue");
2663 $pdf->MultiCell($w, 3, $title.
" : ".
dol_print_date(
$object->date_lim_reglement,
"day",
false, $outputlangs,
true),
'',
'R');
2668 $pdf->SetXY($posx, $posy);
2669 $pdf->SetTextColor(0, 0, 60);
2670 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"CustomerCode").
" : ".$outputlangs->transnoentities(
$object->thirdparty->code_client),
'',
'R');
2675 $pdf->SetXY($posx, $posy);
2676 $pdf->SetTextColor(0, 0, 60);
2677 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"CustomerAccountancyCode").
" : ".$outputlangs->transnoentities(
$object->thirdparty->code_compta_client),
'',
'R');
2682 $arrayidcontact =
$object->getIdContact(
'internal',
'SALESREPFOLL');
2683 if (count($arrayidcontact) > 0) {
2684 $usertmp =
new User($this->db);
2685 $usertmp->fetch($arrayidcontact[0]);
2687 $pdf->SetXY($posx, $posy);
2688 $pdf->SetTextColor(0, 0, 60);
2689 $pdf->MultiCell($w, 3, $outputlangs->transnoentities(
"SalesRepresentative").
" : ".$usertmp->getFullName($langs),
'',
'R');
2699 $current_y = $pdf->getY();
2701 if ($current_y < $pdf->getY()) {
2702 $top_shift = $pdf->getY() - $current_y;
2708 $carac_emetteur =
'';
2710 $arrayidcontact =
$object->getIdContact(
'internal',
'BILLING');
2711 if (count($arrayidcontact) > 0) {
2712 $object->fetch_user($arrayidcontact[0]);
2713 $labelbeforecontactname = ($outputlangs->transnoentities(
"FromContactName") !=
'FromContactName' ? $outputlangs->transnoentities(
"FromContactName") : $outputlangs->transnoentities(
"Name"));
2714 $carac_emetteur .= ($carac_emetteur ?
"\n" :
'').$labelbeforecontactname.
" ".$outputlangs->convToOutputCharset(
$object->user->getFullName($outputlangs));
2715 $carac_emetteur .=
"\n";
2722 $posy += $top_shift;
2723 $posx = $this->marge_gauche;
2725 $posx = $this->page_largeur - $this->marge_droite - 80;
2733 $pdf->SetTextColor(0, 0, 0);
2734 $pdf->SetFont(
'',
'', $default_font_size - 2);
2735 $pdf->SetXY($posx, $posy - 5);
2736 $pdf->MultiCell($widthrecbox, 5, $outputlangs->transnoentities(
"BillFrom"), 0, $ltrdirection);
2737 $pdf->SetXY($posx, $posy);
2738 $pdf->SetFillColor(230, 230, 230);
2739 $pdf->RoundedRect($posx, $posy, $widthrecbox, $hautcadre, $this->corner_radius,
'1234',
'F');
2740 $pdf->SetTextColor(0, 0, 60);
2745 $pdf->SetXY($posx + 2, $posy + 3);
2746 $pdf->SetFont(
'',
'B', $default_font_size);
2747 $pdf->MultiCell($widthrecbox - 2, 4, $outputlangs->convToOutputCharset($this->emetteur->name), 0, $ltrdirection);
2748 $posy = $pdf->getY();
2752 $pdf->SetXY($posx + 2, $posy);
2753 $pdf->SetFont(
'',
'', $default_font_size - 1);
2754 $pdf->MultiCell($widthrecbox - 2, 4, $carac_emetteur, 0, $ltrdirection);
2757 $usecontact =
false;
2758 $arrayidcontact =
$object->getIdContact(
'external',
'BILLING');
2759 if (count($arrayidcontact) > 0) {
2761 $result =
$object->fetch_contact($arrayidcontact[0]);
2765 if ($usecontact && (
$object->contact->socid !=
$object->thirdparty->id && (!isset($conf->global->MAIN_USE_COMPANY_NAME_OF_CONTACT) ||
getDolGlobalString(
'MAIN_USE_COMPANY_NAME_OF_CONTACT')))) {
2766 $thirdparty =
$object->contact;
2768 $thirdparty =
$object->thirdparty;
2778 if ($this->page_largeur < 210) {
2782 $posy += $top_shift;
2783 $posx = $this->page_largeur - $this->marge_droite - $widthrecbox;
2785 $posx = $this->marge_gauche;
2790 $pdf->SetTextColor(0, 0, 0);
2791 $pdf->SetFont(
'',
'', $default_font_size - 2);
2792 $pdf->SetXY($posx + 2, $posy - 5);
2793 $pdf->MultiCell($widthrecbox - 2, 5, $outputlangs->transnoentities(
"BillTo"), 0, $ltrdirection);
2794 $pdf->RoundedRect($posx, $posy, $widthrecbox, $hautcadre, $this->corner_radius,
'1234',
'D');
2798 $pdf->SetXY($posx + 2, $posy + 3);
2799 $pdf->SetFont(
'',
'B', $default_font_size);
2801 $pdf->MultiCell($widthrecbox - 2, 2, $carac_client_name, 0, $ltrdirection);
2803 $posy = $pdf->getY();
2806 $pdf->SetFont(
'',
'', $default_font_size - 1);
2807 $pdf->SetXY($posx + 2, $posy);
2809 $pdf->MultiCell($widthrecbox - 2, 4, $carac_client, 0, $ltrdirection);
2813 $idaddressshipping =
$object->getIdContact(
'external',
'SHIPPING');
2815 if (!empty($idaddressshipping)) {
2816 $object->fetch_contact($idaddressshipping[0]);
2817 $companystatic =
new Societe($this->db);
2818 $companystatic->fetch(
$object->contact->fk_soc);
2825 if (!empty($carac_client_shipping)) {
2826 $posy += $hautcadre;
2831 $pdf->SetXY($posx + 2, $posy - 5);
2832 $pdf->SetFont(
'',
'', $default_font_size - 2);
2833 $pdf->MultiCell($widthrecbox, 0, $outputlangs->transnoentities(
'ShippingTo'), 0,
'L',
false);
2834 $pdf->RoundedRect($posx, $posy, $widthrecbox, $hautcadre, $this->corner_radius,
'1234',
'D');
2837 $pdf->SetXY($posx + 2, $posy + 3);
2838 $pdf->SetFont(
'',
'B', $default_font_size);
2839 $pdf->MultiCell($widthrecbox - 2, 2, $carac_client_name_shipping,
'',
'L');
2841 $posy = $pdf->getY();
2844 $pdf->SetXY($posx + 2, $posy);
2845 $pdf->SetFont(
'',
'', $default_font_size - 1);
2846 $pdf->MultiCell($widthrecbox - 2, 2, $carac_client_shipping,
'',
'L');
2848 $shipp_shift += $hautcadre + 10;
2853 $pdf->SetTextColor(0, 0, 0);
2855 $pagehead = array(
'top_shift' => $top_shift,
'shipp_shift' => $shipp_shift);