PageRenderTime 75ms CodeModel.GetById 32ms RepoModel.GetById 1ms app.codeStats 1ms

/htdocs/core/class/html.form.class.php

https://github.com/asterix14/dolibarr
PHP | 3852 lines | 2695 code | 371 blank | 786 comment | 790 complexity | 4cf4b83662b932defac5e6b03335469a MD5 | raw file
Possible License(s): LGPL-2.0

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

    

  1. <?php
    2. 

  2. /* Copyright (c) 2002-2007 Rodolphe Quiedeville  <rodolphe@quiedeville.org>
    3. 

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

  4.  * Copyright (C) 2004      Benoit Mortier        <benoit.mortier@opensides.be>
    5. 

  5.  * Copyright (C) 2004      Sebastien Di Cintio   <sdicintio@ressource-toi.org>
    6. 

  6.  * Copyright (C) 2004      Eric Seigne           <eric.seigne@ryxeo.com>
    7. 

  7.  * Copyright (C) 2005-2011 Regis Houssin         <regis@dolibarr.fr>
    8. 

  8.  * Copyright (C) 2006      Andre Cianfarani      <acianfa@free.fr>
    9. 

  9.  * Copyright (C) 2006      Marc Barilley/Ocebo   <marc@ocebo.com>
    10. 

  10.  * Copyright (C) 2007      Franky Van Liedekerke <franky.van.liedekerker@telenet.be>
    11. 

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

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

  13.  * Copyright (C) 2010      Philippe Grand        <philippe.grand@atoo-net.com>
    14. 

  14.  * Copyright (C) 2011      Herve Prot            <herve.prot@symeos.com>
    15. 

  15.  *
    16. 

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

  17.  * it under the terms of the GNU General Public License as published by
    18. 

  18.  * the Free Software Foundation; either version 2 of the License, or
    19. 

  19.  * (at your option) any later version.
    20. 

  20.  *
    21. 

  21.  * This program is distributed in the hope that it will be useful,
    22. 

  22.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    23. 

  23.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    24. 

  24.  * GNU General Public License for more details.
    25. 

  25.  *
    26. 

  26.  * You should have received a copy of the GNU General Public License
    27. 

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

  28.  */
    29. 

  29. 

  30. /**
    31. 

  31.  *	\file       htdocs/core/class/html.form.class.php
    32. 

  32.  *  \ingroup    core
    33. 

  33.  *	\brief      File of class with all html predefined components
    34. 

  34.  */
    35. 

  35. 

  36. 

  37. /**
    38. 

  38.  *	\class      Form
    39. 

  39.  *	\brief      Class to manage generation of HTML components
    40. 

  40.  *	\remarks	Only common components must be here.
    41. 

  41.  */
    42. 

  42. class Form
    43. 

  43. {
    44. 

  44. 	var $db;
    45. 

  45. 	var $error;
    46. 

  46. 

  47. 	// Cache arrays
    48. 

  48. 	var $cache_types_paiements=array();
    49. 

  49. 	var $cache_conditions_paiements=array();
    50. 

  50. 	var $cache_availability=array();
    51. 

  51. 	var $cache_demand_reason=array();
    52. 

  52. 	var $cache_type_fees=array();
    53. 

  53. 

  54. 	var $tva_taux_value;
    55. 

  55. 	var $tva_taux_libelle;
    56. 

  56. 

  57. 

  58. 	/**
    59. 

  59. 	 * Constructor
    60. 

  60. 	 *
    61. 

  61. 	 * @param		DoliDB		$db      Database handler
    62. 

  62. 	 */
    63. 

  63. 	public function __construct($db)
    64. 

  64. 	{
    65. 

  65. 		$this->db = $db;
    66. 

  66. 	}
    67. 

  67. 

  68. 	/**
    69. 

  69. 	 * Output key field for an editable field
    70. 

  70. 	 *
    71. 

  71. 	 * @param   string	$text			Text of label or key to translate
    72. 

  72. 	 * @param   string	$htmlname		Name of select field
    73. 

  73. 	 * @param   string	$preselected	Name of Value to show/edit (not used in this function)
    74. 

  74. 	 * @param	object	$object			Object
    75. 

  75. 	 * @param	boolean	$perm			Permission to allow button to edit parameter
    76. 

  76. 	 * @param	string	$typeofdata		Type of data ('string' by default, 'email', 'numeric:99', 'text' or 'textarea', 'day' or 'datepicker', 'ckeditor:dolibarr_zzz:width:height', 'select:xxx'...)
    77. 

  77. 	 * @return	string					HTML edit field
    78. 

  78. 	 */
    79. 

  79. 	function editfieldkey($text,$htmlname,$preselected,$object,$perm,$typeofdata='string')
    80. 

  80. 	{
    81. 

  81. 		global $conf,$langs;
    82. 

  82. 

  83. 		$ret='';
    84. 

  84. 

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

  86. 		{
    87. 

  87. 			if ($perm)
    88. 

  88. 			{
    89. 

  89. 				$tmp=explode(':',$typeofdata);
    90. 

  90. 				$ret.= '<div class="editkey_'.$tmp[0].'" id="'.$htmlname.'">';
    91. 

  91. 				$ret.= $langs->trans($text);
    92. 

  92. 				$ret.= '</div>'."\n";
    93. 

  93. 			}
    94. 

  94. 			else
    95. 

  95. 			{
    96. 

  96. 				$ret.= $langs->trans($text);
    97. 

  97. 			}
    98. 

  98. 		}
    99. 

  99. 		else
    100. 

  100. 		{
    101. 

  101. 			$ret.='<table class="nobordernopadding" width="100%"><tr><td nowrap="nowrap">';
    102. 

  102. 			$ret.=$langs->trans($text);
    103. 

  103. 			$ret.='</td>';
    104. 

  104. 			if (GETPOST('action') != 'edit'.$htmlname && $perm) $ret.='<td align="right"><a href="'.$_SERVER["PHP_SELF"].'?action=edit'.$htmlname.'&amp;id='.$object->id.'">'.img_edit($langs->trans('Edit'),1).'</a></td>';
    105. 

  105. 			$ret.='</tr></table>';
    106. 

  106. 		}
    107. 

  107. 

  108. 		return $ret;
    109. 

  109. 	}
    110. 

  110. 

  111. 	/**
    112. 

  112. 	 * Output val field for an editable field
    113. 

  113. 	 *
    114. 

  114. 	 * @param	string	$text			Text of label (not used in this function)
    115. 

  115. 	 * @param	string	$htmlname		Name of select field
    116. 

  116. 	 * @param	string	$value			Value to show/edit
    117. 

  117. 	 * @param	object	$object			Object
    118. 

  118. 	 * @param	boolean	$perm			Permission to allow button to edit parameter
    119. 

  119. 	 * @param	string	$typeofdata		Type of data ('string' by default, 'email', 'numeric:99', 'text' or 'textarea', 'day' or 'datepicker', 'ckeditor:dolibarr_zzz:width:height', 'select:xxx'...)
    120. 

  120. 	 * @param	string	$editvalue		When in edit mode, use this value as $value instead of value
    121. 

  121. 	 * @param	object	$extObject		External object
    122. 

  122. 	 * @return  string					HTML edit field
    123. 

  123. 	 */
    124. 

  124. 	function editfieldval($text,$htmlname,$value,$object,$perm,$typeofdata='string',$editvalue='',$extObject=false)
    125. 

  125. 	{
    126. 

  126. 		global $conf,$langs,$db;
    127. 

  127. 

  128. 		$ret='';
    129. 

  129. 

  130. 		// When option to edit inline is activated
    131. 

  131. 		if (! empty($conf->global->MAIN_USE_JQUERY_JEDITABLE))
    132. 

  132. 		{
    133. 

  133. 			$ret.=$this->editInPlace($object, $value, $htmlname, $perm, $typeofdata, $extObject);
    134. 

  134. 		}
    135. 

  135. 		else
    136. 

  136. 		{
    137. 

  137. 			if (GETPOST('action') == 'edit'.$htmlname)
    138. 

  138. 			{
    139. 

  139. 				$ret.="\n";
    140. 

  140. 				$ret.='<form method="post" action="'.$_SERVER["PHP_SELF"].'">';
    141. 

  141. 				$ret.='<input type="hidden" name="action" value="set'.$htmlname.'">';
    142. 

  142. 				$ret.='<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
    143. 

  143. 				$ret.='<input type="hidden" name="id" value="'.$object->id.'">';
    144. 

  144. 				$ret.='<table class="nobordernopadding" cellpadding="0" cellspacing="0">';
    145. 

  145. 				$ret.='<tr><td>';
    146. 

  146. 				if (preg_match('/^(string|email|numeric)/',$typeofdata))
    147. 

  147. 				{
    148. 

  148. 					$tmp=explode(':',$typeofdata);
    149. 

  149. 					$ret.='<input type="text" id="'.$htmlname.'" name="'.$htmlname.'" value="'.($editvalue?$editvalue:$value).'"'.($tmp[1]?' size="'.$tmp[1].'"':'').'>';
    150. 

  150. 				}
    151. 

  151. 				else if ($typeofdata == 'text' || $typeofdata == 'textarea' || $typeofdata == 'note')
    152. 

  152. 				{
    153. 

  153. 					$ret.='<textarea id="'.$htmlname.'" name="'.$htmlname.'" wrap="soft" cols="70">'.($editvalue?$editvalue:$value).'</textarea>';
    154. 

  154. 				}
    155. 

  155. 				else if ($typeofdata == 'day' || $typeofdata == 'datepicker')
    156. 

  156. 				{
    157. 

  157. 					$ret.=$this->form_date($_SERVER['PHP_SELF'].'?id='.$object->id,$value,$htmlname);
    158. 

  158. 				}
    159. 

  159. 				else if (preg_match('/^ckeditor/',$typeofdata))
    160. 

  160. 				{
    161. 

  161. 					$tmp=explode(':',$typeofdata);
    162. 

  162. 					require_once(DOL_DOCUMENT_ROOT."/core/class/doleditor.class.php");
    163. 

  163. 					$doleditor=new DolEditor($htmlname,($editvalue?$editvalue:$value),($tmp[2]?$tmp[2]:''),($tmp[3]?$tmp[3]:'100'),($tmp[1]?$tmp[1]:'dolibarr_notes'),'In',false,true,true);
    164. 

  164. 					$ret.=$doleditor->Create(1);
    165. 

  165. 				}
    166. 

  166. 				$ret.='</td>';
    167. 

  167. 				if ($typeofdata != 'day' && $typeofdata != 'datepicker') $ret.='<td align="left"><input type="submit" class="button" value="'.$langs->trans("Modify").'"></td>';
    168. 

  168. 				$ret.='</tr></table>'."\n";
    169. 

  169. 				$ret.='</form>'."\n";
    170. 

  170. 			}
    171. 

  171. 			else
    172. 

  172. 			{
    173. 

  173. 				if ($typeofdata == 'email')   $ret.=dol_print_email($value,0,0,0,0,1);
    174. 

  174. 				elseif ($typeofdata == 'day' || $typeofdata == 'datepicker') $ret.=dol_print_date($value,'day');
    175. 

  175. 				elseif ($typeofdata == 'text' || $typeofdata == 'textarea')  $ret.=dol_htmlentitiesbr($value);
    176. 

  176. 				else if (preg_match('/^ckeditor/',$typeofdata))
    177. 

  177. 				{
    178. 

  178. 					$tmpcontent=dol_htmlentitiesbr($value);
    179. 

  179. 					$firstline=preg_replace('/<br>.*/','',$tmpcontent);
    180. 

  180. 					$firstline=preg_replace('/[\n\r].*/','',$firstline);
    181. 

  181. 					$ret.=$firstline.((strlen($firstline) != strlen($tmpcontent))?'...':'');
    182. 

  182. 				}
    183. 

  183. 				else $ret.=$value;
    184. 

  184. 			}
    185. 

  185. 		}
    186. 

  186. 		return $ret;
    187. 

  187. 	}
    188. 

  188. 

  189. 	/**
    190. 

  190. 	 * Output edit in place form
    191. 

  191. 	 *
    192. 

  192.      * @param	object	$object			Object
    193. 

  193.      * @param	string	$value			Value to show/edit
    194. 

  194.      * @param	string	$htmlname		DIV ID (field name)
    195. 

  195.      * @param	int		$condition		Condition to edit
    196. 

  196.      * @param	string	$inputType		Type of input ('numeric', 'datepicker', 'textarea', 'ckeditor:dolibarr_zzz', 'select:xxx')
    197. 

  197.      * @param	object	$extObject		External object
    198. 

  198.      * @return	string   		      	HTML edit in place
    199. 

  199.      */
    200. 

  200. 	private function editInPlace($object, $value, $htmlname, $condition, $inputType='textarea', $extObject=false)
    201. 

  201. 	{
    202. 

  202. 		global $conf;
    203. 

  203. 

  204. 		$out='';
    205. 

  205. 

  206. 		// Check parameters
    207. 

  207. 		if ($inputType == 'textarea') $value = dol_nl2br($value);
    208. 

  208. 		else if (preg_match('/^numeric/',$inputType)) $value = price($value);
    209. 

  209. 		else if ($inputType == 'datepicker') $value = dol_print_date($value, 'day');
    210. 

  210. 

  211. 		if ($condition)
    212. 

  212. 		{
    213. 

  213. 			$element = false;
    214. 

  214. 			$table_element = false;
    215. 

  215. 			$fk_element = false;
    216. 

  216. 			$loadmethod = false;
    217. 

  217. 			$savemethod = false;
    218. 

  218. 			$ext_element = false;
    219. 

  219. 			//$ext_table_element = false;
    220. 

  220. 			//$ext_fk_element = false;
    221. 

  221. 

  222. 			if (is_object($object))
    223. 

  223. 			{
    224. 

  224. 				$element = $object->element;
    225. 

  225. 				$table_element = $object->table_element;
    226. 

  226. 				$fk_element = $object->id;
    227. 

  227. 			}
    228. 

  228. 

  229. 			if (is_object($extObject))
    230. 

  230. 			{
    231. 

  231. 				$ext_element = $extObject->element;
    232. 

  232. 				//$ext_table_element = $extObject->table_element;
    233. 

  233. 				//$ext_fk_element = $extObject->id;
    234. 

  234. 			}
    235. 

  235. 

  236. 			if (preg_match('/^(string|email|numeric)/',$inputType))
    237. 

  237. 			{
    238. 

  238. 				$tmp=explode(':',$inputType);
    239. 

  239. 				$inputType=$tmp[0]; $inputOption=$tmp[1];
    240. 

  240. 				if (! empty($tmp[2])) $savemethod=$tmp[2];
    241. 

  241. 			}
    242. 

  242. 			if (preg_match('/^datepicker/',$inputType))
    243. 

  243. 			{
    244. 

  244. 				$tmp=explode(':',$inputType);
    245. 

  245. 				$inputType=$tmp[0]; $inputOption=$tmp[1];
    246. 

  246. 				if (! empty($tmp[2])) $savemethod=$tmp[2];
    247. 

  247. 

  248. 				$out.= '<input id="timestamp" type="hidden"/>'."\n"; // Use for timestamp format
    249. 

  249. 			}
    250. 

  250. 			else if (preg_match('/^select/',$inputType))
    251. 

  251. 			{
    252. 

  252. 				$tmp=explode(':',$inputType);
    253. 

  253. 				$inputType=$tmp[0]; $loadmethod=$tmp[1];
    254. 

  254. 				if (! empty($tmp[2])) $savemethod=$tmp[2];
    255. 

  255. 			}
    256. 

  256. 			else if (preg_match('/^ckeditor/',$inputType))
    257. 

  257. 			{
    258. 

  258. 				$tmp=explode(':',$inputType);
    259. 

  259. 				$inputType=$tmp[0]; $toolbar=$tmp[1];
    260. 

  260. 				if (! empty($tmp[2])) $width=$tmp[2];
    261. 

  261. 				if (! empty($tmp[3])) $heigth=$tmp[3];
    262. 

  262. 				if (! empty($tmp[4])) $savemethod=$tmp[4];
    263. 

  263. 

  264. 				if (! empty($conf->fckeditor->enabled))
    265. 

  265. 				{
    266. 

  266. 					$out.= '<input id="ckeditor_toolbar" value="'.$toolbar.'" type="hidden"/>'."\n";
    267. 

  267. 				}
    268. 

  268. 				else
    269. 

  269. 				{
    270. 

  270. 					$inputType = 'textarea';
    271. 

  271. 				}
    272. 

  272. 			}
    273. 

  273. 

  274. 			$out.= '<input id="element_'.$htmlname.'" value="'.$element.'" type="hidden"/>'."\n";
    275. 

  275. 			$out.= '<input id="table_element_'.$htmlname.'" value="'.$table_element.'" type="hidden"/>'."\n";
    276. 

  276. 			$out.= '<input id="fk_element_'.$htmlname.'" value="'.$fk_element.'" type="hidden"/>'."\n";
    277. 

  277. 			$out.= '<input id="loadmethod_'.$htmlname.'" value="'.$loadmethod.'" type="hidden"/>'."\n";
    278. 

  278. 			$out.= '<input id="savemethod_'.$htmlname.'" value="'.$savemethod.'" type="hidden"/>'."\n";
    279. 

  279. 			$out.= '<input id="ext_element_'.$htmlname.'" value="'.$ext_element.'" type="hidden"/>'."\n";
    280. 

  280. 			//$out.= '<input id="ext_table_element_'.$htmlname.'" value="'.$ext_table_element.'" type="hidden"/>'."\n";
    281. 

  281. 			//$out.= '<input id="ext_fk_element_'.$htmlname.'" value="'.$ext_fk_element.'" type="hidden"/>'."\n";
    282. 

  282. 

  283. 			$out.= '<div id="val_'.$htmlname.'" class="editval_'.$inputType.'">'.$value.'</div>'."\n";
    284. 

  284. 		}
    285. 

  285. 		else
    286. 

  286. 		{
    287. 

  287. 			$out = $value;
    288. 

  288. 		}
    289. 

  289. 

  290. 		return $out;
    291. 

  291. 	}
    292. 

  292. 

  293. 	/**
    294. 

  294. 	 *	Show a text and picto with tooltip on text or picto
    295. 

  295. 	 *
    296. 

  296. 	 *	@param	string		$text				Text to show
    297. 

  297. 	 *	@param	string		$htmltext			Content html of tooltip. Must be HTML/UTF8 encoded.
    298. 

  298. 	 *	@param	int			$tooltipon			1=tooltip sur texte, 2=tooltip sur picto, 3=tooltip sur les 2
    299. 

  299. 	 *	@param	int			$direction			-1=Le picto est avant, 0=pas de picto, 1=le picto est apres
    300. 

  300. 	 *	@param	string		$img				Code img du picto (use img_xxx() function to get it)
    301. 

  301. 	 *	@param	string		$extracss			Add a CSS style to td tags
    302. 

  302. 	 *	@param	int			$notabs				Do not include table and tr tags
    303. 

  303. 	 *	@param	string		$incbefore			Include code before the text
    304. 

  304. 	 *	@param	int			$noencodehtmltext	Do not encode into html entity the htmltext
    305. 

  305. 	 *	@return	string							Code html du tooltip (texte+picto)
    306. 

  306. 	 *	@see	Use function textwithpicto if you can.
    307. 

  307. 	 */
    308. 

  308. 	function textwithtooltip($text,$htmltext,$tooltipon=1,$direction=0,$img='',$extracss='',$notabs=0,$incbefore='',$noencodehtmltext=0)
    309. 

  309. 	{
    310. 

  310. 		global $conf;
    311. 

  311. 

  312. 		if ($incbefore) $text = $incbefore.$text;
    313. 

  313. 		if (! $htmltext) return $text;
    314. 

  314. 

  315. 		// Sanitize tooltip
    316. 

  316. 		$htmltext=str_replace("\\","\\\\",$htmltext);
    317. 

  317. 		$htmltext=str_replace("\r","",$htmltext);
    318. 

  318. 		$htmltext=str_replace("\n","",$htmltext);
    319. 

  319. 

  320. 		$htmltext=str_replace('"',"&quot;",$htmltext);
    321. 

  321. 		if ($tooltipon == 2 || $tooltipon == 3) $paramfortooltipimg=' class="classfortooltip'.($extracss?' '.$extracss:'').'" title="'.($noencodehtmltext?$htmltext:dol_escape_htmltag($htmltext,1)).'"'; // Attribut to put on td img tag to store tooltip
    322. 

  322. 		else $paramfortooltipimg =($extracss?' class="'.$extracss.'"':''); // Attribut to put on td text tag
    323. 

  323. 		if ($tooltipon == 1 || $tooltipon == 3) $paramfortooltiptd=' class="classfortooltip'.($extracss?' '.$extracss:'').'" title="'.($noencodehtmltext?$htmltext:dol_escape_htmltag($htmltext,1)).'"'; // Attribut to put on td tag to store tooltip
    324. 

  324. 		else $paramfortooltiptd =($extracss?' class="'.$extracss.'"':''); // Attribut to put on td text tag
    325. 

  325. 

  326. 		$s="";
    327. 

  327. 		if (empty($notabs)) $s.='<table class="nobordernopadding" summary=""><tr>';
    328. 

  328. 		if ($direction > 0)
    329. 

  329. 		{
    330. 

  330. 			if ($text != '')
    331. 

  331. 			{
    332. 

  332. 				$s.='<td'.$paramfortooltiptd.'>'.$text;
    333. 

  333. 				if ($direction) $s.='&nbsp;';
    334. 

  334. 				$s.='</td>';
    335. 

  335. 			}
    336. 

  336. 			if ($direction) $s.='<td'.$paramfortooltipimg.' valign="top" width="14">'.$img.'</td>';
    337. 

  337. 		}
    338. 

  338. 		else
    339. 

  339. 		{
    340. 

  340. 			if ($direction) $s.='<td'.$paramfortooltipimg.' valign="top" width="14">'.$img.'</td>';
    341. 

  341. 			if ($text != '')
    342. 

  342. 			{
    343. 

  343. 				$s.='<td'.$paramfortooltiptd.'>';
    344. 

  344. 				if ($direction) $s.='&nbsp;';
    345. 

  345. 				$s.=$text.'</td>';
    346. 

  346. 			}
    347. 

  347. 		}
    348. 

  348. 		if (empty($notabs)) $s.='</tr></table>';
    349. 

  349. 

  350. 		return $s;
    351. 

  351. 	}
    352. 

  352. 

  353.     /**
    354. 

  354.      *	Show a text with a picto and a tooltip on picto
    355. 

  355.      *
    356. 

  356.      *	@param     	text				Text to show
    357. 

  357.      *	@param   	htmltooltip     	Content of tooltip
    358. 

  358.      *	@param		direction			1=Icon is after text, -1=Icon is before text, 0=no icon
    359. 

  359.      * 	@param		type				Type of picto (info, help, warning, superadmin...)
    360. 

  360.      *  @param  	extracss            Add a CSS style to td tags
    361. 

  361.      *  @param      noencodehtmltext    Do not encode into html entity the htmltext
    362. 

  362.      * 	@return		string				HTML code of text, picto, tooltip
    363. 

  363.      */
    364. 

  364.     function textwithpicto($text,$htmltext,$direction=1,$type='help',$extracss='',$noencodehtmltext=0)
    365. 

  365.     {
    366. 

  366.         global $conf;
    367. 

  367. 

  368.         if ("$type" == "0") $type='info';	// For backward compatibility
    369. 

  369. 

  370.         $alt='';
    371. 

  371.         // If info or help with no javascript, show only text
    372. 

  372.         if (empty($conf->use_javascript_ajax))
    373. 

  373.         {
    374. 

  374.             if ($type == 'info' || $type == 'help')	return $text;
    375. 

  375.             else { $alt=$htmltext; $htmltext=''; }
    376. 

  376.         }
    377. 

  377.         // If info or help with smartphone, show only text
    378. 

  378.         if (! empty($conf->browser->phone))
    379. 

  379.         {
    380. 

  380.             if ($type == 'info' || $type == 'help') return $text;
    381. 

  381.         }
    382. 

  382.         // Info or help
    383. 

  383.         if ($type == 'info') 				$img=img_help(0,$alt);
    384. 

  384.         if ($type == 'help' || $type ==1)	$img=img_help(1,$alt);
    385. 

  385.         if ($type == 'superadmin') 			$img=img_picto($alt,"redstar");
    386. 

  386.         if ($type == 'admin')				$img=img_picto($alt,"star");
    387. 

  387.         // Warnings
    388. 

  388.         if ($type == 'warning') 			$img=img_warning($alt);
    389. 

  389. 

  390.         return $this->textwithtooltip($text,$htmltext,2,$direction,$img,$extracss,0,'',$noencodehtmltext);
    391. 

  391.     }
    392. 

  392. 

  393.     /**
    394. 

  394.      *    Return combo list of activated countries, into language of user
    395. 

  395.      *
    396. 

  396.      *    @param     selected         Id or Code or Label of preselected country
    397. 

  397.      *    @param     htmlname         Name of html select object
    398. 

  398.      *    @param     htmloption       Options html on select object
    399. 

  399.      */
    400. 

  400.     function select_pays($selected='',$htmlname='pays_id',$htmloption='')
    401. 

  401.     {
    402. 

  402.     	print $this->select_country($selected,$htmlname,$htmloption);
    403. 

  403.     }
    404. 

  404. 

  405.     /**
    406. 

  406.      *    Return combo list of activated countries, into language of user
    407. 

  407.      *
    408. 

  408.      *    @param     selected         Id or Code or Label of preselected country
    409. 

  409.      *    @param     htmlname         Name of html select object
    410. 

  410.      *    @param     htmloption       Options html on select object
    411. 

  411.      *    @return    string           HTML string with select
    412. 

  412.      */
    413. 

  413.     function select_country($selected='',$htmlname='pays_id',$htmloption='')
    414. 

  414.     {
    415. 

  415.         global $conf,$langs;
    416. 

  416. 

  417.         $langs->load("dict");
    418. 

  418. 

  419.         $out='';
    420. 

  420.         $countryArray=array();
    421. 

  421.         $label=array();
    422. 

  422. 

  423.         $sql = "SELECT rowid, code as code_iso, libelle as label";
    424. 

  424.         $sql.= " FROM ".MAIN_DB_PREFIX."c_pays";
    425. 

  425.         $sql.= " WHERE active = 1";
    426. 

  426.         $sql.= " ORDER BY code ASC";
    427. 

  427. 

  428.         dol_syslog("Form::select_country sql=".$sql);
    429. 

  429.         $resql=$this->db->query($sql);
    430. 

  430.         if ($resql)
    431. 

  431.         {
    432. 

  432.             $out.= '<select id="select'.$htmlname.'" class="flat selectpays" name="'.$htmlname.'" '.$htmloption.'>';
    433. 

  433.             $num = $this->db->num_rows($resql);
    434. 

  434.             $i = 0;
    435. 

  435.             if ($num)
    436. 

  436.             {
    437. 

  437.                 $foundselected=false;
    438. 

  438. 

  439.             	while ($i < $num)
    440. 

  440.             	{
    441. 

  441.                     $obj = $this->db->fetch_object($resql);
    442. 

  442.                     $countryArray[$i]['rowid'] 		= $obj->rowid;
    443. 

  443.                     $countryArray[$i]['code_iso'] 	= $obj->code_iso;
    444. 

  444.                     $countryArray[$i]['label']		= ($obj->code_iso && $langs->transnoentitiesnoconv("Country".$obj->code_iso)!="Country".$obj->code_iso?$langs->transnoentitiesnoconv("Country".$obj->code_iso):($obj->label!='-'?$obj->label:''));
    445. 

  445.                 	$label[$i] 	= $countryArray[$i]['label'];
    446. 

  446.                     $i++;
    447. 

  447.                 }
    448. 

  448. 

  449.                 array_multisort($label, SORT_ASC, $countryArray);
    450. 

  450. 

  451.                 foreach ($countryArray as $row)
    452. 

  452.                 {
    453. 

  453. 					//print 'rr'.$selected.'-'.$row['label'].'-'.$row['code_iso'].'<br>';
    454. 

  454.                 	if ($selected && $selected != '-1' && ($selected == $row['rowid'] || $selected == $row['code_iso'] || $selected == $row['label']) )
    455. 

  455.                 	{
    456. 

  456.                 		$foundselected=true;
    457. 

  457.                         $out.= '<option value="'.$row['rowid'].'" selected="selected">';
    458. 

  458.                     }
    459. 

  459.                     else
    460. 

  460.                     {
    461. 

  461.                         $out.= '<option value="'.$row['rowid'].'">';
    462. 

  462.                     }
    463. 

  463.                     $out.= $row['label'];
    464. 

  464.                     if ($row['code_iso']) $out.= ' ('.$row['code_iso'] . ')';
    465. 

  465.                     $out.= '</option>';
    466. 

  466.                 }
    467. 

  467.             }
    468. 

  468.             $out.= '</select>';
    469. 

  469.         }
    470. 

  470.         else
    471. 

  471.         {
    472. 

  472.             dol_print_error($this->db);
    473. 

  473.         }
    474. 

  474. 

  475.         return $out;
    476. 

  476.     }
    477. 

  477. 

  478. 

  479.     /**
    480. 

  480.      *    Retourne la liste des types de comptes financiers
    481. 

  481.      *
    482. 

  482.      *    @param      selected        Type pre-selectionne
    483. 

  483.      *    @param      htmlname        Nom champ formulaire
    484. 

  484.      */
    485. 

  485.     function select_type_comptes_financiers($selected=1,$htmlname='type')
    486. 

  486.     {
    487. 

  487.         global $langs;
    488. 

  488.         $langs->load("banks");
    489. 

  489. 

  490.         $type_available=array(0,1,2);
    491. 

  491. 

  492.         print '<select class="flat" name="'.$htmlname.'">';
    493. 

  493.         $num = count($type_available);
    494. 

  494.         $i = 0;
    495. 

  495.         if ($num)
    496. 

  496.         {
    497. 

  497.             while ($i < $num)
    498. 

  498.             {
    499. 

  499.                 if ($selected == $type_available[$i])
    500. 

  500.                 {
    501. 

  501.                     print '<option value="'.$type_available[$i].'" selected="selected">'.$langs->trans("BankType".$type_available[$i]).'</option>';
    502. 

  502.                 }
    503. 

  503.                 else
    504. 

  504.                 {
    505. 

  505.                     print '<option value="'.$type_available[$i].'">'.$langs->trans("BankType".$type_available[$i]).'</option>';
    506. 

  506.                 }
    507. 

  507.                 $i++;
    508. 

  508.             }
    509. 

  509.         }
    510. 

  510.         print '</select>';
    511. 

  511.     }
    512. 

  512. 

  513. 

  514.     /**
    515. 

  515.      *		Return list of social contributions.
    516. 

  516.      * 		Use mysoc->pays_id or mysoc->pays_code so they must be defined.
    517. 

  517.      *
    518. 

  518.      *		@param      selected        Preselected type
    519. 

  519.      *		@param      htmlname        Name of field in form
    520. 

  520.      * 		@param		useempty		Set to 1 if we want an empty value
    521. 

  521.      * 		@param		maxlen			Max length of text in combo box
    522. 

  522.      * 		@param		help			Add or not the admin help picto
    523. 

  523.      */
    524. 

  524.     function select_type_socialcontrib($selected='',$htmlname='actioncode', $useempty=0, $maxlen=40, $help=1)
    525. 

  525.     {
    526. 

  526.         global $db,$langs,$user,$mysoc;
    527. 

  527. 

  528.         if (empty($mysoc->pays_id) && empty($mysoc->pays_code))
    529. 

  529.         {
    530. 

  530.             dol_print_error('','Call to select_type_socialcontrib with mysoc country not yet defined');
    531. 

  531.             exit;
    532. 

  532.         }
    533. 

  533. 

  534.         if (! empty($mysoc->pays_id))
    535. 

  535.         {
    536. 

  536.             $sql = "SELECT c.id, c.libelle as type";
    537. 

  537.             $sql.= " FROM ".MAIN_DB_PREFIX."c_chargesociales as c";
    538. 

  538.             $sql.= " WHERE c.active = 1";
    539. 

  539.             $sql.= " AND c.fk_pays = ".$mysoc->pays_id;
    540. 

  540.             $sql.= " ORDER BY c.libelle ASC";
    541. 

  541.         }
    542. 

  542.         else
    543. 

  543.         {
    544. 

  544.             $sql = "SELECT c.id, c.libelle as type";
    545. 

  545.             $sql.= " FROM ".MAIN_DB_PREFIX."c_chargesociales as c, ".MAIN_DB_PREFIX."c_pays as p";
    546. 

  546.             $sql.= " WHERE c.active = 1 AND c.fk_pays = p.rowid";
    547. 

  547.             $sql.= " AND p.code = '".$mysoc->pays_code."'";
    548. 

  548.             $sql.= " ORDER BY c.libelle ASC";
    549. 

  549.         }
    550. 

  550. 

  551.         dol_syslog("Form::select_type_socialcontrib sql=".$sql, LOG_DEBUG);
    552. 

  552.         $resql=$db->query($sql);
    553. 

  553.         if ($resql)
    554. 

  554.         {
    555. 

  555.             $num = $db->num_rows($resql);
    556. 

  556.             if ($num)
    557. 

  557.             {
    558. 

  558.                 print '<select class="flat" name="'.$htmlname.'">';
    559. 

  559.                 $i = 0;
    560. 

  560. 

  561.                 if ($useempty) print '<option value="0">&nbsp;</option>';
    562. 

  562.                 while ($i < $num)
    563. 

  563.                 {
    564. 

  564.                     $obj = $db->fetch_object($resql);
    565. 

  565.                     print '<option value="'.$obj->id.'"';
    566. 

  566.                     if ($obj->id == $selected) print ' selected="selected"';
    567. 

  567.                     print '>'.dol_trunc($obj->type,$maxlen);
    568. 

  568.                     $i++;
    569. 

  569.                 }
    570. 

  570.                 print '</select>';
    571. 

  571.                 if ($user->admin && $help) print info_admin($langs->trans("YouCanChangeValuesForThisListFromDictionnarySetup"),1);
    572. 

  572.             }
    573. 

  573.             else
    574. 

  574.             {
    575. 

  575.                 print $langs->trans("ErrorNoSocialContributionForSellerCountry",$mysoc->pays_code);
    576. 

  576.             }
    577. 

  577.         }
    578. 

  578.         else
    579. 

  579.         {
    580. 

  580.             dol_print_error($db,$db->lasterror());
    581. 

  581.         }
    582. 

  582.     }
    583. 

  583. 

  584.     /**
    585. 

  585.      *		Return list of types of lines (product or service)
    586. 

  586.      * 		Example: 0=product, 1=service, 9=other (for external module)
    587. 

  587.      *
    588. 

  588.      *		@param      selected        Preselected type
    589. 

  589.      *		@param      htmlname        Name of field in html form
    590. 

  590.      * 		@param		showempty		Add an empty field
    591. 

  591.      * 		@param		hidetext		Do not show label before combo box
    592. 

  592.      * 		@param		forceall		Force to show products and services in combo list, whatever are activated modules
    593. 

  593.      */
    594. 

  594.     function select_type_of_lines($selected='',$htmlname='type',$showempty=0,$hidetext=0,$forceall=0)
    595. 

  595.     {
    596. 

  596.         global $db,$langs,$user,$conf;
    597. 

  597. 

  598.         // If product & services are enabled or both disabled.
    599. 

  599.         if ($forceall || ($conf->product->enabled && $conf->service->enabled)
    600. 

  600.         || (empty($conf->product->enabled) && empty($conf->service->enabled)))
    601. 

  601.         {
    602. 

  602.             if (empty($hidetext)) print $langs->trans("Type").': ';
    603. 

  603.             print '<select class="flat" name="'.$htmlname.'">';
    604. 

  604.             if ($showempty)
    605. 

  605.             {
    606. 

  606.                 print '<option value="-1"';
    607. 

  607.                 if ($selected == -1) print ' selected="selected"';
    608. 

  608.                 print '>&nbsp;</option>';
    609. 

  609.             }
    610. 

  610. 

  611.             print '<option value="0"';
    612. 

  612.             if (0 == $selected) print ' selected="selected"';
    613. 

  613.             print '>'.$langs->trans("Product");
    614. 

  614. 

  615.             print '<option value="1"';
    616. 

  616.             if (1 == $selected) print ' selected="selected"';
    617. 

  617.             print '>'.$langs->trans("Service");
    618. 

  618. 

  619.             print '</select>';
    620. 

  620.             //if ($user->admin) print info_admin($langs->trans("YouCanChangeValuesForThisListFromDictionnarySetup"),1);
    621. 

  621.         }
    622. 

  622.         if (! $forceall && empty($conf->product->enabled) && $conf->service->enabled)
    623. 

  623.         {
    624. 

  624.             print '<input type="hidden" name="'.$htmlname.'" value="1">';
    625. 

  625.         }
    626. 

  626.         if (! $forceall && $conf->product->enabled && empty($conf->service->enabled))
    627. 

  627.         {
    628. 

  628.             print '<input type="hidden" name="'.$htmlname.'" value="0">';
    629. 

  629.         }
    630. 

  630. 

  631.     }
    632. 

  632. 

  633.     /**
    634. 

  634.      *	Load into cache cache_types_fees, array of types of fees
    635. 

  635.      *
    636. 

  636.      *	@return     int             Nb of lines loaded, 0 if already loaded, <0 if ko
    637. 

  637.      *	TODO move in DAO class
    638. 

  638.      */
    639. 

  639.     function load_cache_types_fees()
    640. 

  640.     {
    641. 

  641.     	global $langs;
    642. 

  642. 

  643.     	$langs->load("trips");
    644. 

  644. 

  645.     	if (count($this->cache_types_fees)) return 0;    // Cache already load
    646. 

  646. 

  647.     	$sql = "SELECT c.code, c.libelle as label";
    648. 

  648.     	$sql.= " FROM ".MAIN_DB_PREFIX."c_type_fees as c";
    649. 

  649.     	$sql.= " ORDER BY lower(c.libelle) ASC";
    650. 

  650. 

  651.     	dol_syslog(get_class($this).'::load_cache_types_fees sql='.$sql, LOG_DEBUG);
    652. 

  652.     	$resql=$this->db->query($sql);
    653. 

  653.     	if ($resql)
    654. 

  654.     	{
    655. 

  655.     		$num = $this->db->num_rows($resql);
    656. 

  656.     		$i = 0;
    657. 

  657. 

  658.     		while ($i < $num)
    659. 

  659.     		{
    660. 

  660.     			$obj = $this->db->fetch_object($resql);
    661. 

  661. 

  662.     			// Si traduction existe, on l'utilise, sinon on prend le libelle par defaut
    663. 

  663.     			$label=($obj->code != $langs->trans($obj->code) ? $langs->trans($obj->code) : $langs->trans($obj->label));
    664. 

  664.     			$this->cache_types_fees[$obj->code] = $label;
    665. 

  665.     			$i++;
    666. 

  666.     		}
    667. 

  667.     		return $num;
    668. 

  668.     	}
    669. 

  669.     	else
    670. 

  670.     	{
    671. 

  671.     		dol_print_error($this->db);
    672. 

  672.     		return -1;
    673. 

  673.     	}
    674. 

  674.     }
    675. 

  675. 

  676.     /**
    677. 

  677.      *	Return list of types of notes
    678. 

  678.      *
    679. 

  679.      *	@param      string		$selected		Preselected type
    680. 

  680.      *	@param      string		$htmlname		Name of field in form
    681. 

  681.      * 	@param		int			$showempty		Add an empty field
    682. 

  682.      * 	@return		void
    683. 

  683.      */
    684. 

  684.     function select_type_fees($selected='',$htmlname='type',$showempty=0)
    685. 

  685.     {
    686. 

  686.         global $user, $langs;
    687. 

  687. 

  688.         dol_syslog(get_class($this)."::select_type_fees ".$selected.", ".$htmlname, LOG_DEBUG);
    689. 

  689. 

  690.         $this->load_cache_types_fees();
    691. 

  691. 

  692.         print '<select class="flat" name="'.$htmlname.'">';
    693. 

  693.         if ($showempty)
    694. 

  694.         {
    695. 

  695.             print '<option value="-1"';
    696. 

  696.             if ($selected == -1) print ' selected="selected"';
    697. 

  697.             print '>&nbsp;</option>';
    698. 

  698.         }
    699. 

  699. 

  700.         foreach($this->cache_types_fees as $key => $value)
    701. 

  701.         {
    702. 

  702.         	print '<option value="'.$key.'"';
    703. 

  703.         	if ($key == $selected) print ' selected="selected"';
    704. 

  704.         	print '>';
    705. 

  705.         	print $value;
    706. 

  706.         	print '</option>';
    707. 

  707.         }
    708. 

  708. 

  709.         print '</select>';
    710. 

  710.         if ($user->admin) print info_admin($langs->trans("YouCanChangeValuesForThisListFromDictionnarySetup"),1);
    711. 

  711.     }
    712. 

  712. 

  713.     /**
    714. 

  714.      *    	Output html form to select a third party
    715. 

  715.      *
    716. 

  716.      *		@param      selected        Preselected type
    717. 

  717.      *		@param      htmlname        Name of field in form
    718. 

  718.      *    	@param      filter          Optionnal filters criteras
    719. 

  719.      *		@param		showempty		Add an empty field
    720. 

  720.      * 		@param		showtype		Show third party type in combolist (customer, prospect or supplier)
    721. 

  721.      * 		@param		forcecombo		Force to use combo box
    722. 

  722.      */
    723. 

  723.     function select_societes($selected='',$htmlname='socid',$filter='',$showempty=0, $showtype=0, $forcecombo=0)
    724. 

  724.     {
    725. 

  725.     	print $this->select_company($selected,$htmlname,$filter,$showempty,$showtype,$forcecombo);
    726. 

  726.     }
    727. 

  727. 

  728.     /**
    729. 

  729.      *    	Output html form to select a third party
    730. 

  730.      *
    731. 

  731.      *		@param      selected        Preselected type
    732. 

  732.      *		@param      htmlname        Name of field in form
    733. 

  733.      *    	@param      filter          Optionnal filters criteras
    734. 

  734.      *		@param		showempty		Add an empty field
    735. 

  735.      * 		@param		showtype		Show third party type in combolist (customer, prospect or supplier)
    736. 

  736.      * 		@param		forcecombo		Force to use combo box
    737. 

  737.      */
    738. 

  738.     function select_company($selected='',$htmlname='socid',$filter='',$showempty=0, $showtype=0, $forcecombo=0)
    739. 

  739.     {
    740. 

  740.         global $conf,$user,$langs;
    741. 

  741. 

  742.         $out='';
    743. 

  743. 

  744.         // On recherche les societes
    745. 

  745.         $sql = "SELECT s.rowid, s.nom, s.client, s.fournisseur, s.code_client, s.code_fournisseur";
    746. 

  746.         $sql.= " FROM ".MAIN_DB_PREFIX ."societe as s";
    747. 

  747.         if (!$user->rights->societe->client->voir && !$user->societe_id) $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
    748. 

  748.         $sql.= " WHERE s.entity = ".$conf->entity;
    749. 

  749.         if ($filter) $sql.= " AND ".$filter;
    750. 

  750.         if (!$user->rights->societe->client->voir && !$user->societe_id) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id;
    751. 

  751.         $sql.= " ORDER BY nom ASC";
    752. 

  752. 

  753.         dol_syslog("Form::select_societes sql=".$sql);
    754. 

  754.         $resql=$this->db->query($sql);
    755. 

  755.         if ($resql)
    756. 

  756.         {
    757. 

  757.             if ($conf->use_javascript_ajax && $conf->global->COMPANY_USE_SEARCH_TO_SELECT && ! $forcecombo)
    758. 

  758.             {
    759. 

  759.                 //$minLength = (is_numeric($conf->global->COMPANY_USE_SEARCH_TO_SELECT)?$conf->global->COMPANY_USE_SEARCH_TO_SELECT:2);
    760. 

  760. 

  761.             	$out.= ajax_combobox($htmlname);
    762. 

  762.             }
    763. 

  763. 

  764.             $out.= '<select id="'.$htmlname.'" class="flat" name="'.$htmlname.'">';
    765. 

  765.             if ($showempty) $out.= '<option value="-1">&nbsp;</option>';
    766. 

  766.             $num = $this->db->num_rows($resql);
    767. 

  767.             $i = 0;
    768. 

  768.             if ($num)
    769. 

  769.             {
    770. 

  770.                 while ($i < $num)
    771. 

  771.                 {
    772. 

  772.                     $obj = $this->db->fetch_object($resql);
    773. 

  773.                     $label=$obj->nom;
    774. 

  774.                     if ($showtype)
    775. 

  775.                     {
    776. 

  776.                         if ($obj->client || $obj->fournisseur) $label.=' (';
    777. 

  777.                         if ($obj->client == 1 || $obj->client == 3) $label.=$langs->trans("Customer");
    778. 

  778.                         if ($obj->client == 2 || $obj->client == 3) $label.=($obj->client==3?', ':'').$langs->trans("Prospect");
    779. 

  779.                         if ($obj->fournisseur) $label.=($obj->client?', ':'').$langs->trans("Supplier");
    780. 

  780.                         if ($obj->client || $obj->fournisseur) $label.=')';
    781. 

  781.                     }
    782. 

  782.                     if ($selected > 0 && $selected == $obj->rowid)
    783. 

  783.                     {
    784. 

  784.                         $out.= '<option value="'.$obj->rowid.'" selected="selected">'.$label.'</option>';
    785. 

  785.                     }
    786. 

  786.                     else
    787. 

  787.                     {
    788. 

  788.                         $out.= '<option value="'.$obj->rowid.'">'.$label.'</option>';
    789. 

  789.                     }
    790. 

  790.                     $i++;
    791. 

  791.                 }
    792. 

  792.             }
    793. 

  793.             $out.= '</select>';
    794. 

  794.         }
    795. 

  795.         else
    796. 

  796.         {
    797. 

  797.             dol_print_error($this->db);
    798. 

  798.         }
    799. 

  799. 

  800.         return $out;
    801. 

  801.     }
    802. 

  802. 

  803. 

  804.     /**
    805. 

  805.      *    	Return HTML combo list of absolute discounts
    806. 

  806.      *
    807. 

  807.      *    	@param      selected        Id remise fixe pre-selectionnee
    808. 

  808.      *    	@param      htmlname        Nom champ formulaire
    809. 

  809.      *    	@param      filter          Criteres optionnels de filtre
    810. 

  810.      * 		@param		maxvalue		Max value for lines that can be selected
    811. 

  811.      * 		@return		int				Return number of qualifed lines in list
    812. 

  812.      */
    813. 

  813.     function select_remises($selected='',$htmlname='remise_id',$filter='',$socid, $maxvalue=0)
    814. 

  814.     {
    815. 

  815.         global $langs,$conf;
    816. 

  816. 

  817.         // On recherche les remises
    818. 

  818.         $sql = "SELECT re.rowid, re.amount_ht, re.amount_tva, re.amount_ttc,";
    819. 

  819.         $sql.= " re.description, re.fk_facture_source";
    820. 

  820.         $sql.= " FROM ".MAIN_DB_PREFIX ."societe_remise_except as re";
    821. 

  821.         $sql.= " WHERE fk_soc = ".$socid;
    822. 

  822.         if ($filter) $sql.= " AND ".$filter;
    823. 

  823.         $sql.= " ORDER BY re.description ASC";
    824. 

  824. 

  825.         dol_syslog("Form::select_remises sql=".$sql);
    826. 

  826.         $resql=$this->db->query($sql);
    827. 

  827.         if ($resql)
    828. 

  828.         {
    829. 

  829.             print '<select class="flat" name="'.$htmlname.'">';
    830. 

  830.             $num = $this->db->num_rows($resql);
    831. 

  831. 

  832.             $qualifiedlines=$num;
    833. 

  833. 

  834.             $i = 0;
    835. 

  835.             if ($num)
    836. 

  836.             {
    837. 

  837.                 print '<option value="0">&nbsp;</option>';
    838. 

  838.                 while ($i < $num)
    839. 

  839.                 {
    840. 

  840.                     $obj = $this->db->fetch_object($resql);
    841. 

  841.                     $desc=dol_trunc($obj->description,40);
    842. 

  842.                     if ($desc=='(CREDIT_NOTE)') $desc=$langs->trans("CreditNote");
    843. 

  843.                     if ($desc=='(DEPOSIT)')     $desc=$langs->trans("Deposit");
    844. 

  844. 

  845.                     $selectstring='';
    846. 

  846.                     if ($selected > 0 && $selected == $obj->rowid) $selectstring=' selected="selected"';
    847. 

  847. 

  848.                     $disabled='';
    849. 

  849.                     if ($maxvalue > 0 && $obj->amount_ttc > $maxvalue)
    850. 

  850.                     {
    851. 

  851.                         $qualifiedlines--;
    852. 

  852.                         $disabled=' disabled="disabled"';
    853. 

  853.                     }
    854. 

  854. 

  855.                     print '<option value="'.$obj->rowid.'"'.$selectstring.$disabled.'>'.$desc.' ('.price($obj->amount_ht).' '.$langs->trans("HT").' - '.price($obj->amount_ttc).' '.$langs->trans("TTC").')</option>';
    856. 

  856.                     $i++;
    857. 

  857.                 }
    858. 

  858.             }
    859. 

  859.             print '</select>';
    860. 

  860.             return $qualifiedlines;
    861. 

  861.         }
    862. 

  862.         else
    863. 

  863.         {
    864. 

  864.             dol_print_error($this->db);
    865. 

  865.             return -1;
    866. 

  866.         }
    867. 

  867.     }
    868. 

  868. 

  869. 

  870.     /**
    871. 

  871.      *    	Return list of all contacts (for a third party or all)
    872. 

  872.      *
    873. 

  873.      *    	@param      socid      	    Id ot third party or 0 for all
    874. 

  874.      *    	@param      selected   	    Id contact pre-selectionne
    875. 

  875.      *    	@param      htmlname  	    Name of HTML field ('none' for a not editable field)
    876. 

  876.      *      @param      show_empty      0=no empty value, 1=add an empty value
    877. 

  877.      *      @param      exclude         List of contacts id to exclude
    878. 

  878.      * 		@param		limitto			Disable answers that are not id in this array list
    879. 

  879.      * 	    @param		showfunction    Add function into label
    880. 

  880.      * 		@param		moreclass		Add more class to class style
    881. 

  881.      *		@return		int				<0 if KO, Nb of contact in list if OK
    882. 

  882.      */
    883. 

  883.     function select_contacts($socid,$selected='',$htmlname='contactid',$showempty=0,$exclude='',$limitto='',$showfunction=0, $moreclass='')
    884. 

  884.     {
    885. 

  885.         global $conf,$langs;
    886. 

  886. 

  887.         // On recherche les societes
    888. 

  888.         $sql = "SELECT s.rowid, s.name, s.firstname, s.poste FROM";
    889. 

  889.         $sql.= " ".MAIN_DB_PREFIX ."socpeople as s";
    890. 

  890.         $sql.= " WHERE entity = ".$conf->entity;
    891. 

  891.         if ($socid > 0) $sql.= " AND fk_soc=".$socid;
    892. 

  892.         $sql.= " ORDER BY s.name ASC";
    893. 

  893. 

  894.         dol_syslog("Form::select_contacts sql=".$sql);
    895. 

  895.         $resql=$this->db->query($sql);
    896. 

  896.         if ($resql)
    897. 

  897.         {
    898. 

  898.             $num=$this->db->num_rows($resql);
    899. 

  899.             if ($num == 0) return 0;
    900. 

  900. 

  901.             if ($htmlname != 'none') print '<select class="flat'.($moreclass?' '.$moreclass:'').'" id="'.$htmlname.'" name="'.$htmlname.'">';
    902. 

  902.             if ($showempty) print '<option value="0"></option>';
    903. 

  903.             $num = $this->db->num_rows($resql);
    904. 

  904.             $i = 0;
    905. 

  905.             if ($num)
    906. 

  906.             {
    907. 

  907.             	include_once(DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php');
    908. 

  908.                 $contactstatic=new Contact($this->db);
    909. 

  909. 

  910.                 while ($i < $num)
    911. 

  911.                 {
    912. 

  912.                     $obj = $this->db->fetch_object($resql);
    913. 

  913. 

  914.                     $contactstatic->id=$obj->rowid;
    915. 

  915.                     $contactstatic->name=$obj->name;
    916. 

  916.                     $contactstatic->firstname=$obj->firstname;
    917. 

  917. 

  918.                     if ($htmlname != 'none')
    919. 

  919.                     {
    920. 

  920.                         $disabled=0;
    921. 

  921.                         if (is_array($exclude) && count($exclude) && in_array($obj->rowid,$exclude)) $disabled=1;
    922. 

  922.                         if (is_array($limitto) && count($limitto) && ! in_array($obj->rowid,$limitto)) $disabled=1;
    923. 

  923.                         if ($selected && $selected == $obj->rowid)
    924. 

  924.                         {
    925. 

  925.                             print '<option value="'.$obj->rowid.'"';
    926. 

  926.                             if ($disabled) print ' disabled="disabled"';
    927. 

  927.                             print ' selected="selected">';
    928. 

  928.                             print $contactstatic->getFullName($langs);
    929. 

  929.                             if ($showfunction && $obj->poste) print ' ('.$obj->poste.')';
    930. 

  930.                             print '</option>';
    931. 

  931.                         }
    932. 

  932.                         else
    933. 

  933.                         {
    934. 

  934.                             print '<option value="'.$obj->rowid.'"';
    935. 

  935.                             if ($disabled) print ' disabled="disabled"';
    936. 

  936.                             print '>';
    937. 

  937.                             print $contactstatic->getFullName($langs);
    938. 

  938.                             if ($showfunction && $obj->poste) print ' ('.$obj->poste.')';
    939. 

  939.                             print '</option>';
    940. 

  940.                         }
    941. 

  941.                     }
    942. 

  942.                     else
    943. 

  943.                     {
    944. 

  944.                         if ($selected == $obj->rowid)
    945. 

  945.                         {
    946. 

  946.                             print $contactstatic->getFullName($langs);
    947. 

  947.                             if ($showfunction && $obj->poste) print ' ('.$obj->poste.')';
    948. 

  948.                         }
    949. 

  949.                     }
    950. 

  950.                     $i++;
    951. 

  951.                 }
    952. 

  952.             }
    953. 

  953.             if ($htmlname != 'none')
    954. 

  954.             {
    955. 

  955.                 print '</select>';
    956. 

  956.             }
    957. 

  957.             return $num;
    958. 

  958.         }
    959. 

  959.         else
    960. 

  960.         {
    961. 

  961.             dol_print_error($this->db);
    962. 

  962.             return -1;
    963. 

  963.         }
    964. 

  964.     }
    965. 

  965. 

  966.     /**
    967. 

  967.      *	Return select list of users
    968. 

  968.      *
    969. 

  969.      *  @param      selected        Id user preselected
    970. 

  970.      *  @param      htmlname        Field name in form
    971. 

  971.      *  @param      show_empty      0=liste sans valeur nulle, 1=ajoute valeur inconnue
    972. 

  972.      *  @param      exclude         Array list of users id to exclude
    973. 

  973.      * 	@param		disabled		If select list must be disabled
    974. 

  974.      *  @param      include         Array list of users id to include
    975. 

  975.      * 	@param		enableonly		Array list of users id to be enabled. All other must be disabled
    976. 

  976.      *  @param		force_entity	Possibility to force entity
    977. 

  977.      */
    978. 

  978.     function select_users($selected='',$htmlname='userid',$show_empty=0,$exclude='',$disabled=0,$include='',$enableonly='',$force_entity=0)
    979. 

  979.     {
    980. 

  980.     	print $this->select_dolusers($selected,$htmlname,$show_empty,$exclude,$disabled,$include,$enableonly,$force_entity);
    981. 

  981.     }
    982. 

  982. 

  983.     /**
    984. 

  984.      *	Return select list of users
    985. 

  985.      *
    986. 

  986.      *  @param      selected        User id or user object of user preselected. If -1, we use id of current user.
    987. 

  987.      *  @param      htmlname        Field name in form
    988. 

  988.      *  @param      show_empty      0=liste sans valeur nulle, 1=ajoute valeur inconnue
    989. 

  989.      *  @param      exclude         Array list of users id to exclude
    990. 

  990.      * 	@param		disabled		If select list must be disabled
    991. 

  991.      *  @param      include         Array list of users id to include
    992. 

  992.      * 	@param		enableonly		Array list of users id to be enabled. All other must be disabled
    993. 

  993.      *  @param		force_entity	Possibility to force entity
    994. 

  994.      */
    995. 

  995.     function select_dolusers($selected='',$htmlname='userid',$show_empty=0,$exclude='',$disabled=0,$include='',$enableonly='',$force_entity=0)
    996. 

  996.     {
    997. 

  997.         global $conf,$user,$langs;
    998. 

  998. 

  999.         // If no preselected user defined, we take current user
    1000. 

  1000.         if ($selected < -1 && empty($conf->global->SOCIETE_DISABLE_DEFAULT_SALESREPRESENTATIVE)) $selected=$user->id;
    1001. 

  1001. 

  1002.         // Permettre l'exclusion d'utilisateurs
    1003. 

  1003.         if (is_array($exclude))	$excludeUsers = implode("','",$exclude);
    1004. 

  1004.         // Permettre l'inclusion d'utilisateurs
    1005. 

  1005.         if (is_array($include))	$includeUsers = implode("','",$include);
    1006. 

  1006. 

  1007.         $out='';
    1008. 

  1008. 

  1009.         // On recherche les utilisateurs
    1010. 

  1010.         $sql = "SELECT u.rowid, u.name, u.firstname, u.login, u.admin, u.entity";
    1011. 

  1011.         if(! empty($conf->multicompany->enabled) && $conf->entity == 1 && $user->admin && ! $user->entity)
    1012. 

  1012.         {
    1013. 

  1013.         	$sql.= ", e.label";
    1014. 

  1014.         }
    1015. 

  1015.         $sql.= " FROM ".MAIN_DB_PREFIX ."user as u";
    1016. 

  1016.         if(! empty($conf->multicompany->enabled) && $conf->entity == 1 && $user->admin && ! $user->entity)
    1017. 

  1017.         {
    1018. 

  1018.             $sql.= " LEFT JOIN ".MAIN_DB_PREFIX ."entity as e on e.rowid=u.entity";
    1019. 

  1019.             if ($force_entity) $sql.= " WHERE u.entity IN (0,".$force_entity.")";
    1020. 

  1020.             else $sql.= " WHERE u.entity IS NOT NULL";
    1021. 

  1021.         }
    1022. 

  1022.         else
    1023. 

  1023.         {
    1024. 

  1024.         	$sql.= " WHERE u.entity IN (0,".$conf->entity.")";
    1025. 

  1025.         }
    1026. 

  1026.         if (is_array($exclude) && $excludeUsers) $sql.= " AND u.rowid NOT IN ('".$excludeUsers."')";
    1027. 

  1027.         if (is_array($include) && $includeUsers) $sql.= " AND u.rowid IN ('".$includeUsers."')";
    1028. 

  1028.         $sql.= " ORDER BY u.name ASC";
    1029. 

  1029. 

  1030.         dol_syslog("Form::select_dolusers sql=".$sql);
    1031. 

  1031.         $resql=$this->db->query($sql);
    1032. 

  1032.         if ($resql)
    1033. 

  1033.         {
    1034. 

  1034.             $num = $this->db->num_rows($resql);
    1035. 

  1035.             $i = 0;
    1036. 

  1036.             if ($num)
    1037. 

  1037.             {
    1038. 

  1038.             	$out.= '<select class="flat" id="'.$htmlname.'" name="'.$htmlname.'"'.($disabled?' disabled="disabled"':'').'>';
    1039. 

  1039.             	if ($show_empty) $out.= '<option value="-1"'.($id==-1?' selected="selected"':'').'>&nbsp;</option>'."\n";
    1040. 

  1040. 

  1041.             	$userstatic=new User($this->db);
    1042. 

  1042. 

  1043.                 while ($i < $num)
    1044. 

  1044.                 {
    1045. 

  1045.                     $obj = $this->db->fetch_object($resql);
    1046. 

  1046. 

  1047.                     $userstatic->id=$obj->rowid;
    1048. 

  1048.                     $userstatic->nom=$obj->name;
    1049. 

  1049.                     $userstatic->prenom=$obj->firstname;
    1050. 

  1050. 

  1051.                     $disableline=0;
    1052. 

  1052.                     if (is_array($enableonly) && count($enableonly) && ! in_array($obj->rowid,$enableonly)) $disableline=1;
    1053. 

  1053. 

  1054.                     if ((is_object($selected) && $selected->id == $obj->rowid) || (! is_object($selected) && $selected == $obj->rowid))
    1055. 

  1055.                     {
    1056. 

  1056.                         $out.= '<option value="'.$obj->rowid.'"';
    1057. 

  1057.                         if ($disableline) $out.= ' disabled="disabled"';
    1058. 

  1058.                         $out.= ' selected="selected">';
    1059. 

  1059.                     }
    1060. 

  1060.                     else
    1061. 

  1061.                     {
    1062. 

  1062.                         $out.= '<option value="'.$obj->rowid.'"';
    1063. 

  1063.                         if ($disableline) $out.= ' disabled="disabled"';
    1064. 

  1064.                         $out.= '>';
    1065. 

  1065.                     }
    1066. 

  1066.                     $out.= $userstatic->getFullName($langs);
    1067. 

  1067. 

  1068.                     if(! empty($conf->multicompany->enabled) && empty($conf->multicompany->transverse_mode) && $conf->entity == 1 && $user->admin && ! $user->entity)
    1069. 

  1069.                     {
    1070. 

  1070.                     	if ($obj->admin && ! $obj->entity) $out.=" (".$langs->trans("AllEntities").")";
    1071. 

  1071. 						else $out.=" (".$obj->label.")";
    1072. 

  1072.                     }
    1073. 

  1073. 

  1074.                     //if ($obj->admin) $out.= ' *';
    1075. 

  1075.                     if ($conf->global->MAIN_SHOW_LOGIN) $out.= ' ('.$obj->login.')';
    1076. 

  1076.                     $out.= '</option>';
    1077. 

  1077.                     $i++;
    1078. 

  1078.                 }
    1079. 

  1079.             }
    1080. 

  1080.         	else
    1081. 

  1081.             {
    1082. 

  1082.             	$out.= '<select class="flat" name="'.$htmlname.'" disabled="disabled">';
    1083. 

  1083.             	$out.= '<option value="">'.$langs->trans("None").'</option>';
    1084. 

  1084.             }
    1085. 

  1085.             $out.= '</select>';
    1086. 

  1086.         }
    1087. 

  1087.         else
    1088. 

  1088.         {
    1089. 

  1089.             dol_print_error($this->db);
    1090. 

  1090.         }
    1091. 

  1091. 

  1092.         return $out;
    1093. 

  1093.     }
    1094. 

  1094. 

  1095. 

  1096.     /**
    1097. 

  1097.      *  Return list of products for customer in Ajax if Ajax activated or go to select_produits_do
    1098. 

  1098.      *
    1099. 

  1099.      *  @param		int			$selected				Preselected products
    1100. 

  1100.      *  @param		string		$htmlname				Name of HTML seletc field (must be unique in page)
    1101. 

  1101.      *  @param		int			$filtertype				Filter on product type (''=nofilter, 0=product, 1=service)
    1102. 

  1102.      *  @param		int			$limit					Limit on number of returned lines
    1103. 

  1103.      *  @param		int			$price_level			Level of price to show
    1104. 

  1104.      *  @param		int			$status					-1=Return all products, 0=Products not on sell, 1=Products on sell
    1105. 

  1105.      *  @param		int			$finished				2=all, 1=finished, 0=raw material
    1106. 

  1106.      *  @param		string		$selected_input_value	Value of preselected input text (with ajax)
    1107. 

  1107.      *  @return		void
    1108. 

  1108.      */
    1109. 

  1109.     function select_produits($selected='',$htmlname='productid',$filtertype='',$limit=20,$price_level=0,$status=1,$finished=2,$selected_input_value='',$hidelabel=0)
    1110. 

  1110.     {
    1111. 

  1111.         global $langs,$conf;
    1112. 

  1112. 

  1113.         $price_level = (! empty($price_level) ? $price_level : 0);
    1114. 

  1114. 

  1115.         if ($conf->global->PRODUIT_USE_SEARCH_TO_SELECT)
    1116. 

  1116.         {
    1117. 

  1117.         	if ($selected && empty($selected_input_value))
    1118. 

  1118.         	{
    1119. 

  1119.         		require_once(DOL_DOCUMENT_ROOT."/product/class/product.class.php");
    1120. 

  1120.         		$product = new Product($this->db);
    1121. 

  1121.         		$product->fetch($selected);
    1122. 

  1122.         		$selected_input_value=$product->ref;
    1123. 

  1123.         	}
    1124. 

  1124.             // mode=1 means customers products
    1125. 

  1125.             print ajax_autocompleter($selected, $htmlname, DOL_URL_ROOT.'/product/ajaxproducts.php', 'htmlname='.$htmlname.'&outjson=1&price_level='.$price_level.'&type='.$filtertype.'&mode=1&status='.$status.'&finished='.$finished, $conf->global->PRODUIT_USE_SEARCH_TO_SELECT);
    1126. 

  1126.             if (! $hidelabel) print $langs->trans("RefOrLabel").' : ';
    1127. 

  1127.             print '<input type="text" size="20" name="search_'.$htmlname.'" id="search_'.$htmlname.'" value="'.$selected_input_value.'" />';
    1128. 

  1128.         }
    1129. 

  1129.         else
    1130. 

  1130.         {
    1131. 

  1131.             $this->select_produits_do($selected,$htmlname,$filtertype,$limit,$price_level,'',$status,$finished,0);
    1132. 

  1132.         }
    1133. 

  1133. 

  1134.         print '<br>';
    1135. 

  1135.     }
    1136. 

  1136. 

  1137.     /**
    1138. 

  1138.      *	Return list of products for a customer
    1139. 

  1139.      *
    1140. 

  1140.      *	@param      int		$selected       Preselected product
    1141. 

  1141.      *	@param      string	$htmlname       Name of select html
    1142. 

  1142.      *  @param		string	$filtertype     Filter on product type (''=nofilter, 0=product, 1=service)
    1143. 

  1143.      *	@param      int		$limit          Limite sur le nombre de lignes retournees
    1144. 

  1144.      *	@param      int		$price_level    Level of price to show
    1145. 

  1145.      * 	@param      string	$filterkey      Filter on product
    1146. 

  1146.      *	@param		int		$status         -1=Return all products, 0=Products not on sell, 1=Products on sell
    1147. 

  1147.      *  @param      int		$finished       Filter on finished field: 2=No filter
    1148. 

  1148.      *  @param      int		$disableout     Disable print output
    1149. 

  1149.      *  @return     array    				Array of keys for json
    1150. 

  1150.      */
    1151. 

  1151.     function select_produits_do($selected='',$htmlname='productid',$filtertype='',$limit=20,$price_level=0,$filterkey='',$status=1,$finished=2,$disableout=0)
    1152. 

  1152.     {
    1153. 

  1153.         global $langs,$conf,$user,$db;
    1154. 

  1154. 

  1155.         $sql = "SELECT ";
    1156. 

  1156.         $sql.= " p.rowid, p.label, p.ref, p.fk_product_type, p.price, p.price_ttc, p.price_base_type, p.duration, p.stock";
    1157. 

  1157.         // Multilang : we add translation
    1158. 

  1158.         if ($conf->global->MAIN_MULTILANGS)
    1159. 

  1159.         {
    1160. 

  1160.             $sql.= ", pl.label as label_translated";
    1161. 

  1161.         }
    1162. 

  1162.         $sql.= " FROM ".MAIN_DB_PREFIX."product as p";
    1163. 

  1163.         // Multilang : we add translation
    1164. 

  1164.         if ($conf->global->MAIN_MULTILANGS)
    1165. 

  1165.         {
    1166. 

  1166.             $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."product_lang as pl ON pl.fk_product = p.rowid AND pl.lang='". $langs->getDefaultLang() ."'";
    1167. 

  1167.         }
    1168. 

  1168.         $sql.= ' WHERE p.entity IN (0,'.(! empty($conf->entities['product']) ? $conf->entities['product'] : $conf->entity).')';
    1169. 

  1169.         if ($finished == 0)
    1170. 

  1170.         {
    1171. 

  1171.             $sql.= " AND p.finished = ".$finished;
    1172. 

  1172.         }
    1173. 

  1173.         elseif ($finished == 1)
    1174. 

  1174.         {
    1175. 

  1175.             $sql.= " AND p.finished = ".$finished;
    1176. 

  1176.             if ($status >= 0)  $sql.= " AND p.tosell = ".$status;
    1177. 

  1177.         }
    1178. 

  1178.         elseif ($status >= 0)
    1179. 

  1179.         {
    1180. 

  1180.             $sql.= " AND p.tosell = ".$status;
    1181. 

  1181.         }
    1182. 

  1182.         if (strval($filtertype) != '') $sql.=" AND p.fk_product_type=".$filtertype;
    1183. 

  1183.         // Add criteria on ref/label
    1184. 

  1184.         if ($filterkey && $filterkey != '')
    1185. 

  1185.         {
    1186. 

  1186. 	        if (! empty($conf->global->PRODUCT_DONOTSEARCH_ANYWHERE))   // Can use index
    1187. 

  1187. 	        {
    1188. 

  1188. 	            $sql.=" AND (p.ref LIKE '".$filterkey."%' OR p.label LIKE '".$filterkey."%'";
    1189. 

  1189. 	            if ($conf->global->MAIN_MULTILANGS) $sql.=" OR pl.label LIKE '".$filterkey."%'";
    1190. 

  1190. 	            $sql.=")";
    1191. 

  1191. 	        }
    1192. 

  1192. 	        else
    1193. 

  1193. 	        {
    1194. 

  1194. 	            $sql.=" AND (p.ref LIKE '%".$filterkey."%' OR p.label LIKE '%".$filterkey."%'";
    1195. 

  1195. 	            if ($conf->global->MAIN_MULTILANGS) $sql.=" OR pl.label LIKE '%".$filterkey."%'";
    1196. 

  1196. 	            $sql.=")";
    1197. 

  1197. 	        }
    1198. 

  1198.         }
    1199. 

  1199.         $sql.= $db->order("p.ref");
    1200. 

  1200.         $sql.= $db->plimit($limit);
    1201. 

  1201. 

  1202.         // Build output string
    1203. 

  1203.         $outselect='';
    1204. 

  1204.         $outjson=array();
    1205. 

  1205. 

  1206.         dol_syslog("Form::select_produits_do search product sql=".$sql, LOG_DEBUG);
    1207. 

  1207.         $result=$this->db->query($sql);
    1208. 

  1208.         if ($result)
    1209. 

  1209.         {
    1210. 

  1210.             $num = $this->db->num_rows($result);
    1211. 

  1211. 

  1212.             $outselect.='<select class="flat" name="'.$htmlname.'" id="'.$htmlname.'">';
    1213. 

  1213. 			$outselect.='<option value="0" selected="selected">&nbsp;</option>';
    1214. 

  1214. 

  1215.             $i = 0;
    1216. 

  1216.             while ($num && $i < $num)
    1217. 

  1217.             {
    1218. 

  1218.                 $outkey='';
    1219. 

  1219.                 $outval='';
    1220. 

  1220.                 $outref='';
    1221. 

  1221. 

  1222.                 $objp = $this->db->fetch_object($result);
    1223. 

  1223. 

  1224.                 $label=$objp->label;
    1225. 

  1225.                 if (! empty($objp->label_translated)) $label=$objp->label_translated;
    1226. 

  1226.                 if ($filterkey && $filterkey != '') $label=preg_replace('/('.preg_quote($filterkey).')/i','<strong>$1</strong>',$label,1);
    1227. 

  1227. 

  1228.                 $outkey=$objp->rowid;
    1229. 

  1229.                 $outref=$objp->ref;
    1230. 

  1230. 

  1231.                 $opt = '<option value="'.$objp->rowid.'"';
    1232. 

  1232.                 $opt.= ($objp->rowid == $selected)?' selected="selected"':'';
    1233. 

  1233.                 if ($conf->stock->enabled && $objp->fk_product_type == 0 && isset($objp->stock))
    1234. 

  1234.                 {
    1235. 

  1235.                     if ($objp->stock > 0)
    1236. 

  1236.                     {
    1237. 

  1237.                         $opt.= ' style="background-color:#32CD32; color:#F5F5F5;"';
    1238. 

  1238.                     }
    1239. 

  1239.                     else if ($objp->stock <= 0)
    1240. 

  1240.                     {
    1241. 

  1241.                         $opt.= ' style="background-color:#FF0000; color:#F5F5F5;"';
    1242. 

  1242.                     }
    1243. 

  1243.                 }
    1244. 

  1244.                 $opt.= '>';
    1245. 

  1245.                 $opt.= $langs->convToOutputCharset($objp->ref).' - '.$langs->convToOutputCharset(dol_trunc($label,32)).' - ';
    1246. 

  1246. 

  1247.                 $objRef = $objp->ref;
    1248. 

  1248.                 if ($filterkey && $filterkey != '') $objRef=preg_replace('/('.preg_quote($filterkey).')/i','<strong>$1</strong>',$objRef,1);
    1249. 

  1249.                 $outval.=$objRef.' - '.dol_trunc($label,32).' - ';
    1250. 

  1250. 

  1251.                 $found=0;
    1252. 

  1252.                 $currencytext=$langs->trans("Currency".$conf->monnaie);
    1253. 

  1253.                 $currencytextnoent=$langs->transnoentities("Currency".$conf->monnaie);
    1254. 

  1254.                 if (dol_strlen($currencytext) > 10) $currencytext=$conf->monnaie;	// If text is too long, we use the short code
    1255. 

  1255.                 if (dol_strlen($currencytextnoent) > 10) $currencytextnoent=$conf->monnaie;   // If text is too long, we use the short code
    1256. 

  1256. 

  1257.                 // Multiprice
    1258. 

  1258.                 if ($price_level …
    1259.

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