dolibarr  19.0.0-dev
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
30 require '../../../main.inc.php';
31 require_once DOL_DOCUMENT_ROOT.'/core/lib/product.lib.php';
32 require_once DOL_DOCUMENT_ROOT.'/reception/class/reception.class.php';
33 require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
34 require_once DOL_DOCUMENT_ROOT.'/product/stock/class/productlot.class.php';
35 require_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 = '';
49 if (!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');
63 if (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;
69 if (!$sortorder) {
70  $sortorder = "DESC";
71 }
72 if (!$sortfield) {
73  $sortfield = "recep.date_creation";
74 }
75 
76 $search_month = GETPOST('search_month', 'int');
77 $search_year = GETPOST('search_year', 'int');
78 
79 if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter', 'alpha')) {
80  $search_month = '';
81  $search_year = '';
82 }
83 
84 if (!$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 
97 if ($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 {
360  dol_print_error();
361 }
362 
363 // End of page
364 llxFooter();
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...)
if(isModEnabled('facture') && $user->hasRight('facture', 'lire')) if((isModEnabled('fournisseur') &&empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD) && $user->hasRight("fournisseur", "facture", "lire"))||(isModEnabled('supplier_invoice') && $user->hasRight("supplier_invoice", "lire"))) if(isModEnabled('don') && $user->hasRight('don', 'lire')) if(isModEnabled('tax') &&!empty($user->rights->tax->charges->lire)) if(isModEnabled('facture') &&isModEnabled('commande') && $user->hasRight("commande", "lire") &&empty($conf->global->WORKFLOW_DISABLE_CREATE_INVOICE_FROM_ORDER)) $sql
Social contributions to pay.
Definition: index.php:746
if($cancel &&! $id) if($action=='add' &&! $cancel) if($action=='delete') if($id) $form
Actions.
Definition: card.php:143
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.
GETPOSTISSET($paramname)
Return true if we are in a context of submitting the parameter $paramname from a POST of a form.
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.