dolibarr 18.0.6
reception.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2003-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3 * Copyright (C) 2004-2016 Laurent Destailleur <eldy@users.sourceforge.net>
4 * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
5 * Copyright (C) 2014 Juanjo Menent <jmenent@2byte.es>
6 * Copyright (C) 2014 Florian Henry <florian.henry@open-concept.pro>
7 * Copyright (C) 2023 Gauthier VERDOL <gauthier.verdol@atm-consulting.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 */
22
29// Load Dolibarr environment
30require '../../../main.inc.php';
31require_once DOL_DOCUMENT_ROOT.'/core/lib/product.lib.php';
32require_once DOL_DOCUMENT_ROOT.'/reception/class/reception.class.php';
33require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
34require_once DOL_DOCUMENT_ROOT.'/product/stock/class/productlot.class.php';
35require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
36
37// Load translation files required by the page
38$langs->loadLangs(array('companies', 'bills', 'products', 'supplier_proposal', 'productbatch'));
39
40$id = GETPOST('id', 'int');
41$ref = GETPOST('ref', 'alpha');
42$batch = GETPOST('batch', 'alpha');
43$objectid = GETPOST('productid', 'int');
44
45// Security check
46$fieldvalue = (!empty($id) ? $id : (!empty($ref) ? $ref : ''));
47$fieldtype = (!empty($ref) ? 'ref' : 'rowid');
48$socid = '';
49if (!empty($user->socid)) {
50 $socid = $user->socid;
51}
52
53// Initialize technical object to manage hooks of page. Note that conf->hooks_modules contains array of hook context
54$hookmanager->initHooks(array('batchproductstatsreception'));
55
56$showmessage = GETPOST('showmessage');
57
58// Load variable for pagination
59$limit = GETPOST('limit', 'int') ?GETPOST('limit', 'int') : $conf->liste_limit;
60$sortfield = GETPOST('sortfield', 'aZ09comma');
61$sortorder = GETPOST('sortorder', 'aZ09comma');
62$page = GETPOSTISSET('pageplusone') ? (GETPOST('pageplusone') - 1) : GETPOST("page", 'int');
63if (empty($page) || $page == -1) {
64 $page = 0;
65} // If $page is not defined, or '' or -1
66$offset = $limit * $page;
67$pageprev = $page - 1;
68$pagenext = $page + 1;
69if (!$sortorder) {
70 $sortorder = "DESC";
71}
72if (!$sortfield) {
73 $sortfield = "recep.date_creation";
74}
75
76$search_month = GETPOST('search_month', 'int');
77$search_year = GETPOST('search_year', 'int');
78
79if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter', 'alpha')) {
80 $search_month = '';
81 $search_year = '';
82}
83
84if (!$user->hasRight('produit', 'lire')) accessforbidden();
85
86
87/*
88 * View
89 */
90
91$receptionstatic = new Reception($db);
92$societestatic = new Societe($db);
93
94$form = new Form($db);
95$formother = new FormOther($db);
96
97if ($id > 0 || !empty($ref)) {
98 $object = new Productlot($db);
99 if ($ref) {
100 $tmp = explode('_', $ref);
101 $objectid = $tmp[0];
102 $batch = $tmp[1];
103 }
104 $result = $object->fetch($id, $objectid, $batch);
105
106 $parameters = array('id'=>$id);
107 $reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
108 if ($reshook < 0) {
109 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
110 }
111
112 $title = $langs->trans('ProductServiceCard');
113 $helpurl = '';
114 $shortlabel = dol_trunc($object->batch, 16);
115 $title = $langs->trans('Batch')." ".$shortlabel." - ".$langs->trans('Referers');
116
117 llxHeader('', $title, $helpurl);
118
119 if ($result > 0) {
120 $head = productlot_prepare_head($object);
121 $titre = $langs->trans("CardProduct".$object->type);
122 $picto = 'lot';
123 print dol_get_fiche_head($head, 'referers', $langs->trans("Batch"), -1, $object->picto);
124
125 $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
126 print $hookmanager->resPrint;
127 if ($reshook < 0) {
128 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
129 }
130
131 $linkback = '<a href="'.DOL_URL_ROOT.'/product/stock/productlot_list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
132
133 $shownav = 1;
134 if ($user->socid && !in_array('product', explode(',', $conf->global->MAIN_MODULES_FOR_EXTERNAL))) {
135 $shownav = 0;
136 }
137
138 dol_banner_tab($object, 'id', $linkback, $shownav, 'rowid', 'batch', $morehtmlref);
139
140 print '<div class="fichecenter">';
141
142 print '<div class="underbanner clearboth"></div>';
143 print '<table class="border centpercent tableforfield" width="100%">';
144
145
146 // Product
147 print '<tr><td class="titlefield">'.$langs->trans("Product").'</td><td>';
148 $producttmp = new Product($db);
149 $producttmp->fetch($object->fk_product);
150 print $producttmp->getNomUrl(1, 'stock')." - ".$producttmp->label;
151 print '</td></tr>';
152 print "</table>";
153
154 echo '<br>';
155
156 // // Sell by
157 // if (empty($conf->global->PRODUCT_DISABLE_SELLBY)) {
158 // print '<tr><td>';
159 // print $form->editfieldkey($langs->trans('SellByDate'), 'sellby', $object->sellby, $object, $user->rights->stock->creer, 'datepicker');
160 // print '</td><td>';
161 // print $form->editfieldval($langs->trans('SellByDate'), 'sellby', $object->sellby, $object, $user->rights->stock->creer, 'datepicker');
162 // print '</td>';
163 // print '</tr>';
164 // }
165 //
166 // // Eat by
167 // if (empty($conf->global->PRODUCT_DISABLE_EATBY)) {
168 // print '<tr><td>';
169 // print $form->editfieldkey($langs->trans('EatByDate'), 'eatby', $object->eatby, $object, $user->rights->stock->creer, 'datepicker');
170 // print '</td><td>';
171 // print $form->editfieldval($langs->trans('EatByDate'), 'eatby', $object->eatby, $object, $user->rights->stock->creer, 'datepicker');
172 // print '</td>';
173 // print '</tr>';
174 // }
175 //
176 // if (!empty($conf->global->PRODUCT_LOT_ENABLE_TRACEABOLITY)) {
177 // print '<tr><td>'.$form->editfieldkey($langs->trans('ManufacturingDate'), 'manufacturing_date', $object->manufacturing_date, $object, $user->rights->stock->creer).'</td>';
178 // print '<td>'.$form->editfieldval($langs->trans('ManufacturingDate'), 'manufacturing_date', $object->manufacturing_date, $object, $user->rights->stock->creer, 'datepicker').'</td>';
179 // print '</tr>';
180 // // print '<tr><td>'.$form->editfieldkey($langs->trans('FirstUseDate'), 'commissionning_date', $object->commissionning_date, $object, $user->rights->stock->creer).'</td>';
181 // // print '<td>'.$form->editfieldval($langs->trans('FirstUseDate'), 'commissionning_date', $object->commissionning_date, $object, $user->rights->stock->creer, 'datepicker').'</td>';
182 // // print '</tr>';
183 // print '<tr><td>'.$form->editfieldkey($langs->trans('DestructionDate'), 'scrapping_date', $object->scrapping_date, $object, $user->rights->stock->creer).'</td>';
184 // print '<td>'.$form->editfieldval($langs->trans('DestructionDate'), 'scrapping_date', $object->scrapping_date, $object, $user->rights->stock->creer, 'datepicker').'</td>';
185 // print '</tr>';
186 // }
187 //
188 // // Quality control
189 // if (!empty($conf->global->PRODUCT_LOT_ENABLE_QUALITY_CONTROL)) {
190 // print '<tr><td>'.$form->editfieldkey($langs->trans('EndOfLife'), 'eol_date', $object->eol_date, $object, $user->rights->stock->creer).'</td>';
191 // print '<td>'.$form->editfieldval($langs->trans('EndOfLife'), 'eol_date', $object->eol_date, $object, $user->rights->stock->creer, 'datepicker').'</td>';
192 // print '</tr>';
193 // print '<tr><td>'.$form->editfieldkey($langs->trans('QCFrequency'), 'qc_frequency', $object->qc_frequency, $object, $user->rights->stock->creer).'</td>';
194 // print '<td>'.$form->editfieldval($langs->trans('QCFrequency'), 'qc_frequency', $object->qc_frequency, $object, $user->rights->stock->creer, 'numeric').'</td>';
195 // print '</tr>';
196 // }
197 //
198 // // Other attributes
199 // include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_view.tpl.php';
200
201 print '<table class="border centpercent tableforfield" width="100%">';
202
203 $nboflines = show_stats_for_batch($object, $socid);
204
205 print "</table>";
206
207 print '</div>';
208 print '<div class="clearboth"></div>';
209
210 print dol_get_fiche_end();
211
212 if ($showmessage && $nboflines > 1) {
213 print '<span class="opacitymedium">'.$langs->trans("ClinkOnALinkOfColumn", $langs->transnoentitiesnoconv("Referers")).'</span>';
214 } elseif ($user->rights->reception->lire) {
215 $sql = "SELECT DISTINCT s.nom as name, s.rowid as socid, s.code_fournisseur,";
216 $sql .= " recep.ref, recep.date_creation, recep.fk_statut as statut, recep.rowid as facid,";
217 $sql .= " d.qty";
218 // $sql.= ", d.total_ht as total_ht"; // We must keep the d.rowid here to not loose record because of the distinct used to ignore duplicate line when link on societe_commerciaux is used
219 if (empty($user->rights->societe->client->voir) && !$socid) {
220 $sql .= ", sc.fk_soc, sc.fk_user ";
221 }
222 $sql .= " FROM ".MAIN_DB_PREFIX."societe as s";
223 $sql .= " INNER JOIN ".MAIN_DB_PREFIX."reception as recep ON (recep.fk_soc = s.rowid)";
224 $sql .= " INNER JOIN ".MAIN_DB_PREFIX."commande_fournisseur_dispatch as d ON (d.fk_reception = recep.rowid)";
225 if (empty($user->rights->societe->client->voir) && !$socid) {
226 $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
227 }
228 $sql .= " WHERE recep.entity IN (".getEntity('product').")";
229 $sql .= " AND d.batch = '".($db->escape($object->batch))."'";
230 if (!empty($search_month)) {
231 $sql .= ' AND MONTH(recep.date_creation) IN ('.$db->sanitize($search_month).')';
232 }
233 if (!empty($search_year)) {
234 $sql .= ' AND YEAR(recep.date_creation) IN ('.$db->sanitize($search_year).')';
235 }
236 if (empty($user->rights->societe->client->voir) && !$socid) {
237 $sql .= " AND s.rowid = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
238 }
239 if ($socid) {
240 $sql .= " AND recep.fk_soc = ".((int) $socid);
241 }
242 $sql .= $db->order($sortfield, $sortorder);
243
244 // Calcul total qty and amount for global if full scan list
245 $total_ht = 0;
246 $total_qty = 0;
247
248 // Count total nb of records
249 $totalofrecords = '';
250 if (!getDolGlobalInt('MAIN_DISABLE_FULL_SCANLIST')) {
251 $result = $db->query($sql);
252 $totalofrecords = $db->num_rows($result);
253 }
254
255 $sql .= $db->plimit($limit + 1, $offset);
256
257 $result = $db->query($sql);
258 if ($result) {
259 $num = $db->num_rows($result);
260
261 $option .= '&id='.$object->id;
262
263 if ($limit > 0 && $limit != $conf->liste_limit) {
264 $option .= '&limit='.((int) $limit);
265 }
266 if (!empty($search_month)) {
267 $option .= '&search_month='.urlencode($search_month);
268 }
269 if (!empty($search_year)) {
270 $option .= '&search_year='.urlencode($search_year);
271 }
272
273 print '<form method="post" action="'.$_SERVER ['PHP_SELF'].'?id='.$object->id.'" name="search_form">'."\n";
274 print '<input type="hidden" name="token" value="'.newToken().'">';
275 if (!empty($sortfield)) {
276 print '<input type="hidden" name="sortfield" value="'.$sortfield.'"/>';
277 }
278 if (!empty($sortorder)) {
279 print '<input type="hidden" name="sortorder" value="'.$sortorder.'"/>';
280 }
281
282 print_barre_liste($langs->trans("Receptions"), $page, $_SERVER["PHP_SELF"], $option, $sortfield, $sortorder, '', $num, $totalofrecords, '', 0, '', '', $limit, 0, 0, 1);
283
284 if (!empty($page)) {
285 $option .= '&page='.urlencode($page);
286 }
287
288 print '<div class="liste_titre liste_titre_bydiv centpercent">';
289 print '<div class="divsearchfield">';
290 print $langs->trans('Period').' ('.$langs->trans("DateCreation").') - ';
291 print $langs->trans('Month').':<input class="flat" type="text" size="4" name="search_month" value="'.$search_month.'"> ';
292 print $langs->trans('Year').':'.$formother->selectyear($search_year ? $search_year : - 1, 'search_year', 1, 20, 5);
293 print '<div style="vertical-align: middle; display: inline-block">';
294 print '<input type="image" class="liste_titre" name="button_search" src="'.img_picto($langs->trans("Search"), 'search.png', '', '', 1).'" value="'.dol_escape_htmltag($langs->trans("Search")).'" title="'.dol_escape_htmltag($langs->trans("Search")).'">';
295 print '<input type="image" class="liste_titre" name="button_removefilter" src="'.img_picto($langs->trans("Search"), 'searchclear.png', '', '', 1).'" value="'.dol_escape_htmltag($langs->trans("RemoveFilter")).'" title="'.dol_escape_htmltag($langs->trans("RemoveFilter")).'">';
296 print '</div>';
297 print '</div>';
298 print '</div>';
299
300 $i = 0;
301 print '<div class="div-table-responsive">';
302 print '<table class="tagtable liste listwithfilterbefore" width="100%">';
303 print '<tr class="liste_titre">';
304 print_liste_field_titre("Ref", $_SERVER["PHP_SELF"], "s.rowid", "", $option, '', $sortfield, $sortorder);
305 print_liste_field_titre("Company", $_SERVER["PHP_SELF"], "s.nom", "", $option, '', $sortfield, $sortorder);
306 print_liste_field_titre("SupplierCode", $_SERVER["PHP_SELF"], "s.code_fournisseur", "", $option, '', $sortfield, $sortorder);
307 print_liste_field_titre("DateCreation", $_SERVER["PHP_SELF"], "recep.date_creation", "", $option, 'align="center"', $sortfield, $sortorder);
308 print_liste_field_titre("Qty", $_SERVER["PHP_SELF"], "d.qty", "", $option, 'align="center"', $sortfield, $sortorder);
309 // print_liste_field_titre("AmountHT", $_SERVER["PHP_SELF"], "d.total_ht", "", $option, 'align="right"', $sortfield, $sortorder);
310 print_liste_field_titre("Status", $_SERVER["PHP_SELF"], "recep.fk_statut", "", $option, 'align="right"', $sortfield, $sortorder);
311 print "</tr>\n";
312
313 if ($num > 0) {
314 while ($i < min($num, $limit)) {
315 $objp = $db->fetch_object($result);
316
317 $total_ht += $objp->total_ht;
318 $total_qty += $objp->qty;
319
320 $receptionstatic->id = $objp->facid;
321 $receptionstatic->ref = $objp->ref;
322 $societestatic->fetch($objp->socid);
323 // $paiement = $receptionstatic->getSommePaiement();
324
325 print '<tr class="oddeven">';
326 print '<td>';
327 print $receptionstatic->getNomUrl(1);
328 print "</td>\n";
329 print '<td>'.$societestatic->getNomUrl(1).'</td>';
330 print "<td>".$objp->code_fournisseur."</td>\n";
331 print '<td class="center">';
332 print dol_print_date($db->jdate($objp->date_creation), 'dayhour')."</td>";
333 print '<td class="center">'.$objp->qty."</td>\n";
334 // print '<td align="right">'.price($objp->total_ht)."</td>\n";
335 print '<td align="right">'.$receptionstatic->LibStatut($objp->statut, 5).'</td>';
336 print "</tr>\n";
337 $i++;
338 }
339 }
340 print '<tr class="liste_total">';
341 if ($num < $limit) {
342 print '<td class="left">'.$langs->trans("Total").'</td>';
343 } else {
344 print '<td class="left">'.$langs->trans("Totalforthispage").'</td>';
345 }
346 print '<td colspan="2"></td>';
347 print '<td></td>';
348 print '<td class="center">'.$total_qty.'</td>';
349 print '<td></td>';
350 print "</table>";
351 print '</div>';
352 print '</form>';
353 } else {
354 dol_print_error($db);
355 }
356 $db->free($result);
357 }
358 }
359} else {
361}
362
363// End of page
364llxFooter();
365$db->close();
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
Definition wrapper.php:56
llxFooter()
Empty footer.
Definition wrapper.php:70
Class to manage generation of HTML components Only common components must be here.
Classe permettant la generation de composants html autre Only common components are here.
Class to manage products or services.
Class with list of lots and properties.
Class to manage receptions.
Class to manage third parties objects (customers, suppliers, prospects...)
dol_banner_tab($object, $paramid, $morehtml='', $shownav=1, $fieldid='rowid', $fieldref='ref', $morehtmlref='', $moreparam='', $nodbprefix=0, $morehtmlleft='', $morehtmlstatus='', $onlybanner=0, $morehtmlright='')
Show tab footer of a card.
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.
dol_print_error($db='', $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_get_fiche_end($notab=0)
Return tab footer of a card.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs='', $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
getDolGlobalInt($key, $default=0)
Return dolibarr global constant int value.
print_liste_field_titre($name, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
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.
print_barre_liste($titre, $page, $file, $options='', $sortfield='', $sortorder='', $morehtmlcenter='', $num=-1, $totalnboflines='', $picto='generic', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limit=-1, $hideselectlimit=0, $hidenavigation=0, $pagenavastextinput=0, $morehtmlrightbeforearrow='')
Print a title with navigation controls for pagination.
dol_trunc($string, $size=40, $trunc='right', $stringencoding='UTF-8', $nodot=0, $display=0)
Truncate a string to a particular length adding '…' if string larger than length.
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...
show_stats_for_batch($batch, $socid)
Show stats for product batch.
productlot_prepare_head($object)
Prepare array with list of tabs.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.