dolibarr 19.0.4
getSupplierPrices.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2012 Christophe Battarel <christophe.battarel@altairis.fr>
3 * Copyright (C) 2015 Francis Appels <francis.appels@z-application.com>
4 * Copyright (C) 2016 Laurent Destailleur <eldy@users.sourceforge.net>
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 3 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program. If not, see <https://www.gnu.org/licenses/>.
18 */
19
25if (!defined('NOTOKENRENEWAL')) {
26 define('NOTOKENRENEWAL', '1'); // Disables token renewal
27}
28if (!defined('NOREQUIREMENU')) {
29 define('NOREQUIREMENU', '1');
30}
31if (!defined('NOREQUIREAJAX')) {
32 define('NOREQUIREAJAX', '1');
33}
34if (!defined('NOREQUIRESOC')) {
35 define('NOREQUIRESOC', '1');
36}
37
38// Load Dolibarr environment
39require '../../main.inc.php';
40require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.product.class.php';
41
42$idprod = GETPOST('idprod', 'int');
43
44$prices = array();
45
46// Load translation files required by the page
47$langs->loadLangs(array("stocks", "margins", "products"));
48
49
50/*
51 * View
52 */
53
55
56//print '<!-- Ajax page called with url '.dol_escape_htmltag($_SERVER["PHP_SELF"]).'?'.dol_escape_htmltag($_SERVER["QUERY_STRING"]).' -->'."\n";
57
58if ($idprod > 0) {
59 $producttmp = new ProductFournisseur($db);
60 $producttmp->fetch($idprod);
61
62 $sorttouse = 's.nom, pfp.quantity, pfp.price';
63 if (GETPOST('bestpricefirst')) {
64 $sorttouse = 'pfp.unitprice, s.nom, pfp.quantity, pfp.price';
65 }
66
67 $productSupplierArray = $producttmp->list_product_fournisseur_price($idprod, $sorttouse); // We list all price per supplier, and then firstly with the lower quantity. So we can choose first one with enough quantity into list.
68 if (is_array($productSupplierArray)) {
69 foreach ($productSupplierArray as $productSupplier) {
70 if (getDolGlobalInt("DISABLE_BAD_REPUTATION_PRODUCT_PRICE") && $productSupplier->supplier_reputation == "DONOTORDER") {
71 continue;
72 }
73
74 $price = $productSupplier->fourn_price * (1 - $productSupplier->fourn_remise_percent / 100);
75 $unitprice = $productSupplier->fourn_unitprice * (1 - $productSupplier->fourn_remise_percent / 100);
76
77 $title = $productSupplier->fourn_name.' - '.$productSupplier->fourn_ref.' - ';
78
79 if ($productSupplier->fourn_qty == 1) {
80 $title .= price($price, 0, $langs, 0, 0, -1, $conf->currency)."/";
81 }
82 $title .= $productSupplier->fourn_qty.' '.($productSupplier->fourn_qty == 1 ? $langs->trans("Unit") : $langs->trans("Units"));
83
84 if ($productSupplier->fourn_qty > 1) {
85 $title .= " - ";
86 $title .= price($unitprice, 0, $langs, 0, 0, -1, $conf->currency)."/".$langs->trans("Unit");
87 $price = $unitprice;
88 }
89
90 $label = price($price, 0, $langs, 0, 0, -1, $conf->currency)."/".$langs->trans("Unit");
91 if ($productSupplier->fourn_ref) {
92 $label .= ' ('.$productSupplier->fourn_ref.')';
93 }
94
95 $prices[] = array("id" => $productSupplier->product_fourn_price_id, "price" => price2num($price, '', 0), "label" => $label, "title" => $title); // For price field, we must use price2num(), for label or title, price()
96 }
97 }
98
99 // After best supplier prices and before costprice
100 if (isModEnabled('stock')) {
101 // Add price for pmp
102 $price = $producttmp->pmp;
103 if (empty($price) && getDolGlobalString('PRODUCT_USE_SUB_COST_PRICES_IF_COST_PRICE_EMPTY')) {
104 // get pmp for subproducts if any
105 $producttmp->get_sousproduits_arbo();
106 $prods_arbo=$producttmp->get_arbo_each_prod();
107 if (!empty($prods_arbo)) {
108 $price = 0;
109 foreach ($prods_arbo as $child) {
110 $sousprod = new Product($db);
111 $sousprod->fetch($child['id']);
112 $price += $sousprod->pmp;
113 }
114 }
115 }
116
117 $prices[] = array("id" => 'pmpprice', "price" => price2num($price), "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)); // For price field, we must use price2num(), for label or title, price()
118 }
119
120 // Add price for costprice (at end)
121 $price = $producttmp->cost_price;
122 if (empty($price) && getDolGlobalString('PRODUCT_USE_SUB_COST_PRICES_IF_COST_PRICE_EMPTY')) {
123 // get costprice for subproducts if any
124 $producttmp->get_sousproduits_arbo();
125 $prods_arbo=$producttmp->get_arbo_each_prod();
126 if (!empty($prods_arbo)) {
127 $price = 0;
128 foreach ($prods_arbo as $child) {
129 $sousprod = new Product($db);
130 $sousprod->fetch($child['id']);
131 $price += $sousprod->cost_price;
132 }
133 }
134 }
135
136 $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)); // For price field, we must use price2num(), for label or title, price()
137}
138
139echo json_encode($prices);
Class to manage predefined suppliers products.
Class to manage products or services.
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 dolibarr global constant string value.
if(!defined( 'NOREQUIREMENU')) if(!empty(GETPOST('seteventmessages', 'alpha'))) if(!function_exists("llxHeader")) top_httphead($contenttype='text/html', $forcenocache=0)
Show HTTP header.