* Copyright (C) 2004-2008 Laurent Destailleur * Copyright (C) 2005 Eric Seigne * Copyright (C) 2005-2007 Regis Houssin * Copyright (C) 2006 Andre Cianfarani * * 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/product/price.php * \ingroup product * \brief Page de la fiche produit * \version $Id$ */ require("./pre.inc.php"); require_once(DOL_DOCUMENT_ROOT."/lib/product.lib.php"); require_once(DOL_DOCUMENT_ROOT."/product.class.php"); $langs->load("products"); $langs->load("bills"); if (!$user->rights->produit->lire) accessforbidden(); /* * Actions */ if ($_POST["action"] == 'update_price' && ! $_POST["cancel"] && $user->rights->produit->creer) { $product = new Product($db); $result = $product->fetch($_GET["id"]); // MultiPrix if($conf->global->PRODUIT_MULTIPRICES) { $newprice=''; $newpricebase=''; $newvat=''; for($i=1;$i<=$conf->global->PRODUIT_MULTIPRICES_LIMIT;$i++) { if($_POST["price_".$i]) { // le prix 1 est considere comme le prix de base du produit if ($i == 1) { $newprice=price2num($_POST["price_".$i],'MU'); $newpricebase=$_POST["multiprices_base_type_".$i]; $newvat=$_POST["tva_tx_".$i]; } else { $product->multiprices["$i"] = price2num($_POST["price_".$i],'MU'); $product->multiprices_base_type["$i"] = $_POST["multiprices_base_type_".$i]; $product->multiprices_vat_rate["$i"] = $_POST["tva_tx_".$i]; } } else { $product->multiprices["$i"] = ""; $product->multiprices_ttc["$i"] = ""; $product->multiprices_base_type["$i"] = ""; $product->multiprices_vat_rate["$i"] = ""; } } } else { $newprice=price2num($_POST["price"],'MU'); $newpricebase=$_POST["price_base_type"]; $newvat=$_POST["tva_tx"]; } $newprice_min = '' ; $newprice_min = price2num($_POST["price_min"],'MU'); if ($product->update_price($product->id, $newprice, $newpricebase, $user, $newvat,$newprice_min) > 0) { $_GET["action"] = ''; $mesg = '

'.$langs->trans("RecordSaved").'

'; } else { $_GET["action"] = 'edit_price'; $mesg = '

'.$product->error.'

'; } } if ($_GET["action"] == 'delete' && $user->rights->produit->supprimer) { $productstatic = new Product($db); $result=$productstatic->log_price_delete($user,$_GET["lineid"]); if ($result < 0) $mesg='

'.$productstatic->error.'

'; } /* * View */ $html = new Form($db); $product = new Product($db); if ($_GET["ref"]) $result = $product->fetch('',$_GET["ref"]); if ($_GET["id"]) $result = $product->fetch($_GET["id"]); llxHeader("","",$langs->trans("CardProduct".$product->type)); $head=product_prepare_head($product, $user); $titre=$langs->trans("CardProduct".$product->type); dolibarr_fiche_head($head, 'price', $titre); print ''; // Reference print ''; print ''; print ''; // Libelle print ''; print ''; // MultiPrix if($conf->global->PRODUIT_MULTIPRICES) { for($i=1;$i<=$conf->global->PRODUIT_MULTIPRICES_LIMIT;$i++) { print ''; if ($product->multiprices_base_type["$i"] == 'TTC') { print ''; } } // Prix else { print ''; } else { print price($product->price).' '.$langs->trans($product->price_base_type).''; } } // Prix minimum print ''; // TVA print ''; // Statut print ''; print "

'.$langs->trans("Ref").'	'; print $html->showrefnav($product,'ref','',1,'ref'); print '
'.$langs->trans("Label").'	'.$product->libelle.'
'.$langs->trans("SellingPrice").' '.$i.'	'.price($product->multiprices_ttc["$i"]); } else { print '	'.price($product->multiprices["$i"]); } if ($product->multiprices_base_type["$i"]) { print ' '.$langs->trans($product->multiprices_base_type["$i"]); } else { print ' '.$langs->trans($product->price_base_type); } print '
'.$langs->trans("SellingPrice").'	'; if ($product->price_base_type == 'TTC') { print price($product->price_ttc).' '.$langs->trans($product->price_base_type).'
'.$langs->trans("MinPrice").'	'; if ($product->price_base_type == 'TTC') { print price($product->price_min_ttc).' '.$langs->trans($product->price_base_type); } else { print price($product->price_min).' '.$langs->trans($product->price_base_type); } print '
'.$langs->trans("VATRate").'	'.vatrate($product->tva_tx,true).'
'.$langs->trans("Status").'	'; print $product->getLibStatut(2); print '

\n"; print "\n"; if ($mesg) print $mesg; /* ************************************************************************** */ /* */ /* Barre d'action */ /* */ /* ************************************************************************** */ if (empty($_GET["action"]) || $_GET["action"]=='delete') { print "\n

\n"; if ($user->rights->produit->modifier || $user->rights->produit->creer) { print ''.$langs->trans("UpdatePrice").''; } print "\n

\n"; } /* * Edition du prix */ if ($_GET["action"] == 'edit_price' && $user->rights->produit->creer) { print_fiche_titre($langs->trans("NewPrice")); if (! $conf->global->PRODUIT_MULTIPRICES) { print '

'; print ''; print ''; print ''; // Price base print ''; print ''; print ''; // Price print ''; if ($product->price_base_type == 'TTC') { print ''; // VAT print ''; print ''; print '

'; print $langs->trans('PriceBase'); print '	'; print $html->select_PriceBaseType($product->price_base_type, "price_base_type"); print '
'; $text=$langs->trans('SellingPrice'); print $html->textwithhelp($text,$langs->trans("PrecisionUnitIsLimitedToXDecimals",$conf->global->MAIN_MAX_DECIMALS_UNIT),$direction=1,$usehelpcursor=1); print '	'; } else { print '	'; } print '
' ; $text=$langs->trans('MinPrice') ; print $html->textwithhelp($text,$langs->trans("PrecisionUnitIsLimitedToXDecimals",$conf->global->MAIN_MAX_DECIMALS_UNIT),$direction=1,$usehelpcursor=1); if ($product->price_base_type == 'TTC') { print '	'; } else { print '	'; } print '
'.$langs->trans("VATRate").'	'; print $html->select_tva("tva_tx",$product->tva_tx,$mysoc,''); print '
'; print '

'; print '

'; } else { for($i=1;$i<=$conf->global->PRODUIT_MULTIPRICES_LIMIT;$i++) { print '

'; print ''; print ''; print ''; print ''; if ($product->multiprices_base_type["$i"] == 'TTC') { print ''; print ''; // VAT print ''; print ''; print '

'; $text=$langs->trans('SellingPrice').' '.$i; print $html->textwithhelp($text,$langs->trans("PrecisionUnitIsLimitedToXDecimals",$conf->global->MAIN_MAX_DECIMALS_UNIT),$direction=1,$usehelpcursor=1); print '	'; } else { print '	'; } print $html->select_PriceBaseType($product->multiprices_base_type["$i"], "multiprices_base_type_".$i); print '
' ; $text=$langs->trans('MinPrice') ; print $html->textwithhelp($text,$langs->trans("PrecisionUnitIsLimitedToXDecimals",$conf->global->MAIN_MAX_DECIMALS_UNIT),$direction=1,$usehelpcursor=1); if ($product->price_base_type == 'TTC') { print '	'; } else { print '	'; } print '	'.$langs->trans("VATRate").'	'; print $html->select_tva("tva_tx_".$i,$product->multiprices_tva_tx["$i"],$mysoc,''); print '
'; print '

'; print '

'; } } } // Liste des evolutions du prix if($conf->global->PRODUIT_MULTIPRICES) { $sql = "SELECT p.rowid, p.price, p.price_ttc, p.price_base_type, p.tva_tx,"; $sql.= " p.price_level,"; $sql.= " ".$db->pdate("p.date_price")." as dp, u.rowid as user_id, u.login"; $sql.= " FROM ".MAIN_DB_PREFIX."product_price as p, ".MAIN_DB_PREFIX."user as u"; $sql.= " WHERE fk_product = ".$product->id; $sql.= " AND p.fk_user_author = u.rowid "; $sql.= " ORDER BY p.price_level ASC, p.date_price DESC"; } else { $sql = "SELECT p.rowid, p.price, p.price_ttc, p.price_base_type, p.tva_tx,"; $sql.= " p.price_min, p.price_min_ttc,"; $sql.= " ".$db->pdate("p.date_price")." as dp, u.rowid as user_id, u.login"; $sql.= " FROM ".MAIN_DB_PREFIX."user as u, ".MAIN_DB_PREFIX."product_price as p "; $sql.= " WHERE p.fk_product = ".$product->id; $sql.= " AND p.fk_user_author = u.rowid"; $sql.= " ORDER BY p.date_price DESC"; } //$sql .= $db->plimit(); $result = $db->query($sql) ; if ($result) { $num = $db->num_rows($result); if (! $num) { $db->free($result) ; // Il doit au moins y avoir la ligne de prix initial. // On l'ajoute donc pour remettre a niveau (pb vieilles versions) $product->update_price($product->id, $product->price, 'HT', $user, $newprice_min); $result = $db->query($sql) ; $num = $db->num_rows($result); } if ($num > 0) { print '
'; print ''; print ''; print ''; if($conf->global->PRODUIT_MULTIPRICES) { print ''; } print ''; print ''; print ''; print ''; print ''; print ''; print ''; if ($user->rights->produit->supprimer) print ''; print ''; $var=True; $i = 0; while ($i < $num) { $objp = $db->fetch_object($result); $var=!$var; print ""; // Date print ""; // Price level if ($conf->global->PRODUIT_MULTIPRICES) { print ""; } print '"; print '"; print '"; print '"; print ''; print ''; // User print ''; // Action if ($user->rights->produit->supprimer) { print ''; } print "\n"; $i++; } $db->free($result); print "

'.$langs->trans("AppliedPricesFrom").'	'.$langs->trans("MultiPriceLevelsName").'	'.$langs->trans("PriceBase").'	'.$langs->trans("VAT").'	'.$langs->trans("HT").'	'.$langs->trans("TTC").'	'.$langs->trans("MinPrice").' '.$langs->trans("HT").'	'.$langs->trans("MinPrice").' '.$langs->trans("TTC").'	'.$langs->trans("ChangedBy").'
".dolibarr_print_date($objp->dp,"dayhour")."	".$objp->price_level."	'.$langs->trans($objp->price_base_type)."	'.vatrate($objp->tva_tx,true)."	'.price($objp->price)."	'.price($objp->price_ttc)."	'.price($objp->price_min).'	'.price($objp->price_min_ttc).'	'.img_object($langs->trans("ShowUser"),'user').' '.$objp->login.'	'; if ($i > 0) { print 'id.'&lineid='.$objp->rowid.'">'; print img_delete(); print ''; } else print ' '; // Can not delete last price (it's current price) print '

"; print "
"; } } else { dolibarr_print_error($db); } $db->close(); llxFooter('$Date$ - $Revision$'); ?>