mirror of
https://github.com/Dolibarr/dolibarr.git
synced 2025-12-07 01:58:09 +01:00
555 lines
17 KiB
PHP
555 lines
17 KiB
PHP
<?php
|
|
/* Copyright (c) 2002-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2004-2009 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2004 Benoit Mortier <benoit.mortier@opensides.be>
|
|
* Copyright (C) 2004 Sebastien Di Cintio <sdicintio@ressource-toi.org>
|
|
* Copyright (C) 2004 Eric Seigne <eric.seigne@ryxeo.com>
|
|
* Copyright (C) 2005-2010 Regis Houssin <regis@dolibarr.fr>
|
|
* Copyright (C) 2006 Andre Cianfarani <acianfa@free.fr>
|
|
* Copyright (C) 2006 Marc Barilley/Ocebo <marc@ocebo.com>
|
|
* Copyright (C) 2007 Franky Van Liedekerke <franky.van.liedekerker@telenet.be>
|
|
* Copyright (C) 2007 Patrick Raguin <patrick.raguin@gmail.com>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/core/class/html.formother.class.php
|
|
* \brief Fichier de la classe des fonctions predefinie de composants html autre
|
|
* \version $Id$
|
|
*/
|
|
|
|
|
|
/**
|
|
* \class FormOther
|
|
* \brief Classe permettant la generation de composants html autre
|
|
* \remarks Only common components must be here.
|
|
*/
|
|
class FormOther
|
|
{
|
|
var $db;
|
|
var $error;
|
|
|
|
|
|
/**
|
|
* \brief Constructeur
|
|
* \param DB handler d'acces base de donnee
|
|
*/
|
|
function FormOther($DB)
|
|
{
|
|
$this->db = $DB;
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Retourne la liste des modeles d'export
|
|
* \param selected Id modele pre-selectionne
|
|
* \param htmlname Nom de la zone select
|
|
* \param type Type des modeles recherches
|
|
* \param useempty Affiche valeur vide dans liste
|
|
*/
|
|
function select_export_model($selected='',$htmlname='exportmodelid',$type='',$useempty=0)
|
|
{
|
|
$sql = "SELECT rowid, label";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."export_model";
|
|
$sql.= " WHERE type = '".$type."'";
|
|
$sql.= " ORDER BY rowid";
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
print '<select class="flat" name="'.$htmlname.'">';
|
|
if ($useempty)
|
|
{
|
|
print '<option value="-1"> </option>';
|
|
}
|
|
|
|
$num = $this->db->num_rows($result);
|
|
$i = 0;
|
|
while ($i < $num)
|
|
{
|
|
$obj = $this->db->fetch_object($result);
|
|
if ($selected == $obj->rowid)
|
|
{
|
|
print '<option value="'.$obj->rowid.'" selected="selected">';
|
|
}
|
|
else
|
|
{
|
|
print '<option value="'.$obj->rowid.'">';
|
|
}
|
|
print $obj->label;
|
|
print '</option>';
|
|
$i++;
|
|
}
|
|
print "</select>";
|
|
}
|
|
else {
|
|
dol_print_error($this->db);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Retourne la liste des modeles d'import
|
|
* \param selected Id modele pre-selectionne
|
|
* \param htmlname Nom de la zone select
|
|
* \param type Type des modeles recherches
|
|
* \param useempty Affiche valeur vide dans liste
|
|
*/
|
|
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 '<select class="flat" name="'.$htmlname.'">';
|
|
if ($useempty)
|
|
{
|
|
print '<option value="-1"> </option>';
|
|
}
|
|
|
|
$num = $this->db->num_rows($result);
|
|
$i = 0;
|
|
while ($i < $num)
|
|
{
|
|
$obj = $this->db->fetch_object($result);
|
|
if ($selected == $obj->rowid)
|
|
{
|
|
print '<option value="'.$obj->rowid.'" selected="selected">';
|
|
}
|
|
else
|
|
{
|
|
print '<option value="'.$obj->rowid.'">';
|
|
}
|
|
print $obj->label;
|
|
print '</option>';
|
|
$i++;
|
|
}
|
|
print "</select>";
|
|
}
|
|
else {
|
|
dol_print_error($this->db);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Retourne la liste des ecotaxes avec tooltip sur le libelle
|
|
* \param selected code ecotaxes pre-selectionne
|
|
* \param htmlname nom de la liste deroulante
|
|
*/
|
|
function select_ecotaxes($selected='',$htmlname='ecotaxe_id')
|
|
{
|
|
global $langs;
|
|
|
|
$sql = "SELECT e.rowid, e.code, e.libelle, e.price, e.organization,";
|
|
$sql.= " p.libelle as pays";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."c_ecotaxe as e,".MAIN_DB_PREFIX."c_pays as p";
|
|
$sql.= " WHERE e.active = 1 AND e.fk_pays = p.rowid";
|
|
$sql.= " ORDER BY pays, e.organization ASC, e.code ASC";
|
|
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
print '<select class="flat" name="'.$htmlname.'">';
|
|
$num = $this->db->num_rows($resql);
|
|
$i = 0;
|
|
print '<option value="-1"> </option>'."\n";
|
|
if ($num)
|
|
{
|
|
while ($i < $num)
|
|
{
|
|
$obj = $this->db->fetch_object($resql);
|
|
if ($selected && $selected == $obj->rowid)
|
|
{
|
|
print '<option value="'.$obj->rowid.'" selected="selected">';
|
|
}
|
|
else
|
|
{
|
|
print '<option value="'.$obj->rowid.'">';
|
|
//print '<option onmouseover="showtip(\''.$obj->libelle.'\')" onMouseout="hidetip()" value="'.$obj->rowid.'">';
|
|
}
|
|
$selectOptionValue = $obj->code.' : '.price($obj->price).' '.$langs->trans("HT").' ('.$obj->organization.')';
|
|
print $selectOptionValue;
|
|
print '</option>';
|
|
$i++;
|
|
}
|
|
}
|
|
print '</select>';
|
|
return 0;
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Retourne une liste de pourcentage
|
|
* \param selected pourcentage pre-selectionne
|
|
* \param htmlname nom de la liste deroulante
|
|
* \param increment increment value
|
|
* \param start start value
|
|
* \param end end value
|
|
* \return return combo
|
|
*/
|
|
function select_percent($selected=0,$htmlname='percent',$disabled=0,$increment=5,$start=0,$end=100)
|
|
{
|
|
$return = '<select class="flat" name="'.$htmlname.'" '.($disabled?'disabled="true"':'').'>';
|
|
|
|
for ($i = $start ; $i <= $end ; $i += $increment)
|
|
{
|
|
if ($selected == $i)
|
|
{
|
|
$return.= '<option value="'.$i.'" selected="selected">';
|
|
}
|
|
else
|
|
{
|
|
$return.= '<option value="'.$i.'">';
|
|
}
|
|
$return.= $i.' % ';
|
|
$return.= '</option>';
|
|
}
|
|
|
|
$return.= '</select>';
|
|
|
|
return $return;
|
|
}
|
|
|
|
/**
|
|
* \brief Return select list for categories (to use in form search selectors)
|
|
* \param type Type of categories (0=product, 1=suppliers, 2=customers, 3=members)
|
|
* \param selected Preselected value
|
|
* \param htmlname Name of combo list
|
|
* \return return Html combo list code
|
|
*/
|
|
function select_categories($type,$selected=0,$htmlname='search_categ')
|
|
{
|
|
global $langs;
|
|
require_once(DOL_DOCUMENT_ROOT."/categories/class/categorie.class.php");
|
|
|
|
// Load list of "categories"
|
|
$static_categs = new Categorie($this->db);
|
|
$tab_categs = $static_categs->get_full_arbo($type);
|
|
|
|
// Print a select with each of them
|
|
$moreforfilter ='<select class="flat" name="'.$htmlname.'">';
|
|
$moreforfilter.='<option value=""> </option>';
|
|
|
|
if (is_array($tab_categs))
|
|
{
|
|
foreach ($tab_categs as $categ)
|
|
{
|
|
$moreforfilter.='<option value="'.$categ['id'].'"';
|
|
if ($categ['id'] == $selected) $moreforfilter.=' selected="selected"';
|
|
$moreforfilter.='>'.dol_trunc($categ['fulllabel'],50,'middle').'</option>';
|
|
}
|
|
}
|
|
$moreforfilter.='</select>';
|
|
|
|
return $moreforfilter;
|
|
}
|
|
|
|
|
|
/**
|
|
* Return select list for categories (to use in form search selectors)
|
|
* @param selected Preselected value
|
|
* @param htmlname Name of combo list
|
|
* @param user Object user
|
|
* @return return Html combo list code
|
|
*/
|
|
function select_salesrepresentatives($selected=0,$htmlname='search_sale',$user)
|
|
{
|
|
global $conf;
|
|
|
|
// Select each sales and print them in a select input
|
|
$moreforfilter ='<select class="flat" name="'.$htmlname.'">';
|
|
$moreforfilter.='<option value=""> </option>';
|
|
|
|
// Get list of users allowed to be viewed
|
|
$sql_usr = "SELECT u.rowid, u.name as name, u.firstname, u.login";
|
|
$sql_usr.= " FROM ".MAIN_DB_PREFIX."user as u";
|
|
$sql_usr.= " WHERE u.entity IN (0,".$conf->entity.")";
|
|
if (empty($user->rights->user->user->lire)) $sql_usr.=" AND u.fk_societe = ".($user->societe_id?$user->societe_id:0);
|
|
// Add existing sales representatives of company
|
|
if (empty($user->rights->user->user->lire) && $user->societe_id)
|
|
{
|
|
$sql_usr.=" UNION ";
|
|
$sql_usr.= "SELECT u2.rowid, u2.name as name, u2.firstname, u2.login";
|
|
$sql_usr.= " FROM ".MAIN_DB_PREFIX."user as u2, ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
$sql_usr.= " WHERE u2.entity IN (0,".$conf->entity.")";
|
|
$sql_usr.= " AND u2.rowid = sc.fk_user AND sc.fk_soc=".$user->societe_id;
|
|
}
|
|
$sql_usr.= " ORDER BY name ASC";
|
|
//print $sql_usr;exit;
|
|
|
|
$resql_usr = $this->db->query($sql_usr);
|
|
if ($resql_usr)
|
|
{
|
|
while ($obj_usr = $this->db->fetch_object($resql_usr))
|
|
{
|
|
$moreforfilter.='<option value="'.$obj_usr->rowid.'"';
|
|
|
|
if ($obj_usr->rowid == $selected) $moreforfilter.=' selected="selected"';
|
|
|
|
$moreforfilter.='>';
|
|
$moreforfilter.=$obj_usr->firstname." ".$obj_usr->name." (".$obj_usr->login.')';
|
|
$moreforfilter.='</option>';
|
|
$i++;
|
|
}
|
|
$this->db->free($resql_usr);
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
}
|
|
$moreforfilter.='</select>';
|
|
|
|
return $moreforfilter;
|
|
}
|
|
|
|
/**
|
|
* \brief Return list of project and tasks
|
|
* \param selectedtask Pre-selected task
|
|
* \param projectid Project id
|
|
* \param htmlname Name of html select
|
|
* \param modeproject 1 to restrict on projects owned by user
|
|
* \param modetask 1 to restrict on tasks associated to user
|
|
* \param mode 0=Return list of tasks and their projects, 1=Return projects and tasks if exists
|
|
* \param useempty 0=Allow empty values
|
|
*/
|
|
function selectProjectTasks($selectedtask='', $projectid=0, $htmlname='task_parent', $modeproject=0, $modetask=0, $mode=0, $useempty=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 '<select class="flat" name="'.$htmlname.'">';
|
|
if ($useempty) print '<option value="0"> </option>';
|
|
$j=0;
|
|
$level=0;
|
|
PLineSelect($j, 0, $tasksarray, $level, $selectedtask, $projectid);
|
|
print '</select>';
|
|
}
|
|
else
|
|
{
|
|
print '<div class="warning">'.$langs->trans("NoProject").'</div>';
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Output a HTML code to select a color
|
|
* @param set_color Pre-selected color
|
|
* @param prefix Name of HTML field
|
|
* @param form_name Name of form
|
|
* @param showcolorbox 1=Show color code and color box, 0=Show only color code
|
|
* @param arrayofcolors Array of colors. Example: array('29527A','5229A3','A32929','7A367A','B1365F','0D7813')
|
|
*/
|
|
function select_color($set_color='', $prefix='f_color', $form_name='objForm', $showcolorbox=1, $arrayofcolors='')
|
|
{
|
|
if (! is_array($arrayofcolors) || sizeof($arrayofcolors) < 1)
|
|
{
|
|
// No list of colors forced, we can suggest any color
|
|
print "\n".'<table class="nobordernopadding"><tr><td valign="middle">';
|
|
print '<script type="text/javascript" src="'.DOL_URL_ROOT.'/lib/lib_colorpicker.js"></script>'."\n";
|
|
print '<script type="text/javascript">
|
|
window.onload = function()
|
|
{
|
|
fctLoad();
|
|
}
|
|
window.onscroll = function()
|
|
{
|
|
fctShow();
|
|
}
|
|
window.onresize = function()
|
|
{
|
|
fctShow();
|
|
}
|
|
</script>'."\n";
|
|
print '<input type="text" size="10" name="'.$prefix.'" value="'.$set_color.'" maxlength="7" class="flat">'."\n";
|
|
print '</td><td valign="middle">';
|
|
print '<img src="'.DOL_URL_ROOT.'/theme/common/colorpicker.png" width="21" height="18" border="0" onClick="fctShow(document.'.$form_name.'.'.$prefix.');" style="cursor:pointer;">'."\n";
|
|
print '</td>';
|
|
|
|
if ($showcolorbox)
|
|
{
|
|
print '<td style="padding-left: 4px" nowrap="nowrap">';
|
|
print '<!-- Box color '.$set_color.' -->';
|
|
print '<table style="border-collapse: collapse; margin:0px; padding: 0px; border: 1px solid #888888; background: #'.(preg_replace('/#/','',$set_color)).';" width="12" height="10">';
|
|
print '<tr class="nocellnopadd"><td></td></tr>';
|
|
print '</table>';
|
|
print '</td>';
|
|
}
|
|
|
|
print '</tr></table>';
|
|
}
|
|
else
|
|
{
|
|
// List of colors is forced
|
|
if ($showcolorbox) print '<table class="nobordernopadding"><tr valign="middle" class="nobordernopadding"><td class="nobordernopadding">';
|
|
|
|
print '<select class="flat" name="'.$prefix.'">';
|
|
print '<option value="-1"> </option>';
|
|
foreach ($arrayofcolors as $val)
|
|
{
|
|
print '<option value="'.$val.'"';
|
|
if ($set_color == $val) print ' selected="selected"';
|
|
print '>'.$val.'</option>';
|
|
}
|
|
print '</select>';
|
|
|
|
if ($showcolorbox)
|
|
{
|
|
print '</td><td style="padding-left: 4px" nowrap="nowrap">';
|
|
print '<!-- Box color '.$set_color.' -->';
|
|
print '<table style="border-collapse: collapse; margin:0px; padding: 0px; border: 1px solid #888888; background: #'.(preg_replace('/#/','',$set_color)).';" width="12" height="10">';
|
|
print '<tr class="nocellnopadd"><td></td></tr>';
|
|
print '</table>';
|
|
print '</td></tr></table>';
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Creation d'un icone de couleur
|
|
* @param color Couleur de l'image
|
|
* @param module Nom du module
|
|
* @param name Nom de l'image
|
|
* @param x Largeur de l'image en pixels
|
|
* @param y Hauteur de l'image en pixels
|
|
*/
|
|
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))
|
|
{
|
|
create_exdir($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);
|
|
}
|
|
|
|
}
|
|
|
|
|
|
/**
|
|
* Write all lines of a project (if parent = 0)
|
|
*
|
|
* @param $inc
|
|
* @param $parent
|
|
* @param $lines
|
|
* @param $level
|
|
* @param $selected
|
|
*/
|
|
function PLineSelect(&$inc, $parent, $lines, $level=0, $selectedtask=0, $selectedproject=0)
|
|
{
|
|
global $langs, $user, $conf;
|
|
|
|
$lastprojectid=0;
|
|
|
|
for ($i = 0 ; $i < sizeof($lines) ; $i++)
|
|
{
|
|
if ($lines[$i]->fk_parent == $parent)
|
|
{
|
|
$var = !$var;
|
|
|
|
// Break on a new project
|
|
if ($parent == 0)
|
|
{
|
|
if ($lines[$i]->fk_project != $lastprojectid)
|
|
{
|
|
if ($i > 0 && $conf->browser->firefox) print '<option value="0" disabled="true">----------</option>';
|
|
print '<option value="'.$lines[$i]->fk_project.'_0"';
|
|
if ($selectedproject == $lines[$i]->fk_project) print ' selected="selected"';
|
|
print '>'; // Project -> Task
|
|
print $langs->trans("Project").' '.$lines[$i]->projectref;
|
|
if (empty($lines[$i]->public))
|
|
{
|
|
print ' ('.$langs->trans("Visibility").': '.$langs->trans("PrivateProject").')';
|
|
}
|
|
else
|
|
{
|
|
print ' ('.$langs->trans("Visibility").': '.$langs->trans("SharedProject").')';
|
|
}
|
|
//print '-'.$parent.'-'.$lines[$i]->fk_project.'-'.$lastprojectid;
|
|
print "</option>\n";
|
|
|
|
$lastprojectid=$lines[$i]->fk_project;
|
|
$inc++;
|
|
}
|
|
}
|
|
|
|
// Print task
|
|
if ($lines[$i]->id > 0)
|
|
{
|
|
print '<option value="'.$lines[$i]->fk_project.'_'.$lines[$i]->id.'"';
|
|
if ($lines[$i]->id == $selectedtask) print ' selected="selected"';
|
|
print '>';
|
|
print $langs->trans("Project").' '.$lines[$i]->projectref;
|
|
if (empty($lines[$i]->public))
|
|
{
|
|
print ' ('.$langs->trans("Visibility").': '.$langs->trans("PrivateProject").')';
|
|
}
|
|
else
|
|
{
|
|
print ' ('.$langs->trans("Visibility").': '.$langs->trans("SharedProject").')';
|
|
}
|
|
if ($lines[$i]->id) print ' > ';
|
|
for ($k = 0 ; $k < $level ; $k++)
|
|
{
|
|
print " ";
|
|
}
|
|
print $lines[$i]->label."</option>\n";
|
|
$inc++;
|
|
}
|
|
|
|
$level++;
|
|
if ($lines[$i]->id) PLineSelect($inc, $lines[$i]->id, $lines, $level, $selectedtask, $selectedproject);
|
|
$level--;
|
|
}
|
|
}
|
|
}
|
|
|
|
?>
|