f377456132
The global configuration variable PDF_BOLD_PRODUCT_LABEL is checked to put the product label in bold in the PDF templates. This modification is based on the same behaviour for the product reference, found at line 1373 of the same file. The products table of the invoices / commercial propositions is produced in the PDF library, hence we have to modify this library to style the invoices. Producing a new template would mean duplicating code from the library with the maintenace implications.
2276 lines
98 KiB
PHP
2276 lines
98 KiB
PHP
<?php
|
|
/* Copyright (C) 2006-2017 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2007 Patrick Raguin <patrick.raguin@gmail.com>
|
|
* Copyright (C) 2010-2012 Regis Houssin <regis.houssin@inodbox.com>
|
|
* Copyright (C) 2010-2017 Juanjo Menent <jmenent@2byte.es>
|
|
* Copyright (C) 2012 Christophe Battarel <christophe.battarel@altairis.fr>
|
|
* Copyright (C) 2012 Cédric Salvador <csalvador@gpcsolutions.fr>
|
|
* Copyright (C) 2012-2015 Raphaël Doursenaud <rdoursenaud@gpcsolutions.fr>
|
|
* Copyright (C) 2014 Cedric GROSS <c.gross@kreiz-it.fr>
|
|
* Copyright (C) 2014 Teddy Andreotti <125155@supinfo.com>
|
|
* Copyright (C) 2015-2016 Marcos García <marcosgdf@gmail.com>
|
|
* Copyright (C) 2019 Lenin Rivas <lenin.rivas@servcom-it.com>
|
|
* Copyright (C) 2020 Nicolas ZABOURI <info@inovea-conseil.com>
|
|
*
|
|
* 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/
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/core/lib/pdf.lib.php
|
|
* \brief Set of functions used for PDF generation
|
|
* \ingroup core
|
|
*/
|
|
|
|
|
|
/**
|
|
* Return array with format properties of default PDF format
|
|
*
|
|
* @param Translate $outputlangs Output lang to use to autodetect output format if we need 'auto' detection
|
|
* @param string $mode 'setup' = Use setup, 'auto' = Force autodetection whatever is setup
|
|
* @return array Array('width'=>w,'height'=>h,'unit'=>u);
|
|
*/
|
|
function pdf_getFormat(Translate $outputlangs = null, $mode = 'setup')
|
|
{
|
|
global $conf, $db, $langs;
|
|
|
|
dol_syslog("pdf_getFormat Get paper format with mode=".$mode." MAIN_PDF_FORMAT=".(empty($conf->global->MAIN_PDF_FORMAT) ? 'null' : $conf->global->MAIN_PDF_FORMAT)." outputlangs->defaultlang=".(is_object($outputlangs) ? $outputlangs->defaultlang : 'null')." and langs->defaultlang=".(is_object($langs) ? $langs->defaultlang : 'null'));
|
|
|
|
// Default value if setup was not done and/or entry into c_paper_format not defined
|
|
$width = 210; $height = 297; $unit = 'mm';
|
|
|
|
if ($mode == 'auto' || empty($conf->global->MAIN_PDF_FORMAT) || $conf->global->MAIN_PDF_FORMAT == 'auto')
|
|
{
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
|
|
$pdfformat = dol_getDefaultFormat($outputlangs);
|
|
} else {
|
|
$pdfformat = $conf->global->MAIN_PDF_FORMAT;
|
|
}
|
|
|
|
$sql = "SELECT code, label, width, height, unit FROM ".MAIN_DB_PREFIX."c_paper_format";
|
|
$sql .= " WHERE code = '".$db->escape($pdfformat)."'";
|
|
$resql = $db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$obj = $db->fetch_object($resql);
|
|
if ($obj)
|
|
{
|
|
$width = (int) $obj->width;
|
|
$height = (int) $obj->height;
|
|
$unit = $obj->unit;
|
|
}
|
|
}
|
|
|
|
//print "pdfformat=".$pdfformat." width=".$width." height=".$height." unit=".$unit;
|
|
return array('width'=>$width, 'height'=>$height, 'unit'=>$unit);
|
|
}
|
|
|
|
/**
|
|
* Return a PDF instance object. We create a FPDI instance that instantiate TCPDF.
|
|
*
|
|
* @param string $format Array(width,height). Keep empty to use default setup.
|
|
* @param string $metric Unit of format ('mm')
|
|
* @param string $pagetype 'P' or 'l'
|
|
* @return TCPDF PDF object
|
|
*/
|
|
function pdf_getInstance($format = '', $metric = 'mm', $pagetype = 'P')
|
|
{
|
|
global $conf;
|
|
|
|
// Define constant for TCPDF
|
|
if (!defined('K_TCPDF_EXTERNAL_CONFIG'))
|
|
{
|
|
define('K_TCPDF_EXTERNAL_CONFIG', 1); // this avoid using tcpdf_config file
|
|
define('K_PATH_CACHE', DOL_DATA_ROOT.'/admin/temp/');
|
|
define('K_PATH_URL_CACHE', DOL_DATA_ROOT.'/admin/temp/');
|
|
dol_mkdir(K_PATH_CACHE);
|
|
define('K_BLANK_IMAGE', '_blank.png');
|
|
define('PDF_PAGE_FORMAT', 'A4');
|
|
define('PDF_PAGE_ORIENTATION', 'P');
|
|
define('PDF_CREATOR', 'TCPDF');
|
|
define('PDF_AUTHOR', 'TCPDF');
|
|
define('PDF_HEADER_TITLE', 'TCPDF Example');
|
|
define('PDF_HEADER_STRING', "by Dolibarr ERP CRM");
|
|
define('PDF_UNIT', 'mm');
|
|
define('PDF_MARGIN_HEADER', 5);
|
|
define('PDF_MARGIN_FOOTER', 10);
|
|
define('PDF_MARGIN_TOP', 27);
|
|
define('PDF_MARGIN_BOTTOM', 25);
|
|
define('PDF_MARGIN_LEFT', 15);
|
|
define('PDF_MARGIN_RIGHT', 15);
|
|
define('PDF_FONT_NAME_MAIN', 'helvetica');
|
|
define('PDF_FONT_SIZE_MAIN', 10);
|
|
define('PDF_FONT_NAME_DATA', 'helvetica');
|
|
define('PDF_FONT_SIZE_DATA', 8);
|
|
define('PDF_FONT_MONOSPACED', 'courier');
|
|
define('PDF_IMAGE_SCALE_RATIO', 1.25);
|
|
define('HEAD_MAGNIFICATION', 1.1);
|
|
define('K_CELL_HEIGHT_RATIO', 1.25);
|
|
define('K_TITLE_MAGNIFICATION', 1.3);
|
|
define('K_SMALL_RATIO', 2 / 3);
|
|
define('K_THAI_TOPCHARS', true);
|
|
define('K_TCPDF_CALLS_IN_HTML', true);
|
|
if (!empty($conf->global->TCPDF_THROW_ERRORS_INSTEAD_OF_DIE)) {
|
|
define('K_TCPDF_THROW_EXCEPTION_ERROR', true);
|
|
} else {
|
|
define('K_TCPDF_THROW_EXCEPTION_ERROR', false);
|
|
}
|
|
}
|
|
|
|
// Load TCPDF
|
|
require_once TCPDF_PATH.'tcpdf.php';
|
|
|
|
// We need to instantiate tcpdi object (instead of tcpdf) to use merging features. But we can disable it (this will break all merge features).
|
|
if (empty($conf->global->MAIN_DISABLE_TCPDI)) require_once TCPDI_PATH.'tcpdi.php';
|
|
|
|
//$arrayformat=pdf_getFormat();
|
|
//$format=array($arrayformat['width'],$arrayformat['height']);
|
|
//$metric=$arrayformat['unit'];
|
|
|
|
$pdfa = false; // PDF-1.3
|
|
if (!empty($conf->global->PDF_USE_1A)) $pdfa = true; // PDF1/A
|
|
|
|
if (class_exists('TCPDI')) $pdf = new TCPDI($pagetype, $metric, $format, true, 'UTF-8', false, $pdfa);
|
|
else $pdf = new TCPDF($pagetype, $metric, $format, true, 'UTF-8', false, $pdfa);
|
|
|
|
// Protection and encryption of pdf
|
|
if (!empty($conf->global->PDF_SECURITY_ENCRYPTION))
|
|
{
|
|
/* Permission supported by TCPDF
|
|
- print : Print the document;
|
|
- modify : Modify the contents of the document by operations other than those controlled by 'fill-forms', 'extract' and 'assemble';
|
|
- copy : Copy or otherwise extract text and graphics from the document;
|
|
- annot-forms : Add or modify text annotations, fill in interactive form fields, and, if 'modify' is also set, create or modify interactive form fields (including signature fields);
|
|
- fill-forms : Fill in existing interactive form fields (including signature fields), even if 'annot-forms' is not specified;
|
|
- extract : Extract text and graphics (in support of accessibility to users with disabilities or for other purposes);
|
|
- assemble : Assemble the document (insert, rotate, or delete pages and create bookmarks or thumbnail images), even if 'modify' is not set;
|
|
- print-high : Print the document to a representation from which a faithful digital copy of the PDF content could be generated. When this is not set, printing is limited to a low-level representation of the appearance, possibly of degraded quality.
|
|
- owner : (inverted logic - only for public-key) when set permits change of encryption and enables all other permissions.
|
|
*/
|
|
|
|
// For TCPDF, we specify permission we want to block
|
|
$pdfrights = (!empty($conf->global->PDF_SECURITY_ENCRYPTION_RIGHTS) ?json_decode($conf->global->PDF_SECURITY_ENCRYPTION_RIGHTS, true) : array('modify', 'copy')); // Json format in llx_const
|
|
|
|
// Password for the end user
|
|
$pdfuserpass = (!empty($conf->global->PDF_SECURITY_ENCRYPTION_USERPASS) ? $conf->global->PDF_SECURITY_ENCRYPTION_USERPASS : '');
|
|
|
|
// Password of the owner, created randomly if not defined
|
|
$pdfownerpass = (!empty($conf->global->PDF_SECURITY_ENCRYPTION_OWNERPASS) ? $conf->global->PDF_SECURITY_ENCRYPTION_OWNERPASS : null);
|
|
|
|
// For encryption strength: 0 = RC4 40 bit; 1 = RC4 128 bit; 2 = AES 128 bit; 3 = AES 256 bit
|
|
$encstrength = (!empty($conf->global->PDF_SECURITY_ENCRYPTION_STRENGTH) ? $conf->global->PDF_SECURITY_ENCRYPTION_STRENGTH : 0);
|
|
|
|
// Array of recipients containing public-key certificates ('c') and permissions ('p').
|
|
// For example: array(array('c' => 'file://../examples/data/cert/tcpdf.crt', 'p' => array('print')))
|
|
$pubkeys = (!empty($conf->global->PDF_SECURITY_ENCRYPTION_PUBKEYS) ?json_decode($conf->global->PDF_SECURITY_ENCRYPTION_PUBKEYS, true) : null); // Json format in llx_const
|
|
|
|
$pdf->SetProtection($pdfrights, $pdfuserpass, $pdfownerpass, $encstrength, $pubkeys);
|
|
}
|
|
|
|
return $pdf;
|
|
}
|
|
|
|
/**
|
|
* Return if pdf file is protected/encrypted
|
|
*
|
|
* @param string $pathoffile Path of file
|
|
* @return boolean True or false
|
|
*/
|
|
function pdf_getEncryption($pathoffile)
|
|
{
|
|
require_once TCPDF_PATH.'tcpdf_parser.php';
|
|
|
|
$isencrypted = false;
|
|
|
|
$content = file_get_contents($pathoffile);
|
|
|
|
//ob_start();
|
|
@($parser = new \TCPDF_PARSER(ltrim($content)));
|
|
list($xref, $data) = $parser->getParsedData();
|
|
unset($parser);
|
|
//ob_end_clean();
|
|
|
|
if (isset($xref['trailer']['encrypt'])) {
|
|
$isencrypted = true; // Secured pdf file are currently not supported
|
|
}
|
|
|
|
if (empty($data)) {
|
|
$isencrypted = true; // Object list not found. Possible secured file
|
|
}
|
|
|
|
return $isencrypted;
|
|
}
|
|
|
|
/**
|
|
* Return font name to use for PDF generation
|
|
*
|
|
* @param Translate $outputlangs Output langs object
|
|
* @return string Name of font to use
|
|
*/
|
|
function pdf_getPDFFont($outputlangs)
|
|
{
|
|
global $conf;
|
|
|
|
if (!empty($conf->global->MAIN_PDF_FORCE_FONT)) return $conf->global->MAIN_PDF_FORCE_FONT;
|
|
|
|
$font = 'Helvetica'; // By default, for FPDI, or ISO language on TCPDF
|
|
if (class_exists('TCPDF')) // If TCPDF on, we can use an UTF8 one like DejaVuSans if required (slower)
|
|
{
|
|
if ($outputlangs->trans('FONTFORPDF') != 'FONTFORPDF')
|
|
{
|
|
$font = $outputlangs->trans('FONTFORPDF');
|
|
}
|
|
}
|
|
return $font;
|
|
}
|
|
|
|
/**
|
|
* Return font size to use for PDF generation
|
|
*
|
|
* @param Translate $outputlangs Output langs object
|
|
* @return int Size of font to use
|
|
*/
|
|
function pdf_getPDFFontSize($outputlangs)
|
|
{
|
|
global $conf;
|
|
|
|
$size = 10; // By default, for FPDI or ISO language on TCPDF
|
|
if (class_exists('TCPDF')) // If TCPDF on, we can use an UTF8 font like DejaVuSans if required (slower)
|
|
{
|
|
if ($outputlangs->trans('FONTSIZEFORPDF') != 'FONTSIZEFORPDF')
|
|
{
|
|
$size = (int) $outputlangs->trans('FONTSIZEFORPDF');
|
|
}
|
|
}
|
|
if (!empty($conf->global->MAIN_PDF_FORCE_FONT_SIZE)) $size = $conf->global->MAIN_PDF_FORCE_FONT_SIZE;
|
|
|
|
return $size;
|
|
}
|
|
|
|
|
|
/**
|
|
* Return height to use for Logo onto PDF
|
|
*
|
|
* @param string $logo Full path to logo file to use
|
|
* @param bool $url Image with url (true or false)
|
|
* @return number
|
|
*/
|
|
function pdf_getHeightForLogo($logo, $url = false)
|
|
{
|
|
global $conf;
|
|
$height = (empty($conf->global->MAIN_DOCUMENTS_LOGO_HEIGHT) ? 20 : $conf->global->MAIN_DOCUMENTS_LOGO_HEIGHT);
|
|
$maxwidth = 130;
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
|
|
$tmp = dol_getImageSize($logo, $url);
|
|
if ($tmp['height'])
|
|
{
|
|
$width = round($height * $tmp['width'] / $tmp['height']);
|
|
if ($width > $maxwidth) $height = $height * $maxwidth / $width;
|
|
}
|
|
//print $tmp['width'].' '.$tmp['height'].' '.$width; exit;
|
|
return $height;
|
|
}
|
|
|
|
/**
|
|
* Function to try to calculate height of a HTML Content
|
|
*
|
|
* @param TCPDF $pdf PDF initialized object
|
|
* @param string $htmlcontent HTML Contect
|
|
* @return int Height
|
|
* @see getStringHeight()
|
|
*/
|
|
function pdfGetHeightForHtmlContent(&$pdf, $htmlcontent)
|
|
{
|
|
// store current object
|
|
$pdf->startTransaction();
|
|
// store starting values
|
|
$start_y = $pdf->GetY();
|
|
//var_dump($start_y);
|
|
$start_page = $pdf->getPage();
|
|
// call printing functions with content
|
|
$pdf->writeHTMLCell(0, 0, 0, $start_y, $htmlcontent, 0, 1, false, true, 'J', true);
|
|
// get the new Y
|
|
$end_y = $pdf->GetY();
|
|
$end_page = $pdf->getPage();
|
|
// calculate height
|
|
$height = 0;
|
|
if ($end_page == $start_page) {
|
|
$height = $end_y - $start_y;
|
|
} else {
|
|
for ($page = $start_page; $page <= $end_page; ++$page) {
|
|
$pdf->setPage($page);
|
|
$tmpm = $pdf->getMargins();
|
|
$tMargin = $tmpm['top'];
|
|
if ($page == $start_page) {
|
|
// first page
|
|
$height = $pdf->getPageHeight() - $start_y - $pdf->getBreakMargin();
|
|
} elseif ($page == $end_page) {
|
|
// last page
|
|
$height = $end_y - $tMargin;
|
|
} else {
|
|
$height = $pdf->getPageHeight() - $tMargin - $pdf->getBreakMargin();
|
|
}
|
|
}
|
|
}
|
|
// restore previous object
|
|
$pdf = $pdf->rollbackTransaction();
|
|
|
|
return $height;
|
|
}
|
|
|
|
|
|
/**
|
|
* Returns the name of the thirdparty
|
|
*
|
|
* @param Societe|Contact $thirdparty Contact or thirdparty
|
|
* @param Translate $outputlangs Output language
|
|
* @param int $includealias 1=Include alias name after name
|
|
* @return string String with name of thirdparty (+ alias if requested)
|
|
*/
|
|
function pdfBuildThirdpartyName($thirdparty, Translate $outputlangs, $includealias = 0)
|
|
{
|
|
global $conf;
|
|
|
|
// Recipient name
|
|
$socname = '';
|
|
|
|
if ($thirdparty instanceof Societe) {
|
|
$socname .= $thirdparty->name;
|
|
if (($includealias || !empty($conf->global->PDF_INCLUDE_ALIAS_IN_THIRDPARTY_NAME)) && !empty($thirdparty->name_alias)) {
|
|
$socname .= " - ".$thirdparty->name_alias;
|
|
}
|
|
} elseif ($thirdparty instanceof Contact) {
|
|
$socname = $thirdparty->socname;
|
|
} else {
|
|
throw new InvalidArgumentException('Parameter 1 $thirdparty is not a Societe nor Contact');
|
|
}
|
|
|
|
return $outputlangs->convToOutputCharset($socname);
|
|
}
|
|
|
|
|
|
/**
|
|
* Return a string with full address formated for output on documents
|
|
*
|
|
* @param Translate $outputlangs Output langs object
|
|
* @param Societe $sourcecompany Source company object
|
|
* @param Societe|string|null $targetcompany Target company object
|
|
* @param Contact|string|null $targetcontact Target contact object
|
|
* @param int $usecontact Use contact instead of company
|
|
* @param string $mode Address type ('source', 'target', 'targetwithdetails', 'targetwithdetails_xxx': target but include also phone/fax/email/url)
|
|
* @param Object $object Object we want to build document for
|
|
* @return string String with full address
|
|
*/
|
|
function pdf_build_address($outputlangs, $sourcecompany, $targetcompany = '', $targetcontact = '', $usecontact = 0, $mode = 'source', $object = null)
|
|
{
|
|
global $conf, $hookmanager;
|
|
|
|
if ($mode == 'source' && !is_object($sourcecompany)) return -1;
|
|
if ($mode == 'target' && !is_object($targetcompany)) return -1;
|
|
|
|
if (!empty($sourcecompany->state_id) && empty($sourcecompany->state)) $sourcecompany->state = getState($sourcecompany->state_id);
|
|
if (!empty($targetcompany->state_id) && empty($targetcompany->state)) $targetcompany->state = getState($targetcompany->state_id);
|
|
|
|
$reshook = 0;
|
|
$stringaddress = '';
|
|
if (is_object($hookmanager))
|
|
{
|
|
$parameters = array('sourcecompany' => &$sourcecompany, 'targetcompany' => &$targetcompany, 'targetcontact' => &$targetcontact, 'outputlangs' => $outputlangs, 'mode' => $mode, 'usecontact' => $usecontact);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_build_address', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
$stringaddress .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if ($mode == 'source')
|
|
{
|
|
$withCountry = 0;
|
|
if (!empty($sourcecompany->country_code) && ($targetcompany->country_code != $sourcecompany->country_code)) $withCountry = 1;
|
|
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->convToOutputCharset(dol_format_address($sourcecompany, $withCountry, "\n", $outputlangs))."\n";
|
|
|
|
if (empty($conf->global->MAIN_PDF_DISABLESOURCEDETAILS))
|
|
{
|
|
// Phone
|
|
if ($sourcecompany->phone) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("PhoneShort").": ".$outputlangs->convToOutputCharset($sourcecompany->phone);
|
|
// Fax
|
|
if ($sourcecompany->fax) $stringaddress .= ($stringaddress ? ($sourcecompany->phone ? " - " : "\n") : '').$outputlangs->transnoentities("Fax").": ".$outputlangs->convToOutputCharset($sourcecompany->fax);
|
|
// EMail
|
|
if ($sourcecompany->email) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Email").": ".$outputlangs->convToOutputCharset($sourcecompany->email);
|
|
// Web
|
|
if ($sourcecompany->url) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Web").": ".$outputlangs->convToOutputCharset($sourcecompany->url);
|
|
}
|
|
// Intra VAT
|
|
if (!empty($conf->global->MAIN_TVAINTRA_IN_SOURCE_ADDRESS))
|
|
{
|
|
if ($sourcecompany->tva_intra) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("VATIntraShort").': '.$outputlangs->convToOutputCharset($sourcecompany->tva_intra);
|
|
}
|
|
// Professionnal Ids
|
|
$reg = array();
|
|
if (!empty($conf->global->MAIN_PROFID1_IN_SOURCE_ADDRESS) && !empty($sourcecompany->idprof1))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId1", $sourcecompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($sourcecompany->idprof1);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID2_IN_SOURCE_ADDRESS) && !empty($sourcecompany->idprof2))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId2", $sourcecompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($sourcecompany->idprof2);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID3_IN_SOURCE_ADDRESS) && !empty($sourcecompany->idprof3))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId3", $sourcecompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($sourcecompany->idprof3);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID4_IN_SOURCE_ADDRESS) && !empty($sourcecompany->idprof4))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId4", $sourcecompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($sourcecompany->idprof4);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID5_IN_SOURCE_ADDRESS) && !empty($sourcecompany->idprof5))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId5", $sourcecompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($sourcecompany->idprof5);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID6_IN_SOURCE_ADDRESS) && !empty($sourcecompany->idprof6))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId6", $sourcecompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($sourcecompany->idprof6);
|
|
}
|
|
if (!empty($conf->global->PDF_ADD_MORE_AFTER_SOURCE_ADDRESS)) {
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$conf->global->PDF_ADD_MORE_AFTER_SOURCE_ADDRESS;
|
|
}
|
|
}
|
|
|
|
if ($mode == 'target' || preg_match('/targetwithdetails/', $mode))
|
|
{
|
|
if ($usecontact)
|
|
{
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->convToOutputCharset($targetcontact->getFullName($outputlangs, 1));
|
|
|
|
if (!empty($targetcontact->address)) {
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->convToOutputCharset(dol_format_address($targetcontact));
|
|
} else {
|
|
$companytouseforaddress = $targetcompany;
|
|
|
|
// Contact on a thirdparty that is a different thirdparty than the thirdparty of object
|
|
if ($targetcontact->socid > 0 && $targetcontact->socid != $targetcompany->id)
|
|
{
|
|
$targetcontact->fetch_thirdparty();
|
|
$companytouseforaddress = $targetcontact->thirdparty;
|
|
}
|
|
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->convToOutputCharset(dol_format_address($companytouseforaddress));
|
|
}
|
|
// Country
|
|
if (!empty($targetcontact->country_code) && $targetcontact->country_code != $sourcecompany->country_code) {
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->convToOutputCharset($outputlangs->transnoentitiesnoconv("Country".$targetcontact->country_code));
|
|
} elseif (empty($targetcontact->country_code) && !empty($targetcompany->country_code) && ($targetcompany->country_code != $sourcecompany->country_code)) {
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->convToOutputCharset($outputlangs->transnoentitiesnoconv("Country".$targetcompany->country_code));
|
|
}
|
|
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || preg_match('/targetwithdetails/', $mode))
|
|
{
|
|
// Phone
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || $mode == 'targetwithdetails' || preg_match('/targetwithdetails_phone/', $mode))
|
|
{
|
|
if (!empty($targetcontact->phone_pro) || !empty($targetcontact->phone_mobile)) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Phone").": ";
|
|
if (!empty($targetcontact->phone_pro)) $stringaddress .= $outputlangs->convToOutputCharset($targetcontact->phone_pro);
|
|
if (!empty($targetcontact->phone_pro) && !empty($targetcontact->phone_mobile)) $stringaddress .= " / ";
|
|
if (!empty($targetcontact->phone_mobile)) $stringaddress .= $outputlangs->convToOutputCharset($targetcontact->phone_mobile);
|
|
}
|
|
// Fax
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || $mode == 'targetwithdetails' || preg_match('/targetwithdetails_fax/', $mode))
|
|
{
|
|
if ($targetcontact->fax) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Fax").": ".$outputlangs->convToOutputCharset($targetcontact->fax);
|
|
}
|
|
// EMail
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || $mode == 'targetwithdetails' || preg_match('/targetwithdetails_email/', $mode))
|
|
{
|
|
if ($targetcontact->email) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Email").": ".$outputlangs->convToOutputCharset($targetcontact->email);
|
|
}
|
|
// Web
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || $mode == 'targetwithdetails' || preg_match('/targetwithdetails_url/', $mode))
|
|
{
|
|
if ($targetcontact->url) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Web").": ".$outputlangs->convToOutputCharset($targetcontact->url);
|
|
}
|
|
}
|
|
} else {
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->convToOutputCharset(dol_format_address($targetcompany));
|
|
// Country
|
|
if (!empty($targetcompany->country_code) && $targetcompany->country_code != $sourcecompany->country_code) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->convToOutputCharset($outputlangs->transnoentitiesnoconv("Country".$targetcompany->country_code));
|
|
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || preg_match('/targetwithdetails/', $mode))
|
|
{
|
|
// Phone
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || $mode == 'targetwithdetails' || preg_match('/targetwithdetails_phone/', $mode))
|
|
{
|
|
if (!empty($targetcompany->phone) || !empty($targetcompany->phone_mobile)) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Phone").": ";
|
|
if (!empty($targetcompany->phone)) $stringaddress .= $outputlangs->convToOutputCharset($targetcompany->phone);
|
|
if (!empty($targetcompany->phone) && !empty($targetcompany->phone_mobile)) $stringaddress .= " / ";
|
|
if (!empty($targetcompany->phone_mobile)) $stringaddress .= $outputlangs->convToOutputCharset($targetcompany->phone_mobile);
|
|
}
|
|
// Fax
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || $mode == 'targetwithdetails' || preg_match('/targetwithdetails_fax/', $mode))
|
|
{
|
|
if ($targetcompany->fax) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Fax").": ".$outputlangs->convToOutputCharset($targetcompany->fax);
|
|
}
|
|
// EMail
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || $mode == 'targetwithdetails' || preg_match('/targetwithdetails_email/', $mode))
|
|
{
|
|
if ($targetcompany->email) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Email").": ".$outputlangs->convToOutputCharset($targetcompany->email);
|
|
}
|
|
// Web
|
|
if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS) || $mode == 'targetwithdetails' || preg_match('/targetwithdetails_url/', $mode))
|
|
{
|
|
if ($targetcompany->url) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("Web").": ".$outputlangs->convToOutputCharset($targetcompany->url);
|
|
}
|
|
}
|
|
}
|
|
|
|
// Intra VAT
|
|
if (empty($conf->global->MAIN_TVAINTRA_NOT_IN_ADDRESS))
|
|
{
|
|
if ($targetcompany->tva_intra) $stringaddress .= ($stringaddress ? "\n" : '').$outputlangs->transnoentities("VATIntraShort").': '.$outputlangs->convToOutputCharset($targetcompany->tva_intra);
|
|
}
|
|
|
|
// Professionnal Ids
|
|
if (!empty($conf->global->MAIN_PROFID1_IN_ADDRESS) && !empty($targetcompany->idprof1))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId1", $targetcompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($targetcompany->idprof1);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID2_IN_ADDRESS) && !empty($targetcompany->idprof2))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId2", $targetcompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($targetcompany->idprof2);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID3_IN_ADDRESS) && !empty($targetcompany->idprof3))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId3", $targetcompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($targetcompany->idprof3);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID4_IN_ADDRESS) && !empty($targetcompany->idprof4))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId4", $targetcompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($targetcompany->idprof4);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID5_IN_ADDRESS) && !empty($targetcompany->idprof5))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId5", $targetcompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($targetcompany->idprof5);
|
|
}
|
|
if (!empty($conf->global->MAIN_PROFID6_IN_ADDRESS) && !empty($targetcompany->idprof6))
|
|
{
|
|
$tmp = $outputlangs->transcountrynoentities("ProfId6", $targetcompany->country_code);
|
|
if (preg_match('/\((.+)\)/', $tmp, $reg)) $tmp = $reg[1];
|
|
$stringaddress .= ($stringaddress ? "\n" : '').$tmp.': '.$outputlangs->convToOutputCharset($targetcompany->idprof6);
|
|
}
|
|
|
|
// Public note
|
|
if (!empty($conf->global->MAIN_PUBLIC_NOTE_IN_ADDRESS))
|
|
{
|
|
if ($mode == 'source' && !empty($sourcecompany->note_public))
|
|
{
|
|
$stringaddress .= ($stringaddress ? "\n" : '').dol_string_nohtmltag($sourcecompany->note_public);
|
|
}
|
|
if (($mode == 'target' || preg_match('/targetwithdetails/', $mode)) && !empty($targetcompany->note_public))
|
|
{
|
|
$stringaddress .= ($stringaddress ? "\n" : '').dol_string_nohtmltag($targetcompany->note_public);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
return $stringaddress;
|
|
}
|
|
|
|
|
|
/**
|
|
* Show header of page for PDF generation
|
|
*
|
|
* @param TCPDF $pdf Object PDF
|
|
* @param Translate $outputlangs Object lang for output
|
|
* @param int $page_height Height of page
|
|
* @return void
|
|
*/
|
|
function pdf_pagehead(&$pdf, $outputlangs, $page_height)
|
|
{
|
|
global $conf;
|
|
|
|
// Add a background image on document
|
|
if (!empty($conf->global->MAIN_USE_BACKGROUND_ON_PDF)) // Warning, this option make TCPDF generation being crazy and some content disappeared behind the image
|
|
{
|
|
$pdf->SetAutoPageBreak(0, 0); // Disable auto pagebreak before adding image
|
|
$pdf->Image($conf->mycompany->dir_output.'/logos/'.$conf->global->MAIN_USE_BACKGROUND_ON_PDF, (isset($conf->global->MAIN_USE_BACKGROUND_ON_PDF_X) ? $conf->global->MAIN_USE_BACKGROUND_ON_PDF_X : 0), (isset($conf->global->MAIN_USE_BACKGROUND_ON_PDF_Y) ? $conf->global->MAIN_USE_BACKGROUND_ON_PDF_Y : 0), 0, $page_height);
|
|
$pdf->SetAutoPageBreak(1, 0); // Restore pagebreak
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Return array of possible substitutions for PDF content (without external module substitutions).
|
|
*
|
|
* @param Translate $outputlangs Output language
|
|
* @param array $exclude Array of family keys we want to exclude. For example array('mycompany', 'object', 'date', 'user', ...)
|
|
* @param Object $object Object
|
|
* @param int $onlykey 1=Do not calculate some heavy values of keys (performance enhancement when we need only the keys), 2=Values are truncated and html sanitized (to use for help tooltip)
|
|
* @return array Array of substitutions
|
|
*/
|
|
function pdf_getSubstitutionArray($outputlangs, $exclude = null, $object = null, $onlykey = 0)
|
|
{
|
|
$substitutionarray = getCommonSubstitutionArray($outputlangs, $onlykey, $exclude, $object);
|
|
$substitutionarray['__FROM_NAME__'] = '__FROM_NAME__';
|
|
$substitutionarray['__FROM_EMAIL__'] = '__FROM_EMAIL__';
|
|
return $substitutionarray;
|
|
}
|
|
|
|
|
|
/**
|
|
* Add a draft watermark on PDF files
|
|
*
|
|
* @param TCPDF $pdf Object PDF
|
|
* @param Translate $outputlangs Object lang
|
|
* @param int $h Height of PDF
|
|
* @param int $w Width of PDF
|
|
* @param string $unit Unit of height (mm, pt, ...)
|
|
* @param string $text Text to show
|
|
* @return void
|
|
*/
|
|
function pdf_watermark(&$pdf, $outputlangs, $h, $w, $unit, $text)
|
|
{
|
|
global $langs, $mysoc, $user;
|
|
|
|
// Print Draft Watermark
|
|
if ($unit == 'pt') $k = 1;
|
|
elseif ($unit == 'mm') $k = 72 / 25.4;
|
|
elseif ($unit == 'cm') $k = 72 / 2.54;
|
|
elseif ($unit == 'in') $k = 72;
|
|
|
|
// Make substitution
|
|
$substitutionarray = pdf_getSubstitutionArray($outputlangs, null, null);
|
|
complete_substitutions_array($substitutionarray, $outputlangs, null);
|
|
$text = make_substitutions($text, $substitutionarray, $outputlangs);
|
|
$text = $outputlangs->convToOutputCharset($text);
|
|
|
|
$savx = $pdf->getX(); $savy = $pdf->getY();
|
|
|
|
$watermark_angle = atan($h / $w) / 2;
|
|
$watermark_x_pos = 0;
|
|
$watermark_y_pos = $h / 3;
|
|
$watermark_x = $w / 2;
|
|
$watermark_y = $h / 3;
|
|
$pdf->SetFont('', 'B', 40);
|
|
$pdf->SetTextColor(255, 192, 203);
|
|
//rotate
|
|
$pdf->_out(sprintf('q %.5F %.5F %.5F %.5F %.2F %.2F cm 1 0 0 1 %.2F %.2F cm', cos($watermark_angle), sin($watermark_angle), -sin($watermark_angle), cos($watermark_angle), $watermark_x * $k, ($h - $watermark_y) * $k, -$watermark_x * $k, -($h - $watermark_y) * $k));
|
|
//print watermark
|
|
$pdf->SetXY($watermark_x_pos, $watermark_y_pos);
|
|
$pdf->Cell($w - 20, 25, $outputlangs->convToOutputCharset($text), "", 2, "C", 0);
|
|
//antirotate
|
|
$pdf->_out('Q');
|
|
|
|
$pdf->SetXY($savx, $savy);
|
|
}
|
|
|
|
|
|
/**
|
|
* Show bank informations for PDF generation
|
|
*
|
|
* @param TCPDF $pdf Object PDF
|
|
* @param Translate $outputlangs Object lang
|
|
* @param int $curx X
|
|
* @param int $cury Y
|
|
* @param Account $account Bank account object
|
|
* @param int $onlynumber Output only number (bank+desk+key+number according to country, but without name of bank and domiciliation)
|
|
* @param int $default_font_size Default font size
|
|
* @return float The Y PDF position
|
|
*/
|
|
function pdf_bank(&$pdf, $outputlangs, $curx, $cury, $account, $onlynumber = 0, $default_font_size = 10)
|
|
{
|
|
global $mysoc, $conf;
|
|
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formbank.class.php';
|
|
|
|
$diffsizetitle = (empty($conf->global->PDF_DIFFSIZE_TITLE) ? 3 : $conf->global->PDF_DIFFSIZE_TITLE);
|
|
$diffsizecontent = (empty($conf->global->PDF_DIFFSIZE_CONTENT) ? 4 : $conf->global->PDF_DIFFSIZE_CONTENT);
|
|
$pdf->SetXY($curx, $cury);
|
|
|
|
if (empty($onlynumber))
|
|
{
|
|
$pdf->SetFont('', 'B', $default_font_size - $diffsizetitle);
|
|
$pdf->MultiCell(100, 3, $outputlangs->transnoentities('PaymentByTransferOnThisBankAccount').':', 0, 'L', 0);
|
|
$cury += 4;
|
|
}
|
|
|
|
$outputlangs->load("banks");
|
|
|
|
// Use correct name of bank id according to country
|
|
$bickey = "BICNumber";
|
|
if ($account->getCountryCode() == 'IN') $bickey = "SWIFT";
|
|
|
|
// Get format of bank account according to its country
|
|
$usedetailedbban = $account->useDetailedBBAN();
|
|
|
|
//$onlynumber=0; $usedetailedbban=1; // For tests
|
|
if ($usedetailedbban)
|
|
{
|
|
$savcurx = $curx;
|
|
|
|
if (empty($onlynumber))
|
|
{
|
|
$pdf->SetFont('', '', $default_font_size - $diffsizecontent);
|
|
$pdf->SetXY($curx, $cury);
|
|
$pdf->MultiCell(100, 3, $outputlangs->transnoentities("Bank").': '.$outputlangs->convToOutputCharset($account->bank), 0, 'L', 0);
|
|
$cury += 3;
|
|
}
|
|
|
|
if (empty($conf->global->PDF_BANK_HIDE_NUMBER_SHOW_ONLY_BICIBAN)) // Note that some countries still need bank number, BIC/IBAN not enougth for them
|
|
{
|
|
// Note:
|
|
// bank = code_banque (FR), sort code (GB, IR. Example: 12-34-56)
|
|
// desk = code guichet (FR), used only when $usedetailedbban = 1
|
|
// number = account number
|
|
// key = check control key used only when $usedetailedbban = 1
|
|
if (empty($onlynumber)) $pdf->line($curx + 1, $cury + 1, $curx + 1, $cury + 6);
|
|
|
|
|
|
foreach ($account->getFieldsToShow() as $val)
|
|
{
|
|
$pdf->SetXY($curx, $cury + 4);
|
|
$pdf->SetFont('', '', $default_font_size - 3);
|
|
|
|
if ($val == 'BankCode') {
|
|
// Bank code
|
|
$tmplength = 18;
|
|
$content = $account->code_banque;
|
|
} elseif ($val == 'DeskCode') {
|
|
// Desk
|
|
$tmplength = 18;
|
|
$content = $account->code_guichet;
|
|
} elseif ($val == 'BankAccountNumber') {
|
|
// Number
|
|
$tmplength = 24;
|
|
$content = $account->number;
|
|
} elseif ($val == 'BankAccountNumberKey') {
|
|
// Key
|
|
$tmplength = 15;
|
|
$content = $account->cle_rib;
|
|
} elseif ($val == 'IBAN' || $val == 'BIC') {
|
|
// Key
|
|
$tmplength = 0;
|
|
$content = '';
|
|
} else {
|
|
dol_print_error($account->db, 'Unexpected value for getFieldsToShow: '.$val);
|
|
break;
|
|
}
|
|
|
|
$pdf->MultiCell($tmplength, 3, $outputlangs->convToOutputCharset($content), 0, 'C', 0);
|
|
$pdf->SetXY($curx, $cury + 1);
|
|
$curx += $tmplength;
|
|
$pdf->SetFont('', 'B', $default_font_size - $diffsizecontent);
|
|
$pdf->MultiCell($tmplength, 3, $outputlangs->transnoentities($val), 0, 'C', 0);
|
|
if (empty($onlynumber)) {
|
|
$pdf->line($curx, $cury + 1, $curx, $cury + 7);
|
|
}
|
|
}
|
|
|
|
$curx = $savcurx;
|
|
$cury += 8;
|
|
}
|
|
} else {
|
|
$pdf->SetFont('', 'B', $default_font_size - $diffsizecontent);
|
|
$pdf->SetXY($curx, $cury);
|
|
$pdf->MultiCell(100, 3, $outputlangs->transnoentities("Bank").': '.$outputlangs->convToOutputCharset($account->bank), 0, 'L', 0);
|
|
$cury += 3;
|
|
|
|
$pdf->SetFont('', 'B', $default_font_size - $diffsizecontent);
|
|
$pdf->SetXY($curx, $cury);
|
|
$pdf->MultiCell(100, 3, $outputlangs->transnoentities("BankAccountNumber").': '.$outputlangs->convToOutputCharset($account->number), 0, 'L', 0);
|
|
$cury += 3;
|
|
|
|
if ($diffsizecontent <= 2) $cury += 1;
|
|
}
|
|
|
|
$pdf->SetFont('', '', $default_font_size - $diffsizecontent);
|
|
|
|
if (empty($onlynumber) && !empty($account->domiciliation))
|
|
{
|
|
$pdf->SetXY($curx, $cury);
|
|
$val = $outputlangs->transnoentities("Residence").': '.$outputlangs->convToOutputCharset($account->domiciliation);
|
|
$pdf->MultiCell(100, 3, $val, 0, 'L', 0);
|
|
//$nboflines=dol_nboflines_bis($val,120);
|
|
//$cury+=($nboflines*3)+2;
|
|
$tmpy = $pdf->getStringHeight(100, $val);
|
|
$cury += $tmpy;
|
|
}
|
|
|
|
if (!empty($account->proprio))
|
|
{
|
|
$pdf->SetXY($curx, $cury);
|
|
$val = $outputlangs->transnoentities("BankAccountOwner").': '.$outputlangs->convToOutputCharset($account->proprio);
|
|
$pdf->MultiCell(100, 3, $val, 0, 'L', 0);
|
|
$tmpy = $pdf->getStringHeight(100, $val);
|
|
$cury += $tmpy;
|
|
$cur += 1;
|
|
} elseif (!$usedetailedbban) $cury += 1;
|
|
|
|
// Use correct name of bank id according to country
|
|
$ibankey = FormBank::getIBANLabel($account);
|
|
|
|
if (!empty($account->iban))
|
|
{
|
|
//Remove whitespaces to ensure we are dealing with the format we expect
|
|
$ibanDisplay_temp = str_replace(' ', '', $outputlangs->convToOutputCharset($account->iban));
|
|
$ibanDisplay = "";
|
|
|
|
$nbIbanDisplay_temp = dol_strlen($ibanDisplay_temp);
|
|
for ($i = 0; $i < $nbIbanDisplay_temp; $i++)
|
|
{
|
|
$ibanDisplay .= $ibanDisplay_temp[$i];
|
|
if ($i % 4 == 3 && $i > 0) $ibanDisplay .= " ";
|
|
}
|
|
|
|
$pdf->SetFont('', 'B', $default_font_size - 3);
|
|
$pdf->SetXY($curx, $cury);
|
|
$pdf->MultiCell(100, 3, $outputlangs->transnoentities($ibankey).': '.$ibanDisplay, 0, 'L', 0);
|
|
$cury += 3;
|
|
}
|
|
|
|
if (!empty($account->bic))
|
|
{
|
|
$pdf->SetFont('', 'B', $default_font_size - 3);
|
|
$pdf->SetXY($curx, $cury);
|
|
$pdf->MultiCell(100, 3, $outputlangs->transnoentities($bickey).': '.$outputlangs->convToOutputCharset($account->bic), 0, 'L', 0);
|
|
}
|
|
|
|
return $pdf->getY();
|
|
}
|
|
|
|
/**
|
|
* Show footer of page for PDF generation
|
|
*
|
|
* @param TCPDF $pdf The PDF factory
|
|
* @param Translate $outputlangs Object lang for output
|
|
* @param string $paramfreetext Constant name of free text
|
|
* @param Societe $fromcompany Object company
|
|
* @param int $marge_basse Margin bottom we use for the autobreak
|
|
* @param int $marge_gauche Margin left (no more used)
|
|
* @param int $page_hauteur Page height (no more used)
|
|
* @param Object $object Object shown in PDF
|
|
* @param int $showdetails Show company adress details into footer (0=Nothing, 1=Show address, 2=Show managers, 3=Both)
|
|
* @param int $hidefreetext 1=Hide free text, 0=Show free text
|
|
* @return int Return height of bottom margin including footer text
|
|
*/
|
|
function pdf_pagefoot(&$pdf, $outputlangs, $paramfreetext, $fromcompany, $marge_basse, $marge_gauche, $page_hauteur, $object, $showdetails = 0, $hidefreetext = 0)
|
|
{
|
|
global $conf, $user, $mysoc;
|
|
|
|
$outputlangs->load("dict");
|
|
$line = '';
|
|
|
|
$dims = $pdf->getPageDimensions();
|
|
|
|
// Line of free text
|
|
if (empty($hidefreetext) && !empty($conf->global->$paramfreetext))
|
|
{
|
|
$substitutionarray = pdf_getSubstitutionArray($outputlangs, null, $object);
|
|
// More substitution keys
|
|
$substitutionarray['__FROM_NAME__'] = $fromcompany->name;
|
|
$substitutionarray['__FROM_EMAIL__'] = $fromcompany->email;
|
|
complete_substitutions_array($substitutionarray, $outputlangs, $object);
|
|
$newfreetext = make_substitutions($conf->global->$paramfreetext, $substitutionarray, $outputlangs);
|
|
|
|
// Make a change into HTML code to allow to include images from medias directory.
|
|
// <img alt="" src="/dolibarr_dev/htdocs/viewimage.php?modulepart=medias&entity=1&file=image/ldestailleur_166x166.jpg" style="height:166px; width:166px" />
|
|
// become
|
|
// <img alt="" src="'.DOL_DATA_ROOT.'/medias/image/ldestailleur_166x166.jpg" style="height:166px; width:166px" />
|
|
$newfreetext = preg_replace('/(<img.*src=")[^\"]*viewimage\.php[^\"]*modulepart=medias[^\"]*file=([^\"]*)("[^\/]*\/>)/', '\1file:/'.DOL_DATA_ROOT.'/medias/\2\3', $newfreetext);
|
|
|
|
$line .= $outputlangs->convToOutputCharset($newfreetext);
|
|
}
|
|
|
|
// First line of company infos
|
|
$line1 = ""; $line2 = ""; $line3 = ""; $line4 = "";
|
|
|
|
if ($showdetails == 1 || $showdetails == 3)
|
|
{
|
|
// Company name
|
|
if ($fromcompany->name)
|
|
{
|
|
$line1 .= ($line1 ? " - " : "").$outputlangs->transnoentities("RegisteredOffice").": ".$fromcompany->name;
|
|
}
|
|
// Address
|
|
if ($fromcompany->address)
|
|
{
|
|
$line1 .= ($line1 ? " - " : "").str_replace("\n", ", ", $fromcompany->address);
|
|
}
|
|
// Zip code
|
|
if ($fromcompany->zip)
|
|
{
|
|
$line1 .= ($line1 ? " - " : "").$fromcompany->zip;
|
|
}
|
|
// Town
|
|
if ($fromcompany->town)
|
|
{
|
|
$line1 .= ($line1 ? " " : "").$fromcompany->town;
|
|
}
|
|
// Country
|
|
if ($fromcompany->country)
|
|
{
|
|
$line1 .= ($line1 ? ", " : "").$fromcompany->country;
|
|
}
|
|
// Phone
|
|
if ($fromcompany->phone)
|
|
{
|
|
$line2 .= ($line2 ? " - " : "").$outputlangs->transnoentities("Phone").": ".$fromcompany->phone;
|
|
}
|
|
// Fax
|
|
if ($fromcompany->fax)
|
|
{
|
|
$line2 .= ($line2 ? " - " : "").$outputlangs->transnoentities("Fax").": ".$fromcompany->fax;
|
|
}
|
|
|
|
// URL
|
|
if ($fromcompany->url)
|
|
{
|
|
$line2 .= ($line2 ? " - " : "").$fromcompany->url;
|
|
}
|
|
// Email
|
|
if ($fromcompany->email)
|
|
{
|
|
$line2 .= ($line2 ? " - " : "").$fromcompany->email;
|
|
}
|
|
}
|
|
if ($showdetails == 2 || $showdetails == 3 || ($fromcompany->country_code == 'DE'))
|
|
{
|
|
// Managers
|
|
if ($fromcompany->managers)
|
|
{
|
|
$line2 .= ($line2 ? " - " : "").$fromcompany->managers;
|
|
}
|
|
}
|
|
|
|
// Line 3 of company infos
|
|
// Juridical status
|
|
if ($fromcompany->forme_juridique_code)
|
|
{
|
|
$line3 .= ($line3 ? " - " : "").$outputlangs->convToOutputCharset(getFormeJuridiqueLabel($fromcompany->forme_juridique_code));
|
|
}
|
|
// Capital
|
|
if ($fromcompany->capital)
|
|
{
|
|
$tmpamounttoshow = price2num($fromcompany->capital); // This field is a free string
|
|
if (is_numeric($tmpamounttoshow) && $tmpamounttoshow > 0) $line3 .= ($line3 ? " - " : "").$outputlangs->transnoentities("CapitalOf", price($tmpamounttoshow, 0, $outputlangs, 0, 0, 0, $conf->currency));
|
|
else $line3 .= ($line3 ? " - " : "").$outputlangs->transnoentities("CapitalOf", $tmpamounttoshow, $outputlangs);
|
|
}
|
|
// Prof Id 1
|
|
if ($fromcompany->idprof1 && ($fromcompany->country_code != 'FR' || !$fromcompany->idprof2))
|
|
{
|
|
$field = $outputlangs->transcountrynoentities("ProfId1", $fromcompany->country_code);
|
|
if (preg_match('/\((.*)\)/i', $field, $reg)) $field = $reg[1];
|
|
$line3 .= ($line3 ? " - " : "").$field.": ".$outputlangs->convToOutputCharset($fromcompany->idprof1);
|
|
}
|
|
// Prof Id 2
|
|
if ($fromcompany->idprof2)
|
|
{
|
|
$field = $outputlangs->transcountrynoentities("ProfId2", $fromcompany->country_code);
|
|
if (preg_match('/\((.*)\)/i', $field, $reg)) $field = $reg[1];
|
|
$line3 .= ($line3 ? " - " : "").$field.": ".$outputlangs->convToOutputCharset($fromcompany->idprof2);
|
|
}
|
|
|
|
// Line 4 of company infos
|
|
// Prof Id 3
|
|
if ($fromcompany->idprof3)
|
|
{
|
|
$field = $outputlangs->transcountrynoentities("ProfId3", $fromcompany->country_code);
|
|
if (preg_match('/\((.*)\)/i', $field, $reg)) $field = $reg[1];
|
|
$line4 .= ($line4 ? " - " : "").$field.": ".$outputlangs->convToOutputCharset($fromcompany->idprof3);
|
|
}
|
|
// Prof Id 4
|
|
if ($fromcompany->idprof4)
|
|
{
|
|
$field = $outputlangs->transcountrynoentities("ProfId4", $fromcompany->country_code);
|
|
if (preg_match('/\((.*)\)/i', $field, $reg)) $field = $reg[1];
|
|
$line4 .= ($line4 ? " - " : "").$field.": ".$outputlangs->convToOutputCharset($fromcompany->idprof4);
|
|
}
|
|
// Prof Id 5
|
|
if ($fromcompany->idprof5)
|
|
{
|
|
$field = $outputlangs->transcountrynoentities("ProfId5", $fromcompany->country_code);
|
|
if (preg_match('/\((.*)\)/i', $field, $reg)) $field = $reg[1];
|
|
$line4 .= ($line4 ? " - " : "").$field.": ".$outputlangs->convToOutputCharset($fromcompany->idprof5);
|
|
}
|
|
// Prof Id 6
|
|
if ($fromcompany->idprof6)
|
|
{
|
|
$field = $outputlangs->transcountrynoentities("ProfId6", $fromcompany->country_code);
|
|
if (preg_match('/\((.*)\)/i', $field, $reg)) $field = $reg[1];
|
|
$line4 .= ($line4 ? " - " : "").$field.": ".$outputlangs->convToOutputCharset($fromcompany->idprof6);
|
|
}
|
|
// IntraCommunautary VAT
|
|
if ($fromcompany->tva_intra != '')
|
|
{
|
|
$line4 .= ($line4 ? " - " : "").$outputlangs->transnoentities("VATIntraShort").": ".$outputlangs->convToOutputCharset($fromcompany->tva_intra);
|
|
}
|
|
|
|
$pdf->SetFont('', '', 7);
|
|
$pdf->SetDrawColor(224, 224, 224);
|
|
|
|
// The start of the bottom of this page footer is positioned according to # of lines
|
|
$freetextheight = 0;
|
|
if ($line) // Free text
|
|
{
|
|
//$line="sample text<br>\nfd<strong>sf</strong>sdf<br>\nghfghg<br>";
|
|
if (empty($conf->global->PDF_ALLOW_HTML_FOR_FREE_TEXT))
|
|
{
|
|
$width = 20000; $align = 'L'; // By default, ask a manual break: We use a large value 20000, to not have automatic wrap. This make user understand, he need to add CR on its text.
|
|
if (!empty($conf->global->MAIN_USE_AUTOWRAP_ON_FREETEXT)) {
|
|
$width = 200; $align = 'C';
|
|
}
|
|
$freetextheight = $pdf->getStringHeight($width, $line);
|
|
} else {
|
|
$freetextheight = pdfGetHeightForHtmlContent($pdf, dol_htmlentitiesbr($line, 1, 'UTF-8', 0)); // New method (works for HTML content)
|
|
//print '<br>'.$freetextheight;exit;
|
|
}
|
|
}
|
|
|
|
$marginwithfooter = $marge_basse + $freetextheight + (!empty($line1) ? 3 : 0) + (!empty($line2) ? 3 : 0) + (!empty($line3) ? 3 : 0) + (!empty($line4) ? 3 : 0);
|
|
$posy = $marginwithfooter + 0;
|
|
|
|
if ($line) // Free text
|
|
{
|
|
$pdf->SetXY($dims['lm'], -$posy);
|
|
if (empty($conf->global->PDF_ALLOW_HTML_FOR_FREE_TEXT)) // by default
|
|
{
|
|
$pdf->MultiCell(0, 3, $line, 0, $align, 0);
|
|
} else {
|
|
$pdf->writeHTMLCell($pdf->page_largeur - $pdf->margin_left - $pdf->margin_right, $freetextheight, $dims['lm'], $dims['hk'] - $marginwithfooter, dol_htmlentitiesbr($line, 1, 'UTF-8', 0));
|
|
}
|
|
$posy -= $freetextheight;
|
|
}
|
|
|
|
$pdf->SetY(-$posy);
|
|
$pdf->line($dims['lm'], $dims['hk'] - $posy, $dims['wk'] - $dims['rm'], $dims['hk'] - $posy);
|
|
$posy--;
|
|
|
|
if (!empty($line1))
|
|
{
|
|
$pdf->SetFont('', 'B', 7);
|
|
$pdf->SetXY($dims['lm'], -$posy);
|
|
$pdf->MultiCell($dims['wk'] - $dims['rm'] - $dims['lm'], 2, $line1, 0, 'C', 0);
|
|
$posy -= 3;
|
|
$pdf->SetFont('', '', 7);
|
|
}
|
|
|
|
if (!empty($line2))
|
|
{
|
|
$pdf->SetFont('', 'B', 7);
|
|
$pdf->SetXY($dims['lm'], -$posy);
|
|
$pdf->MultiCell($dims['wk'] - $dims['rm'] - $dims['lm'], 2, $line2, 0, 'C', 0);
|
|
$posy -= 3;
|
|
$pdf->SetFont('', '', 7);
|
|
}
|
|
|
|
if (!empty($line3))
|
|
{
|
|
$pdf->SetXY($dims['lm'], -$posy);
|
|
$pdf->MultiCell($dims['wk'] - $dims['rm'] - $dims['lm'], 2, $line3, 0, 'C', 0);
|
|
}
|
|
|
|
if (!empty($line4))
|
|
{
|
|
$posy -= 3;
|
|
$pdf->SetXY($dims['lm'], -$posy);
|
|
$pdf->MultiCell($dims['wk'] - $dims['rm'] - $dims['lm'], 2, $line4, 0, 'C', 0);
|
|
}
|
|
|
|
// Show page nb only on iso languages (so default Helvetica font)
|
|
if (strtolower(pdf_getPDFFont($outputlangs)) == 'helvetica')
|
|
{
|
|
$pdf->SetXY($dims['wk'] - $dims['rm'] - 15, -$posy);
|
|
//print 'xxx'.$pdf->PageNo().'-'.$pdf->getAliasNbPages().'-'.$pdf->getAliasNumPage();exit;
|
|
$pdf->MultiCell(15, 2, $pdf->PageNo().'/'.$pdf->getAliasNbPages(), 0, 'R', 0);
|
|
}
|
|
|
|
return $marginwithfooter;
|
|
}
|
|
|
|
/**
|
|
* Show linked objects for PDF generation
|
|
*
|
|
* @param TCPDF $pdf Object PDF
|
|
* @param object $object Object
|
|
* @param Translate $outputlangs Object lang
|
|
* @param int $posx X
|
|
* @param int $posy Y
|
|
* @param float $w Width of cells. If 0, they extend up to the right margin of the page.
|
|
* @param float $h Cell minimum height. The cell extends automatically if needed.
|
|
* @param int $align Align
|
|
* @param string $default_font_size Font size
|
|
* @return float The Y PDF position
|
|
*/
|
|
function pdf_writeLinkedObjects(&$pdf, $object, $outputlangs, $posx, $posy, $w, $h, $align, $default_font_size)
|
|
{
|
|
$linkedobjects = pdf_getLinkedObjects($object, $outputlangs);
|
|
if (!empty($linkedobjects))
|
|
{
|
|
foreach ($linkedobjects as $linkedobject)
|
|
{
|
|
$reftoshow = $linkedobject["ref_title"].' : '.$linkedobject["ref_value"];
|
|
if (!empty($linkedobject["date_value"]))
|
|
{
|
|
$reftoshow .= ' / '.$linkedobject["date_value"];
|
|
}
|
|
|
|
$posy += 3;
|
|
$pdf->SetXY($posx, $posy);
|
|
$pdf->SetFont('', '', $default_font_size - 2);
|
|
$pdf->MultiCell($w, $h, $reftoshow, '', $align);
|
|
}
|
|
}
|
|
|
|
return $pdf->getY();
|
|
}
|
|
|
|
/**
|
|
* Output line description into PDF
|
|
*
|
|
* @param TCPDF $pdf PDF object
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object lang for output
|
|
* @param int $w Width
|
|
* @param int $h Height
|
|
* @param int $posx Pos x
|
|
* @param int $posy Pos y
|
|
* @param int $hideref Hide reference
|
|
* @param int $hidedesc Hide description
|
|
* @param int $issupplierline Is it a line for a supplier object ?
|
|
* @return string
|
|
*/
|
|
function pdf_writelinedesc(&$pdf, $object, $i, $outputlangs, $w, $h, $posx, $posy, $hideref = 0, $hidedesc = 0, $issupplierline = 0)
|
|
{
|
|
global $db, $conf, $langs, $hookmanager;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('pdf'=>$pdf, 'i'=>$i, 'outputlangs'=>$outputlangs, 'w'=>$w, 'h'=>$h, 'posx'=>$posx, 'posy'=>$posy, 'hideref'=>$hideref, 'hidedesc'=>$hidedesc, 'issupplierline'=>$issupplierline, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_writelinedesc', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
$labelproductservice = pdf_getlinedesc($object, $i, $outputlangs, $hideref, $hidedesc, $issupplierline);
|
|
|
|
//var_dump($labelproductservice);exit;
|
|
|
|
// Fix bug of some HTML editors that replace links <img src="http://localhostgit/viewimage.php?modulepart=medias&file=image/efd.png" into <img src="http://localhostgit/viewimage.php?modulepart=medias&file=image/efd.png"
|
|
// We make the reverse, so PDF generation has the real URL.
|
|
$labelproductservice = preg_replace('/(<img[^>]*src=")([^"]*)(&)([^"]*")/', '\1\2&\4', $labelproductservice, -1, $nbrep);
|
|
|
|
//var_dump($labelproductservice);exit;
|
|
|
|
// Description
|
|
$pdf->writeHTMLCell($w, $h, $posx, $posy, $outputlangs->convToOutputCharset($labelproductservice), 0, 1, false, true, 'J', true);
|
|
$result .= $labelproductservice;
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line description translated in outputlangs and encoded into htmlentities and with <br>
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number (0 = first line, 1 = second line, ...)
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hideref Hide reference
|
|
* @param int $hidedesc Hide description
|
|
* @param int $issupplierline Is it a line for a supplier object ?
|
|
* @return string String with line
|
|
*/
|
|
function pdf_getlinedesc($object, $i, $outputlangs, $hideref = 0, $hidedesc = 0, $issupplierline = 0)
|
|
{
|
|
global $db, $conf, $langs;
|
|
|
|
$idprod = (!empty($object->lines[$i]->fk_product) ? $object->lines[$i]->fk_product : false);
|
|
$label = (!empty($object->lines[$i]->label) ? $object->lines[$i]->label : (!empty($object->lines[$i]->product_label) ? $object->lines[$i]->product_label : ''));
|
|
$desc = (!empty($object->lines[$i]->desc) ? $object->lines[$i]->desc : (!empty($object->lines[$i]->description) ? $object->lines[$i]->description : ''));
|
|
$ref_supplier = (!empty($object->lines[$i]->ref_supplier) ? $object->lines[$i]->ref_supplier : (!empty($object->lines[$i]->ref_fourn) ? $object->lines[$i]->ref_fourn : '')); // TODO Not yet saved for supplier invoices, only supplier orders
|
|
$note = (!empty($object->lines[$i]->note) ? $object->lines[$i]->note : '');
|
|
$dbatch = (!empty($object->lines[$i]->detail_batch) ? $object->lines[$i]->detail_batch : false);
|
|
|
|
if ($issupplierline)
|
|
{
|
|
include_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.product.class.php';
|
|
$prodser = new ProductFournisseur($db);
|
|
} else {
|
|
include_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
|
|
$prodser = new Product($db);
|
|
}
|
|
|
|
if ($idprod)
|
|
{
|
|
$prodser->fetch($idprod);
|
|
// If a predefined product and multilang and on other lang, we renamed label with label translated
|
|
if (!empty($conf->global->MAIN_MULTILANGS) && ($outputlangs->defaultlang != $langs->defaultlang))
|
|
{
|
|
$translatealsoifmodified = (!empty($conf->global->MAIN_MULTILANG_TRANSLATE_EVEN_IF_MODIFIED)); // By default if value was modified manually, we keep it (no translation because we don't have it)
|
|
|
|
// TODO Instead of making a compare to see if param was modified, check that content contains reference translation. If yes, add the added part to the new translation
|
|
// ($textwasmodified is replaced with $textwasmodifiedorcompleted and we add completion).
|
|
|
|
// Set label
|
|
// If we want another language, and if label is same than default language (we did force it to a specific value), we can use translation.
|
|
//var_dump($outputlangs->defaultlang.' - '.$langs->defaultlang.' - '.$label.' - '.$prodser->label);exit;
|
|
$textwasmodified = ($label == $prodser->label);
|
|
if (!empty($prodser->multilangs[$outputlangs->defaultlang]["label"]) && ($textwasmodified || $translatealsoifmodified)) $label = $prodser->multilangs[$outputlangs->defaultlang]["label"];
|
|
|
|
// Set desc
|
|
// Manage HTML entities description test because $prodser->description is store with htmlentities but $desc no
|
|
$textwasmodified = false;
|
|
if (!empty($desc) && dol_textishtml($desc) && !empty($prodser->description) && dol_textishtml($prodser->description)) {
|
|
$textwasmodified = (strpos(dol_html_entity_decode($desc, ENT_QUOTES|ENT_HTML5), dol_html_entity_decode($prodser->description, ENT_QUOTES|ENT_HTML5)) !== false);
|
|
} else {
|
|
$textwasmodified = ($desc == $prodser->description);
|
|
}
|
|
if (!empty($prodser->multilangs[$outputlangs->defaultlang]["description"]) && ($textwasmodified || $translatealsoifmodified)) $desc = $prodser->multilangs[$outputlangs->defaultlang]["description"];
|
|
|
|
// Set note
|
|
$textwasmodified = ($note == $prodser->note);
|
|
if (!empty($prodser->multilangs[$outputlangs->defaultlang]["note"]) && ($textwasmodified || $translatealsoifmodified)) $note = $prodser->multilangs[$outputlangs->defaultlang]["note"];
|
|
}
|
|
} elseif ($object->element == 'facture' || $object->element == 'facturefourn') {
|
|
if ($object->type == $object::TYPE_DEPOSIT) {
|
|
$desc = str_replace('(DEPOSIT)', $outputlangs->trans('Deposit'), $desc);
|
|
}
|
|
}
|
|
|
|
// Description short of product line
|
|
$libelleproduitservice = $label;
|
|
if (!empty($libelleproduitservice) && !empty($conf->global->PDF_BOLD_PRODUCT_LABEL))
|
|
{
|
|
$libelleproduitservice = '<b>'.$libelleproduitservice.'</b>';
|
|
}
|
|
|
|
// Description long of product line
|
|
if (!empty($desc) && ($desc != $label))
|
|
{
|
|
if ($libelleproduitservice && empty($hidedesc))
|
|
{
|
|
$libelleproduitservice .= '__N__';
|
|
}
|
|
|
|
if ($desc == '(CREDIT_NOTE)' && $object->lines[$i]->fk_remise_except)
|
|
{
|
|
$discount = new DiscountAbsolute($db);
|
|
$discount->fetch($object->lines[$i]->fk_remise_except);
|
|
$sourceref = !empty($discount->discount_type) ? $discount->ref_invoive_supplier_source : $discount->ref_facture_source;
|
|
$libelleproduitservice = $outputlangs->transnoentitiesnoconv("DiscountFromCreditNote", $sourceref);
|
|
} elseif ($desc == '(DEPOSIT)' && $object->lines[$i]->fk_remise_except)
|
|
{
|
|
$discount = new DiscountAbsolute($db);
|
|
$discount->fetch($object->lines[$i]->fk_remise_except);
|
|
$sourceref = !empty($discount->discount_type) ? $discount->ref_invoive_supplier_source : $discount->ref_facture_source;
|
|
$libelleproduitservice = $outputlangs->transnoentitiesnoconv("DiscountFromDeposit", $sourceref);
|
|
// Add date of deposit
|
|
if (!empty($conf->global->INVOICE_ADD_DEPOSIT_DATE)) $libelleproduitservice .= ' ('.dol_print_date($discount->datec, 'day', '', $outputlangs).')';
|
|
} elseif ($desc == '(EXCESS RECEIVED)' && $object->lines[$i]->fk_remise_except)
|
|
{
|
|
$discount = new DiscountAbsolute($db);
|
|
$discount->fetch($object->lines[$i]->fk_remise_except);
|
|
$libelleproduitservice = $outputlangs->transnoentitiesnoconv("DiscountFromExcessReceived", $discount->ref_facture_source);
|
|
} elseif ($desc == '(EXCESS PAID)' && $object->lines[$i]->fk_remise_except)
|
|
{
|
|
$discount = new DiscountAbsolute($db);
|
|
$discount->fetch($object->lines[$i]->fk_remise_except);
|
|
$libelleproduitservice = $outputlangs->transnoentitiesnoconv("DiscountFromExcessPaid", $discount->ref_invoice_supplier_source);
|
|
} else {
|
|
if ($idprod)
|
|
{
|
|
if (empty($hidedesc))
|
|
{
|
|
if (!empty($conf->global->MAIN_DOCUMENTS_DESCRIPTION_FIRST))
|
|
{
|
|
$libelleproduitservice = $desc."\n".$libelleproduitservice;
|
|
} else {
|
|
if (!empty($conf->global->HIDE_LABEL_VARIANT_PDF) && $prodser->isVariant()) {
|
|
$libelleproduitservice = $desc;
|
|
} else {
|
|
$libelleproduitservice .= $desc;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
$libelleproduitservice .= $desc;
|
|
}
|
|
}
|
|
}
|
|
|
|
// We add ref of product (and supplier ref if defined)
|
|
$prefix_prodserv = "";
|
|
$ref_prodserv = "";
|
|
if (!empty($conf->global->PRODUCT_ADD_TYPE_IN_DOCUMENTS)) // In standard mode, we do not show this
|
|
{
|
|
if ($prodser->isService())
|
|
{
|
|
$prefix_prodserv = $outputlangs->transnoentitiesnoconv("Service")." ";
|
|
} else {
|
|
$prefix_prodserv = $outputlangs->transnoentitiesnoconv("Product")." ";
|
|
}
|
|
}
|
|
|
|
if (empty($hideref))
|
|
{
|
|
if ($issupplierline)
|
|
{
|
|
if ($conf->global->PDF_HIDE_PRODUCT_REF_IN_SUPPLIER_LINES == 1)
|
|
$ref_prodserv = $ref_supplier;
|
|
elseif ($conf->global->PDF_HIDE_PRODUCT_REF_IN_SUPPLIER_LINES == 2)
|
|
$ref_prodserv = $ref_supplier.' ('.$outputlangs->transnoentitiesnoconv("InternalRef").' '.$prodser->ref.')';
|
|
else // Common case
|
|
{
|
|
$ref_prodserv = $prodser->ref; // Show local ref
|
|
if ($ref_supplier) $ref_prodserv .= ($prodser->ref ? ' (' : '').$outputlangs->transnoentitiesnoconv("SupplierRef").' '.$ref_supplier.($prodser->ref ? ')' : '');
|
|
}
|
|
} else {
|
|
$ref_prodserv = $prodser->ref; // Show local ref only
|
|
}
|
|
|
|
if (!empty($libelleproduitservice) && !empty($ref_prodserv)) $ref_prodserv .= " - ";
|
|
}
|
|
|
|
if (!empty($ref_prodserv) && !empty($conf->global->PDF_BOLD_PRODUCT_REF_AND_PERIOD)) { $ref_prodserv = '<b>'.$ref_prodserv.'</b>'; }
|
|
$libelleproduitservice = $prefix_prodserv.$ref_prodserv.$libelleproduitservice;
|
|
|
|
// Add an additional description for the category products
|
|
if (!empty($conf->global->CATEGORY_ADD_DESC_INTO_DOC) && $idprod && !empty($conf->categorie->enabled))
|
|
{
|
|
include_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
|
|
$categstatic = new Categorie($db);
|
|
// recovering the list of all the categories linked to product
|
|
$tblcateg = $categstatic->containing($idprod, Categorie::TYPE_PRODUCT);
|
|
foreach ($tblcateg as $cate)
|
|
{
|
|
// Adding the descriptions if they are filled
|
|
$desccateg = $cate->description;
|
|
if ($desccateg)
|
|
$libelleproduitservice .= '__N__'.$desccateg;
|
|
}
|
|
}
|
|
|
|
if (!empty($object->lines[$i]->date_start) || !empty($object->lines[$i]->date_end))
|
|
{
|
|
$format = 'day';
|
|
$period = '';
|
|
// Show duration if exists
|
|
if ($object->lines[$i]->date_start && $object->lines[$i]->date_end)
|
|
{
|
|
$period = '('.$outputlangs->transnoentitiesnoconv('DateFromTo', dol_print_date($object->lines[$i]->date_start, $format, false, $outputlangs), dol_print_date($object->lines[$i]->date_end, $format, false, $outputlangs)).')';
|
|
}
|
|
if ($object->lines[$i]->date_start && !$object->lines[$i]->date_end)
|
|
{
|
|
$period = '('.$outputlangs->transnoentitiesnoconv('DateFrom', dol_print_date($object->lines[$i]->date_start, $format, false, $outputlangs)).')';
|
|
}
|
|
if (!$object->lines[$i]->date_start && $object->lines[$i]->date_end)
|
|
{
|
|
$period = '('.$outputlangs->transnoentitiesnoconv('DateUntil', dol_print_date($object->lines[$i]->date_end, $format, false, $outputlangs)).')';
|
|
}
|
|
//print '>'.$outputlangs->charset_output.','.$period;
|
|
if (!empty($conf->global->PDF_BOLD_PRODUCT_REF_AND_PERIOD)) {
|
|
$libelleproduitservice .= '<b style="color:#333666;" ><em>'."__N__</b> ".$period.'</em>';
|
|
} else {
|
|
$libelleproduitservice .= "__N__".$period;
|
|
}
|
|
//print $libelleproduitservice;
|
|
}
|
|
|
|
if ($dbatch)
|
|
{
|
|
$format = 'day';
|
|
foreach ($dbatch as $detail)
|
|
{
|
|
$dte = array();
|
|
if ($detail->eatby) $dte[] = $outputlangs->transnoentitiesnoconv('printEatby', dol_print_date($detail->eatby, $format, false, $outputlangs));
|
|
if ($detail->sellby) $dte[] = $outputlangs->transnoentitiesnoconv('printSellby', dol_print_date($detail->sellby, $format, false, $outputlangs));
|
|
if ($detail->batch) $dte[] = $outputlangs->transnoentitiesnoconv('printBatch', $detail->batch);
|
|
$dte[] = $outputlangs->transnoentitiesnoconv('printQty', $detail->qty);
|
|
$libelleproduitservice .= "__N__ ".implode(" - ", $dte);
|
|
}
|
|
}
|
|
|
|
// Now we convert \n into br
|
|
if (dol_textishtml($libelleproduitservice)) $libelleproduitservice = preg_replace('/__N__/', '<br>', $libelleproduitservice);
|
|
else $libelleproduitservice = preg_replace('/__N__/', "\n", $libelleproduitservice);
|
|
$libelleproduitservice = dol_htmlentitiesbr($libelleproduitservice, 1);
|
|
|
|
return $libelleproduitservice;
|
|
}
|
|
|
|
/**
|
|
* Return line num
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlinenum($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlinenum', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
$result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
$result .= dol_htmlentitiesbr($object->lines[$i]->num);
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
|
|
/**
|
|
* Return line product ref
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlineref($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineref', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
$result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
$result .= dol_htmlentitiesbr($object->lines[$i]->product_ref);
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line ref_supplier
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlineref_supplier($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineref_supplier', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
$result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
$result .= dol_htmlentitiesbr($object->lines[$i]->ref_supplier);
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line vat rate
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlinevatrate($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $conf, $hookmanager, $mysoc;
|
|
|
|
$result = '';
|
|
$reshook = 0;
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduce this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlinevatrate', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if (empty($hidedetails) || $hidedetails > 1)
|
|
{
|
|
$tmpresult = '';
|
|
|
|
$tmpresult .= vatrate($object->lines[$i]->tva_tx, 0, $object->lines[$i]->info_bits, -1);
|
|
if (empty($conf->global->MAIN_PDF_MAIN_HIDE_SECOND_TAX))
|
|
{
|
|
if ($object->lines[$i]->total_localtax1 != 0)
|
|
{
|
|
if (preg_replace('/[\s0%]/', '', $tmpresult)) $tmpresult .= '/';
|
|
else $tmpresult = '';
|
|
$tmpresult .= vatrate(abs($object->lines[$i]->localtax1_tx), 0);
|
|
}
|
|
}
|
|
if (empty($conf->global->MAIN_PDF_MAIN_HIDE_THIRD_TAX))
|
|
{
|
|
if ($object->lines[$i]->total_localtax2 != 0)
|
|
{
|
|
if (preg_replace('/[\s0%]/', '', $tmpresult)) $tmpresult .= '/';
|
|
else $tmpresult = '';
|
|
$tmpresult .= vatrate(abs($object->lines[$i]->localtax2_tx), 0);
|
|
}
|
|
}
|
|
$tmpresult .= '%';
|
|
|
|
$result .= $tmpresult;
|
|
}
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line unit price excluding tax
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlineupexcltax($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $conf, $hookmanager;
|
|
|
|
$sign = 1;
|
|
if (isset($object->type) && $object->type == 2 && !empty($conf->global->INVOICE_POSITIVE_CREDIT_NOTE)) $sign = -1;
|
|
|
|
$result = '';
|
|
$reshook = 0;
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineupexcltax', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if (empty($hidedetails) || $hidedetails > 1)
|
|
{
|
|
$subprice = ($conf->multicurrency->enabled && $object->multicurrency_tx != 1 ? $object->lines[$i]->multicurrency_subprice : $object->lines[$i]->subprice);
|
|
$result .= price($sign * $subprice, 0, $outputlangs);
|
|
}
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line unit price including tax
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide value (0 = no, 1 = yes, 2 = just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlineupwithtax($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager, $conf;
|
|
|
|
$sign = 1;
|
|
if (isset($object->type) && $object->type == 2 && !empty($conf->global->INVOICE_POSITIVE_CREDIT_NOTE)) $sign = -1;
|
|
|
|
$result = '';
|
|
$reshook = 0;
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineupwithtax', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if (empty($hidedetails) || $hidedetails > 1) $result .= price($sign * (($object->lines[$i]->subprice) + ($object->lines[$i]->subprice) * ($object->lines[$i]->tva_tx) / 100), 0, $outputlangs);
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line quantity
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlineqty($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager;
|
|
|
|
$result = '';
|
|
$reshook = 0;
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineqty', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result = $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if ($object->lines[$i]->special_code == 3) return '';
|
|
if (empty($hidedetails) || $hidedetails > 1) $result .= $object->lines[$i]->qty;
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line quantity asked
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlineqty_asked($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineqty_asked', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if ($object->lines[$i]->special_code == 3) return '';
|
|
if (empty($hidedetails) || $hidedetails > 1) $result .= $object->lines[$i]->qty_asked;
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line quantity shipped
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlineqty_shipped($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineqty_shipped', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if ($object->lines[$i]->special_code == 3) return '';
|
|
if (empty($hidedetails) || $hidedetails > 1) $result .= $object->lines[$i]->qty_shipped;
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line keep to ship quantity
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlineqty_keeptoship($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineqty_keeptoship', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if ($object->lines[$i]->special_code == 3) return '';
|
|
if (empty($hidedetails) || $hidedetails > 1) $result .= ($object->lines[$i]->qty_asked - $object->lines[$i]->qty_shipped);
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line unit
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @param HookManager $hookmanager Hook manager instance
|
|
* @return string Value for unit cell
|
|
*/
|
|
function pdf_getlineunit($object, $i, $outputlangs, $hidedetails = 0, $hookmanager = false)
|
|
{
|
|
global $langs;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) {
|
|
$special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
}
|
|
$parameters = array(
|
|
'i' => $i,
|
|
'outputlangs' => $outputlangs,
|
|
'hidedetails' => $hidedetails,
|
|
'special_code' => $special_code
|
|
);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineunit', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if (empty($hidedetails) || $hidedetails > 1) $result .= $langs->transnoentitiesnoconv($object->lines[$i]->getLabelOfUnit('short'));
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
|
|
/**
|
|
* Return line remise percent
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string
|
|
*/
|
|
function pdf_getlineremisepercent($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager;
|
|
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineremisepercent', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if ($object->lines[$i]->special_code == 3) return '';
|
|
if (empty($hidedetails) || $hidedetails > 1) $result .= dol_print_reduction($object->lines[$i]->remise_percent, $outputlangs);
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line percent
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @param HookManager $hookmanager Hook manager instance
|
|
* @return string
|
|
*/
|
|
function pdf_getlineprogress($object, $i, $outputlangs, $hidedetails = 0, $hookmanager = null)
|
|
{
|
|
if (empty($hookmanager)) global $hookmanager;
|
|
global $conf;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i' => $i, 'outputlangs' => $outputlangs, 'hidedetails' => $hidedetails, 'special_code' => $special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlineprogress', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) return $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if ($object->lines[$i]->special_code == 3) return '';
|
|
if (empty($hidedetails) || $hidedetails > 1)
|
|
{
|
|
if ($conf->global->SITUATION_DISPLAY_DIFF_ON_PDF)
|
|
{
|
|
$prev_progress = 0;
|
|
if (method_exists($object, 'get_prev_progress'))
|
|
{
|
|
$prev_progress = $object->lines[$i]->get_prev_progress($object->id);
|
|
}
|
|
$result = ($object->lines[$i]->situation_percent - $prev_progress).'%';
|
|
} else $result = $object->lines[$i]->situation_percent.'%';
|
|
}
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line total excluding tax
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string Return total of line excl tax
|
|
*/
|
|
function pdf_getlinetotalexcltax($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $conf, $hookmanager;
|
|
|
|
$sign = 1;
|
|
if (isset($object->type) && $object->type == 2 && !empty($conf->global->INVOICE_POSITIVE_CREDIT_NOTE)) $sign = -1;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code, 'sign'=>$sign);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlinetotalexcltax', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if ($object->lines[$i]->special_code == 3)
|
|
{
|
|
$result .= $outputlangs->transnoentities("Option");
|
|
}
|
|
elseif (empty($hidedetails) || $hidedetails > 1)
|
|
{
|
|
$total_ht = ($conf->multicurrency->enabled && $object->multicurrency_tx != 1 ? $object->lines[$i]->multicurrency_total_ht : $object->lines[$i]->total_ht);
|
|
if ($object->lines[$i]->situation_percent > 0)
|
|
{
|
|
// TODO Remove this. The total should be saved correctly in database instead of being modified here.
|
|
$prev_progress = 0;
|
|
$progress = 1;
|
|
if (method_exists($object->lines[$i], 'get_prev_progress'))
|
|
{
|
|
$prev_progress = $object->lines[$i]->get_prev_progress($object->id);
|
|
$progress = ($object->lines[$i]->situation_percent - $prev_progress) / 100;
|
|
}
|
|
$result .= price($sign * ($total_ht / ($object->lines[$i]->situation_percent / 100)) * $progress, 0, $outputlangs);
|
|
} else {
|
|
$result .= price($sign * $total_ht, 0, $outputlangs);
|
|
}
|
|
}
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return line total including tax
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide value (0 = no, 1 = yes, 2 = just special lines)
|
|
* @return string Return total of line incl tax
|
|
*/
|
|
function pdf_getlinetotalwithtax($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $hookmanager, $conf;
|
|
|
|
$sign = 1;
|
|
if (isset($object->type) && $object->type == 2 && !empty($conf->global->INVOICE_POSITIVE_CREDIT_NOTE)) $sign = -1;
|
|
|
|
$reshook = 0;
|
|
$result = '';
|
|
//if (is_object($hookmanager) && ( (isset($object->lines[$i]->product_type) && $object->lines[$i]->product_type == 9 && ! empty($object->lines[$i]->special_code)) || ! empty($object->lines[$i]->fk_parent_line) ) )
|
|
if (is_object($hookmanager)) // Old code is commented on preceding line. Reproduct this test in the pdf_xxx function if you don't want your hook to run
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getlinetotalwithtax', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
|
|
if (!empty($hookmanager->resPrint)) $result .= $hookmanager->resPrint;
|
|
}
|
|
if (empty($reshook))
|
|
{
|
|
if ($object->lines[$i]->special_code == 3)
|
|
{
|
|
$result .= $outputlangs->transnoentities("Option");
|
|
}
|
|
elseif (empty($hidedetails) || $hidedetails > 1)
|
|
{
|
|
$total_ttc = ($conf->multicurrency->enabled && $object->multicurrency_tx != 1 ? $object->lines[$i]->multicurrency_total_ttc : $object->lines[$i]->total_ttc);
|
|
if ($object->lines[$i]->situation_percent > 0)
|
|
{
|
|
// TODO Remove this. The total should be saved correctly in database instead of being modified here.
|
|
$prev_progress = 0;
|
|
$progress = 1;
|
|
if (method_exists($object->lines[$i], 'get_prev_progress'))
|
|
{
|
|
$prev_progress = $object->lines[$i]->get_prev_progress($object->id);
|
|
$progress = ($object->lines[$i]->situation_percent - $prev_progress) / 100;
|
|
}
|
|
$result .= price($sign * ($total_ttc / ($object->lines[$i]->situation_percent / 100)) * $progress, 0, $outputlangs);
|
|
} else {
|
|
$result .= price($sign * $total_ttc, 0, $outputlangs);
|
|
}
|
|
}
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return total quantity of products and/or services
|
|
*
|
|
* @param Object $object Object
|
|
* @param string $type Type
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @return integer
|
|
* @deprecated Not used by Dolibarr core, so will be removed.
|
|
*/
|
|
function pdf_getTotalQty($object, $type, $outputlangs)
|
|
{
|
|
global $hookmanager;
|
|
|
|
$total = 0;
|
|
$nblines = count($object->lines);
|
|
|
|
// Loop on each lines
|
|
for ($i = 0; $i < $nblines; $i++)
|
|
{
|
|
if ($object->lines[$i]->special_code != 3)
|
|
{
|
|
if ($type == 'all')
|
|
{
|
|
$total += $object->lines[$i]->qty;
|
|
} elseif ($type == 9 && is_object($hookmanager) && (($object->lines[$i]->product_type == 9 && !empty($object->lines[$i]->special_code)) || !empty($object->lines[$i]->fk_parent_line)))
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
$parameters = array('i'=>$i, 'outputlangs'=>$outputlangs, 'hidedetails'=>$hidedetails, 'special_code'=>$special_code);
|
|
$action = '';
|
|
$reshook = $hookmanager->executeHooks('pdf_getTotalQty', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
return $hookmanager->resPrint;
|
|
} elseif ($type == 0 && $object->lines[$i]->product_type == 0)
|
|
{
|
|
$total += $object->lines[$i]->qty;
|
|
} elseif ($type == 1 && $object->lines[$i]->product_type == 1)
|
|
{
|
|
$total += $object->lines[$i]->qty;
|
|
}
|
|
}
|
|
}
|
|
|
|
return $total;
|
|
}
|
|
|
|
/**
|
|
* Return linked objects to use for document generation.
|
|
* Warning: To save space, this function returns only one link per link type (all links are concated on same record string). This function is used by pdf_writeLinkedObjects
|
|
*
|
|
* @param object $object Object
|
|
* @param Translate $outputlangs Object lang for output
|
|
* @return array Linked objects
|
|
*/
|
|
function pdf_getLinkedObjects($object, $outputlangs)
|
|
{
|
|
global $db, $hookmanager;
|
|
|
|
$linkedobjects = array();
|
|
|
|
$object->fetchObjectLinked();
|
|
|
|
foreach ($object->linkedObjects as $objecttype => $objects)
|
|
{
|
|
if ($objecttype == 'facture')
|
|
{
|
|
// For invoice, we don't want to have a reference line on document. Image we are using recuring invoice, we will have a line longer than document width.
|
|
} elseif ($objecttype == 'propal' || $objecttype == 'supplier_proposal')
|
|
{
|
|
$outputlangs->load('propal');
|
|
|
|
foreach ($objects as $elementobject)
|
|
{
|
|
$linkedobjects[$objecttype]['ref_title'] = $outputlangs->transnoentities("RefProposal");
|
|
$linkedobjects[$objecttype]['ref_value'] = $outputlangs->transnoentities($elementobject->ref);
|
|
$linkedobjects[$objecttype]['date_title'] = $outputlangs->transnoentities("DatePropal");
|
|
$linkedobjects[$objecttype]['date_value'] = dol_print_date($elementobject->date, 'day', '', $outputlangs);
|
|
}
|
|
} elseif ($objecttype == 'commande' || $objecttype == 'supplier_order')
|
|
{
|
|
$outputlangs->load('orders');
|
|
foreach ($objects as $elementobject)
|
|
{
|
|
$linkedobjects[$objecttype]['ref_title'] = $outputlangs->transnoentities("RefOrder");
|
|
$linkedobjects[$objecttype]['ref_value'] = $outputlangs->transnoentities($elementobject->ref).($elementobject->ref_client ? ' ('.$elementobject->ref_client.')' : '').($elementobject->ref_supplier ? ' ('.$elementobject->ref_supplier.')' : '');
|
|
$linkedobjects[$objecttype]['date_title'] = $outputlangs->transnoentities("OrderDate");
|
|
$linkedobjects[$objecttype]['date_value'] = dol_print_date($elementobject->date, 'day', '', $outputlangs);
|
|
}
|
|
} elseif ($objecttype == 'contrat')
|
|
{
|
|
$outputlangs->load('contracts');
|
|
foreach ($objects as $elementobject)
|
|
{
|
|
$linkedobjects[$objecttype]['ref_title'] = $outputlangs->transnoentities("RefContract");
|
|
$linkedobjects[$objecttype]['ref_value'] = $outputlangs->transnoentities($elementobject->ref);
|
|
$linkedobjects[$objecttype]['date_title'] = $outputlangs->transnoentities("DateContract");
|
|
$linkedobjects[$objecttype]['date_value'] = dol_print_date($elementobject->date_contrat, 'day', '', $outputlangs);
|
|
}
|
|
} elseif ($objecttype == 'fichinter')
|
|
{
|
|
$outputlangs->load('interventions');
|
|
foreach ($objects as $elementobject)
|
|
{
|
|
$linkedobjects[$objecttype]['ref_title'] = $outputlangs->transnoentities("InterRef");
|
|
$linkedobjects[$objecttype]['ref_value'] = $outputlangs->transnoentities($elementobject->ref);
|
|
$linkedobjects[$objecttype]['date_title'] = $outputlangs->transnoentities("InterDate");
|
|
$linkedobjects[$objecttype]['date_value'] = dol_print_date($elementobject->datec, 'day', '', $outputlangs);
|
|
}
|
|
} elseif ($objecttype == 'shipping')
|
|
{
|
|
$outputlangs->loadLangs(array("orders", "sendings"));
|
|
|
|
foreach ($objects as $x => $elementobject)
|
|
{
|
|
$order = null;
|
|
// We concat this record info into fields xxx_value. title is overwrote.
|
|
if (empty($object->linkedObjects['commande']) && $object->element != 'commande') // There is not already a link to order and object is not the order, so we show also info with order
|
|
{
|
|
$elementobject->fetchObjectLinked(null, '', null, '', 'OR', 1, 'sourcetype', 0);
|
|
if (!empty($elementobject->linkedObjectsIds['commande'])) {
|
|
include_once DOL_DOCUMENT_ROOT.'/commande/class/commande.class.php';
|
|
$order = new Commande($db);
|
|
$ret = $order->fetch(reset($elementobject->linkedObjectsIds['commande']));
|
|
if ($ret < 1) { $order = null; }
|
|
}
|
|
}
|
|
if (!is_object($order))
|
|
{
|
|
$linkedobjects[$objecttype]['ref_title'] = $outputlangs->transnoentities("RefSending");
|
|
if (!empty($linkedobjects[$objecttype]['ref_value'])) $linkedobjects[$objecttype]['ref_value'] .= ' / ';
|
|
$linkedobjects[$objecttype]['ref_value'] .= $outputlangs->transnoentities($elementobject->ref);
|
|
//$linkedobjects[$objecttype]['date_title'] = $outputlangs->transnoentities("DateShipment");
|
|
//if (! empty($linkedobjects[$objecttype]['date_value'])) $linkedobjects[$objecttype]['date_value'].=' / ';
|
|
//$linkedobjects[$objecttype]['date_value'].= dol_print_date($elementobject->date_delivery,'day','',$outputlangs);
|
|
} else {
|
|
$linkedobjects[$objecttype]['ref_title'] = $outputlangs->transnoentities("RefOrder").' / '.$outputlangs->transnoentities("RefSending");
|
|
if (empty($linkedobjects[$objecttype]['ref_value'])) $linkedobjects[$objecttype]['ref_value'] = $outputlangs->convToOutputCharset($order->ref).($order->ref_client ? ' ('.$order->ref_client.')' : '');
|
|
$linkedobjects[$objecttype]['ref_value'] .= ' / '.$outputlangs->transnoentities($elementobject->ref);
|
|
//$linkedobjects[$objecttype]['date_title'] = $outputlangs->transnoentities("OrderDate") . ($elementobject->date_delivery ? ' / ' . $outputlangs->transnoentities("DateShipment") : '');
|
|
//if (empty($linkedobjects[$objecttype]['date_value'])) $linkedobjects[$objecttype]['date_value'] = dol_print_date($order->date,'day','',$outputlangs);
|
|
//$linkedobjects[$objecttype]['date_value'].= ($elementobject->date_delivery ? ' / ' . dol_print_date($elementobject->date_delivery,'day','',$outputlangs) : '');
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// For add external linked objects
|
|
if (is_object($hookmanager))
|
|
{
|
|
$parameters = array('linkedobjects' => $linkedobjects, 'outputlangs'=>$outputlangs);
|
|
$action = '';
|
|
$hookmanager->executeHooks('pdf_getLinkedObjects', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
if (!empty($hookmanager->resArray)) $linkedobjects = $hookmanager->resArray;
|
|
}
|
|
|
|
return $linkedobjects;
|
|
}
|
|
|
|
/**
|
|
* Return dimensions to use for images onto PDF checking that width and height are not higher than
|
|
* maximum (16x32 by default).
|
|
*
|
|
* @param string $realpath Full path to photo file to use
|
|
* @return array Height and width to use to output image (in pdf user unit, so mm)
|
|
*/
|
|
function pdf_getSizeForImage($realpath)
|
|
{
|
|
global $conf;
|
|
|
|
$maxwidth = (empty($conf->global->MAIN_DOCUMENTS_WITH_PICTURE_WIDTH) ? 20 : $conf->global->MAIN_DOCUMENTS_WITH_PICTURE_WIDTH);
|
|
$maxheight = (empty($conf->global->MAIN_DOCUMENTS_WITH_PICTURE_HEIGHT) ? 32 : $conf->global->MAIN_DOCUMENTS_WITH_PICTURE_HEIGHT);
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
|
|
$tmp = dol_getImageSize($realpath);
|
|
if ($tmp['height'])
|
|
{
|
|
$width = (int) round($maxheight * $tmp['width'] / $tmp['height']); // I try to use maxheight
|
|
if ($width > $maxwidth) // Pb with maxheight, so i use maxwidth
|
|
{
|
|
$width = $maxwidth;
|
|
$height = (int) round($maxwidth * $tmp['height'] / $tmp['width']);
|
|
} else // No pb with maxheight
|
|
{
|
|
$height = $maxheight;
|
|
}
|
|
}
|
|
return array('width'=>$width, 'height'=>$height);
|
|
}
|
|
|
|
/**
|
|
* Return line total amount discount
|
|
*
|
|
* @param Object $object Object
|
|
* @param int $i Current line number
|
|
* @param Translate $outputlangs Object langs for output
|
|
* @param int $hidedetails Hide details (0=no, 1=yes, 2=just special lines)
|
|
* @return string Return total of line excl tax
|
|
*/
|
|
function pdfGetLineTotalDiscountAmount($object, $i, $outputlangs, $hidedetails = 0)
|
|
{
|
|
global $conf, $hookmanager;
|
|
$sign = 1;
|
|
if (isset($object->type) && $object->type == 2 && !empty($conf->global->INVOICE_POSITIVE_CREDIT_NOTE)) $sign = -1;
|
|
if ($object->lines[$i]->special_code == 3)
|
|
{
|
|
return $outputlangs->transnoentities("Option");
|
|
} else {
|
|
if (is_object($hookmanager))
|
|
{
|
|
$special_code = $object->lines[$i]->special_code;
|
|
if (!empty($object->lines[$i]->fk_parent_line)) $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
|
|
|
|
$parameters = array(
|
|
'i'=>$i,
|
|
'outputlangs'=>$outputlangs,
|
|
'hidedetails'=>$hidedetails,
|
|
'special_code'=>$special_code
|
|
);
|
|
|
|
$action = '';
|
|
|
|
if ($hookmanager->executeHooks('getlinetotalremise', $parameters, $object, $action) > 0)
|
|
{
|
|
return $hookmanager->resPrint; // Note that $action and $object may have been modified by some hooks
|
|
}
|
|
}
|
|
|
|
if (empty($hidedetails) || $hidedetails > 1) return $sign * (($object->lines[$i]->subprice * $object->lines[$i]->qty) - $object->lines[$i]->total_ht);
|
|
}
|
|
return '';
|
|
}
|