commondocgenerator.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2003-2005  Rodolphe Quiedeville    <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2010  Laurent Destailleur     <eldy@users.sourceforge.net>
 * Copyright (C) 2004   Eric Seigne             <eric.seigne@ryxeo.com>
 * Copyright (C) 2005-2012  Regis Houssin           <regis.houssin@inodbox.com>
 * Copyright (C) 2015       Marcos García           <marcosgdf@gmail.com>
 * Copyright (C) 2016       Charlie Benke           <charlie@patas-monkey.com>
 * Copyright (C) 2018-2023  Frédéric France         <frederic.france@netlogic.fr>
 * Copyright (C) 2020       Josep Lluís Amador      <joseplluis@lliuretic.cat>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 * or see https://www.gnu.org/
 */
 
abstract class CommonDocGenerator
{
  public $name = '';
 
  public $error = '';
 
  public $errors = array();
 
  protected $db;
 
  public $extrafieldsCache;
 
  public $update_main_doc_field;
 
  public $scandir;
 
  public $description;
 
  public $format;
 
  public $type;
 
  public $page_hauteur;
  public $page_largeur;
  public $marge_gauche;
  public $marge_droite;
  public $marge_haute;
  public $marge_basse;
 
  public $option_logo;
  public $option_tva;
  public $option_multilang;
  public $option_freetext;
  public $option_draft_watermark;
  public $watermark;
 
  public $option_modereg;
  public $option_condreg;
  public $option_escompte;
  public $option_credit_note;
 
  public $emetteur;
 
  public $phpmin = array(7, 1);
 
  public $cols;
 
 
  public function __construct($db)
  {
    $this->db = $db;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_user($user, $outputlangs)
  {
    // phpcs:enable
    global $conf, $extrafields;
 
    $logotouse = $conf->user->dir_output.'/'.get_exdir($user->id, 2, 0, 1, $user, 'user').'/'.$user->photo;
 
    $array_user = array(
      'myuser_lastname'=>$user->lastname,
      'myuser_firstname'=>$user->firstname,
      'myuser_fullname'=>$user->getFullName($outputlangs, 1),
      'myuser_login'=>$user->login,
      'myuser_phone'=>$user->office_phone,
      'myuser_address'=>$user->address,
      'myuser_zip'=>$user->zip,
      'myuser_town'=>$user->town,
      'myuser_country'=>$user->country,
      'myuser_country_code'=>$user->country_code,
      'myuser_state'=>$user->state,
      'myuser_state_code'=>$user->state_code,
      'myuser_fax'=>$user->office_fax,
      'myuser_mobile'=>$user->user_mobile,
      'myuser_email'=>$user->email,
      'myuser_logo'=>$logotouse,
      'myuser_job'=>$user->job,
      'myuser_web'=>'', // url not exist in $user object
      'myuser_birth'=>dol_print_date($user->birth, 'day', 'gmt'),
      'myuser_dateemployment'=>dol_print_date($user->dateemployment, 'day', 'tzuser'),
      'myuser_dateemploymentend'=>dol_print_date($user->dateemploymentend, 'day', 'tzuser'),
      'myuser_gender'=>$user->gender,
    );
    // Retrieve extrafields
    if (is_array($user->array_options) && count($user->array_options)) {
      $array_user = $this->fill_substitutionarray_with_extrafields($user, $array_user, $extrafields, 'myuser', $outputlangs);
    }
    return $array_user;
  }
 
 
  public function getSubstitutionarrayMember($member, $outputlangs)
  {
    global $conf, $extrafields;
 
    if ($member->photo) {
      $logotouse = $conf->adherent->dir_output.'/'.get_exdir(0, 0, 0, 1, $member, 'user').'/photos/'.$member->photo;
    } else {
      $logotouse = DOL_DOCUMENT_ROOT.'/public/theme/common/nophoto.png';
    }
 
    $array_member = array(
      'mymember_lastname' => $member->lastname,
      'mymember_firstname' => $member->firstname,
      'mymember_fullname' => $member->getFullName($outputlangs, 1),
      'mymember_login' => $member->login,
      'mymember_address' => $member->address,
      'mymember_zip' => $member->zip,
      'mymember_town' => $member->town,
      'mymember_country_code' => $member->country_code,
      'mymember_country' => $member->country,
      'mymember_state_code' => $member->state_code,
      'mymember_state' => $member->state,
      'mymember_phone_perso' => $member->phone_perso,
      'mymember_phone_pro' => $member->phone,
      'mymember_phone_mobile' => $member->phone_mobile,
      'mymember_email' => $member->email,
      'mymember_logo' => $logotouse,
      'mymember_gender' => $member->gender,
      'mymember_birth_locale' => dol_print_date($member->birth, 'day', 'tzuser', $outputlangs),
      'mymember_birth' => dol_print_date($member->birth, 'day', 'tzuser'),
    );
    // Retrieve extrafields
    if (is_array($member->array_options) && count($member->array_options)) {
      $array_member = $this->fill_substitutionarray_with_extrafields($member, $array_member, $extrafields, 'mymember', $outputlangs);
    }
    return $array_member;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_mysoc($mysoc, $outputlangs)
  {
    // phpcs:enable
    global $conf;
 
    if (empty($mysoc->forme_juridique) && !empty($mysoc->forme_juridique_code)) {
      $mysoc->forme_juridique = getFormeJuridiqueLabel($mysoc->forme_juridique_code);
    }
    if (empty($mysoc->country) && !empty($mysoc->country_code)) {
      $mysoc->country = $outputlangs->transnoentitiesnoconv("Country".$mysoc->country_code);
    }
    if (empty($mysoc->state) && !empty($mysoc->state_code)) {
      $mysoc->state = getState($mysoc->state_code, 0);
    }
 
    $logotouse = $conf->mycompany->dir_output.'/logos/thumbs/'.$mysoc->logo_small;
 
    return array(
      'mycompany_logo'=>$logotouse,
      'mycompany_name'=>$mysoc->name,
      'mycompany_email'=>$mysoc->email,
      'mycompany_phone'=>$mysoc->phone,
      'mycompany_fax'=>$mysoc->fax,
      'mycompany_address'=>$mysoc->address,
      'mycompany_zip'=>$mysoc->zip,
      'mycompany_town'=>$mysoc->town,
      'mycompany_country'=>$mysoc->country,
      'mycompany_country_code'=>$mysoc->country_code,
      'mycompany_state'=>$mysoc->state,
      'mycompany_state_code'=>$mysoc->state_code,
      'mycompany_web'=>$mysoc->url,
      'mycompany_juridicalstatus'=>$mysoc->forme_juridique,
      'mycompany_managers'=>$mysoc->managers,
      'mycompany_capital'=>$mysoc->capital,
      'mycompany_barcode'=>$mysoc->barcode,
      'mycompany_idprof1'=>$mysoc->idprof1,
      'mycompany_idprof2'=>$mysoc->idprof2,
      'mycompany_idprof3'=>$mysoc->idprof3,
      'mycompany_idprof4'=>$mysoc->idprof4,
      'mycompany_idprof5'=>$mysoc->idprof5,
      'mycompany_idprof6'=>$mysoc->idprof6,
      'mycompany_vatnumber'=>$mysoc->tva_intra,
      'mycompany_socialobject'=>$mysoc->socialobject,
      'mycompany_note_private'=>$mysoc->note_private,
      //'mycompany_note_public'=>$mysoc->note_public,        // Only private not exists for "mysoc" but both for thirdparties
    );
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_thirdparty($object, $outputlangs, $array_key = 'company')
  {
    // phpcs:enable
    global $conf, $extrafields;
 
    if (empty($object->country) && !empty($object->country_code)) {
      $object->country = $outputlangs->transnoentitiesnoconv("Country".$object->country_code);
    }
    if (empty($object->state) && !empty($object->state_code)) {
      $object->state = getState($object->state_code, 0);
    }
 
    $array_thirdparty = array(
      'company_name'=>$object->name,
      'company_name_alias' => $object->name_alias,
      'company_email'=>$object->email,
      'company_phone'=>$object->phone,
      'company_fax'=>$object->fax,
      'company_address'=>$object->address,
      'company_zip'=>$object->zip,
      'company_town'=>$object->town,
      'company_country'=>$object->country,
      'company_country_code'=>$object->country_code,
      'company_state'=>$object->state,
      'company_state_code'=>$object->state_code,
      'company_web'=>$object->url,
      'company_barcode'=>$object->barcode,
      'company_vatnumber'=>$object->tva_intra,
      'company_customercode'=>$object->code_client,
      'company_suppliercode'=>$object->code_fournisseur,
      'company_customeraccountancycode'=>$object->code_compta,
      'company_supplieraccountancycode'=>$object->code_compta_fournisseur,
      'company_juridicalstatus'=>$object->forme_juridique,
      'company_outstanding_limit'=>$object->outstanding_limit,
      'company_capital'=>$object->capital,
      'company_capital_formated'=> price($object->capital, 0, '', 1, -1),
      'company_idprof1'=>$object->idprof1,
      'company_idprof2'=>$object->idprof2,
      'company_idprof3'=>$object->idprof3,
      'company_idprof4'=>$object->idprof4,
      'company_idprof5'=>$object->idprof5,
      'company_idprof6'=>$object->idprof6,
      'company_note_public'=>$object->note_public,
      'company_note_private'=>$object->note_private,
      'company_default_bank_iban'=>(is_object($object->bank_account) ? $object->bank_account->iban : ''),
      'company_default_bank_bic'=>(is_object($object->bank_account) ? $object->bank_account->bic : '')
    );
 
    // Retrieve extrafields
    if (is_array($object->array_options) && count($object->array_options)) {
      $object->fetch_optionals();
 
      $array_thirdparty = $this->fill_substitutionarray_with_extrafields($object, $array_thirdparty, $extrafields, $array_key, $outputlangs);
    }
    return $array_thirdparty;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_contact($object, $outputlangs, $array_key = 'object')
  {
    // phpcs:enable
    global $conf, $extrafields;
 
    if (empty($object->country) && !empty($object->country_code)) {
      $object->country = $outputlangs->transnoentitiesnoconv("Country".$object->country_code);
    }
    if (empty($object->state) && !empty($object->state_code)) {
      $object->state = getState($object->state_code, 0);
    }
 
    $array_contact = array(
      $array_key.'_fullname' => $object->getFullName($outputlangs, 1),
      $array_key.'_lastname' => $object->lastname,
      $array_key.'_firstname' => $object->firstname,
      $array_key.'_address' => $object->address,
      $array_key.'_zip' => $object->zip,
      $array_key.'_town' => $object->town,
      $array_key.'_state_id' => $object->state_id,
      $array_key.'_state_code' => $object->state_code,
      $array_key.'_state' => $object->state,
      $array_key.'_country_id' => $object->country_id,
      $array_key.'_country_code' => $object->country_code,
      $array_key.'_country' => $object->country,
      $array_key.'_poste' => $object->poste,
      $array_key.'_socid' => $object->socid,
      $array_key.'_statut' => $object->statut,
      $array_key.'_code' => $object->code,
      $array_key.'_email' => $object->email,
      $array_key.'_phone_pro' => $object->phone_pro,
      $array_key.'_phone_perso' => $object->phone_perso,
      $array_key.'_phone_mobile' => $object->phone_mobile,
      $array_key.'_fax' => $object->fax,
      $array_key.'_birthday' => $object->birthday,
      $array_key.'_default_lang' => $object->default_lang,
      $array_key.'_note_public' => $object->note_public,
      $array_key.'_note_private' => $object->note_private,
      $array_key.'_civility' => $object->civility,
    );
 
    // Retrieve extrafields
    if (is_array($object->array_options) && count($object->array_options)) {
      $object->fetch_optionals();
 
      $array_contact = $this->fill_substitutionarray_with_extrafields($object, $array_contact, $extrafields, $array_key, $outputlangs);
    }
    return $array_contact;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_other($outputlangs)
  {
    // phpcs:enable
    global $conf;
 
    $now = dol_now('gmt'); // gmt
    $array_other = array(
      // Date in default language
      'current_date'=>dol_print_date($now, 'day', 'tzuser'),
      'current_datehour'=>dol_print_date($now, 'dayhour', 'tzuser'),
      'current_server_date'=>dol_print_date($now, 'day', 'tzserver'),
      'current_server_datehour'=>dol_print_date($now, 'dayhour', 'tzserver'),
      // Date in requested output language
      'current_date_locale'=>dol_print_date($now, 'day', 'tzuser', $outputlangs),
      'current_datehour_locale'=>dol_print_date($now, 'dayhour', 'tzuser', $outputlangs),
      'current_server_date_locale'=>dol_print_date($now, 'day', 'tzserver', $outputlangs),
      'current_server_datehour_locale'=>dol_print_date($now, 'dayhour', 'tzserver', $outputlangs),
    );
 
 
    foreach ($conf->global as $key => $val) {
      if (isASecretKey($key)) {
        $newval = '*****forbidden*****';
      } else {
        $newval = $val;
      }
      $array_other['__['.$key.']__'] = $newval;
    }
 
    return $array_other;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_object($object, $outputlangs, $array_key = 'object')
  {
    // phpcs:enable
    global $conf, $extrafields;
 
    $sumpayed = $sumdeposit = $sumcreditnote = '';
    $already_payed_all = 0;
 
    if ($object->element == 'facture') {
      $invoice_source = new Facture($this->db);
      if ($object->fk_facture_source > 0) {
        $invoice_source->fetch($object->fk_facture_source);
      }
      $sumpayed = $object->getSommePaiement();
      $sumdeposit = $object->getSumDepositsUsed();
      $sumcreditnote = $object->getSumCreditNotesUsed();
      $already_payed_all = $sumpayed + $sumdeposit + $sumcreditnote;
 
      if ($object->fk_account > 0) {
        require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
        $bank_account = new Account($this->db);
        $bank_account->fetch($object->fk_account);
      }
    }
 
    $date = (isset($object->element) && $object->element == 'contrat' && isset($object->date_contrat)) ? $object->date_contrat : (isset($object->date) ? $object->date : null);
 
    if (get_class($object) == 'CommandeFournisseur') {
      /* @var $object CommandeFournisseur*/
      $object->date_validation =  $object->date_valid;
      $object->date_commande = $object->date;
    }
    $resarray = array(
      $array_key.'_id'=>$object->id,
      $array_key.'_ref' => (property_exists($object, 'ref') ? $object->ref : ''),
      $array_key.'_label' => (property_exists($object, 'label') ? $object->label : ''),
      $array_key.'_ref_ext' => (property_exists($object, 'ref_ext') ? $object->ref_ext : ''),
      $array_key.'_ref_customer'=>(!empty($object->ref_client) ? $object->ref_client : (empty($object->ref_customer) ? '' : $object->ref_customer)),
      $array_key.'_ref_supplier'=>(!empty($object->ref_fournisseur) ? $object->ref_fournisseur : (empty($object->ref_supplier) ? '' : $object->ref_supplier)),
      $array_key.'_source_invoice_ref'=>((empty($invoice_source) || empty($invoice_source->ref)) ? '' : $invoice_source->ref),
      // Dates
      $array_key.'_hour'=>dol_print_date($date, 'hour'),
      $array_key.'_date'=>dol_print_date($date, 'day'),
      $array_key.'_date_rfc'=>dol_print_date($date, 'dayrfc'),
      $array_key.'_date_limit'=>(!empty($object->date_lim_reglement) ? dol_print_date($object->date_lim_reglement, 'day') : ''),
      $array_key.'_date_limit_rfc'=>(!empty($object->date_lim_reglement) ? dol_print_date($object->date_lim_reglement, 'dayrfc') : ''),
      $array_key.'_date_end'=>(!empty($object->fin_validite) ? dol_print_date($object->fin_validite, 'day') : ''),
      $array_key.'_date_creation'=>dol_print_date($object->date_creation, 'day'),
      $array_key.'_date_modification'=>(!empty($object->date_modification) ? dol_print_date($object->date_modification, 'day') : ''),
      $array_key.'_date_validation'=>(!empty($object->date_validation) ? dol_print_date($object->date_validation, 'dayhour') : ''),
      $array_key.'_date_approve'=>(!empty($object->date_approve) ? dol_print_date($object->date_approve, 'day') : ''),
      $array_key.'_date_delivery_planed'=>(!empty($object->delivery_date) ? dol_print_date($object->delivery_date, 'day') : ''),
      $array_key.'_date_close'=>(!empty($object->date_cloture) ? dol_print_date($object->date_cloture, 'dayhour') : ''),
 
      $array_key.'_payment_mode_code'=>$object->mode_reglement_code,
      $array_key.'_payment_mode'=>($outputlangs->transnoentitiesnoconv('PaymentType'.$object->mode_reglement_code) != 'PaymentType'.$object->mode_reglement_code ? $outputlangs->transnoentitiesnoconv('PaymentType'.$object->mode_reglement_code) : $object->mode_reglement),
      $array_key.'_payment_term_code'=>$object->cond_reglement_code,
      $array_key.'_payment_term'=>($outputlangs->transnoentitiesnoconv('PaymentCondition'.$object->cond_reglement_code) != 'PaymentCondition'.$object->cond_reglement_code ? $outputlangs->transnoentitiesnoconv('PaymentCondition'.$object->cond_reglement_code) : ($object->cond_reglement_doc ? $object->cond_reglement_doc : $object->cond_reglement)),
 
      $array_key.'_incoterms' => (method_exists($object, 'display_incoterms') ? $object->display_incoterms() : ''),
 
      $array_key.'_bank_iban' => (!empty($bank_account) ? $bank_account->iban : ''),
      $array_key.'_bank_bic' => (!empty($bank_account) ? $bank_account->bic : ''),
      $array_key.'_bank_label' => (!empty($bank_account) ? $bank_account->label : ''),
      $array_key.'_bank_number' => (!empty($bank_account) ? $bank_account->number : ''),
      $array_key.'_bank_proprio' => (!empty($bank_account) ? $bank_account->proprio : ''),
 
      $array_key.'_total_ht_locale'=>price($object->total_ht, 0, $outputlangs),
      $array_key.'_total_vat_locale'=>(!empty($object->total_vat) ?price($object->total_vat, 0, $outputlangs) : price($object->total_tva, 0, $outputlangs)),
      $array_key.'_total_localtax1_locale'=>price($object->total_localtax1, 0, $outputlangs),
      $array_key.'_total_localtax2_locale'=>price($object->total_localtax2, 0, $outputlangs),
      $array_key.'_total_ttc_locale'=>price($object->total_ttc, 0, $outputlangs),
 
      $array_key.'_total_ht'=>price2num($object->total_ht),
      $array_key.'_total_vat'=>(!empty($object->total_vat) ?price2num($object->total_vat) : price2num($object->total_tva)),
      $array_key.'_total_localtax1'=>price2num($object->total_localtax1),
      $array_key.'_total_localtax2'=>price2num($object->total_localtax2),
      $array_key.'_total_ttc'=>price2num($object->total_ttc),
 
      $array_key.'_multicurrency_code' => $object->multicurrency_code,
      $array_key.'_multicurrency_tx' => price2num($object->multicurrency_tx),
      $array_key.'_multicurrency_total_ht' => price2num($object->multicurrency_total_ht),
      $array_key.'_multicurrency_total_tva' => price2num($object->multicurrency_total_tva),
      $array_key.'_multicurrency_total_ttc' => price2num($object->multicurrency_total_ttc),
      $array_key.'_multicurrency_total_ht_locale' => price($object->multicurrency_total_ht, 0, $outputlangs),
      $array_key.'_multicurrency_total_tva_locale' => price($object->multicurrency_total_tva, 0, $outputlangs),
      $array_key.'_multicurrency_total_ttc_locale' => price($object->multicurrency_total_ttc, 0, $outputlangs),
 
      $array_key.'_note_private'=>$object->note,
      $array_key.'_note_public'=>$object->note_public,
      $array_key.'_note'=>$object->note_public, // For backward compatibility
 
      // Payments
      $array_key.'_already_payed_locale'=>price($sumpayed, 0, $outputlangs),
      $array_key.'_already_payed'=>price2num($sumpayed),
      $array_key.'_already_deposit_locale'=>price($sumdeposit, 0, $outputlangs),
      $array_key.'_already_deposit'=>price2num($sumdeposit),
      $array_key.'_already_creditnote_locale'=>price($sumcreditnote, 0, $outputlangs),
      $array_key.'_already_creditnote'=>price2num($sumcreditnote),
 
      $array_key.'_already_payed_all_locale'=>price(price2num($already_payed_all, 'MT'), 0, $outputlangs),
      $array_key.'_already_payed_all'=> price2num($already_payed_all, 'MT'),
 
      // Remain to pay with all known information (except open direct debit requests)
      $array_key.'_remain_to_pay_locale'=>price(price2num($object->total_ttc - $already_payed_all, 'MT'), 0, $outputlangs),
      $array_key.'_remain_to_pay'=>price2num($object->total_ttc - $already_payed_all, 'MT')
    );
 
    if (method_exists($object, 'getTotalDiscount') && in_array(get_class($object), array('Propal', 'Proposal', 'Commande', 'Facture', 'SupplierProposal', 'CommandeFournisseur', 'FactureFournisseur'))) {
      $resarray[$array_key.'_total_discount_ht_locale'] = price($object->getTotalDiscount(), 0, $outputlangs);
      $resarray[$array_key.'_total_discount_ht'] = price2num($object->getTotalDiscount());
    } else {
      $resarray[$array_key.'_total_discount_ht_locale'] = '';
      $resarray[$array_key.'_total_discount_ht'] = '';
    }
 
    // Fetch project information if there is a project assigned to this object
    if ($object->element != "project" && !empty($object->fk_project) && $object->fk_project > 0) {
      if (!is_object($object->project)) {
        $object->fetch_projet();
      }
 
      $resarray[$array_key.'_project_ref'] = $object->project->ref;
      $resarray[$array_key.'_project_title'] = $object->project->title;
      $resarray[$array_key.'_project_description'] = $object->project->description;
      $resarray[$array_key.'_project_date_start'] = dol_print_date($object->project->date_start, 'day');
      $resarray[$array_key.'_project_date_end'] = dol_print_date($object->project->date_end, 'day');
    } else { // empty replacement
      $resarray[$array_key.'_project_ref'] ='';
      $resarray[$array_key.'_project_title'] = '';
      $resarray[$array_key.'_project_description'] = '';
      $resarray[$array_key.'_project_date_start'] = '';
      $resarray[$array_key.'_project_date_end'] = '';
    }
 
    // Add vat by rates
    if (is_array($object->lines) && count($object->lines) > 0) {
      $totalUp = 0;
      // Set substitution keys for different VAT rates
      foreach ($object->lines as $line) {
        // $line->tva_tx format depends on database field accuracy, no reliable. This is kept for backward compatibility
        if (empty($resarray[$array_key.'_total_vat_'.$line->tva_tx])) {
          $resarray[$array_key.'_total_vat_'.$line->tva_tx] = 0;
        }
        $resarray[$array_key.'_total_vat_'.$line->tva_tx] += $line->total_tva;
        $resarray[$array_key.'_total_vat_locale_'.$line->tva_tx] = price($resarray[$array_key.'_total_vat_'.$line->tva_tx]);
        // $vatformated is vat without not expected chars (so 20, or 8.5 or 5.99 for example)
        $vatformated = vatrate($line->tva_tx);
        if (empty($resarray[$array_key.'_total_vat_'.$vatformated])) {
          $resarray[$array_key.'_total_vat_'.$vatformated] = 0;
        }
        $resarray[$array_key.'_total_vat_'.$vatformated] += $line->total_tva;
        $resarray[$array_key.'_total_vat_locale_'.$vatformated] = price($resarray[$array_key.'_total_vat_'.$vatformated]);
 
        $totalUp += $line->subprice * $line->qty;
      }
 
      // Calculate total up and total discount percentage
      // Note that this added fields does not match a field into database in Dolibarr (Dolibarr manage discount on lines not as a global property of object)
      $resarray['object_total_up'] = $totalUp;
      $resarray['object_total_up_locale'] = price($resarray['object_total_up'], 0, $outputlangs);
      if (method_exists($object, 'getTotalDiscount') && in_array(get_class($object), array('Propal', 'Proposal', 'Commande', 'Facture', 'SupplierProposal', 'CommandeFournisseur', 'FactureFournisseur'))) {
        $totalDiscount = $object->getTotalDiscount();
      } else {
        $totalDiscount = 0;
      }
      if (!empty($totalUp) && !empty($totalDiscount)) {
        $resarray['object_total_discount'] = round(100 / $totalUp * $totalDiscount, 2);
        $resarray['object_total_discount_locale'] = price($resarray['object_total_discount'], 0, $outputlangs);
      } else {
        $resarray['object_total_discount'] = '';
        $resarray['object_total_discount_locale'] = '';
      }
    }
 
    // Retrieve extrafields
    if (is_array($object->array_options) && count($object->array_options)) {
      $object->fetch_optionals();
 
      $resarray = $this->fill_substitutionarray_with_extrafields($object, $resarray, $extrafields, $array_key, $outputlangs);
    }
 
    return $resarray;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_lines($line, $outputlangs, $linenumber = 0)
  {
    // phpcs:enable
    $resarray = array(
      'line_pos' => $linenumber,
      'line_fulldesc'=>doc_getlinedesc($line, $outputlangs),
 
      'line_product_ref'=>(empty($line->product_ref) ? '' : $line->product_ref),
      'line_product_ref_fourn'=>(empty($line->ref_fourn) ? '' : $line->ref_fourn), // for supplier doc lines
      'line_product_label'=>(empty($line->product_label) ? '' : $line->product_label),
      'line_product_type'=>(empty($line->product_type) ? '' : $line->product_type),
      'line_product_barcode'=>(empty($line->product_barcode) ? '' : $line->product_barcode),
      'line_product_desc'=>(empty($line->product_desc) ? '' : $line->product_desc),
 
      'line_desc'=>$line->desc,
      'line_vatrate'=>vatrate($line->tva_tx, true, $line->info_bits),
      'line_localtax1_rate'=>vatrate($line->localtax1_tx),
      'line_localtax2_rate'=>vatrate($line->localtax1_tx),
      'line_up'=>price2num($line->subprice),
      'line_up_locale'=>price($line->subprice, 0, $outputlangs),
      'line_total_up'=>price2num($line->subprice * $line->qty),
      'line_total_up_locale'=>price($line->subprice * $line->qty, 0, $outputlangs),
      'line_qty'=>$line->qty,
      'line_discount_percent'=>($line->remise_percent ? $line->remise_percent.'%' : ''),
      'line_price_ht'=>price2num($line->total_ht),
      'line_price_ttc'=>price2num($line->total_ttc),
      'line_price_vat'=>price2num($line->total_tva),
      'line_price_ht_locale'=>price($line->total_ht, 0, $outputlangs),
      'line_price_ttc_locale'=>price($line->total_ttc, 0, $outputlangs),
      'line_price_vat_locale'=>price($line->total_tva, 0, $outputlangs),
      // Dates
      'line_date_start'=>dol_print_date($line->date_start, 'day'),
      'line_date_start_locale'=>dol_print_date($line->date_start, 'day', 'tzserver', $outputlangs),
      'line_date_start_rfc'=>dol_print_date($line->date_start, 'dayrfc'),
      'line_date_end'=>dol_print_date($line->date_end, 'day'),
      'line_date_end_locale'=>dol_print_date($line->date_end, 'day', 'tzserver', $outputlangs),
      'line_date_end_rfc'=>dol_print_date($line->date_end, 'dayrfc'),
 
      'line_multicurrency_code' => price2num($line->multicurrency_code),
      'line_multicurrency_subprice' => price2num($line->multicurrency_subprice),
      'line_multicurrency_total_ht' => price2num($line->multicurrency_total_ht),
      'line_multicurrency_total_tva' => price2num($line->multicurrency_total_tva),
      'line_multicurrency_total_ttc' => price2num($line->multicurrency_total_ttc),
      'line_multicurrency_subprice_locale' => price($line->multicurrency_subprice, 0, $outputlangs),
      'line_multicurrency_total_ht_locale' => price($line->multicurrency_total_ht, 0, $outputlangs),
      'line_multicurrency_total_tva_locale' => price($line->multicurrency_total_tva, 0, $outputlangs),
      'line_multicurrency_total_ttc_locale' => price($line->multicurrency_total_ttc, 0, $outputlangs),
    );
 
    // Units
    if (getDolGlobalInt('PRODUCT_USE_UNITS')) {
        $resarray['line_unit'] = $outputlangs->trans($line->getLabelOfUnit('long'));
        $resarray['line_unit_short'] = $outputlangs->trans($line->getLabelOfUnit('short'));
    }
 
    // Retrieve extrafields
    $extrafieldkey = $line->table_element;
    $array_key = "line";
    require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php';
    $extrafields = new ExtraFields($this->db);
    $extrafields->fetch_name_optionals_label($extrafieldkey, true);
    $line->fetch_optionals();
 
    $resarray = $this->fill_substitutionarray_with_extrafields($line, $resarray, $extrafields, $array_key, $outputlangs);
 
    // Check if the current line belongs to a supplier order
    if (get_class($line) == 'CommandeFournisseurLigne') {
      // Add the product supplier extrafields to the substitutions
      $extrafields->fetch_name_optionals_label("product_fournisseur_price");
      $extralabels = $extrafields->attributes["product_fournisseur_price"]['label'];
 
      if (!empty($extralabels) && is_array($extralabels)) {
        $columns = "";
 
        foreach ($extralabels as $key => $label) {
          $columns .= "$key, ";
        }
 
        if ($columns != "") {
          $columns = substr($columns, 0, strlen($columns) - 2);
          $resql = $this->db->query("SELECT ".$columns." FROM ".$this->db->prefix()."product_fournisseur_price_extrafields AS ex INNER JOIN ".$this->db->prefix()."product_fournisseur_price AS f ON ex.fk_object = f.rowid WHERE f.ref_fourn = '".$this->db->escape($line->ref_supplier)."'");
 
          if ($this->db->num_rows($resql) > 0) {
            $resql = $this->db->fetch_object($resql);
 
            foreach ($extralabels as $key => $label) {
              $resarray['line_product_supplier_'.$key] = $resql->$key;
            }
          }
        }
      }
    }
 
    // Load product data optional fields to the line -> enables to use "line_options_{extrafield}"
    if (isset($line->fk_product) && $line->fk_product > 0) {
      $tmpproduct = new Product($this->db);
      $result = $tmpproduct->fetch($line->fk_product);
      if (!empty($tmpproduct->array_options) && is_array($tmpproduct->array_options)) {
        foreach ($tmpproduct->array_options as $key => $label) {
          $resarray["line_product_".$key] = $label;
        }
      }
    } else {
      // Set unused placeholders as blank
      $extrafields->fetch_name_optionals_label("product");
      $extralabels = $extrafields->attributes["product"]['label'];
 
      if (!empty($extralabels) && is_array($extralabels)) {
        foreach ($extralabels as $key => $label) {
          $resarray['line_product_options_'.$key] = '';
        }
      }
    }
 
    return $resarray;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_shipment($object, $outputlangs, $array_key = 'object')
  {
    // phpcs:enable
    global $conf, $extrafields;
    dol_include_once('/core/lib/product.lib.php');
    $object->list_delivery_methods($object->shipping_method_id);
    $calculatedVolume = ($object->trueWidth * $object->trueHeight * $object->trueDepth);
 
    $array_shipment = array(
      $array_key.'_id'=>$object->id,
      $array_key.'_ref'=>$object->ref,
      $array_key.'_ref_ext'=>$object->ref_ext,
      $array_key.'_ref_customer'=>$object->ref_customer,
      $array_key.'_date_delivery'=>dol_print_date($object->date_delivery, 'day'),
      $array_key.'_hour_delivery'=>dol_print_date($object->date_delivery, 'hour'),
      $array_key.'_date_creation'=>dol_print_date($object->date_creation, 'day'),
      $array_key.'_total_ht'=>price($object->total_ht),
      $array_key.'_total_vat'=>price($object->total_tva),
      $array_key.'_total_ttc'=>price($object->total_ttc),
      $array_key.'_total_discount_ht' => price($object->getTotalDiscount()),
      $array_key.'_note_private'=>$object->note_private,
      $array_key.'_note'=>$object->note_public,
      $array_key.'_tracking_number'=>$object->tracking_number,
      $array_key.'_tracking_url'=>$object->tracking_url,
      $array_key.'_shipping_method'=>$object->listmeths[0]['libelle'],
      $array_key.'_weight'=>$object->trueWeight.' '.measuringUnitString(0, 'weight', $object->weight_units),
      $array_key.'_width'=>$object->trueWidth.' '.measuringUnitString(0, 'size', $object->width_units),
      $array_key.'_height'=>$object->trueHeight.' '.measuringUnitString(0, 'size', $object->height_units),
      $array_key.'_depth'=>$object->trueDepth.' '.measuringUnitString(0, 'size', $object->depth_units),
      $array_key.'_size'=>$calculatedVolume.' '.measuringUnitString(0, 'volume'),
    );
 
    // Add vat by rates
    foreach ($object->lines as $line) {
      if (empty($array_shipment[$array_key.'_total_vat_'.$line->tva_tx])) {
        $array_shipment[$array_key.'_total_vat_'.$line->tva_tx] = 0;
      }
      $array_shipment[$array_key.'_total_vat_'.$line->tva_tx] += $line->total_tva;
    }
 
    // Retrieve extrafields
    if (is_array($object->array_options) && count($object->array_options)) {
      $object->fetch_optionals();
 
      $array_shipment = $this->fill_substitutionarray_with_extrafields($object, $array_shipment, $extrafields, $array_key, $outputlangs);
    }
 
    // Add infor from $object->xxx where xxx has been loaded by fetch_origin() of shipment
    if (!empty($object->commande) && is_object($object->commande)) {
      $array_shipment['order_ref'] = $object->commande->ref;
      $array_shipment['order_ref_customer'] = $object->commande->ref_customer;
    }
 
    return $array_shipment;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_shipment_lines($line, $outputlangs)
  {
    // phpcs:enable
    dol_include_once('/core/lib/product.lib.php');
 
    $resarray = array(
      'line_fulldesc'=>doc_getlinedesc($line, $outputlangs),
      'line_product_ref'=>$line->product_ref,
      'line_product_label'=>$line->product_label,
      'line_desc'=>$line->desc,
      'line_vatrate'=>vatrate($line->tva_tx, true, $line->info_bits),
      'line_up'=>price($line->subprice),
      'line_total_up'=>price($line->subprice * $line->qty),
      'line_qty'=>$line->qty,
      'line_qty_shipped'=>$line->qty_shipped,
      'line_qty_asked'=>$line->qty_asked,
      'line_discount_percent'=>($line->remise_percent ? $line->remise_percent.'%' : ''),
      'line_price_ht'=>price($line->total_ht),
      'line_price_ttc'=>price($line->total_ttc),
      'line_price_vat'=>price($line->total_tva),
      'line_weight'=>empty($line->weight) ? '' : $line->weight * $line->qty_shipped.' '.measuringUnitString(0, 'weight', $line->weight_units),
      'line_length'=>empty($line->length) ? '' : $line->length * $line->qty_shipped.' '.measuringUnitString(0, 'size', $line->length_units),
      'line_surface'=>empty($line->surface) ? '' : $line->surface * $line->qty_shipped.' '.measuringUnitString(0, 'surface', $line->surface_units),
      'line_volume'=>empty($line->volume) ? '' : $line->volume * $line->qty_shipped.' '.measuringUnitString(0, 'volume', $line->volume_units),
    );
 
    // Retrieve extrafields
    $extrafieldkey = $line->element;
    $array_key = "line";
    require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php';
    $extrafields = new ExtraFields($this->db);
    $extrafields->fetch_name_optionals_label($extrafieldkey, true);
    $line->fetch_optionals();
 
    $resarray = $this->fill_substitutionarray_with_extrafields($line, $resarray, $extrafields, $array_key, $outputlangs);
 
    // Load product data optional fields to the line -> enables to use "line_product_options_{extrafield}"
    if (isset($line->fk_product) && $line->fk_product > 0) {
      $tmpproduct = new Product($this->db);
      $tmpproduct->fetch($line->fk_product);
      if (!empty($tmpproduct->array_options) && is_array($tmpproduct->array_options)) {
        foreach ($tmpproduct->array_options as $key=>$label) {
          $resarray["line_product_".$key] = $label;
        }
      }
    }
 
    return $resarray;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_substitutionarray_each_var_object(&$object, $outputlangs, $recursive = 1)
  {
    // phpcs:enable
    $array_other = array();
    if (!empty($object)) {
      foreach ($object as $key => $value) {
        if (in_array($key, array('db', 'fields', 'lines', 'modelpdf', 'model_pdf'))) {    // discard some properties
          continue;
        }
        if (!empty($value)) {
          if (!is_array($value) && !is_object($value)) {
            $array_other['object_'.$key] = $value;
          } elseif (is_array($value) && $recursive) {
            $tmparray = $this->get_substitutionarray_each_var_object($value, $outputlangs, 0);
            if (!empty($tmparray) && is_array($tmparray)) {
              foreach ($tmparray as $key2 => $value2) {
                $array_other['object_'.$key.'_'.preg_replace('/^object_/', '', $key2)] = $value2;
              }
            }
          } elseif (is_object($value) && $recursive) {
            $tmparray = $this->get_substitutionarray_each_var_object($value, $outputlangs, 0);
            if (!empty($tmparray) && is_array($tmparray)) {
              foreach ($tmparray as $key2 => $value2) {
                $array_other['object_'.$key.'_'.preg_replace('/^object_/', '', $key2)] = $value2;
              }
            }
          }
        }
      }
    }
 
    //var_dump($array_other);
 
    return $array_other;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function fill_substitutionarray_with_extrafields($object, $array_to_fill, $extrafields, $array_key, $outputlangs)
  {
    // phpcs:enable
    global $conf;
 
    if (is_array($extrafields->attributes[$object->table_element]['label'])) {
      foreach ($extrafields->attributes[$object->table_element]['label'] as $key => $label) {
        $formatedarrayoption = $object->array_options;
 
        if ($extrafields->attributes[$object->table_element]['type'][$key] == 'price') {
          $formatedarrayoption['options_'.$key] = price2num($formatedarrayoption['options_'.$key]);
          $formatedarrayoption['options_'.$key.'_currency'] = price($formatedarrayoption['options_'.$key], 0, $outputlangs, 0, 0, -1, $conf->currency);
          //Add value to store price with currency
          $array_to_fill = array_merge($array_to_fill, array($array_key.'_options_'.$key.'_currency' => $formatedarrayoption['options_'.$key.'_currency']));
        } elseif ($extrafields->attributes[$object->table_element]['type'][$key] == 'select') {
          $valueofselectkey = $formatedarrayoption['options_'.$key];
          if (array_key_exists($valueofselectkey, $extrafields->attributes[$object->table_element]['param'][$key]['options'])) {
            $formatedarrayoption['options_'.$key] = $extrafields->attributes[$object->table_element]['param'][$key]['options'][$valueofselectkey];
          } else {
            $formatedarrayoption['options_'.$key] = '';
          }
        } elseif ($extrafields->attributes[$object->table_element]['type'][$key] == 'checkbox') {
          $valArray = explode(',', $formatedarrayoption['options_'.$key]);
          $output = array();
          foreach ($extrafields->attributes[$object->table_element]['param'][$key]['options'] as $keyopt => $valopt) {
            if (in_array($keyopt, $valArray)) {
              $output[] = $valopt;
            }
          }
          $formatedarrayoption['options_'.$key] = implode(', ', $output);
        } elseif ($extrafields->attributes[$object->table_element]['type'][$key] == 'date') {
          if (strlen($formatedarrayoption['options_'.$key]) > 0) {
            $date = $formatedarrayoption['options_'.$key];
            $formatedarrayoption['options_'.$key] = dol_print_date($date, 'day'); // using company output language
            $formatedarrayoption['options_'.$key.'_locale'] = dol_print_date($date, 'day', 'tzserver', $outputlangs); // using output language format
            $formatedarrayoption['options_'.$key.'_rfc'] = dol_print_date($date, 'dayrfc'); // international format
          } else {
            $formatedarrayoption['options_'.$key] = '';
            $formatedarrayoption['options_'.$key.'_locale'] = '';
            $formatedarrayoption['options_'.$key.'_rfc'] = '';
          }
          $array_to_fill = array_merge($array_to_fill, array($array_key.'_options_'.$key.'_locale' => $formatedarrayoption['options_'.$key.'_locale']));
          $array_to_fill = array_merge($array_to_fill, array($array_key.'_options_'.$key.'_rfc' => $formatedarrayoption['options_'.$key.'_rfc']));
        } elseif ($extrafields->attributes[$object->table_element]['type'][$key] == 'datetime') {
          $datetime = $formatedarrayoption['options_'.$key];
          $formatedarrayoption['options_'.$key] = ($datetime != "0000-00-00 00:00:00" ? dol_print_date($datetime, 'dayhour') : ''); // using company output language
          $formatedarrayoption['options_'.$key.'_locale'] = ($datetime != "0000-00-00 00:00:00" ? dol_print_date($datetime, 'dayhour', 'tzserver', $outputlangs) : ''); // using output language format
          $formatedarrayoption['options_'.$key.'_rfc'] = ($datetime != "0000-00-00 00:00:00" ? dol_print_date($datetime, 'dayhourrfc') : ''); // international format
          $array_to_fill = array_merge($array_to_fill, array($array_key.'_options_'.$key.'_locale' => $formatedarrayoption['options_'.$key.'_locale']));
          $array_to_fill = array_merge($array_to_fill, array($array_key.'_options_'.$key.'_rfc' => $formatedarrayoption['options_'.$key.'_rfc']));
        } elseif ($extrafields->attributes[$object->table_element]['type'][$key] == 'link') {
          $id = $formatedarrayoption['options_'.$key];
          if ($id != "") {
            $param = $extrafields->attributes[$object->table_element]['param'][$key];
            $param_list = array_keys($param['options']); // $param_list='ObjectName:classPath'
            $InfoFieldList = explode(":", $param_list[0]);
            $classname = $InfoFieldList[0];
            $classpath = $InfoFieldList[1];
            if (!empty($classpath)) {
              dol_include_once($InfoFieldList[1]);
              if ($classname && class_exists($classname)) {
                $tmpobject = new $classname($this->db);
                $tmpobject->fetch($id);
                // completely replace the id with the linked object name
                $formatedarrayoption['options_'.$key] = $tmpobject->name;
              }
            }
          }
        }
 
        if (array_key_exists('options_'.$key, $formatedarrayoption)) {
          $array_to_fill = array_merge($array_to_fill, array($array_key.'_options_'.$key => $formatedarrayoption['options_'.$key]));
        } else {
          $array_to_fill = array_merge($array_to_fill, array($array_key.'_options_'.$key => ''));
        }
      }
    }
 
    return $array_to_fill;
  }
 
 
  public function printRect($pdf, $x, $y, $l, $h, $hidetop = 0, $hidebottom = 0)
  {
    if (empty($hidetop) || $hidetop == -1) {
      $pdf->line($x, $y, $x + $l, $y);
    }
    $pdf->line($x + $l, $y, $x + $l, $y + $h);
    if (empty($hidebottom)) {
      $pdf->line($x + $l, $y + $h, $x, $y + $h);
    }
    $pdf->line($x, $y + $h, $x, $y);
  }
 
 
  public function columnSort($a, $b)
  {
    if (empty($a['rank'])) {
      $a['rank'] = 0;
    }
    if (empty($b['rank'])) {
      $b['rank'] = 0;
    }
    if ($a['rank'] == $b['rank']) {
      return 0;
    }
    return ($a['rank'] > $b['rank']) ? -1 : 1;
  }
 
  public function prepareArrayColumnField($object, $outputlangs, $hidedetails = 0, $hidedesc = 0, $hideref = 0)
  {
    $this->defineColumnField($object, $outputlangs, $hidedetails, $hidedesc, $hideref);
 
 
    // Sorting
    uasort($this->cols, array($this, 'columnSort'));
 
    // Positionning
    $curX = $this->page_largeur - $this->marge_droite; // start from right
 
    // Array width
    $arrayWidth = $this->page_largeur - $this->marge_droite - $this->marge_gauche;
 
    // Count flexible column
    $totalDefinedColWidth = 0;
    $countFlexCol = 0;
    foreach ($this->cols as $colKey => & $colDef) {
      if (!$this->getColumnStatus($colKey)) {
        continue; // continue if disabled
      }
 
      if (!empty($colDef['scale'])) {
        // In case of column width is defined by percentage
        $colDef['width'] = abs($arrayWidth * $colDef['scale'] / 100);
      }
 
      if (empty($colDef['width'])) {
        $countFlexCol++;
      } else {
        $totalDefinedColWidth += $colDef['width'];
      }
    }
 
    foreach ($this->cols as $colKey => & $colDef) {
      // setting empty conf with default
      if (!empty($colDef['title'])) {
        $colDef['title'] = array_replace($this->defaultTitlesFieldsStyle, $colDef['title']);
      } else {
        $colDef['title'] = $this->defaultTitlesFieldsStyle;
      }
 
      // setting empty conf with default
      if (!empty($colDef['content'])) {
        $colDef['content'] = array_replace($this->defaultContentsFieldsStyle, $colDef['content']);
      } else {
        $colDef['content'] = $this->defaultContentsFieldsStyle;
      }
 
      if ($this->getColumnStatus($colKey)) {
        // In case of flexible column
        if (empty($colDef['width'])) {
          $colDef['width'] = abs(($arrayWidth - $totalDefinedColWidth)) / $countFlexCol;
        }
 
        // Set positions
        $lastX = $curX;
        $curX = $lastX - $colDef['width'];
        $colDef['xStartPos'] = $curX;
        $colDef['xEndPos']   = $lastX;
      }
    }
  }
 
  public function getColumnContentWidth($colKey)
  {
    $colDef = $this->cols[$colKey];
    return  $colDef['width'] - $colDef['content']['padding'][3] - $colDef['content']['padding'][1];
  }
 
 
  public function getColumnContentXStart($colKey)
  {
    $colDef = (isset($this->cols[$colKey]) ? $this->cols[$colKey] : null);
    return (is_array($colDef) ? ((isset($colDef['xStartPos']) ? $colDef['xStartPos'] : 0) + $colDef['content']['padding'][3]) : 0);
  }
 
  public function getColumnRank($colKey)
  {
    if (!isset($this->cols[$colKey]['rank'])) {
      return -1;
    }
    return  $this->cols[$colKey]['rank'];
  }
 
  public function insertNewColumnDef($newColKey, $defArray, $targetCol = false, $insertAfterTarget = false)
  {
    // prepare wanted rank
    $rank = -1;
 
    // try to get rank from target column
    if (!empty($targetCol)) {
      $rank = $this->getColumnRank($targetCol);
      if ($rank >= 0 && $insertAfterTarget) {
        $rank++;
      }
    }
 
    // get rank from new column definition
    if ($rank < 0 && !empty($defArray['rank'])) {
      $rank = $defArray['rank'];
    }
 
    // error: no rank
    if ($rank < 0) {
      return -1;
    }
 
    foreach ($this->cols as $colKey => & $colDef) {
      if ($rank <= $colDef['rank']) {
        $colDef['rank'] = $colDef['rank'] + 1;
      }
    }
 
    $defArray['rank'] = $rank;
    $this->cols[$newColKey] = $defArray; // array_replace is used to preserve keys
 
    return $rank;
  }
 
 
  public function printStdColumnContent($pdf, &$curY, $colKey, $columnText = '')
  {
    global $hookmanager;
 
    $parameters = array(
      'curY' => &$curY,
      'columnText' => $columnText,
      'colKey' => $colKey,
      'pdf' => &$pdf,
    );
    $reshook = $hookmanager->executeHooks('printStdColumnContent', $parameters, $this); // Note that $action and $object may have been modified by hook
    if ($reshook < 0) {
      setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
    }
    if (!$reshook) {
      if (empty($columnText)) {
        return 0;
      }
      $pdf->SetXY($this->getColumnContentXStart($colKey), $curY); // Set curent position
      $colDef = $this->cols[$colKey];
      // save curent cell padding
      $curentCellPaddinds = $pdf->getCellPaddings();
      // set cell padding with column content definition
      $pdf->setCellPaddings(isset($colDef['content']['padding'][3]) ? $colDef['content']['padding'][3] : 0, isset($colDef['content']['padding'][0]) ? $colDef['content']['padding'][0] : 0, isset($colDef['content']['padding'][1]) ? $colDef['content']['padding'][1] : 0, isset($colDef['content']['padding'][2]) ? $colDef['content']['padding'][2] : 0);
      $pdf->writeHTMLCell($colDef['width'], 2, isset($colDef['xStartPos']) ? $colDef['xStartPos'] : 0, $curY, $columnText, 0, 1, 0, true, $colDef['content']['align']);
 
      // restore cell padding
      $pdf->setCellPaddings($curentCellPaddinds['L'], $curentCellPaddinds['T'], $curentCellPaddinds['R'], $curentCellPaddinds['B']);
    }
 
    return 0;
  }
 
 
  public function printColDescContent($pdf, &$curY, $colKey, $object, $i, $outputlangs, $hideref = 0, $hidedesc = 0, $issupplierline = 0)
  {
    // load desc col params
    $colDef = $this->cols[$colKey];
    // save curent cell padding
    $curentCellPaddinds = $pdf->getCellPaddings();
    // set cell padding with column content definition
    $pdf->setCellPaddings($colDef['content']['padding'][3], $colDef['content']['padding'][0], $colDef['content']['padding'][1], $colDef['content']['padding'][2]);
 
    // line description
    pdf_writelinedesc($pdf, $object, $i, $outputlangs, $colDef['width'], 3, $colDef['xStartPos'], $curY, $hideref, $hidedesc, $issupplierline);
    $posYAfterDescription = $pdf->GetY() - $colDef['content']['padding'][0];
 
    // restore cell padding
    $pdf->setCellPaddings($curentCellPaddinds['L'], $curentCellPaddinds['T'], $curentCellPaddinds['R'], $curentCellPaddinds['B']);
 
    // Display extrafield if needed
    $params = array(
      'display'         => 'list',
      'printableEnable' => array(3),
      'printableEnableNotEmpty' => array(4)
    );
    $extrafieldDesc = $this->getExtrafieldsInHtml($object->lines[$i], $outputlangs, $params);
    if (!empty($extrafieldDesc)) {
      $this->printStdColumnContent($pdf, $posYAfterDescription, $colKey, $extrafieldDesc);
    }
  }
 
  public function getExtrafieldContent($object, $extrafieldKey, $outputlangs = null)
  {
    global $hookmanager;
 
    if (empty($object->table_element)) {
      return '';
    }
 
    $extrafieldsKeyPrefix = "options_";
 
    // Cleanup extrafield key to remove prefix if present
    $pos = strpos($extrafieldKey, $extrafieldsKeyPrefix);
    if ($pos === 0) {
      $extrafieldKey = substr($extrafieldKey, strlen($extrafieldsKeyPrefix));
    }
 
    $extrafieldOptionsKey = $extrafieldsKeyPrefix.$extrafieldKey;
 
 
    // Load extra fields if they haven't been loaded already.
    if (empty($this->extrafieldsCache)) {
      $this->extrafieldsCache = new ExtraFields($this->db);
    }
    if (empty($this->extrafieldsCache->attributes[$object->table_element])) {
      $this->extrafieldsCache->fetch_name_optionals_label($object->table_element);
    }
    $extrafields = $this->extrafieldsCache;
 
    $extrafieldOutputContent = '';
    if (isset($object->array_options[$extrafieldOptionsKey])) {
      $extrafieldOutputContent = $extrafields->showOutputField($extrafieldKey, $object->array_options[$extrafieldOptionsKey], '', $object->table_element, $outputlangs);
    }
 
    // TODO : allow showOutputField to be pdf public friendly, ex: in a link to object, clean getNomUrl to remove link and images... like a getName methode ...
    if ($extrafields->attributes[$object->table_element]['type'][$extrafieldKey] == 'link') {
      // for lack of anything better we cleanup all html tags
      $extrafieldOutputContent = dol_string_nohtmltag($extrafieldOutputContent);
    }
 
    $parameters = array(
      'object' => $object,
      'extrafields' => $extrafields,
      'extrafieldKey' => $extrafieldKey,
      'extrafieldOutputContent' =>& $extrafieldOutputContent
    );
    $reshook = $hookmanager->executeHooks('getPDFExtrafieldContent', $parameters, $this); // Note that $action and $object may have been modified by hook
    if ($reshook < 0) {
      setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
    }
    if ($reshook) {
      $extrafieldOutputContent = $hookmanager->resPrint;
    }
 
    return $extrafieldOutputContent;
  }
 
 
  public function getExtrafieldsInHtml($object, $outputlangs, $params = array())
  {
    global $hookmanager;
 
    if (empty($object->table_element)) {
      return "";
    }
 
    // Load extrafields if not allready done
    if (empty($this->extrafieldsCache)) {
      $this->extrafieldsCache = new ExtraFields($this->db);
    }
    if (empty($this->extrafieldsCache->attributes[$object->table_element])) {
      $this->extrafieldsCache->fetch_name_optionals_label($object->table_element);
    }
    $extrafields = $this->extrafieldsCache;
 
    $defaultParams = array(
      'style'         => '',
      'display'         => 'auto', // auto, table, list
      'printableEnable' => array(1),
      'printableEnableNotEmpty' => array(2),
 
      'table'         => array(
        'maxItemsInRow' => 2,
        'cellspacing'   => 0,
        'cellpadding'   => 0,
        'border'        => 0,
        'labelcolwidth' => '25%',
        'arrayOfLineBreakType' => array('text', 'html')
      ),
 
      'list'         => array(
        'separator' => '<br>'
      ),
 
      'auto'         => array(
        'list' => 0, // 0 for default
        'table' => 4 // if there more than x extrafield to display
      ),
    );
 
    $params = $params + $defaultParams;
 
    $html = '';
    $fields = array();
 
    if (!empty($extrafields->attributes[$object->table_element]['label']) && is_array($extrafields->attributes[$object->table_element]['label'])) {
      foreach ($extrafields->attributes[$object->table_element]['label'] as $key => $label) {
        // Enable extrafield ?
        $enabled = 0;
        $disableOnEmpty = 0;
        if (!empty($extrafields->attributes[$object->table_element]['printable'][$key])) {
          $printable = intval($extrafields->attributes[$object->table_element]['printable'][$key]);
          if (in_array($printable, $params['printableEnable']) || in_array($printable, $params['printableEnableNotEmpty'])) {
            $enabled = 1;
          }
 
          if (in_array($printable, $params['printableEnableNotEmpty'])) {
            $disableOnEmpty = 1;
          }
        }
 
        if (empty($enabled)) {
          continue;
        }
 
        $field = new stdClass();
        $field->rank = intval($extrafields->attributes[$object->table_element]['pos'][$key]);
        $field->content = $this->getExtrafieldContent($object, $key, $outputlangs);
        if (isset($extrafields->attributes[$object->table_element]['langfile'][$key])) {
          $outputlangs->load($extrafields->attributes[$object->table_element]['langfile'][$key]);
        }
        $field->label = $outputlangs->transnoentities($label);
        $field->type = $extrafields->attributes[$object->table_element]['type'][$key];
 
        // dont display if empty
        if ($disableOnEmpty && empty($field->content)) {
          continue;
        }
 
        $fields[] = $field;
      }
    }
 
    if (!empty($fields)) {
      // Sort extrafields by rank
      uasort($fields, function ($a, $b) {
        return  ($a->rank > $b->rank) ? 1 : -1;
      });
 
      // define some HTML content with style
      $html .= !empty($params['style']) ? '<style>'.$params['style'].'</style>' : '';
 
      // auto select display format
      if ($params['display'] == 'auto') {
        $lastNnumbItems = 0;
        foreach ($params['auto'] as $display => $numbItems) {
          if ($lastNnumbItems <= $numbItems && count($fields) > $numbItems) {
            $lastNnumbItems = $numbItems;
            $params['display'] = $display;
          }
        }
      }
 
      if ($params['display'] == 'list') {
        // Display in list format
        $i = 0;
        foreach ($fields as $field) {
          $html .= !empty($i) ? $params['list']['separator'] : '';
          $html .= '<strong>'.$field->label.' : </strong>';
          $html .= $field->content;
          $i++;
        }
      } elseif ($params['display'] == 'table') {
        // Display in table format
        $html .= '<table class="extrafield-table" cellspacing="'.$params['table']['cellspacing'].'" cellpadding="'.$params['table']['cellpadding'].'" border="'.$params['table']['border'].'">';
 
        $html .= "<tr>";
        $itemsInRow = 0;
        $maxItemsInRow = $params['table']['maxItemsInRow'];
        foreach ($fields as $field) {
          //$html.= !empty($html)?'<br>':'';
          if ($itemsInRow >= $maxItemsInRow) {
            // start a new line
            $html .= "</tr><tr>";
            $itemsInRow = 0;
          }
 
          // for some type we need line break
          if (in_array($field->type, $params['table']['arrayOfLineBreakType'])) {
            if ($itemsInRow > 0) {
              // close table row and empty cols
              for ($i = $itemsInRow; $i <= $maxItemsInRow; $i++) {
                $html .= "<td></td><td></td>";
              }
              $html .= "</tr>";
 
              // start a new line
              $html .= "<tr>";
            }
 
            $itemsInRow = $maxItemsInRow;
            $html .= '<td colspan="'.($maxItemsInRow * 2 - 1).'">';
            $html .= '<strong>'.$field->label.' :</strong> ';
            $html .= $field->content;
            $html .= "</td>";
          } else {
            $itemsInRow++;
            $html .= '<td width="'.$params['table']['labelcolwidth'].'" class="extrafield-label">';
            $html .= '<strong>'.$field->label.' :</strong>';
            $html .= "</td>";
 
 
            $html .= '<td  class="extrafield-content">';
            $html .= $field->content;
            $html .= "</td>";
          }
        }
        $html .= "</tr>";
 
        $html .= '</table>';
      }
    }
 
    return $html;
  }
 
 
  public function getColumnStatus($colKey)
  {
    if (!empty($this->cols[$colKey]['status'])) {
      return true;
    } else {
      return  false;
    }
  }
 
  public function pdfTabTitles(&$pdf, $tab_top, $tab_height, $outputlangs, $hidetop = 0)
  {
    global $hookmanager, $conf;
 
    foreach ($this->cols as $colKey => $colDef) {
      $parameters = array(
        'colKey' => $colKey,
        'pdf' => $pdf,
        'outputlangs' => $outputlangs,
        'tab_top' => $tab_top,
        'tab_height' => $tab_height,
        'hidetop' => $hidetop
      );
 
      $reshook = $hookmanager->executeHooks('pdfTabTitles', $parameters, $this); // Note that $object may have been modified by hook
      if ($reshook < 0) {
        setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
      } elseif (empty($reshook)) {
        if (!$this->getColumnStatus($colKey)) {
          continue;
        }
 
        // get title label
        $colDef['title']['label'] = !empty($colDef['title']['label']) ? $colDef['title']['label'] : $outputlangs->transnoentities($colDef['title']['textkey']);
 
        // Add column separator
        if (!empty($colDef['border-left']) && isset($colDef['xStartPos'])) {
          $pdf->line($colDef['xStartPos'], $tab_top, $colDef['xStartPos'], $tab_top + $tab_height);
        }
 
        if (empty($hidetop)) {
          // save curent cell padding
          $curentCellPaddinds = $pdf->getCellPaddings();
 
          // Add space for lines (more if we need to show a second alternative language)
          global $outputlangsbis;
          if (is_object($outputlangsbis)) {
            // set cell padding with column title definition
            $pdf->setCellPaddings($colDef['title']['padding'][3], $colDef['title']['padding'][0], $colDef['title']['padding'][1], 0.5);
          } else {
            // set cell padding with column title definition
            $pdf->setCellPaddings($colDef['title']['padding'][3], $colDef['title']['padding'][0], $colDef['title']['padding'][1], $colDef['title']['padding'][2]);
          }
          if (isset($colDef['title']['align'])) {
            $align = $colDef['title']['align'];
          } else {
            $align = '';
          }
          $pdf->SetXY($colDef['xStartPos'], $tab_top);
          $textWidth = $colDef['width'];
          $pdf->MultiCell($textWidth, 2, $colDef['title']['label'], '', $align);
 
          // Add variant of translation if $outputlangsbis is an object
          if (is_object($outputlangsbis) && trim($colDef['title']['label'])) {
            $pdf->setCellPaddings($colDef['title']['padding'][3], 0, $colDef['title']['padding'][1], $colDef['title']['padding'][2]);
            $pdf->SetXY($colDef['xStartPos'], $pdf->GetY());
            $textbis = $outputlangsbis->transnoentities($colDef['title']['textkey']);
            $pdf->MultiCell($textWidth, 2, $textbis, '', $align);
          }
 
          $this->tabTitleHeight = max($pdf->GetY() - $tab_top, $this->tabTitleHeight);
 
          // restore cell padding
          $pdf->setCellPaddings($curentCellPaddinds['L'], $curentCellPaddinds['T'], $curentCellPaddinds['R'], $curentCellPaddinds['B']);
        }
      }
    }
 
    return $this->tabTitleHeight;
  }
 
 
 
  public function defineColumnExtrafield($object, $outputlangs, $hidedetails = 0)
  {
    if (!empty($hidedetails)) {
      return 0;
    }
 
    if (empty($object->table_element)) {
      return 0;
    }
 
    // Load extra fields if they haven't been loaded already.
    if (empty($this->extrafieldsCache)) {
      $this->extrafieldsCache = new ExtraFields($this->db);
    }
    if (empty($this->extrafieldsCache->attributes[$object->table_element])) {
      $this->extrafieldsCache->fetch_name_optionals_label($object->table_element);
    }
    $extrafields = $this->extrafieldsCache;
 
 
    if (!empty($extrafields->attributes[$object->table_element]) && is_array($extrafields->attributes[$object->table_element]) && array_key_exists('label', $extrafields->attributes[$object->table_element]) && is_array($extrafields->attributes[$object->table_element]['label'])) {
      foreach ($extrafields->attributes[$object->table_element]['label'] as $key => $label) {
        // Dont display separator yet even is set to be displayed (not compatible yet)
        if ($extrafields->attributes[$object->table_element]['type'][$key] == 'separate') {
          continue;
        }
 
        // Enable extrafield ?
        $enabled = 0;
        if (!empty($extrafields->attributes[$object->table_element]['printable'][$key])) {
          $printable = intval($extrafields->attributes[$object->table_element]['printable'][$key]);
          if ($printable === 1 || $printable === 2) {
            $enabled = 1;
          }
          // Note : if $printable === 3 or 4 so, it's displayed after line description not in cols
        }
 
        if (!$enabled) {
          continue;
        } // don't wast resourses if we don't need them...
 
        // Load language if required
        if (!empty($extrafields->attributes[$object->table_element]['langfile'][$key])) {
          $outputlangs->load($extrafields->attributes[$object->table_element]['langfile'][$key]);
        }
 
        // TODO : add more extrafield customisation capacities for PDF like width, rank...
 
        // set column definition
        $def = array(
          'rank' => intval($extrafields->attributes[$object->table_element]['pos'][$key]),
          'width' => 25, // in mm
          'status' => boolval($enabled),
          'title' => array(
            'label' => $outputlangs->transnoentities($label)
          ),
          'content' => array(
            'align' => 'C'
          ),
          'border-left' => true, // add left line separator
        );
 
        $alignTypeRight = array('double', 'int', 'price');
        if (in_array($extrafields->attributes[$object->table_element]['type'][$key], $alignTypeRight)) {
          $def['content']['align'] = 'R';
        }
 
        $alignTypeLeft = array('text', 'html');
        if (in_array($extrafields->attributes[$object->table_element]['type'][$key], $alignTypeLeft)) {
          $def['content']['align'] = 'L';
        }
 
 
        // for extrafields we use rank of extrafield to place it on PDF
        $this->insertNewColumnDef("options_".$key, $def);
      }
    }
 
    return 1;
  }
}