PageRenderTime 49ms CodeModel.GetById 12ms RepoModel.GetById 0ms app.codeStats 1ms

/htdocs/core/lib/pdf.lib.php

https://bitbucket.org/speedealing/speedealing
PHP | 1359 lines | 869 code | 126 blank | 364 comment | 349 complexity | 3cad4782df9e8fac3cf4fd876478e7db MD5 | raw file
Possible License(s): LGPL-3.0, LGPL-2.1, GPL-3.0, MIT

Large files files are truncated, but you can click here to view the full file

    

  1. <?php
    2. 

  2. 

  3. /* Copyright (C) 2006-2011 Laurent Destailleur  <eldy@users.sourceforge.net>
    4. 

  4.  * Copyright (C) 2006      Rodolphe Quiedeville <rodolphe@quiedeville.org>
    5. 

  5.  * Copyright (C) 2007      Patrick Raguin       <patrick.raguin@gmail.com>
    6. 

  6.  * Copyright (C) 2010-2012 Regis Houssin        <regis.houssin@capnetworks.com>
    7. 

  7.  * Copyright (C) 2010      Juanjo Menent        <jmenent@2byte.es>
    8. 

  8.  * Copyright (C) 2012      Christophe Battarel  <christophe.battarel@altairis.fr>
    9. 

  9.  *
    10. 

  10.  * This program is free software; you can redistribute it and/or modify
    11. 

  11.  * it under the terms of the GNU General Public License as published by
    12. 

  12.  * the Free Software Foundation; either version 3 of the License, or
    13. 

  13.  * (at your option) any later version.
    14. 

  14.  *
    15. 

  15.  * This program is distributed in the hope that it will be useful,
    16. 

  16.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    17. 

  17.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    18. 

  18.  * GNU General Public License for more details.
    19. 

  19.  *
    20. 

  20.  * You should have received a copy of the GNU General Public License
    21. 

  21.  * along with this program. If not, see <http://www.gnu.org/licenses/>.
    22. 

  22.  * or see http://www.gnu.org/
    23. 

  23.  */
    24. 

  24. 

  25. /**
    26. 

  26.  * 	\file       htdocs/core/lib/pdf.lib.php
    27. 

  27.  * 	\brief      Set of functions used for PDF generation
    28. 

  28.  * 	\ingroup    core
    29. 

  29.  */
    30. 

  30. 

  31. /**
    32. 

  32.  *      Return array with format properties of default PDF format
    33. 

  33.  *
    34. 

  34.  *      @return     array		Array('width'=>w,'height'=>h,'unit'=>u);
    35. 

  35.  */
    36. 

  36. function pdf_getFormat() {
    37. 

  37.     global $conf, $db;
    38. 

  38. 

  39.     // Default value if setup was not done and/or entry into c_paper_format not defined
    40. 

  40.     $width = 210;
    41. 

  41.     $height = 297;
    42. 

  42.     $unit = 'mm';
    43. 

  43. 

  44.     if (empty($conf->global->MAIN_PDF_FORMAT)) {
    45. 

  45.         include_once DOL_DOCUMENT_ROOT . '/core/lib/functions2.lib.php';
    46. 

  46.         $pdfformat = dol_getDefaultFormat();
    47. 

  47.     }
    48. 

  48.     else
    49. 

  49.         $pdfformat = $conf->global->MAIN_PDF_FORMAT;
    50. 

  50. 

  51.     $sql = "SELECT code, label, width, height, unit FROM " . MAIN_DB_PREFIX . "c_paper_format";
    52. 

  52.     $sql.=" WHERE code = '" . $pdfformat . "'";
    53. 

  53.     $resql = $db->query($sql);
    54. 

  54.     if ($resql) {
    55. 

  55.         $obj = $db->fetch_object($resql);
    56. 

  56.         if ($obj) {
    57. 

  57.             $width = (int) $obj->width;
    58. 

  58.             $height = (int) $obj->height;
    59. 

  59.             $unit = $obj->unit;
    60. 

  60.         }
    61. 

  61.     }
    62. 

  62. 

  63.     //print "pdfformat=".$pdfformat." width=".$width." height=".$height." unit=".$unit;
    64. 

  64.     return array('width' => $width, 'height' => $height, 'unit' => $unit);
    65. 

  65. }
    66. 

  66. 

  67. /**
    68. 

  68.  *      Return a PDF instance object. We create a FPDI instance that instanciate TCPDF.
    69. 

  69.  *
    70. 

  70.  *      @param	string		$format         Array(width,height). Keep empty to use default setup.
    71. 

  71.  *      @param	string		$metric         Unit of format ('mm')
    72. 

  72.  *      @param  string		$pagetype       'P' or 'l'
    73. 

  73.  *      @return TPDF							PDF object
    74. 

  74.  */
    75. 

  75. function pdf_getInstance($format = '', $metric = 'mm', $pagetype = 'P') {
    76. 

  76.     global $conf;
    77. 

  77. 

  78.     if (!empty($conf->global->MAIN_USE_FPDF) && !empty($conf->global->MAIN_DISABLE_FPDI))
    79. 

  79.         return "Error MAIN_USE_FPDF and MAIN_DISABLE_FPDI can't be set together";
    80. 

  80. 

  81.     // We use by default TCPDF
    82. 

  82.     if (empty($conf->global->MAIN_USE_FPDF))
    83. 

  83.         require_once TCPDF_PATH . 'tcpdf.php';
    84. 

  84.     // We need to instantiate fpdi object (instead of tcpdf) to use merging features. But we can disable it.
    85. 

  85.     if (empty($conf->global->MAIN_DISABLE_FPDI))
    86. 

  86.         require_once FPDI_PATH . 'fpdi.php';
    87. 

  87. 

  88.     //$arrayformat=pdf_getFormat();
    89. 

  89.     //$format=array($arrayformat['width'],$arrayformat['height']);
    90. 

  90.     //$metric=$arrayformat['unit'];
    91. 

  91.     // Protection et encryption du pdf
    92. 

  92.     if (!empty($conf->global->PDF_SECURITY_ENCRYPTION)) {
    93. 

  93.         /* Permission supported by TCPDF
    94. 

  94.           - print : Print the document;
    95. 

  95.           - modify : Modify the contents of the document by operations other than those controlled by 'fill-forms', 'extract' and 'assemble';
    96. 

  96.           - copy : Copy or otherwise extract text and graphics from the document;
    97. 

  97.           - 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);
    98. 

  98.           - fill-forms : Fill in existing interactive form fields (including signature fields), even if 'annot-forms' is not specified;
    99. 

  99.           - extract : Extract text and graphics (in support of accessibility to users with disabilities or for other purposes);
    100. 

  100.           - assemble : Assemble the document (insert, rotate, or delete pages and create bookmarks or thumbnail images), even if 'modify' is not set;
    101. 

  101.           - 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.
    102. 

  102.           - owner : (inverted logic - only for public-key) when set permits change of encryption and enables all other permissions.
    103. 

  103.          */
    104. 

  104.         if (!empty($conf->global->MAIN_USE_FPDF)) {
    105. 

  105.             require_once FPDI_PATH . 'fpdi_protection.php';
    106. 

  106.             $pdf = new FPDI_Protection($pagetype, $metric, $format);
    107. 

  107.             // For FPDF, we specify permission we want to open
    108. 

  108.             $pdfrights = array('print');
    109. 

  109.         } else {
    110. 

  110.             if (class_exists('FPDI'))
    111. 

  111.                 $pdf = new FPDI($pagetype, $metric, $format);
    112. 

  112.             else
    113. 

  113.                 $pdf = new TCPDF($pagetype, $metric, $format);
    114. 

  114.             // For TCPDF, we specify permission we want to block
    115. 

  115.             $pdfrights = array('modify', 'copy');
    116. 

  116.         }
    117. 

  117.         $pdfuserpass = ''; // Mot de passe pour l'utilisateur final
    118. 

  118.         $pdfownerpass = NULL; // Mot de passe du proprietaire, cree aleatoirement si pas defini
    119. 

  119.         $pdf->SetProtection($pdfrights, $pdfuserpass, $pdfownerpass);
    120. 

  120.     }
    121. 

  121.     else {
    122. 

  122.         if (class_exists('FPDI'))
    123. 

  123.             $pdf = new FPDI($pagetype, $metric, $format);
    124. 

  124.         else
    125. 

  125.             $pdf = new TCPDF($pagetype, $metric, $format);
    126. 

  126.     }
    127. 

  127.     return $pdf;
    128. 

  128. }
    129. 

  129. 

  130. /**
    131. 

  131.  *      Return font name to use for PDF generation
    132. 

  132.  *
    133. 

  133.  *      @param	Translate	$outputlangs    Output langs object
    134. 

  134.  *      @return string          			Name of font to use
    135. 

  135.  */
    136. 

  136. function pdf_getPDFFont($outputlangs) {
    137. 

  137.     $font = 'Helvetica'; // By default, for FPDI or ISO language on TCPDF
    138. 

  138.     if (class_exists('TCPDF')) {  // If TCPDF on, we can use an UTF8 one like DejaVuSans if required (slower)
    139. 

  139.         if ($outputlangs->trans('FONTFORPDF') != 'FONTFORPDF') {
    140. 

  140.             $font = $outputlangs->trans('FONTFORPDF');
    141. 

  141.         }
    142. 

  142.     }
    143. 

  143.     return $font;
    144. 

  144. }
    145. 

  145. 

  146. /**
    147. 

  147.  *      Return font size to use for PDF generation
    148. 

  148.  *
    149. 

  149.  *      @param	Translate	$outputlangs     Output langs object
    150. 

  150.  *      @return int				             Size of font to use
    151. 

  151.  */
    152. 

  152. function pdf_getPDFFontSize($outputlangs) {
    153. 

  153.     $size = 10;                   // By default, for FPDI or ISO language on TCPDF
    154. 

  154.     if (class_exists('TCPDF')) {  // If TCPDF on, we can use an UTF8 one like DejaVuSans if required (slower)
    155. 

  155.         if ($outputlangs->trans('FONTSIZEFORPDF') != 'FONTSIZEFORPDF') {
    156. 

  156.             $size = (int) $outputlangs->trans('FONTSIZEFORPDF');
    157. 

  157.         }
    158. 

  158.     }
    159. 

  159.     return $size;
    160. 

  160. }
    161. 

  161. 

  162. /**
    163. 

  163.  * Return height to use for Logo onot PDF
    164. 

  164.  *
    165. 

  165.  * @param	string		$logo		Full path to logo file to use
    166. 

  166.  * @return	number
    167. 

  167.  */
    168. 

  168. function pdf_getHeightForLogo($logo) {
    169. 

  169.     $height = 22;
    170. 

  170.     $maxwidth = 130;
    171. 

  171.     include_once DOL_DOCUMENT_ROOT . '/core/lib/images.lib.php';
    172. 

  172.     $tmp = dol_getImageSize($logo);
    173. 

  173.     if ($tmp['height']) {
    174. 

  174.         $width = round($height * $tmp['width'] / $tmp['height']);
    175. 

  175.         if ($width > $maxwidth)
    176. 

  176.             $height = $height * $maxwidth / $width;
    177. 

  177.     }
    178. 

  178.     //print $tmp['width'].' '.$tmp['height'].' '.$width; exit;
    179. 

  179.     return $height;
    180. 

  180. }
    181. 

  181. 

  182. /**
    183. 

  183.  *   	Return a string with full address formated
    184. 

  184.  *
    185. 

  185.  * 		@param	Translate	$outputlangs		Output langs object
    186. 

  186.  *   	@param  Societe		$sourcecompany		Source company object
    187. 

  187.  *   	@param  Societe		$targetcompany		Target company object
    188. 

  188.  *      @param  Contact		$targetcontact		Target contact object
    189. 

  189.  * 		@param	int			$usecontact			Use contact instead of company
    190. 

  190.  * 		@param	int			$mode				Address type
    191. 

  191.  * 		@param	Societe		$deliverycompany	Delivery company object
    192. 

  192.  * 		@return	string							String with full address
    193. 

  193.  */
    194. 

  194. function pdf_build_address($outputlangs, $sourcecompany, $targetcompany = '', $targetcontact = '', $usecontact = 0, $mode = 'source', $deliverycompany = '') {
    195. 

  195.     global $conf;
    196. 

  196. 

  197.     $stringaddress = '';
    198. 

  198. 

  199.     if ($mode == 'source' && !is_object($sourcecompany))
    200. 

  200.         return -1;
    201. 

  201.     if ($mode == 'target' && !is_object($targetcompany))
    202. 

  202.         return -1;
    203. 

  203.     if ($mode == 'delivery' && !is_object($deliverycompany))
    204. 

  204.         return -1;
    205. 

  205. 

  206.     if (!empty($sourcecompany->state_id) && empty($sourcecompany->departement))
    207. 

  207.         $sourcecompany->departement = getState($sourcecompany->state_id);
    208. 

  208.     if (!empty($targetcompany->state_id) && empty($targetcompany->departement))
    209. 

  209.         $targetcompany->departement = getState($targetcompany->state_id);
    210. 

  210. 

  211.     if ($mode == 'source') {
    212. 

  212.         $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->convToOutputCharset(dol_format_address($sourcecompany)) . "\n";
    213. 

  213. 

  214.         if (empty($conf->global->MAIN_PDF_DISABLESOURCEDETAILS)) {
    215. 

  215.             // Tel
    216. 

  216.             if ($sourcecompany->tel)
    217. 

  217.                 $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Phone") . ": " . $outputlangs->convToOutputCharset($sourcecompany->tel);
    218. 

  218.             // Fax
    219. 

  219.             if ($sourcecompany->fax)
    220. 

  220.                 $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Fax") . ": " . $outputlangs->convToOutputCharset($sourcecompany->fax);
    221. 

  221.             // EMail
    222. 

  222.             if ($sourcecompany->email)
    223. 

  223.                 $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Email") . ": " . $outputlangs->convToOutputCharset($sourcecompany->email);
    224. 

  224.             // Web
    225. 

  225.             if ($sourcecompany->url)
    226. 

  226.                 $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Web") . ": " . $outputlangs->convToOutputCharset($sourcecompany->url);
    227. 

  227.         }
    228. 

  228.     }
    229. 

  229. 

  230.     if ($mode == 'target') {
    231. 

  231.         if ($usecontact) {
    232. 

  232.             $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->convToOutputCharset($targetcontact->getFullName($outputlangs, 1));
    233. 

  233.             $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->convToOutputCharset(dol_format_address($targetcontact)) . "\n";
    234. 

  234.             // Country
    235. 

  235.             if ($targetcontact->country_code && $targetcontact->country_code != $sourcecompany->pays_code)
    236. 

  236.                 $stringaddress.=$outputlangs->convToOutputCharset($outputlangs->transnoentitiesnoconv("Country" . $targetcontact->pays_code)) . "\n";
    237. 

  237. 

  238.             if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS)) {
    239. 

  239.                 // Tel
    240. 

  240.                 if ($targetcontact->tel)
    241. 

  241.                     $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Phone") . ": " . $outputlangs->convToOutputCharset($targetcontact->tel);
    242. 

  242.                 // Fax
    243. 

  243.                 if ($targetcontact->fax)
    244. 

  244.                     $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Fax") . ": " . $outputlangs->convToOutputCharset($targetcontact->fax);
    245. 

  245.                 // EMail
    246. 

  246.                 if ($targetcontact->email)
    247. 

  247.                     $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Email") . ": " . $outputlangs->convToOutputCharset($targetcontact->email);
    248. 

  248.                 // Web
    249. 

  249.                 if ($targetcontact->url)
    250. 

  250.                     $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Web") . ": " . $outputlangs->convToOutputCharset($targetcontact->url);
    251. 

  251.             }
    252. 

  252.         }
    253. 

  253.         else {
    254. 

  254.             $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->convToOutputCharset(dol_format_address($targetcompany)) . "\n";
    255. 

  255.             // Country
    256. 

  256.             if ($targetcompany->country_code && $targetcompany->country_code != $sourcecompany->pays_code)
    257. 

  257.                 $stringaddress.=$outputlangs->convToOutputCharset($outputlangs->transnoentitiesnoconv("Country" . $targetcompany->pays_code)) . "\n";
    258. 

  258. 

  259.             if (!empty($conf->global->MAIN_PDF_ADDALSOTARGETDETAILS)) {
    260. 

  260.                 // Tel
    261. 

  261.                 if ($targetcompany->phone)
    262. 

  262.                     $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Phone") . ": " . $outputlangs->convToOutputCharset($targetcompany->phone);
    263. 

  263.                 // Fax
    264. 

  264.                 if ($targetcompany->fax)
    265. 

  265.                     $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Fax") . ": " . $outputlangs->convToOutputCharset($targetcompany->fax);
    266. 

  266.                 // EMail
    267. 

  267.                 if ($targetcompany->email)
    268. 

  268.                     $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Email") . ": " . $outputlangs->convToOutputCharset($targetcompany->email);
    269. 

  269.                 // Web
    270. 

  270.                 if ($targetcompany->url)
    271. 

  271.                     $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Web") . ": " . $outputlangs->convToOutputCharset($targetcompany->url);
    272. 

  272.             }
    273. 

  273.         }
    274. 

  274. 

  275.         // Intra VAT
    276. 

  276.         if ($targetcompany->tva_intra)
    277. 

  277.             $stringaddress.="\n" . $outputlangs->transnoentities("VATIntraShort") . ': ' . $outputlangs->convToOutputCharset($targetcompany->tva_intra);
    278. 

  278. 

  279.         // Professionnal Ids
    280. 

  280.         if (!empty($conf->global->MAIN_PROFID1_IN_ADDRESS) && !empty($targetcompany->idprof1)) {
    281. 

  281.             $tmp = $outputlangs->transcountrynoentities("ProfId1", $targetcompany->country_code);
    282. 

  282.             if (preg_match('/\((.+)\)/', $tmp, $reg))
    283. 

  283.                 $tmp = $reg[1];
    284. 

  284.             $stringaddress.="\n" . $tmp . ': ' . $outputlangs->convToOutputCharset($targetcompany->idprof1);
    285. 

  285.         }
    286. 

  286.         if (!empty($conf->global->MAIN_PROFID2_IN_ADDRESS) && !empty($targetcompany->idprof2)) {
    287. 

  287.             $tmp = $outputlangs->transcountrynoentities("ProfId2", $targetcompany->country_code);
    288. 

  288.             if (preg_match('/\((.+)\)/', $tmp, $reg))
    289. 

  289.                 $tmp = $reg[1];
    290. 

  290.             $stringaddress.="\n" . $tmp . ': ' . $outputlangs->convToOutputCharset($targetcompany->idprof2);
    291. 

  291.         }
    292. 

  292.         if (!empty($conf->global->MAIN_PROFID3_IN_ADDRESS) && !empty($targetcompany->idprof3)) {
    293. 

  293.             $tmp = $outputlangs->transcountrynoentities("ProfId3", $targetcompany->country_code);
    294. 

  294.             if (preg_match('/\((.+)\)/', $tmp, $reg))
    295. 

  295.                 $tmp = $reg[1];
    296. 

  296.             $stringaddress.="\n" . $tmp . ': ' . $outputlangs->convToOutputCharset($targetcompany->idprof3);
    297. 

  297.         }
    298. 

  298.         if (!empty($conf->global->MAIN_PROFID4_IN_ADDRESS) && !empty($targetcompany->idprof4)) {
    299. 

  299.             $tmp = $outputlangs->transcountrynoentities("ProfId4", $targetcompany->country_code);
    300. 

  300.             if (preg_match('/\((.+)\)/', $tmp, $reg))
    301. 

  301.                 $tmp = $reg[1];
    302. 

  302.             $stringaddress.="\n" . $tmp . ': ' . $outputlangs->convToOutputCharset($targetcompany->idprof4);
    303. 

  303.         }
    304. 

  304.     }
    305. 

  305. 

  306.     if ($mode == 'delivery') { // for a delivery address (address + phone/fax)
    307. 

  307.         $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->convToOutputCharset(dol_format_address($deliverycompany)) . "\n";
    308. 

  308. 

  309.         // Tel
    310. 

  310.         if ($deliverycompany->phone)
    311. 

  311.             $stringaddress .= ($stringaddress ? "\n" : '' ) . $outputlangs->transnoentities("Phone") . ": " . $outputlangs->convToOutputCharset($deliverycompany->phone);
    312. 

  312.         // Fax
    313. 

  313.         if ($deliverycompany->fax)
    314. 

  314.             $stringaddress .= ($stringaddress ? ($deliverycompany->phone ? " - " : "\n") : '' ) . $outputlangs->transnoentities("Fax") . ": " . $outputlangs->convToOutputCharset($deliverycompany->fax);
    315. 

  315.     }
    316. 

  316. 

  317.     return $stringaddress;
    318. 

  318. }
    319. 

  319. 

  320. /**
    321. 

  321.  *   	Show header of page for PDF generation
    322. 

  322.  *
    323. 

  323.  *   	@param      PDF			&$pdf     		Object PDF
    324. 

  324.  *      @param      Translate	$outputlangs	Object lang for output
    325. 

  325.  * 		@param		int			$page_height	Height of page
    326. 

  326.  *      @return	void
    327. 

  327.  */
    328. 

  328. function pdf_pagehead(&$pdf, $outputlangs, $page_height) {
    329. 

  329.     global $conf;
    330. 

  330. 

  331.     // Add a background image on document
    332. 

  332.     if (!empty($conf->global->MAIN_USE_BACKGROUND_ON_PDF)) {
    333. 

  333.         $pdf->Image($conf->mycompany->dir_output . '/logos/' . $conf->global->MAIN_USE_BACKGROUND_ON_PDF, 0, 0, 0, $page_height);
    334. 

  334.     }
    335. 

  335. }
    336. 

  336. 

  337. /**
    338. 

  338.  *      Add a draft watermark on PDF files
    339. 

  339.  *
    340. 

  340.  *      @param	PDF      	&$pdf           Object PDF
    341. 

  341.  *      @param  Translate	$outputlangs	Object lang
    342. 

  342.  *      @param  int		    $h		        Height of PDF
    343. 

  343.  *      @param  int		    $w		        Width of PDF
    344. 

  344.  *      @param  string	    $unit           Unit of height (mmn, pt, ...)
    345. 

  345.  *      @param  string		$text           Text to show
    346. 

  346.  *      @return	void
    347. 

  347.  */
    348. 

  348. function pdf_watermark(&$pdf, $outputlangs, $h, $w, $unit, $text) {
    349. 

  349.     // Print Draft Watermark
    350. 

  350.     if ($unit == 'pt')
    351. 

  351.         $k = 1;
    352. 

  352.     elseif ($unit == 'mm')
    353. 

  353.         $k = 72 / 25.4;
    354. 

  354.     elseif ($unit == 'cm')
    355. 

  355.         $k = 72 / 2.54;
    356. 

  356.     elseif ($unit == 'in')
    357. 

  357.         $k = 72;
    358. 

  358. 

  359.     $watermark_angle = atan($h / $w);
    360. 

  360.     $watermark_x = 5;
    361. 

  361.     $watermark_y = $h - 25; //Set to $this->page_hauteur-50 or less if problems
    362. 

  362.     $watermark_width = $h;
    363. 

  363.     $pdf->SetFont('', 'B', 50);
    364. 

  364.     $pdf->SetTextColor(255, 192, 203);
    365. 

  365.     //rotate
    366. 

  366.     $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));
    367. 

  367.     //print watermark
    368. 

  368.     $pdf->SetXY($watermark_x, $watermark_y);
    369. 

  369.     $pdf->Cell($watermark_width, 25, $outputlangs->convToOutputCharset($text), 0, 2, "C", 0);
    370. 

  370.     //antirotate
    371. 

  371.     $pdf->_out('Q');
    372. 

  372. }
    373. 

  373. 

  374. /**
    375. 

  375.  *  Show bank informations for PDF generation
    376. 

  376.  *
    377. 

  377.  *  @param	PDF			&$pdf            		Object PDF
    378. 

  378.  *  @param  Translate	$outputlangs     		Object lang
    379. 

  379.  *  @param  int			$curx            		X
    380. 

  380.  *  @param  int			$cury            		Y
    381. 

  381.  *  @param  Account		$account         		Bank account object
    382. 

  382.  *  @param  int			$onlynumber      		Output only number
    383. 

  383.  *  @param	int			$default_font_size		Default font size
    384. 

  384.  *  @return	void
    385. 

  385.  */
    386. 

  386. function pdf_bank(&$pdf, $outputlangs, $curx, $cury, $account, $onlynumber = 0, $default_font_size = 10) {
    387. 

  387.     global $mysoc, $conf;
    388. 

  388. 

  389.     $pdf->SetXY($curx, $cury);
    390. 

  390. 

  391.     if (empty($onlynumber)) {
    392. 

  392.         $pdf->SetFont('', 'B', $default_font_size - 3);
    393. 

  393.         $pdf->MultiCell(100, 3, $outputlangs->transnoentities('PaymentByTransferOnThisBankAccount') . ':', 0, 'L', 0);
    394. 

  394.         $cury+=4;
    395. 

  395.     }
    396. 

  396. 

  397.     $outputlangs->load("banks");
    398. 

  398. 

  399.     // Get format of bank account according to its country
    400. 

  400.     $usedetailedbban = $account->useDetailedBBAN();
    401. 

  401. 

  402.     //$onlynumber=0; $usedetailedbban=0; // For tests
    403. 

  403.     if ($usedetailedbban) {
    404. 

  404.         $savcurx = $curx;
    405. 

  405. 

  406.         if (empty($onlynumber)) {
    407. 

  407.             $pdf->SetFont('', '', $default_font_size - 4);
    408. 

  408.             $pdf->SetXY($curx, $cury);
    409. 

  409.             $pdf->MultiCell(100, 3, $outputlangs->transnoentities("Bank") . ': ' . $outputlangs->convToOutputCharset($account->bank), 0, 'L', 0);
    410. 

  410.             $cury+=3;
    411. 

  411.         }
    412. 

  412. 

  413.         if (empty($onlynumber))
    414. 

  414.             $pdf->line($curx + 1, $cury + 1, $curx + 1, $cury + 8);
    415. 

  415. 

  416.         if ($usedetailedbban == 1) {
    417. 

  417.             $fieldstoshow = array('bank', 'desk', 'number', 'key');
    418. 

  418.             if ($conf->global->BANK_SHOW_ORDER_OPTION == 1)
    419. 

  419.                 $fieldstoshow = array('bank', 'desk', 'key', 'number');
    420. 

  420.         }
    421. 

  421.         else if ($usedetailedbban == 2) {
    422. 

  422.             $fieldstoshow = array('bank', 'number');
    423. 

  423.         }
    424. 

  424.         else
    425. 

  425.             dol_print_error('', 'Value returned by function useDetailedBBAN not managed');
    426. 

  426. 

  427.         foreach ($fieldstoshow as $val) {
    428. 

  428.             if ($val == 'bank') {
    429. 

  429.                 // Bank code
    430. 

  430.                 $tmplength = 18;
    431. 

  431.                 $pdf->SetXY($curx, $cury + 5);
    432. 

  432.                 $pdf->SetFont('', '', $default_font_size - 3);
    433. 

  433.                 $pdf->MultiCell($tmplength, 3, $outputlangs->convToOutputCharset($account->code_banque), 0, 'C', 0);
    434. 

  434.                 $pdf->SetXY($curx, $cury + 1);
    435. 

  435.                 $curx+=$tmplength;
    436. 

  436.                 $pdf->SetFont('', 'B', $default_font_size - 4);
    437. 

  437.                 $pdf->MultiCell($tmplength, 3, $outputlangs->transnoentities("BankCode"), 0, 'C', 0);
    438. 

  438.                 if (empty($onlynumber))
    439. 

  439.                     $pdf->line($curx, $cury + 1, $curx, $cury + 8);
    440. 

  440.             }
    441. 

  441.             if ($val == 'desk') {
    442. 

  442.                 // Desk
    443. 

  443.                 $tmplength = 18;
    444. 

  444.                 $pdf->SetXY($curx, $cury + 5);
    445. 

  445.                 $pdf->SetFont('', '', $default_font_size - 3);
    446. 

  446.                 $pdf->MultiCell($tmplength, 3, $outputlangs->convToOutputCharset($account->code_guichet), 0, 'C', 0);
    447. 

  447.                 $pdf->SetXY($curx, $cury + 1);
    448. 

  448.                 $curx+=$tmplength;
    449. 

  449.                 $pdf->SetFont('', 'B', $default_font_size - 4);
    450. 

  450.                 $pdf->MultiCell($tmplength, 3, $outputlangs->transnoentities("DeskCode"), 0, 'C', 0);
    451. 

  451.                 if (empty($onlynumber))
    452. 

  452.                     $pdf->line($curx, $cury + 1, $curx, $cury + 8);
    453. 

  453.             }
    454. 

  454.             if ($val == 'number') {
    455. 

  455.                 // Number
    456. 

  456.                 $tmplength = 24;
    457. 

  457.                 $pdf->SetXY($curx, $cury + 5);
    458. 

  458.                 $pdf->SetFont('', '', $default_font_size - 3);
    459. 

  459.                 $pdf->MultiCell($tmplength, 3, $outputlangs->convToOutputCharset($account->number), 0, 'C', 0);
    460. 

  460.                 $pdf->SetXY($curx, $cury + 1);
    461. 

  461.                 $curx+=$tmplength;
    462. 

  462.                 $pdf->SetFont('', 'B', $default_font_size - 4);
    463. 

  463.                 $pdf->MultiCell($tmplength, 3, $outputlangs->transnoentities("BankAccountNumber"), 0, 'C', 0);
    464. 

  464.                 if (empty($onlynumber))
    465. 

  465.                     $pdf->line($curx, $cury + 1, $curx, $cury + 8);
    466. 

  466.             }
    467. 

  467.             if ($val == 'key') {
    468. 

  468.                 // Key
    469. 

  469.                 $tmplength = 13;
    470. 

  470.                 $pdf->SetXY($curx, $cury + 5);
    471. 

  471.                 $pdf->SetFont('', '', $default_font_size - 3);
    472. 

  472.                 $pdf->MultiCell($tmplength, 3, $outputlangs->convToOutputCharset($account->cle_rib), 0, 'C', 0);
    473. 

  473.                 $pdf->SetXY($curx, $cury + 1);
    474. 

  474.                 $curx+=$tmplength;
    475. 

  475.                 $pdf->SetFont('', 'B', $default_font_size - 4);
    476. 

  476.                 $pdf->MultiCell($tmplength, 3, $outputlangs->transnoentities("BankAccountNumberKey"), 0, 'C', 0);
    477. 

  477.                 if (empty($onlynumber))
    478. 

  478.                     $pdf->line($curx, $cury + 1, $curx, $cury + 8);
    479. 

  479.             }
    480. 

  480.         }
    481. 

  481. 

  482.         $curx = $savcurx;
    483. 

  483.         $cury+=10;
    484. 

  484.     }
    485. 

  485.     else {
    486. 

  486.         $pdf->SetFont('', 'B', 6);
    487. 

  487.         $pdf->SetXY($curx, $cury);
    488. 

  488.         $pdf->MultiCell(100, 3, $outputlangs->transnoentities("Bank") . ': ' . $outputlangs->convToOutputCharset($account->bank), 0, 'L', 0);
    489. 

  489.         $cury+=3;
    490. 

  490. 

  491.         $pdf->SetFont('', 'B', 6);
    492. 

  492.         $pdf->SetXY($curx, $cury);
    493. 

  493.         $pdf->MultiCell(100, 3, $outputlangs->transnoentities("BankAccountNumber") . ': ' . $outputlangs->convToOutputCharset($account->number), 0, 'L', 0);
    494. 

  494.         $cury+=3;
    495. 

  495.     }
    496. 

  496. 

  497.     // Use correct name of bank id according to country
    498. 

  498.     $ibankey = "IBANNumber";
    499. 

  499.     $bickey = "BICNumber";
    500. 

  500.     if ($account->getCountryCode() == 'IN')
    501. 

  501.         $ibankey = "IFSC";
    502. 

  502.     if ($account->getCountryCode() == 'IN')
    503. 

  503.         $bickey = "SWIFT";
    504. 

  504. 

  505.     $pdf->SetFont('', '', 6);
    506. 

  506. 

  507.     if (empty($onlynumber) && !empty($account->domiciliation)) {
    508. 

  508.         $pdf->SetXY($curx, $cury);
    509. 

  509.         $val = $outputlangs->transnoentities("Residence") . ': ' . $outputlangs->convToOutputCharset($account->domiciliation);
    510. 

  510.         $pdf->MultiCell(100, 3, $val, 0, 'L', 0);
    511. 

  511.         $nboflines = dol_nboflines_bis($val, 120);
    512. 

  512.         //print $nboflines;exit;
    513. 

  513.         $cury+=($nboflines * 2) + 2;
    514. 

  514.     } else if (!$usedetailedbban)
    515. 

  515.         $cury+=1;
    516. 

  516. 

  517.     $pdf->SetXY($curx, $cury);
    518. 

  518.     $pdf->MultiCell(100, 3, $outputlangs->transnoentities($ibankey) . ': ' . $outputlangs->convToOutputCharset($account->iban), 0, 'L', 0);
    519. 

  519.     $pdf->SetXY($curx, $cury + 3);
    520. 

  520.     $pdf->MultiCell(100, 3, $outputlangs->transnoentities($bickey) . ': ' . $outputlangs->convToOutputCharset($account->bic), 0, 'L', 0);
    521. 

  521. 

  522.     return $pdf->getY();
    523. 

  523. }
    524. 

  524. 

  525. /**
    526. 

  526.  *  Show footer of page for PDF generation
    527. 

  527.  *
    528. 

  528.  * 	@param	PDF			&$pdf     		The PDF factory
    529. 

  529.  *  @param  Translate	$outputlangs	Object lang for output
    530. 

  530.  * 	@param	string		$paramfreetext	Constant name of free text
    531. 

  531.  * 	@param	Societe		$fromcompany	Object company
    532. 

  532.  * 	@param	int			$marge_basse	Margin bottom we use for the autobreak
    533. 

  533.  * 	@param	int			$marge_gauche	Margin left (no more used)
    534. 

  534.  * 	@param	int			$page_hauteur	Page height (no more used)
    535. 

  535.  * 	@param	Object		$object			Object shown in PDF
    536. 

  536.  * 	@param	int			$showdetails	Show company details into footer. This param seems to not be used by standard version.
    537. 

  537.  * 	@return	int							Return height of bottom margin including footer text
    538. 

  538.  */
    539. 

  539. function pdf_pagefoot(&$pdf, $outputlangs, $paramfreetext, $fromcompany, $marge_basse, $marge_gauche, $page_hauteur, $object, $showdetails = 0) {
    540. 

  540.     global $conf, $user;
    541. 

  541. 

  542.     $outputlangs->load("dict");
    543. 

  543.     $line = '';
    544. 

  544. 

  545.     $dims = $pdf->getPageDimensions();
    546. 

  546. 

  547.     // Line of free text
    548. 

  548.     if (!empty($conf->global->$paramfreetext)) {
    549. 

  549.         // Make substitution
    550. 

  550.         $substitutionarray = array(
    551. 

  551.             '__FROM_NAME__' => $fromcompany->nom,
    552. 

  552.             '__FROM_EMAIL__' => $fromcompany->email,
    553. 

  553.             '__TOTAL_TTC__' => $object->total_ttc,
    554. 

  554.             '__TOTAL_HT__' => $object->total_ht,
    555. 

  555.             '__TOTAL_VAT__' => $object->total_vat
    556. 

  556.         );
    557. 

  557.         complete_substitutions_array($substitutionarray, $outputlangs, $object);
    558. 

  558.         $newfreetext = make_substitutions($conf->global->$paramfreetext, $substitutionarray);
    559. 

  559.         $line.=$outputlangs->convToOutputCharset($newfreetext);
    560. 

  560.     }
    561. 

  561. 

  562.     // First line of company infos
    563. 

  563. 

  564.     if ($showdetails) {
    565. 

  565.         $line1 = "";
    566. 

  566.         // Company name
    567. 

  567.         if ($fromcompany->name) {
    568. 

  568.             $line1.=($line1 ? " - " : "") . $outputlangs->transnoentities("RegisteredOffice") . ": " . $fromcompany->name;
    569. 

  569.         }
    570. 

  570.         // Address
    571. 

  571.         if ($fromcompany->address) {
    572. 

  572.             $line1.=($line1 ? " - " : "") . $fromcompany->address;
    573. 

  573.         }
    574. 

  574.         // Zip code
    575. 

  575.         if ($fromcompany->zip) {
    576. 

  576.             $line1.=($line1 ? " - " : "") . $fromcompany->zip;
    577. 

  577.         }
    578. 

  578.         // Town
    579. 

  579.         if ($fromcompany->town) {
    580. 

  580.             $line1.=($line1 ? " " : "") . $fromcompany->town;
    581. 

  581.         }
    582. 

  582.         // Phone
    583. 

  583.         if ($fromcompany->phone) {
    584. 

  584.             $line1.=($line1 ? " - " : "") . $outputlangs->transnoentities("Phone") . ": " . $fromcompany->phone;
    585. 

  585.         }
    586. 

  586.         // Fax
    587. 

  587.         if ($fromcompany->fax) {
    588. 

  588.             $line1.=($line1 ? " - " : "") . $outputlangs->transnoentities("Fax") . ": " . $fromcompany->fax;
    589. 

  589.         }
    590. 

  590. 

  591.         $line2 = "";
    592. 

  592.         // URL
    593. 

  593.         if ($fromcompany->url) {
    594. 

  594.             $line2.=($line2 ? " - " : "") . $fromcompany->url;
    595. 

  595.         }
    596. 

  596.         // Email
    597. 

  597.         if ($fromcompany->email) {
    598. 

  598.             $line2.=($line2 ? " - " : "") . $fromcompany->email;
    599. 

  599.         }
    600. 

  600.     }
    601. 

  601. 

  602.     // Line 3 of company infos
    603. 

  603.     $line3 = "";
    604. 

  604.     // Juridical status
    605. 

  605.     if ($fromcompany->forme_juridique_code) {
    606. 

  606.         $line3.=($line3 ? " - " : "") . $outputlangs->convToOutputCharset(getFormeJuridiqueLabel($fromcompany->forme_juridique_code));
    607. 

  607.     }
    608. 

  608.     // Capital
    609. 

  609.     if ($fromcompany->capital) {
    610. 

  610.         $line3.=($line3 ? " - " : "") . $outputlangs->transnoentities("CapitalOf", $fromcompany->capital) . " " . $outputlangs->transnoentities("Currency" . $conf->currency);
    611. 

  611.     }
    612. 

  612.     // Prof Id 1
    613. 

  613.     if ($fromcompany->idprof1 && ($fromcompany->country_code != 'FR' || !$fromcompany->idprof2)) {
    614. 

  614.         $field = $outputlangs->transcountrynoentities("ProfId1", $fromcompany->country_code);
    615. 

  615.         if (preg_match('/\((.*)\)/i', $field, $reg))
    616. 

  616.             $field = $reg[1];
    617. 

  617.         $line3.=($line3 ? " - " : "") . $field . ": " . $outputlangs->convToOutputCharset($fromcompany->idprof1);
    618. 

  618.     }
    619. 

  619.     // Prof Id 2
    620. 

  620.     if ($fromcompany->idprof2) {
    621. 

  621.         $field = $outputlangs->transcountrynoentities("ProfId2", $fromcompany->country_code);
    622. 

  622.         if (preg_match('/\((.*)\)/i', $field, $reg))
    623. 

  623.             $field = $reg[1];
    624. 

  624.         $line3.=($line3 ? " - " : "") . $field . ": " . $outputlangs->convToOutputCharset($fromcompany->idprof2);
    625. 

  625.     }
    626. 

  626. 

  627.     // Line 4 of company infos
    628. 

  628.     $line4 = "";
    629. 

  629.     // Prof Id 3
    630. 

  630.     if ($fromcompany->idprof3) {
    631. 

  631.         $field = $outputlangs->transcountrynoentities("ProfId3", $fromcompany->country_code);
    632. 

  632.         if (preg_match('/\((.*)\)/i', $field, $reg))
    633. 

  633.             $field = $reg[1];
    634. 

  634.         $line4.=($line4 ? " - " : "") . $field . ": " . $outputlangs->convToOutputCharset($fromcompany->idprof3);
    635. 

  635.     }
    636. 

  636.     // Prof Id 4
    637. 

  637.     if ($fromcompany->idprof4) {
    638. 

  638.         $field = $outputlangs->transcountrynoentities("ProfId4", $fromcompany->country_code);
    639. 

  639.         if (preg_match('/\((.*)\)/i', $field, $reg))
    640. 

  640.             $field = $reg[1];
    641. 

  641.         $line4.=($line4 ? " - " : "") . $field . ": " . $outputlangs->convToOutputCharset($fromcompany->idprof4);
    642. 

  642.     }
    643. 

  643.     // IntraCommunautary VAT
    644. 

  644.     if ($fromcompany->tva_intra != '') {
    645. 

  645.         $line4.=($line4 ? " - " : "") . $outputlangs->transnoentities("VATIntraShort") . ": " . $outputlangs->convToOutputCharset($fromcompany->tva_intra);
    646. 

  646.     }
    647. 

  647. 

  648.     $pdf->SetFont('', '', 7);
    649. 

  649.     $pdf->SetDrawColor(224, 224, 224);
    650. 

  650. 

  651.     // On positionne le debut du bas de page selon nbre de lignes de ce bas de page
    652. 

  652.     $nbofline = dol_nboflines_bis($line, 0, $outputlangs->charset_output);
    653. 

  653.     //print 'nbofline='.$nbofline; exit;
    654. 

  654.     //print 'e'.$line.'t'.dol_nboflines($line);exit;
    655. 

  655.     $marginwithfooter = $marge_basse + ($nbofline * 3) + (!empty($line1) ? 3 : 0) + (!empty($line2) ? 3 : 0) + (!empty($line3) ? 3 : 0) + (!empty($line4) ? 3 : 0);
    656. 

  656.     $posy = $marginwithfooter + 0;
    657. 

  657. 

  658.     if ($line) { // Free text
    659. 

  659.         $pdf->SetXY($dims['lm'], -$posy);
    660. 

  660.         $width = 20000;
    661. 

  661.         $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.
    662. 

  662.         if (!empty($conf->global->MAIN_USE_AUTOWRAP_ON_FREETEXT)) {
    663. 

  663.             $width = 200;
    664. 

  664.             $align = 'C';
    665. 

  665.         }
    666. 

  666.         $pdf->MultiCell($width, 3, $line, 0, $align, 0);
    667. 

  667.         $posy-=($nbofline * 3); // 6 of ligne + 3 of MultiCell
    668. 

  668.     }
    669. 

  669. 

  670.     $pdf->SetY(-$posy);
    671. 

  671.     $pdf->line($dims['lm'], $dims['hk'] - $posy, $dims['wk'] - $dims['rm'], $dims['hk'] - $posy);
    672. 

  672.     $posy--;
    673. 

  673. 

  674.     if (!empty($line1)) {
    675. 

  675.         $pdf->SetFont('', 'B', 7);
    676. 

  676.         $pdf->SetXY($dims['lm'], -$posy);
    677. 

  677.         $pdf->MultiCell(200, 2, $line1, 0, 'C', 0);
    678. 

  678.         $posy-=3;
    679. 

  679.         $pdf->SetFont('', '', 7);
    680. 

  680.     }
    681. 

  681. 

  682.     if (!empty($line2)) {
    683. 

  683.         $pdf->SetFont('', 'B', 7);
    684. 

  684.         $pdf->SetXY($dims['lm'], -$posy);
    685. 

  685.         $pdf->MultiCell(200, 2, $line2, 0, 'C', 0);
    686. 

  686.         $posy-=3;
    687. 

  687.         $pdf->SetFont('', '', 7);
    688. 

  688.     }
    689. 

  689. 

  690.     if (!empty($line3)) {
    691. 

  691.         $pdf->SetXY($dims['lm'], -$posy);
    692. 

  692.         $pdf->MultiCell(200, 2, $line3, 0, 'C', 0);
    693. 

  693.     }
    694. 

  694. 

  695.     if (!empty($line4)) {
    696. 

  696.         $posy-=3;
    697. 

  697.         $pdf->SetXY($dims['lm'], -$posy);
    698. 

  698.         $pdf->MultiCell(200, 2, $line4, 0, 'C', 0);
    699. 

  699.     }
    700. 

  700. 

  701.     // Show page nb only on iso languages (so default Helvetica font)
    702. 

  702.     if (pdf_getPDFFont($outputlangs) == 'Helvetica') {
    703. 

  703.         $pdf->SetXY(-20, -$posy);
    704. 

  704.         $pdf->MultiCell(11, 2, $pdf->PageNo() . '/' . $pdf->getAliasNbPages(), 0, 'R', 0);
    705. 

  705.         //print 'xxx'.$pdf->getAliasNbPages().'-'.$pdf->getAliasNumPage();exit;
    706. 

  706.     }
    707. 

  707. 

  708.     return $marginwithfooter;
    709. 

  709. }
    710. 

  710. 

  711. /**
    712. 

  712.  * 	Show linked objects for PDF generation
    713. 

  713.  *
    714. 

  714.  * 	@param	PDF			&$pdf				Object PDF
    715. 

  715.  * 	@param	object		$object				Object
    716. 

  716.  * 	@param  Translate	$outputlangs		Object lang
    717. 

  717.  * 	@param  int			$posx				X
    718. 

  718.  * 	@param  int			$posy				Y
    719. 

  719.  * 	@param	float		$w					Width of cells. If 0, they extend up to the right margin of the page.
    720. 

  720.  * 	@param	float		$h					Cell minimum height. The cell extends automatically if needed.
    721. 

  721.  * 	@param	int			$align				Align
    722. 

  722.  * 	@param	string		$default_font_size	Font size
    723. 

  723.  * 	@return	void
    724. 

  724.  */
    725. 

  725. function pdf_writeLinkedObjects(&$pdf, $object, $outputlangs, $posx, $posy, $w, $h, $align, $default_font_size) {
    726. 

  726.     $linkedobjects = pdf_getLinkedObjects($object, $outputlangs);
    727. 

  727.     if (!empty($linkedobjects)) {
    728. 

  728.         foreach ($linkedobjects as $linkedobject) {
    729. 

  729.             $posy+=3;
    730. 

  730.             $pdf->SetXY($posx, $posy);
    731. 

  731.             $pdf->SetFont('', '', $default_font_size - 2);
    732. 

  732.             $pdf->MultiCell($w, $h, $linkedobject["ref_title"] . ' : ' . $linkedobject["ref_value"], '', $align);
    733. 

  733. 

  734.             if (!empty($linkedobject["date_title"]) && !empty($linkedobject["date_value"])) {
    735. 

  735.                 $posy+=3;
    736. 

  736.                 $pdf->SetXY($posx, $posy);
    737. 

  737.                 $pdf->MultiCell($w, $h, $linkedobject["date_title"] . ' : ' . $linkedobject["date_value"], '', $align);
    738. 

  738.             }
    739. 

  739.         }
    740. 

  740.     }
    741. 

  741. 

  742.     return $pdf->getY();
    743. 

  743. }
    744. 

  744. 

  745. /**
    746. 

  746.  * 	Output line description into PDF
    747. 

  747.  *
    748. 

  748.  *  @param  PDF				&$pdf               PDF object
    749. 

  749.  * 	@param	Object			$object				Object
    750. 

  750.  * 	@param	int				$i					Current line number
    751. 

  751.  *  @param  Translate		$outputlangs		Object lang for output
    752. 

  752.  *  @param  int				$w					Width
    753. 

  753.  *  @param  int				$h					Height
    754. 

  754.  *  @param  int				$posx				Pos x
    755. 

  755.  *  @param  int				$posy				Pos y
    756. 

  756.  *  @param  int				$hideref       		Hide reference
    757. 

  757.  *  @param  int				$hidedesc            Hide description
    758. 

  758.  * 	@param	int				$issupplierline		Is it a line for a supplier object ?
    759. 

  759.  * 	@return	void
    760. 

  760.  */
    761. 

  761. function pdf_writelinedesc(&$pdf, $object, $i, $outputlangs, $w, $h, $posx, $posy, $hideref = 0, $hidedesc = 0, $issupplierline = 0) {
    762. 

  762.     global $db, $conf, $langs, $hookmanager;
    763. 

  763. 

  764.     if ($object->lines[$i]->product_type == 9 && (!empty($object->lines[$i]->special_code) || !empty($object->lines[$i]->fk_parent_line))) {
    765. 

  765.         $special_code = $object->lines[$i]->special_code;
    766. 

  766.         if (!empty($object->lines[$i]->fk_parent_line))
    767. 

  767.             $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
    768. 

  768.         $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);
    769. 

  769.         $action = '';
    770. 

  770.         $reshook = $hookmanager->executeHooks('pdf_writelinedesc', $parameters, $object, $action);    // Note that $action and $object may have been modified by some hooks
    771. 

  771.     }
    772. 

  772.     else {
    773. 

  773.         $labelproductservice = pdf_getlinedesc($object, $i, $outputlangs, $hideref, $hidedesc, $issupplierline);
    774. 

  774.         // Description
    775. 

  775.         $pdf->writeHTMLCell($w, $h, $posx, $posy, $outputlangs->convToOutputCharset($labelproductservice), 0, 1);
    776. 

  776. 

  777.         return $labelproductservice;
    778. 

  778.     }
    779. 

  779. }
    780. 

  780. 

  781. /**
    782. 

  782.  *  Return line description translated in outputlangs and encoded into htmlentities and with <br>
    783. 

  783.  *
    784. 

  784.  *  @param  Object		$object              Object
    785. 

  785.  *  @param  int			$i                   Current line number (0 = first line, 1 = second line, ...)
    786. 

  786.  *  @param  Translate	$outputlangs         Object langs for output
    787. 

  787.  *  @param  int			$hideref             Hide reference
    788. 

  788.  *  @param  int			$hidedesc            Hide description
    789. 

  789.  *  @param  int			$issupplierline      Is it a line for a supplier object ?
    790. 

  790.  *  @return string       				     String with line
    791. 

  791.  */
    792. 

  792. function pdf_getlinedesc($object, $i, $outputlangs, $hideref = 0, $hidedesc = 0, $issupplierline = 0) {
    793. 

  793.     global $db, $conf, $langs;
    794. 

  794. 

  795.     $idprod = (!empty($object->lines[$i]->fk_product) ? $object->lines[$i]->fk_product : false);
    796. 

  796.     $label = (!empty($object->lines[$i]->label) ? $object->lines[$i]->label : (!empty($object->lines[$i]->product_label) ? $object->lines[$i]->product_label : ''));
    797. 

  797.     $desc = (!empty($object->lines[$i]->desc) ? $object->lines[$i]->desc : (!empty($object->lines[$i]->description) ? $object->lines[$i]->description : ''));
    798. 

  798.     $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
    799. 

  799.     $note = (!empty($object->lines[$i]->note) ? $object->lines[$i]->note : '');
    800. 

  800. 

  801.     if ($issupplierline)
    802. 

  802.         $prodser = new ProductFournisseur($db);
    803. 

  803.     else
    804. 

  804.         $prodser = new Product($db);
    805. 

  805. 

  806.     if ($idprod) {
    807. 

  807.         $prodser->load($idprod);
    808. 

  808.         // If a predefined product and multilang and on other lang, we renamed label with label translated
    809. 

  809.         if (!empty($conf->global->MAIN_MULTILANGS) && ($outputlangs->defaultlang != $langs->defaultlang)) {
    810. 

  810.             if (!empty($prodser->multilangs[$outputlangs->defaultlang]["label"]) && $label == $prodser->label)
    811. 

  811.                 $label = $prodser->multilangs[$outputlangs->defaultlang]["label"];
    812. 

  812.             if (!empty($prodser->multilangs[$outputlangs->defaultlang]["description"]) && $desc == $prodser->description)
    813. 

  813.                 $desc = $prodser->multilangs[$outputlangs->defaultlang]["description"];
    814. 

  814.             if (!empty($prodser->multilangs[$outputlangs->defaultlang]["note"]) && $note == $prodser->note)
    815. 

  815.                 $note = $prodser->multilangs[$outputlangs->defaultlang]["note"];
    816. 

  816.         }
    817. 

  817.     }
    818. 

  818. 

  819.     // Description short of product line
    820. 

  820.     $libelleproduitservice = $label;
    821. 

  821. 

  822.     // Description long of product line
    823. 

  823.     if (!empty($desc) && ($desc != $label)) {
    824. 

  824.         if ($libelleproduitservice && empty($hidedesc)) {
    825. 

  825.             $libelleproduitservice.='__N__';
    826. 

  826.         }
    827. 

  827. 

  828.         if ($desc == '(CREDIT_NOTE)' && $object->lines[$i]->fk_remise_except) {
    829. 

  829.             $discount = new DiscountAbsolute($db);
    830. 

  830.             $discount->fetch($object->lines[$i]->fk_remise_except);
    831. 

  831.             $libelleproduitservice = $outputlangs->transnoentitiesnoconv("DiscountFromCreditNote", $discount->ref_facture_source);
    832. 

  832.         } elseif ($desc == '(DEPOSIT)' && $object->lines[$i]->fk_remise_except) {
    833. 

  833.             $discount = new DiscountAbsolute($db);
    834. 

  834.             $discount->fetch($object->lines[$i]->fk_remise_except);
    835. 

  835.             $libelleproduitservice = $outputlangs->transnoentitiesnoconv("DiscountFromDeposit", $discount->ref_facture_source);
    836. 

  836.             // Add date of deposit
    837. 

  837.             if (!empty($conf->global->INVOICE_ADD_DEPOSIT_DATE))
    838. 

  838.                 echo ' (' . dol_print_date($discount->datec, 'day', '', $outputlangs) . ')';
    839. 

  839.         }
    840. 

  840.         else {
    841. 

  841.             if ($idprod) {
    842. 

  842.                 if (empty($hidedesc))
    843. 

  843.                     $libelleproduitservice.=$desc;
    844. 

  844.             }
    845. 

  845.             else {
    846. 

  846.                 $libelleproduitservice.=$desc;
    847. 

  847.             }
    848. 

  848.         }
    849. 

  849.     }
    850. 

  850. 

  851.     // If line linked to a product
    852. 

  852.     if ($idprod) {
    853. 

  853.         // On ajoute la ref
    854. 

  854.         if ($prodser->name) {
    855. 

  855.             $prefix_prodserv = "";
    856. 

  856.             $ref_prodserv = "";
    857. 

  857.             if (!empty($conf->global->PRODUCT_ADD_TYPE_IN_DOCUMENTS)) {   // In standard mode, we do not show this
    858. 

  858.                 if ($prodser->isservice()) {
    859. 

  859.                     $prefix_prodserv = $outputlangs->transnoentitiesnoconv("Service") . " ";
    860. 

  860.                 } else {
    861. 

  861.                     $prefix_prodserv = $outputlangs->transnoentitiesnoconv("Product") . " ";
    862. 

  862.                 }
    863. 

  863.             }
    864. 

  864. 

  865.             if (empty($hideref)) {
    866. 

  866.                 if ($issupplierline)
    867. 

  867.                     $ref_prodserv = $prodser->name . ' (' . $outputlangs->transnoentitiesnoconv("SupplierRef") . ' ' . $ref_supplier . ')';   // Show local ref and supplier ref
    868. 

  868.                 else
    869. 

  869.                     $ref_prodserv = $prodser->name; // Show local ref only
    870. 

  870. 

  871.                 $ref_prodserv .= " - ";
    872. 

  872.             }
    873. 

  873. 

  874.             $libelleproduitservice = $prefix_prodserv . $ref_prodserv . $libelleproduitservice;
    875. 

  875.         }
    876. 

  876.     }
    877. 

  877. 

  878.     if (!empty($object->lines[$i]->date_start) || !empty($object->lines[$i]->date_end)) {
    879. 

  879.         $format = 'day';
    880. 

  880.         // Show duration if exists
    881. 

  881.         if ($object->lines[$i]->date_start && $object->lines[$i]->date_end) {
    882. 

  882.             $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)) . ')';
    883. 

  883.         }
    884. 

  884.         if ($object->lines[$i]->date_start && !$object->lines[$i]->date_end) {
    885. 

  885.             $period = '(' . $outputlangs->transnoentitiesnoconv('DateFrom', dol_print_date($object->lines[$i]->date_start, $format, false, $outputlangs)) . ')';
    886. 

  886.         }
    887. 

  887.         if (!$object->lines[$i]->date_start && $object->lines[$i]->date_end) {
    888. 

  888.             $period = '(' . $outputlangs->transnoentitiesnoconv('DateUntil', dol_print_date($object->lines[$i]->date_end, $format, false, $outputlangs)) . ')';
    889. 

  889.         }
    890. 

  890.         //print '>'.$outputlangs->charset_output.','.$period;
    891. 

  891.         $libelleproduitservice.="__N__" . $period;
    892. 

  892.         //print $libelleproduitservice;
    893. 

  893.     }
    894. 

  894. 

  895.     // Now we convert \n into br
    896. 

  896.     if (dol_textishtml($libelleproduitservice))
    897. 

  897.         $libelleproduitservice = preg_replace('/__N__/', '<br>', $libelleproduitservice);
    898. 

  898.     else
    899. 

  899.         $libelleproduitservice = preg_replace('/__N__/', "\n", $libelleproduitservice);
    900. 

  900.     $libelleproduitservice = dol_htmlentitiesbr($libelleproduitservice, 1);
    901. 

  901. 

  902.     return $libelleproduitservice;
    903. 

  903. }
    904. 

  904. 

  905. /**
    906. 

  906.  * 	Return line num
    907. 

  907.  *
    908. 

  908.  * 	@param	Object		$object				Object
    909. 

  909.  * 	@param	int			$i					Current line number
    910. 

  910.  *  @param  Translate	$outputlangs		Object langs for output
    911. 

  911.  *  @param	int			$hidedetails		Hide details (0=no, 1=yes, 2=just special lines)
    912. 

  912.  * 	@return	void
    913. 

  913.  */
    914. 

  914. function pdf_getlinenum($object, $i, $outputlangs, $hidedetails = 0) {
    915. 

  915.     global $hookmanager;
    916. 

  916. 

  917.     if (($object->lines[$i]->product_type == 9 && !empty($object->lines[$i]->special_code)) || !empty($object->lines[$i]->fk_parent_line)) {
    918. 

  918.         $special_code = $object->lines[$i]->special_code;
    919. 

  919.         if (!empty($object->lines[$i]->fk_parent_line))
    920. 

  920.             $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
    921. 

  921.         // TODO add hook function
    922. 

  922.     }
    923. 

  923.     else {
    924. 

  924.         return dol_htmlentitiesbr($object->lines[$i]->num);
    925. 

  925.     }
    926. 

  926. }
    927. 

  927. 

  928. /**
    929. 

  929.  * 	Return line product ref
    930. 

  930.  *
    931. 

  931.  * 	@param	Object		$object				Object
    932. 

  932.  * 	@param	int			$i					Current line number
    933. 

  933.  *  @param  Translate	$outputlangs		Object langs for output
    934. 

  934.  *  @param	int			$hidedetails		Hide details (0=no, 1=yes, 2=just special lines)
    935. 

  935.  * 	@return	void
    936. 

  936.  */
    937. 

  937. function pdf_getlineref($object, $i, $outputlangs, $hidedetails = 0) {
    938. 

  938.     global $hookmanager;
    939. 

  939. 

  940.     if (($object->lines[$i]->product_type == 9 && !empty($object->lines[$i]->special_code)) || !empty($object->lines[$i]->fk_parent_line)) {
    941. 

  941.         $special_code = $object->lines[$i]->special_code;
    942. 

  942.         if (!empty($object->lines[$i]->fk_parent_line))
    943. 

  943.             $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
    944. 

  944.         // TODO add hook function
    945. 

  945.     }
    946. 

  946.     else {
    947. 

  947.         return dol_htmlentitiesbr($object->lines[$i]->product_ref);
    948. 

  948.     }
    949. 

  949. }
    950. 

  950. 

  951. /**
    952. 

  952.  * 	Return line ref_supplier
    953. 

  953.  *
    954. 

  954.  * 	@param	Object		$object				Object
    955. 

  955.  * 	@param	int			$i					Current line number
    956. 

  956.  *  @param  Translate	$outputlangs		Object langs for output
    957. 

  957.  *  @param	int			$hidedetails		Hide details (0=no, 1=yes, 2=just special lines)
    958. 

  958.  * 	@return	void
    959. 

  959.  */
    960. 

  960. function pdf_getlineref_supplier($object, $i, $outputlangs, $hidedetails = 0) {
    961. 

  961.     global $hookmanager;
    962. 

  962. 

  963.     if (($object->lines[$i]->product_type == 9 && !empty($object->lines[$i]->special_code)) || !empty($object->lines[$i]->fk_parent_line)) {
    964. 

  964.         $special_code = $object->lines[$i]->special_code;
    965. 

  965.         if (!empty($object->lines[$i]->fk_parent_line))
    966. 

  966.             $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
    967. 

  967.         // TODO add hook function
    968. 

  968.     }
    969. 

  969.     else {
    970. 

  970.         return dol_htmlentitiesbr($object->lines[$i]->ref_supplier);
    971. 

  971.     }
    972. 

  972. }
    973. 

  973. 

  974. /**
    975. 

  975.  * 	Return line vat rate
    976. 

  976.  *
    977. 

  977.  * 	@param	Object		$object				Object
    978. 

  978.  * 	@param	int			$i					Current line number
    979. 

  979.  *  @param  Translate	$outputlangs		Object langs for output
    980. 

  980.  *  @param	int			$hidedetails		Hide details (0=no, 1=yes, 2=just special lines)
    981. 

  981.  * 	@return	void
    982. 

  982.  */
    983. 

  983. function pdf_getlinevatrate($object, $i, $outputlangs, $hidedetails = 0) {
    984. 

  984.     global $hookmanager;
    985. 

  985. 

  986.     if (($object->lines[$i]->product_type == 9 && !empty($object->lines[$i]->special_code)) || !empty($object->lines[$i]->fk_parent_line)) {
    987. 

  987.         $special_code = $object->lines[$i]->special_code;
    988. 

  988.         if (!empty($object->lines[$i]->fk_parent_line))
    989. 

  989.             $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
    990. 

  990.         $parameters = array('i' => $i, 'outputlangs' => $outputlangs, 'hidedetails' => $hidedetails, 'special_code' => $special_code);
    991. 

  991.         $action = '';
    992. 

  992.         return $hookmanager->executeHooks('pdf_getlinevatrate', $parameters, $object, $action);    // Note that $action and $object may have been modified by some hooks
    993. 

  993.     }
    994. 

  994.     else {
    995. 

  995.         if (empty($hidedetails) || $hidedetails > 1)
    996. 

  996.             return vatrate($object->lines[$i]->tva_tx, 1, $object->lines[$i]->info_bits, 1);
    997. 

  997.     }
    998. 

  998. }
    999. 

  999. 

  1000. /**
    1001. 

  1001.  * 	Return line unit price excluding tax
    1002. 

  1002.  *
    1003. 

  1003.  * 	@param	Object		$object				Object
    1004. 

  1004.  * 	@param	int			$i					Current line number
    1005. 

  1005.  *  @param  Translate	$outputlangs		Object langs for output
    1006. 

  1006.  *  @param	int			$hidedetails		Hide details (0=no, 1=yes, 2=just special lines)
    1007. 

  1007.  * 	@return	void
    1008. 

  1008.  */
    1009. 

  1009. function pdf_getlineupexcltax($object, $i, $outputlangs, $hidedetails = 0) {
    1010. 

  1010.     global $conf, $hookmanager;
    1011. 

  1011. 

  1012.     $sign = 1;
    1013. 

  1013.     if (isset($object->type) && $object->type == 2 && !empty($conf->global->INVOICE_POSITIVE_CREDIT_NOTE))
    1014. 

  1014.         $sign = -1;
    1015. 

  1015. 

  1016.     if (($object->lines[$i]->product_type == 9 && !empty($object->lines[$i]->special_code)) || !empty($object->lines[$i]->fk_parent_line)) {
    1017. 

  1017.         $special_code = $object->lines[$i]->special_code;
    1018. 

  1018.         if (!empty($object->lines[$i]->fk_parent_line))
    1019. 

  1019.             $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
    1020. 

  1020.         $parameters = array('i' => $i, 'outputlangs' => $outputlangs, 'hidedetails' => $hidedetails, 'special_code' => $special_code);
    1021. 

  1021.         $action = '';
    1022. 

  1022.         return $hookmanager->executeHooks('pdf_getlineupexcltax', $parameters, $object, $action);    // Note that $action and $object may have been modified by some hooks
    1023. 

  1023.     }
    1024. 

  1024.     else {
    1025. 

  1025.         if (empty($hidedetails) || $hidedetails > 1)
    1026. 

  1026.             return price($sign * $object->lines[$i]->subprice);
    1027. 

  1027.     }
    1028. 

  1028. }
    1029. 

  1029. 

  1030. /**
    1031. 

  1031.  * 	Return line unit price including tax
    1032. 

  1032.  *
    1033. 

  1033.  * 	@param	Object		$object				Object
    1034. 

  1034.  * 	@param	int			$i					Current line number
    1035. 

  1035.  *  @param  Tranlate	$outputlangs		Object langs for output
    1036. 

  1036.  *  @param	int			$hidedetails		Hide value (0 = no,	1 = yes, 2 = just special lines)
    1037. 

  1037.  *  @return	void
    1038. 

  1038.  */
    1039. 

  1039. function pdf_getlineupwithtax($object, $i, $outputlangs, $hidedetails = 0) {
    1040. 

  1040.     global $hookmanager;
    1041. 

  1041. 

  1042.     if (($object->lines[$i]->product_type == 9 && !empty($object->lines[$i]->special_code)) || !empty($object->lines[$i]->fk_parent_line)) {
    1043. 

  1043.         $special_code = $object->lines[$i]->special_code;
    1044. 

  1044.         if (!empty($object->lines[$i]->fk_parent_line))
    1045. 

  1045.             $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
    1046. 

  1046.         $parameters = array('i' => $i, 'outputlangs' => $outputlangs, 'hidedetails' => $hidedetails, 'special_code' => $special_code);
    1047. 

  1047.         $action = '';
    1048. 

  1048.         return $hookmanager->executeHooks('pdf_getlineupwithtax', $parameters, $object, $action);    // Note that $action and $object may have been modified by some hooks
    1049. 

  1049.     }
    1050. 

  1050.     else {
    1051. 

  1051.         if (empty($hidedetails) || $hidedetails > 1)
    1052. 

  1052.             return price(($object->lines[$i]->subprice) + ($object->lines[$i]->subprice) * ($object->lines[$i]->tva_tx) / 100);
    1053. 

  1053.     }
    1054. 

  1054. }
    1055. 

  1055. 

  1056. /**
    1057. 

  1057.  * 	Return line quantity
    1058. 

  1058.  *
    1059. 

  1059.  * 	@param	Object		$object				Object
    1060. 

  1060.  * 	@param	int			$i					Current line number
    1061. 

  1061.  *  @param  Translate	$outputlangs		Object langs for output
    1062. 

  1062.  *  @param	int			$hidedetails		Hide details (0=no, 1=yes, 2=just special lines)
    1063. 

  1063.  *  @return	void
    1064. 

  1064.  */
    1065. 

  1065. function pdf_getlineqty($object, $i, $outputlangs, $hidedetails = 0) {
    1066. 

  1066.     global $hookmanager;
    1067. 

  1067. 

  1068.     if ($object->lines[$i]->special_code != 3) {
    1069. 

  1069.         if (( $object->lines[$i]->product_type == 9 && !empty($object->lines[$i]->special_code)) || !empty($object->lines[$i]->fk_parent_line)) {
    1070. 

  1070.             $special_code = $object->lines[$i]->special_code;
    1071. 

  1071.             if (!empty($object->lines[$i]->fk_parent_line))
    1072. 

  1072.                 $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
    1073. 

  1073.             $parameters = array('i' => $i, 'outputlangs' => $outputlangs, 'hidedetails' => $hidedetails, 'special_code' => $special_code);
    1074. 

  1074.             $action = '';
    1075. 

  1075.             return $hookmanager->executeHooks('pdf_getlineqty', $parameters, $object, $action);    // Note that $action and $object may have been modified by some hooks
    1076. 

  1076.         }
    1077. 

  1077.         else {
    1078. 

  1078.             if (empty($hidedetails) || $hidedetails > 1) {
    1079. 

  1079.                 $qty = price2num($object->lines[$i]->qty, 'MT');
    1080. 

  1080. 				$qty = price($qty, 0, '', 0, 0);
    1081. 

  1081. 				return $qty;
    1082. 

  1082. 			}
    1083. 

  1083.         }
    1084. 

  1084.     }
    1085. 

  1085. }
    1086. 

  1086. 

  1087. /**
    1088. 

  1088.  * 	Return line quantity asked
    1089. 

  1089.  *
    1090. 

  1090.  * 	@param	Object		$object				Object
    1091. 

  1091.  * 	@param	int			$i					Current line number
    1092. 

  1092.  *  @param  Translate	$outputlangs		Object langs for output
    1093. 

  1093.  *  @param	int			$hidedetails		Hide details (0=no, 1=yes, 2=just special lines)
    1094. 

  1094.  * 	@return	void
    1095. 

  1095.  */
    1096. 

  1096. function pdf_getlineqty_asked($object, $i, $outputlangs, $hidedetails = 0) {
    1097. 

  1097.     global $hookmanager;
    1098. 

  1098. 

  1099.     if ($object->lines[$i]->special_code != 3) {
    1100. 

  1100.         if (($object->lines[$i]->product_type == 9 && !empty($object->lines[$i]->special_code)) || !empty($object->lines[$i]->fk_parent_line)) {
    1101. 

  1101.             $special_code = $object->lines[$i]->special_code;
    1102. 

  1102.             if (!empty($object->lines[$i]->fk_parent_line))
    1103. 

  1103.                 $special_code = $object->getSpecialCode($object->lines[$i]->fk_parent_line);
    1104. 

  1104.             $parameters = array('i' => $i, 'outputlangs' => $outputlangs, 'hidedetails' => $hidedetails, 'special_code' => $special_code);
    1105. 

  1105.             $action = '';
    1106. 

  1106.             return $hookmanager->executeHooks('pdf_getlineqty_asked', $parameters, $object, $ac…
    1107.

Large files files are truncated, but you can click here to view the full file