23require
'../../main.inc.php';
24require_once DOL_DOCUMENT_ROOT.
'/core/lib/admin.lib.php';
25require_once DOL_DOCUMENT_ROOT.
'/core/lib/product.lib.php';
28$langs->loadLangs(array(
'admin',
'products'));
30$action =
GETPOST(
'action',
'aZ09');
33if (!$user->admin || (!isModEnabled(
"product") && !isModEnabled(
"service"))) {
44if ($action ==
'update') {
45 $var_percent =
GETPOST(
'var_percent',
'array');
46 $var_min_percent =
GETPOST(
'var_min_percent',
'array');
47 $fk_level =
GETPOST(
'fk_level',
'array');
49 for ($i = 1; $i <= $conf->global->PRODUIT_MULTIPRICES_LIMIT; $i++) {
50 $check = isset($var_min_percent[$i]);
53 $check = $check && isset($var_percent[$i]) && isset($fk_level[$i]);
64 $i_var_percent = (float)
price2num($var_percent[$i]);
67 $i_var_min_percent = (float)
price2num($var_min_percent[$i]);
68 $i_fk_level = (int) $fk_level[$i];
72 $check2 = $i_var_min_percent;
74 $check1 = $i_fk_level >= 1 && $i_fk_level <= $conf->global->PRODUIT_MULTIPRICES_LIMIT;
75 $check2 = $i_var_percent && ($i_var_min_percent || (string) $i_var_min_percent ===
'0');
78 if (empty($i_var_percent) && empty($i_var_min_percent)) {
80 $db->query(
"DELETE FROM ".MAIN_DB_PREFIX.
"product_pricerules WHERE level = ".((
int) $i));
84 $sql =
"INSERT INTO ".MAIN_DB_PREFIX.
"product_pricerules (level, fk_level, var_percent, var_min_percent) VALUES (";
85 $sql .= ((int) $i).
", ".$db->escape($i_fk_level).
", ".$i_var_percent.
", ".$i_var_min_percent.
")";
87 if (!$db->query($sql)) {
89 $sql =
"UPDATE ".MAIN_DB_PREFIX.
"product_pricerules";
90 $sql .=
" SET fk_level = ".$db->escape($i_fk_level).
", var_percent = ".$i_var_percent.
", var_min_percent = ".$i_var_min_percent.
" WHERE level = ".((int) $i);
92 if (!$db->query($sql)) {
109$sql =
"SELECT rowid, level, fk_level, var_percent, var_min_percent";
110$sql .=
" FROM ".MAIN_DB_PREFIX.
"product_pricerules";
111$query = $db->query($sql);
115while ($result = $db->fetch_object($query)) {
116 $rules[$result->level] = $result;
119$title = $langs->trans(
'ProductServiceSetup');
120$tab = $langs->trans(
"ProductsAndServices");
122if (!isModEnabled(
"product")) {
123 $title = $langs->trans(
'ServiceSetup');
124 $tab = $langs->trans(
'Services');
125} elseif (!isModEnabled(
"service")) {
126 $title = $langs->trans(
'ProductSetup');
127 $tab = $langs->trans(
'Products');
130llxHeader(
'', $langs->trans(
'MultipriceRules'),
'',
'', 0, 0,
'',
'',
'',
'mod-product page-admin_price_rules');
132$linkback =
'<a href="'.DOL_URL_ROOT.
'/admin/modules.php?restore_lastsearch_values=1">'.$langs->trans(
"BackToModuleList").
'</a>';
136print
'<form method="POST" action="'.$_SERVER[
"PHP_SELF"].
'">';
137print
'<input type="hidden" name="token" value="'.newToken().
'">';
138print
'<input type="hidden" name="action" value="update">';
143print
'<span class="opacitymedium">'.$langs->trans(
"MultiPriceRuleDesc").
'</span><br><br>';
146$price_options = array();
148for ($i = 1; $i <= $conf->global->PRODUIT_MULTIPRICES_LIMIT; $i++) {
149 $price_options[$i] = $langs->trans(
'SellingPrice').
' '.$i;
153 <
table class=
"noborder centpercent">
154 <tr
class=
"liste_titre">
155 <td style=
"text-align: center"><?php echo $langs->trans(
'PriceLevel') ?></td>
156 <td style=
"text-align: center"><?php echo $langs->trans(
'Price') ?></td>
157 <td style=
"text-align: center"><?php echo $langs->trans(
'MinPrice') ?></td></tr>
159 <td
class=
"fieldrequired" style=
"text-align: center"><?php echo $langs->trans(
'SellingPrice') ?> 1</td>
161 <td style=
"text-align: center"><input
type=
"text" style=
"text-align: right" name=
"var_min_percent[1]" size=
"5" value=
"<?php echo price(isset($rules[1]) ? $rules[1]->var_min_percent : 0, 2) ?>"> <?php echo $langs->trans(
'PercentDiscountOver', $langs->trans(
'SellingPrice').
' 1') ?></td>
163 <?php
for ($i = 2; $i <= $conf->global->PRODUIT_MULTIPRICES_LIMIT; $i++) : ?>
165 <td class=
"fieldrequired" style=
"text-align: center"><?php
166 echo $langs->trans(
'SellingPrice').
' '.$i;
168 $keyforlabel =
'PRODUIT_MULTIPRICES_LABEL'.$i;
169 if (!empty($conf->global->$keyforlabel)) {
174 <td style=
"text-align: center">
175 <input
type=
"text" style=
"text-align: right" name=
"var_percent[<?php echo $i ?>]" size=
"5" value=
"<?php echo price(isset($rules[$i]) ? $rules[$i]->var_percent : 0, 2) ?>">
178 for ($j = 1; $j < $i; $j++) {
179 $return[$j] = $price_options[$j];
181 $texttoshow = $langs->trans(
'PercentVariationOver',
'{s1}');
182 $texttoshow = str_replace(
'{s1}',
Form::selectarray(
"fk_level[$i]", $return, (isset($rules[$i]) ? $rules[$i]->fk_level : null)), $texttoshow);
186 <td style=
"text-align: center">
187 <input
type=
"text" style=
"text-align: right" name=
"var_min_percent[<?php echo $i ?>]" size=
"5" value=
"<?php echo price(isset($rules[$i]) ? $rules[$i]->var_min_percent : 0, 2) ?>">
188 <?php echo $langs->trans(
'PercentDiscountOver', $langs->transnoentitiesnoconv(
'SellingPrice').
' '.$i) ?>
198print
'<div style="text-align: center">
199 <input type="submit" value="'.$langs->trans(
"Save").
'" class="button button-save">
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0)
Show tabs of a record.
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
treeview li table
No Email.
product_admin_prepare_head()
Return array head with list of tabs to view object information.
if(preg_match('/crypted:/i', $dolibarr_main_db_pass)||!empty($dolibarr_main_db_encrypted_pass)) $conf db type
$conf db name
Only used if Module[ID]Name translation string is not found.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.