diff --git a/htdocs/core/class/html.formwebsite.class.php b/htdocs/core/class/html.formwebsite.class.php
index a42bdd0158a..6981ecc343f 100644
--- a/htdocs/core/class/html.formwebsite.class.php
+++ b/htdocs/core/class/html.formwebsite.class.php
@@ -95,1158 +95,4 @@ class FormWebsite
return $out;
}
-
- /**
- * Return list of export models
- *
- * @param string $selected Id modele pre-selectionne
- * @param string $htmlname Nom de la zone select
- * @param string $type Type des modeles recherches
- * @param int $useempty Affiche valeur vide dans liste
- * @return void
- */
- function select_import_model($selected='',$htmlname='importmodelid',$type='',$useempty=0)
- {
- $sql = "SELECT rowid, label";
- $sql.= " FROM ".MAIN_DB_PREFIX."import_model";
- $sql.= " WHERE type = '".$type."'";
- $sql.= " ORDER BY rowid";
- $result = $this->db->query($sql);
- if ($result)
- {
- print '";
- }
- else {
- dol_print_error($this->db);
- }
- }
-
-
- /**
- * Return list of ecotaxes with label
- *
- * @param string $selected Preselected ecotaxes
- * @param string $htmlname Name of combo list
- * @return integer
- */
- function select_ecotaxes($selected='',$htmlname='ecotaxe_id')
- {
- global $langs;
-
- $sql = "SELECT e.rowid, e.code, e.libelle, e.price, e.organization,";
- $sql.= " c.label as country";
- $sql.= " FROM ".MAIN_DB_PREFIX."c_ecotaxe as e,".MAIN_DB_PREFIX."c_country as c";
- $sql.= " WHERE e.active = 1 AND e.fk_pays = c.rowid";
- $sql.= " ORDER BY country, e.organization ASC, e.code ASC";
-
- dol_syslog(get_class($this).'::select_ecotaxes', LOG_DEBUG);
- $resql=$this->db->query($sql);
- if ($resql)
- {
- print '';
- return 0;
- }
- else
- {
- dol_print_error($this->db);
- return 1;
- }
- }
-
-
- /**
- * Return list of revenue stamp for country
- *
- * @param string $selected Value of preselected revenue stamp
- * @param string $htmlname Name of combo list
- * @param string $country_code Country Code
- * @return string HTML select list
- */
- function select_revenue_stamp($selected='',$htmlname='revenuestamp',$country_code='')
- {
- global $langs;
-
- $out='';
-
- $sql = "SELECT r.taux";
- $sql.= " FROM ".MAIN_DB_PREFIX."c_revenuestamp as r,".MAIN_DB_PREFIX."c_country as c";
- $sql.= " WHERE r.active = 1 AND r.fk_pays = c.rowid";
- $sql.= " AND c.code = '".$country_code."'";
-
- dol_syslog(get_class($this).'::select_revenue_stamp', LOG_DEBUG);
- $resql=$this->db->query($sql);
- if ($resql)
- {
- $out.='';
- return $out;
- }
- else
- {
- dol_print_error($this->db);
- return '';
- }
- }
-
-
- /**
- * Return a HTML select list to select a percent
- *
- * @param integer $selected pourcentage pre-selectionne
- * @param string $htmlname nom de la liste deroulante
- * @param int $disabled Disabled or not
- * @param int $increment increment value
- * @param int $start start value
- * @param int $end end value
- * @param int $showempty Add also an empty line
- * @return string HTML select string
- */
- function select_percent($selected=0,$htmlname='percent',$disabled=0,$increment=5,$start=0,$end=100,$showempty=0)
- {
- $return = '';
-
- return $return;
- }
-
- /**
- * Return select list for categories (to use in form search selectors)
- *
- * @param int $type Type of category ('customer', 'supplier', 'contact', 'product', 'member'). Old mode (0, 1, 2, ...) is deprecated.
- * @param integer $selected Preselected value
- * @param string $htmlname Name of combo list
- * @param int $nocateg Show also an entry "Not categorized"
- * @param int $showempty Add also an empty line
- * @param string $morecss More CSS
- * @return string Html combo list code
- * @see select_all_categories
- */
- function select_categories($type, $selected=0, $htmlname='search_categ', $nocateg=0, $showempty=1, $morecss='')
- {
- global $conf, $langs;
- require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
-
- // For backward compatibility
- if (is_numeric($type))
- {
- dol_syslog(__METHOD__ . ': using numeric value for parameter type is deprecated. Use string code instead.', LOG_WARNING);
- }
-
- // Load list of "categories"
- $static_categs = new Categorie($this->db);
- $tab_categs = $static_categs->get_full_arbo($type);
-
- $moreforfilter = '';
- // Enhance with select2
- if ($conf->use_javascript_ajax)
- {
- include_once DOL_DOCUMENT_ROOT . '/core/lib/ajax.lib.php';
- $comboenhancement = ajax_combobox('select_categ_'.$htmlname);
- $moreforfilter.=$comboenhancement;
- }
-
- // Print a select with each of them
- $moreforfilter.='';
-
- return $moreforfilter;
- }
-
-
- /**
- * Return select list for categories (to use in form search selectors)
- *
- * @param string $selected Preselected value
- * @param string $htmlname Name of combo list (example: 'search_sale')
- * @param User $user Object user
- * @param int $showstatus 0=show user status only if status is disabled, 1=always show user status into label, -1=never show user status
- * @param int $showempty 1=show also an empty value
- * @param string $morecss More CSS
- * @return string Html combo list code
- */
- function select_salesrepresentatives($selected,$htmlname,$user,$showstatus=0,$showempty=1,$morecss='')
- {
- global $conf,$langs;
- $langs->load('users');
-
- $out = '';
- // Enhance with select2
- if ($conf->use_javascript_ajax)
- {
- include_once DOL_DOCUMENT_ROOT . '/core/lib/ajax.lib.php';
-
- $comboenhancement = ajax_combobox($htmlname);
- if ($comboenhancement)
- {
- $out.=$comboenhancement;
- }
- }
- // Select each sales and print them in a select input
- $out.='';
-
- return $out;
- }
-
- /**
- * Return list of project and tasks
- *
- * @param int $selectedtask Pre-selected task
- * @param int $projectid Project id
- * @param string $htmlname Name of html select
- * @param int $modeproject 1 to restrict on projects owned by user
- * @param int $modetask 1 to restrict on tasks associated to user
- * @param int $mode 0=Return list of tasks and their projects, 1=Return projects and tasks if exists
- * @param int $useempty 0=Allow empty values
- * @param int $disablechildoftaskid 1=Disable task that are child of the provided task id
- * @return void
- */
- function selectProjectTasks($selectedtask='', $projectid=0, $htmlname='task_parent', $modeproject=0, $modetask=0, $mode=0, $useempty=0, $disablechildoftaskid=0)
- {
- global $user, $langs;
-
- require_once DOL_DOCUMENT_ROOT.'/projet/class/task.class.php';
-
- //print $modeproject.'-'.$modetask;
- $task=new Task($this->db);
- $tasksarray=$task->getTasksArray($modetask?$user:0, $modeproject?$user:0, $projectid, 0, $mode);
- if ($tasksarray)
- {
- print '';
- }
- else
- {
- print '
'.$langs->trans("NoProject").'
';
- }
- }
-
- /**
- * Write lines of a project (all lines of a project if parent = 0)
- *
- * @param int $inc Cursor counter
- * @param int $parent Id of parent task we want to see
- * @param array $lines Array of task lines
- * @param int $level Level
- * @param int $selectedtask Id selected task
- * @param int $selectedproject Id selected project
- * @param int $disablechildoftaskid 1=Disable task that are child of the provided task id
- * @return void
- */
- private function _pLineSelect(&$inc, $parent, $lines, $level=0, $selectedtask=0, $selectedproject=0, $disablechildoftaskid=0)
- {
- global $langs, $user, $conf;
-
- $lastprojectid=0;
-
- $numlines=count($lines);
- for ($i = 0 ; $i < $numlines ; $i++)
- {
- if ($lines[$i]->fk_parent == $parent)
- {
- //var_dump($selectedproject."--".$selectedtask."--".$lines[$i]->fk_project."_".$lines[$i]->id); // $lines[$i]->id may be empty if project has no lines
-
- // Break on a new project
- if ($parent == 0) // We are on a task at first level
- {
- if ($lines[$i]->fk_project != $lastprojectid) // Break found on project
- {
- if ($i > 0) print '';
- print '\n";
-
- $lastprojectid=$lines[$i]->fk_project;
- $inc++;
- }
- }
-
- $newdisablechildoftaskid=$disablechildoftaskid;
-
- // Print task
- if (isset($lines[$i]->id)) // We use isset because $lines[$i]->id may be null if project has no task and are on root project (tasks may be caught by a left join). We enter here only if '0' or >0
- {
- // Check if we must disable entry
- $disabled=0;
- if ($disablechildoftaskid && (($lines[$i]->id == $disablechildoftaskid || $lines[$i]->fk_parent == $disablechildoftaskid)))
- {
- $disabled++;
- if ($lines[$i]->fk_parent == $disablechildoftaskid) $newdisablechildoftaskid=$lines[$i]->id; // If task is child of a disabled parent, we will propagate id to disable next child too
- }
-
- print '\n";
- $inc++;
- }
-
- $level++;
- if ($lines[$i]->id) $this->_pLineSelect($inc, $lines[$i]->id, $lines, $level, $selectedtask, $selectedproject, $newdisablechildoftaskid);
- $level--;
- }
- }
- }
-
-
- /**
- * Output a HTML thumb of color or a text if not defined.
- *
- * @param string $color String with hex (FFFFFF) or comma RGB ('255,255,255')
- * @param string $textifnotdefined Text to show if color not defined
- * @return string HTML code for color thumb
- * @see selectColor
- */
- static function showColor($color, $textifnotdefined='')
- {
- $textcolor='FFF';
- if ($color)
- {
- $tmp=explode(',', $color);
- if (count($tmp) > 1) // This is a comma RGB ('255','255','255')
- {
- $r = $tmp[0];
- $g = $tmp[1];
- $b = $tmp[2];
- }
- else
- {
- $hexr=$color[0].$color[1];
- $hexg=$color[2].$color[3];
- $hexb=$color[4].$color[5];
- $r = hexdec($hexr);
- $g = hexdec($hexg);
- $b = hexdec($hexb);
- }
- $bright = (max($r, $g, $b) + min($r, $g, $b)) / 510.0; // HSL algorithm
- if ($bright > 0.6) $textcolor='000';
- }
-
- include_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
- $color = colorArrayToHex(colorStringToArray($color,array()),'');
-
- if ($color) print '';
- else print $textifnotdefined;
- }
-
- /**
- * Output a HTML code to select a color
- *
- * @param string $set_color Pre-selected color
- * @param string $prefix Name of HTML field
- * @param string $form_name Deprecated. Not used.
- * @param int $showcolorbox 1=Show color code and color box, 0=Show only color code
- * @param array $arrayofcolors Array of colors. Example: array('29527A','5229A3','A32929','7A367A','B1365F','0D7813')
- * @return void
- * @deprecated Use instead selectColor
- * @see selectColor()
- */
- function select_color($set_color='', $prefix='f_color', $form_name='', $showcolorbox=1, $arrayofcolors='')
- {
- print $this->selectColor($set_color, $prefix, $form_name, $showcolorbox, $arrayofcolors);
- }
-
- /**
- * Output a HTML code to select a color. Field will return an hexa color like '334455'.
- *
- * @param string $set_color Pre-selected color
- * @param string $prefix Name of HTML field
- * @param string $form_name Deprecated. Not used.
- * @param int $showcolorbox 1=Show color code and color box, 0=Show only color code
- * @param array $arrayofcolors Array of colors. Example: array('29527A','5229A3','A32929','7A367A','B1365F','0D7813')
- * @param string $morecss Add css style into input field
- * @return string
- * @see showColor
- */
- static function selectColor($set_color='', $prefix='f_color', $form_name='', $showcolorbox=1, $arrayofcolors='', $morecss='')
- {
- // Deprecation warning
- if ($form_name) {
- dol_syslog(__METHOD__ . ": form_name parameter is deprecated", LOG_WARNING);
- }
-
- global $langs,$conf;
-
- $out='';
-
- if (! is_array($arrayofcolors) || count($arrayofcolors) < 1)
- {
- $langs->load("other");
- if (empty($conf->dol_use_jmobile))
- {
- $out.= '';
- $out.= '';
- $out.= '';
- }
- $out.= '';
- }
- else // In most cases, this is not used. We used instead function with no specific list of colors
- {
- if (empty($conf->dol_use_jmobile))
- {
- $out.= '';
- $out.= '';
- $out.= '';
- }
- $out.= '';
- }
-
- return $out;
- }
-
- /**
- * Creation d'un icone de couleur
- *
- * @param string $color Couleur de l'image
- * @param string $module Nom du module
- * @param string $name Nom de l'image
- * @param int $x Largeur de l'image en pixels
- * @param int $y Hauteur de l'image en pixels
- * @return void
- */
- function CreateColorIcon($color,$module,$name,$x='12',$y='12')
- {
- global $conf;
-
- $file = $conf->$module->dir_temp.'/'.$name.'.png';
-
- // On cree le repertoire contenant les icones
- if (! file_exists($conf->$module->dir_temp))
- {
- dol_mkdir($conf->$module->dir_temp);
- }
-
- // On cree l'image en vraies couleurs
- $image = imagecreatetruecolor($x,$y);
-
- $color = substr($color,1,6);
-
- $rouge = hexdec(substr($color,0,2)); //conversion du canal rouge
- $vert = hexdec(substr($color,2,2)); //conversion du canal vert
- $bleu = hexdec(substr($color,4,2)); //conversion du canal bleu
-
- $couleur = imagecolorallocate($image,$rouge,$vert,$bleu);
- //print $rouge.$vert.$bleu;
- imagefill($image,0,0,$couleur); //on remplit l'image
- // On cree la couleur et on l'attribue a une variable pour ne pas la perdre
- ImagePng($image,$file); //renvoie une image sous format png
- ImageDestroy($image);
- }
-
- /**
- * Return HTML combo list of week
- *
- * @param string $selected Preselected value
- * @param string $htmlname Nom de la zone select
- * @param int $useempty Affiche valeur vide dans liste
- * @return string
- */
- function select_dayofweek($selected='',$htmlname='weekid',$useempty=0)
- {
- global $langs;
-
- $week = array( 0=>$langs->trans("Day0"),
- 1=>$langs->trans("Day1"),
- 2=>$langs->trans("Day2"),
- 3=>$langs->trans("Day3"),
- 4=>$langs->trans("Day4"),
- 5=>$langs->trans("Day5"),
- 6=>$langs->trans("Day6"));
-
- $select_week = '';
- return $select_week;
- }
-
- /**
- * Return HTML combo list of month
- *
- * @param string $selected Preselected value
- * @param string $htmlname Name of HTML select object
- * @param int $useempty Show empty in list
- * @param int $longlabel Show long label
- * @return string
- */
- function select_month($selected='',$htmlname='monthid',$useempty=0,$longlabel=0)
- {
- global $langs;
-
- require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
-
- if ($longlabel) $montharray = monthArray($langs, 0); // Get array
- else $montharray = monthArray($langs, 1);
-
- $select_month = '';
- return $select_month;
- }
-
- /**
- * Return HTML combo list of years
- *
- * @param string $selected Preselected value (''=current year, -1=none, year otherwise)
- * @param string $htmlname Name of HTML select object
- * @param int $useempty Affiche valeur vide dans liste
- * @param int $min_year Offset of minimum year into list (by default current year -10)
- * @param int $max_year Offset of maximum year into list (by default current year + 5)
- * @param int $offset Offset
- * @param int $invert Invert
- * @param string $option Option
- * @return string
- */
- function select_year($selected='',$htmlname='yearid',$useempty=0, $min_year=10, $max_year=5, $offset=0, $invert=0, $option='')
- {
- print $this->selectyear($selected,$htmlname,$useempty,$min_year,$max_year,$offset,$invert,$option);
- }
-
- /**
- * Return HTML combo list of years
- *
- * @param string $selected Preselected value (''=current year, -1=none, year otherwise)
- * @param string $htmlname Name of HTML select object
- * @param int $useempty Affiche valeur vide dans liste
- * @param int $min_year Offset of minimum year into list (by default current year -10)
- * @param int $max_year Offset of maximum year into list (by default current year + 5)
- * @param int $offset Offset
- * @param int $invert Invert
- * @param string $option Option
- * @return string
- */
- function selectyear($selected='',$htmlname='yearid',$useempty=0, $min_year=10, $max_year=5, $offset=0, $invert=0, $option='')
- {
- $out='';
-
- $currentyear = date("Y")+$offset;
- $max_year = $currentyear+$max_year;
- $min_year = $currentyear-$min_year;
- if(empty($selected) && empty($useempty)) $selected = $currentyear;
-
- $out.= '\n";
-
- return $out;
- }
-
- /**
- * Show form to select address
- *
- * @param int $page Page
- * @param string $selected Id condition pre-selectionne
- * @param int $socid Id of third party
- * @param string $htmlname Nom du formulaire select
- * @param string $origin Origine de l'appel pour pouvoir creer un retour
- * @param int $originid Id de l'origine
- * @return void
- */
- function form_address($page, $selected, $socid, $htmlname='address_id', $origin='', $originid='')
- {
- global $langs,$conf;
- global $form;
-
- if ($htmlname != "none")
- {
- print '';
- }
- else
- {
- if ($selected)
- {
- require_once DOL_DOCUMENT_ROOT .'/societe/class/address.class.php';
- $address=new Address($this->db);
- $result=$address->fetch_address($selected);
- print ''.$address->label.'';
- }
- else
- {
- print " ";
- }
- }
- }
-
-
-
- /**
- * Get array with HTML tabs with boxes of a particular area including personalized choices of user.
- * Class 'Form' must be known.
- *
- * @param User $user Object User
- * @param String $areacode Code of area for pages ('0'=value for Home page)
- * @return array array('selectboxlist'=>, 'boxactivated'=>, 'boxlista'=>, 'boxlistb'=>)
- */
- static function getBoxesArea($user,$areacode)
- {
- global $conf,$langs,$db;
-
- include_once DOL_DOCUMENT_ROOT.'/core/class/infobox.class.php';
-
- $confuserzone='MAIN_BOXES_'.$areacode;
-
- // $boxactivated will be array of boxes enabled into global setup
- // $boxidactivatedforuser will be array of boxes choosed by user
-
- $selectboxlist='';
- $boxactivated=InfoBox::listBoxes($db, 'activated', $areacode, (empty($user->conf->$confuserzone)?null:$user), array(), 0); // Search boxes of common+user (or common only if user has no specific setup)
-
- $boxidactivatedforuser=array();
- foreach($boxactivated as $box)
- {
- if (empty($user->conf->$confuserzone) || $box->fk_user == $user->id) $boxidactivatedforuser[$box->id]=$box->id; // We keep only boxes to show for user
- }
-
- // Define selectboxlist
- $arrayboxtoactivatelabel=array();
- if (! empty($user->conf->$confuserzone))
- {
- $boxorder='';
- $langs->load("boxes"); // Load label of boxes
- foreach($boxactivated as $box)
- {
- if (! empty($boxidactivatedforuser[$box->id])) continue; // Already visible for user
- $label=$langs->transnoentitiesnoconv($box->boxlabel);
- if (preg_match('/graph/',$box->class)) $label.=' ('.$langs->trans("Graph").')';
- //$label = ''.$label; KO with select2. No html rendering.
- $arrayboxtoactivatelabel[$box->id]=$label; // We keep only boxes not shown for user, to show into combo list
- }
- foreach($boxidactivatedforuser as $boxid)
- {
- if (empty($boxorder)) $boxorder.='A:';
- $boxorder.=$boxid.',';
- }
-
- //var_dump($boxidactivatedforuser);
-
- // Class Form must have been already loaded
- $selectboxlist.='';
- $selectboxlist.=ajax_combobox("boxcombo");
- }
-
- // Javascript code for dynamic actions
- if (! empty($conf->use_javascript_ajax))
- {
- $selectboxlist.=''."\n";
- }
-
- // Define boxlista and boxlistb
- $nbboxactivated=count($boxidactivatedforuser);
-
- if ($nbboxactivated)
- {
- $langs->load("boxes");
- $langs->load("projects");
-
- $emptybox=new ModeleBoxes($db);
-
- $boxlista ="\n\n";
- $boxlista.='
'."\n";
-
- // Define $box_max_lines
- $box_max_lines=5;
- if (! empty($conf->global->MAIN_BOXES_MAXLINES)) $box_max_lines=$conf->global->MAIN_BOXES_MAXLINES;
-
- $ii=0;
- foreach ($boxactivated as $key => $box)
- {
- if ((! empty($user->conf->$confuserzone) && $box->fk_user == 0) || (empty($user->conf->$confuserzone) && $box->fk_user != 0)) continue;
- if (empty($box->box_order) && $ii < ($nbboxactivated / 2)) $box->box_order='A'.sprintf("%02d",($ii+1)); // When box_order was not yet set to Axx or Bxx and is still 0
- if (preg_match('/^A/i',$box->box_order)) // column A
- {
- $ii++;
- //print 'box_id '.$boxactivated[$ii]->box_id.' ';
- //print 'box_order '.$boxactivated[$ii]->box_order.' ';
- // Show box
- $box->loadBox($box_max_lines);
- $boxlista.= $box->outputBox();
- }
- }
-
- if (empty($conf->browser->phone))
- {
- $emptybox->box_id='A';
- $emptybox->info_box_head=array();
- $emptybox->info_box_contents=array();
- $boxlista.= $emptybox->outputBox(array(),array());
- }
- $boxlista.= "