26if (!defined(
'NOTOKENRENEWAL')) {
27 define(
'NOTOKENRENEWAL',
'1');
29if (!defined(
'NOREQUIREMENU')) {
30 define(
'NOREQUIREMENU',
'1');
32if (!defined(
'NOREQUIREAJAX')) {
33 define(
'NOREQUIREAJAX',
'1');
35if (!defined(
'NOREQUIRESOC')) {
36 define(
'NOREQUIRESOC',
'1');
40require
'../../main.inc.php';
41require_once DOL_DOCUMENT_ROOT.
'/fourn/class/fournisseur.product.class.php';
55$langs->loadLangs(array(
"stocks",
"margins",
"products"));
60if (!$user->hasRight(
'fournisseur',
'lire')) {
69 if (
$object->type == $object::TYPE_PRODUCT) {
72 if (
$object->type == $object::TYPE_SERVICE) {
76 restrictedArea($user,
'produit|service', 0,
'product&product',
'',
'',
'rowid');
90 $sorttouse =
's.nom, pfp.quantity, pfp.price';
91 if (
GETPOST(
'bestpricefirst')) {
92 $sorttouse =
'pfp.unitprice, s.nom, pfp.quantity, pfp.price';
95 $productSupplierArray =
$object->list_product_fournisseur_price($idprod, $sorttouse);
96 if (is_array($productSupplierArray)) {
97 foreach ($productSupplierArray as $productSupplier) {
98 if (
getDolGlobalInt(
"DISABLE_BAD_REPUTATION_PRODUCT_PRICE") && $productSupplier->supplier_reputation ==
"DONOTORDER") {
102 $price = $productSupplier->fourn_price * (1 - $productSupplier->fourn_remise_percent / 100);
103 $unitprice = $productSupplier->fourn_unitprice * (1 - $productSupplier->fourn_remise_percent / 100);
105 $title = $productSupplier->fourn_name.
' - '.$productSupplier->fourn_ref.
' - ';
107 if ($productSupplier->fourn_qty == 1) {
108 $title .=
price($price, 0, $langs, 0, 0, -1, $conf->currency).
"/";
110 $title .= $productSupplier->fourn_qty.
' '.($productSupplier->fourn_qty == 1 ? $langs->trans(
"Unit") : $langs->trans(
"Units"));
112 if ($productSupplier->fourn_qty > 1) {
114 $title .=
price($unitprice, 0, $langs, 0, 0, -1, $conf->currency).
"/".$langs->trans(
"Unit");
118 $label =
price($price, 0, $langs, 0, 0, -1, $conf->currency).
"/".$langs->trans(
"Unit");
119 if ($productSupplier->fourn_ref) {
120 $label .=
' ('.$productSupplier->fourn_ref.
')';
124 "id" => $productSupplier->product_fourn_price_id,
132 "fk_unit" => $productSupplier->fk_unit,
141 if (empty($price) &&
getDolGlobalString(
'PRODUCT_USE_SUB_COST_PRICES_IF_COST_PRICE_EMPTY')) {
143 $object->get_sousproduits_arbo();
144 $prods_arbo =
$object->get_arbo_each_prod();
145 if (!empty($prods_arbo)) {
147 foreach ($prods_arbo as $child) {
149 $sousprod->fetch($child[
'id']);
150 $price += $sousprod->pmp;
155 $prices[] = array(
"id" =>
'pmpprice',
"price" =>
price2num($price,
'MU'),
"label" => $langs->trans(
"PMPValueShort").
': '.
price($price, 0, $langs, 0, 0, -1, $conf->currency),
"title" => $langs->trans(
"PMPValueShort").
': '.
price($price, 0, $langs, 0, 0, -1, $conf->currency));
160 if (empty($price) &&
getDolGlobalString(
'PRODUCT_USE_SUB_COST_PRICES_IF_COST_PRICE_EMPTY')) {
162 $object->get_sousproduits_arbo();
163 $prods_arbo =
$object->get_arbo_each_prod();
164 if (!empty($prods_arbo)) {
166 foreach ($prods_arbo as $child) {
168 $sousprod->fetch($child[
'id']);
169 $price += $sousprod->cost_price;
174 $prices[] = array(
"id" =>
'costprice',
"price" =>
price2num($price),
"label" => $langs->trans(
"CostPrice").
': '.
price($price, 0, $langs, 0, 0, -1, $conf->currency),
"title" => $langs->trans(
"PMPValueShort").
': '.
price($price, 0, $langs, 0, 0, -1, $conf->currency));
177echo json_encode($prices);
if(! $sortfield) if(! $sortorder) $object
Class to manage predefined suppliers products.
Class to manage products or services.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
price($amount, $form=0, $outlangs='', $trunc=1, $rounding=-1, $forcerounding=-1, $currency_code='')
Function to format a value into an amount for visual output Function used into PDF and HTML pages.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
isModEnabled($module)
Is Dolibarr module enabled.
if(!defined( 'NOREQUIREMENU')) if(!empty(GETPOST('seteventmessages', 'alpha'))) if(!function_exists("llxHeader")) top_httphead($contenttype='text/html', $forcenocache=0)
Show HTTP header.
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.