dolibarr  16.0.5
mod_lot_advanced.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2003-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3  * Copyright (C) 2004-2007 Laurent Destailleur <eldy@users.sourceforge.net>
4  * Copyright (C) 2005-2009 Regis Houssin <regis.houssin@inodbox.com>
5  * Copyright (C) 2008 Raphael Bertrand (Resultic) <raphael.bertrand@resultic.fr>
6  * Copyright (C) 2019 Frédéric France <frederic.france@netlogic.fr>
7  * Copyright (C) 2021 Christophe Battarel <christophe@altairis.fr>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 3 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program. If not, see <https://www.gnu.org/licenses/>.
21  * or see https://www.gnu.org/
22  */
23 
30 require_once DOL_DOCUMENT_ROOT.'/core/modules/product_batch/modules_product_batch.class.php';
31 
32 
37 {
42  public $version = 'dolibarr'; // 'development', 'experimental', 'dolibarr'
43 
47  public $error = '';
48 
52  public $name = 'lot_advanced';
53 
54 
60  public function info()
61  {
62  global $conf, $langs, $db;
63 
64  $langs->load("bills");
65 
66  $form = new Form($db);
67 
68  // We get cursor rule
69  $mask = getDolGlobalString('LOT_ADVANCED_MASK');
70 
71  $texte = $langs->trans('GenericNumRefModelDesc')."<br>\n";
72  $texte .= '<form action="'.$_SERVER["PHP_SELF"].'" method="POST">';
73  $texte .= '<input type="hidden" name="token" value="'.newToken().'">';
74  $texte .= '<input type="hidden" name="action" value="updateMaskLot">';
75  $texte .= '<input type="hidden" name="maskconstLot" value="LOT_ADVANCED_MASK">';
76  $texte .= '<table class="nobordernopadding" width="100%">';
77 
78  $tooltip = $langs->trans("GenericMaskCodes", $langs->transnoentities("Batch"), $langs->transnoentities("Batch"));
79  $tooltip .= $langs->trans("GenericMaskCodes2");
80  $tooltip .= $langs->trans("GenericMaskCodes3");
81  $tooltip .= $langs->trans("GenericMaskCodes4a", $langs->transnoentities("Batch"), $langs->transnoentities("Batch"));
82  $tooltip .= $langs->trans("GenericMaskCodes5");
83 
84  // Parametrage du prefix
85  $texte .= '<tr><td>'.$langs->trans("Mask").':</td>';
86  $texte .= '<td class="right">'.$form->textwithpicto('<input type="text" class="flat minwidth175" name="maskLot" value="'.$mask.'">', $tooltip, 1, 1).'</td>';
87 
88  $texte .= '<td class="left" rowspan="2">&nbsp; <input type="submit" class="button button-edit" name="Button" value="'.$langs->trans("Modify").'"></td>';
89 
90  // Option to enable custom masks per product
91  $texte .= '<td class="right">';
92  if (!empty($conf->global->PRODUCTBATCH_LOT_USE_PRODUCT_MASKS)) {
93  $texte .= '<a class="reposition" href="'.$_SERVER["PHP_SELF"].'?action=setmaskslot&token='.newToken().'&value=0">'.img_picto($langs->trans("Enabled"), 'on').'</a>';
94  } else {
95  $texte .= '<a class="reposition" href="'.$_SERVER["PHP_SELF"].'?action=setmaskslot&token='.newToken().'&value=1">'.img_picto($langs->trans("Disabled"), 'off').'</a>';
96  }
97  $texte .= ' '.$langs->trans('CustomMasks')."\n";
98  $texte .= '</td>';
99 
100  $texte .= '</tr>';
101 
102  $texte .= '</table>';
103  $texte .= '</form>';
104 
105  return $texte;
106  }
107 
113  public function getExample()
114  {
115  global $conf, $langs, $mysoc;
116 
117  $old_code_client = $mysoc->code_client;
118  $old_code_type = $mysoc->typent_code;
119  $mysoc->code_client = 'CCCCCCCCCC';
120  $mysoc->typent_code = 'TTTTTTTTTT';
121  $numExample = $this->getNextValue($mysoc, '');
122  $mysoc->code_client = $old_code_client;
123  $mysoc->typent_code = $old_code_type;
124 
125  if (!$numExample) {
126  $numExample = $langs->trans('NotConfigured');
127  }
128  return $numExample;
129  }
130 
138  public function getNextValue($objsoc, $object)
139  {
140  global $db, $conf;
141 
142  require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
143 
144  // We get cursor rule
145  $mask = getDolGlobalString('LOT_ADVANCED_MASK');
146 
147  if (!$mask) {
148  $this->error = 'NotConfigured';
149  return 0;
150  }
151 
152  $date = dol_now();
153 
154  $numFinal = get_next_value($db, $mask, 'product_lot', 'batch', '', null, $date);
155 
156  return $numFinal;
157  }
158 }
$form
if($cancel &&! $id) if($action=='add' &&! $cancel) if($action=='delete') if($id) $form
Actions.
Definition: card.php:142
img_picto
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
Definition: functions.lib.php:3866
mod_lot_advanced\info
info()
Returns the description of the numbering model.
Definition: mod_lot_advanced.php:60
ModeleNumRefBatch
Parent class to manage numbering of batch products.
Definition: modules_product_batch.class.php:72
mod_lot_advanced
Class to manage Batch numbering rules advanced.
Definition: mod_lot_advanced.php:36
mod_lot_advanced\getNextValue
getNextValue($objsoc, $object)
Return next free value.
Definition: mod_lot_advanced.php:138
getDolGlobalString
if(!function_exists('utf8_encode')) if(!function_exists('utf8_decode')) getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
Definition: functions.lib.php:80
newToken
newToken()
Return the value of token currently saved into session with name 'newtoken'.
Definition: functions.lib.php:10864
get_next_value
get_next_value($db, $mask, $table, $field, $where='', $objsoc='', $date='', $mode='next', $bentityon=true, $objuser=null, $forceentity=null)
Return last or next value for a mask (according to area we should not reset)
Definition: functions2.lib.php:970
Form
Class to manage generation of HTML components Only common components must be here.
Definition: html.form.class.php:52
mod_lot_advanced\getExample
getExample()
Return an example of numbering.
Definition: mod_lot_advanced.php:113
dol_now
dol_now($mode='auto')
Return date for now.
Definition: functions.lib.php:2831