dolibarr  20.0.0-beta
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-2009 Laurent Destailleur <eldy@users.sourceforge.net>
4  * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
5  * Copyright (C) 2014 Florian Henry <florian.henry@open-concept.pro>
6  * Copyright (C) 2024 Jean-RĂ©mi Taponier <jean-remi@netlogic.fr>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 3 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program. If not, see <https://www.gnu.org/licenses/>.
20  */
21 
28 // Load Dolibarr environment
29 require '../../main.inc.php';
30 require_once DOL_DOCUMENT_ROOT.'/core/lib/product.lib.php';
31 require_once DOL_DOCUMENT_ROOT.'/reception/class/reception.class.php';
32 require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
33 require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
34 
35 // Load translation files required by the page
36 $langs->loadLangs(array('orders', 'receptions', 'products', 'companies'));
37 
38 $id = GETPOSTINT('id');
39 $ref = GETPOST('ref', 'alpha');
40 
41 // Security check
42 $fieldvalue = (!empty($id) ? $id : (!empty($ref) ? $ref : ''));
43 $fieldtype = (!empty($ref) ? 'ref' : 'rowid');
44 $socid = '';
45 if (!empty($user->socid)) {
46  $socid = $user->socid;
47 }
48 
49 // Initialize technical object to manage hooks of page. Note that conf->hooks_modules contains array of hook context
50 $hookmanager->initHooks(array('productstatsreception'));
51 
52 // Load variable for pagination
53 $limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
54 $sortfield = GETPOST('sortfield', 'aZ09comma');
55 $sortorder = GETPOST('sortorder', 'aZ09comma');
56 $page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
57 if (empty($page) || $page == -1) {
58  $page = 0;
59 } // If $page is not defined, or '' or -1
60 $offset = $limit * $page;
61 $pageprev = $page - 1;
62 $pagenext = $page + 1;
63 if (!$sortorder) {
64  $sortorder = "DESC";
65 }
66 if (!$sortfield) {
67  $sortfield = "r.date_creation";
68 }
69 $search_month = GETPOSTINT('search_month');
70 $search_year = GETPOSTINT('search_year');
71 
72 if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter', 'alpha')) {
73  $search_month = '';
74  $search_year = '';
75 }
76 
77 $result = restrictedArea($user, 'produit|service', $fieldvalue, 'product&product', '', '', $fieldtype);
78 
79 
80 /*
81  * View
82  */
83 
84 $receptionstatic = new Reception($db);
85 $societestatic = new Societe($db);
86 
87 $form = new Form($db);
88 $formother = new FormOther($db);
89 
90 if ($id > 0 || !empty($ref)) {
91  $product = new Product($db);
92  $result = $product->fetch($id, $ref);
93 
94  $object = $product;
95 
96  $parameters = array('id' => $id);
97  $reshook = $hookmanager->executeHooks('doActions', $parameters, $product, $action); // Note that $action and $object may have been modified by some hooks
98  if ($reshook < 0) {
99  setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
100  }
101 
102  llxHeader("", "", $langs->trans("CardProduct".$product->type));
103 
104  if ($result > 0) {
105  $head = product_prepare_head($product);
106  $titre = $langs->trans("CardProduct".$product->type);
107  $picto = ($product->type == Product::TYPE_SERVICE ? 'service' : 'product');
108  print dol_get_fiche_head($head, 'referers', $titre, -1, $picto);
109 
110  $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $product, $action); // Note that $action and $object may have been modified by hook
111  print $hookmanager->resPrint;
112  if ($reshook < 0) {
113  setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
114  }
115 
116  $linkback = '<a href="'.DOL_URL_ROOT.'/product/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
117 
118  $shownav = 1;
119  if ($user->socid && !in_array('product', explode(',', getDolGlobalString('MAIN_MODULES_FOR_EXTERNAL')))) {
120  $shownav = 0;
121  }
122 
123  dol_banner_tab($object, 'ref', $linkback, $shownav, 'ref');
124 
125  print '<div class="fichecenter">';
126 
127  print '<div class="underbanner clearboth"></div>';
128  print '<table class="border tableforfield" width="100%">';
129 
130  $nboflines = show_stats_for_company($product, $socid);
131 
132  print "</table>";
133 
134  print '</div>';
135  print '<div class="clearboth"></div>';
136 
137  print dol_get_fiche_end();
138 
139 
140  if ($user->hasRight('reception', 'lire')) {
141  $sql = "SELECT DISTINCT s.nom as name, s.rowid as socid, s.code_fournisseur, r.ref, r.ref_supplier";
142  $sql .= ", r.date_creation, r.date_delivery, r.fk_statut as statut, r.rowid as receptionid, cfd.rowid";
143  $sql .= ", cfd.qty, cfdet.subprice * (100 - cfdet.remise_percent) / 100 * cfd.qty AS total_ht";
144  if (empty($user->rights->societe->client->voir) && !$socid) {
145  $sql .= ", sc.fk_soc, sc.fk_user ";
146  }
147  $sql .= " FROM ".MAIN_DB_PREFIX."societe as s";
148  $sql .= " INNER JOIN ".MAIN_DB_PREFIX."reception as r ON r.fk_soc = s.rowid";
149  $sql .= " INNER JOIN ".MAIN_DB_PREFIX."receptiondet_batch as cfd ON cfd.fk_reception = r.rowid AND element_type = 'supplier_order'";
150  $sql .= " INNER JOIN ".MAIN_DB_PREFIX."commande_fournisseurdet as cfdet ON cfdet.rowid = cfd.fk_elementdet";
151  if (empty($user->rights->societe->client->voir) && !$socid) {
152  $sql .= " INNER JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON s.rowid = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
153  }
154  $sql .= " WHERE r.entity IN (".getEntity('reception').")";
155  $sql .= " AND cfd.fk_product = ".((int) $product->id);
156  if (!empty($search_month)) {
157  $sql .= ' AND MONTH(r.date_creation) IN ('.$db->sanitize($search_month).')';
158  }
159  if (!empty($search_year)) {
160  $sql .= ' AND YEAR(r.date_creation) IN ('.$db->sanitize($search_year).')';
161  }
162  if ($socid) {
163  $sql .= " AND r.fk_soc = ".((int) $socid);
164  }
165  $sql .= $db->order($sortfield, $sortorder);
166 
167  //Calcul total qty and amount for global if full scan list
168  $total_ht = 0;
169  $total_qty = 0;
170 
171  // Count total nb of records
172  $totalofrecords = '';
173  if (!getDolGlobalInt('MAIN_DISABLE_FULL_SCANLIST')) {
174  $result = $db->query($sql);
175  $totalofrecords = $db->num_rows($result);
176  }
177 
178  $sql .= $db->plimit($limit + 1, $offset);
179 
180  $result = $db->query($sql);
181  if ($result) {
182  $num = $db->num_rows($result);
183 
184  $option = '&id='.$product->id;
185 
186  if ($limit > 0 && $limit != $conf->liste_limit) {
187  $option .= '&limit='.((int) $limit);
188  }
189  if (!empty($search_month)) {
190  $option .= '&search_month='.urlencode((string) ($search_month));
191  }
192  if (!empty($search_year)) {
193  $option .= '&search_year='.urlencode((string) ($search_year));
194  }
195 
196  print '<form method="post" action="'.$_SERVER ['PHP_SELF'].'?id='.$product->id.'" name="search_form">'."\n";
197  print '<input type="hidden" name="token" value="'.newToken().'">';
198  if (!empty($sortfield)) {
199  print '<input type="hidden" name="sortfield" value="'.$sortfield.'"/>';
200  }
201  if (!empty($sortorder)) {
202  print '<input type="hidden" name="sortorder" value="'.$sortorder.'"/>';
203  }
204 
205  // @phan-suppress-next-line PhanPluginSuspiciousParamOrder
206  print_barre_liste($langs->trans("Receptions"), $page, $_SERVER["PHP_SELF"], $option, $sortfield, $sortorder, '', $num, $totalofrecords, '', 0, '', '', $limit, 0, 0, 1);
207 
208  if (!empty($page)) {
209  $option .= '&page='.urlencode((string) ($page));
210  }
211 
212  print '<div class="liste_titre liste_titre_bydiv centpercent">';
213  print '<div class="divsearchfield">';
214  print $langs->trans('Period').' ('.$langs->trans("DateCreation").') - ';
215  print $langs->trans('Month').':<input class="flat" type="text" size="4" name="search_month" value="'.($search_month > 0 ? $search_month : '').'"> ';
216  print $langs->trans('Year').':'.$formother->selectyear($search_year ? $search_year : - 1, 'search_year', 1, 20, 5);
217  print '<div style="vertical-align: middle; display: inline-block">';
218  print '<input type="image" class="liste_titre" name="button_search" src="'.img_picto($langs->trans("Search"), 'search.png', '', 0, 1).'" value="'.dol_escape_htmltag($langs->trans("Search")).'" title="'.dol_escape_htmltag($langs->trans("Search")).'">';
219  print '<input type="image" class="liste_titre" name="button_removefilter" src="'.img_picto($langs->trans("Search"), 'searchclear.png', '', 0, 1).'" value="'.dol_escape_htmltag($langs->trans("RemoveFilter")).'" title="'.dol_escape_htmltag($langs->trans("RemoveFilter")).'">';
220  print '</div>';
221  print '</div>';
222  print '</div>';
223 
224  $i = 0;
225  print '<div class="div-table-responsive">';
226  print '<table class="tagtable liste listwithfilterbefore" width="100%">';
227  print '<tr class="liste_titre">';
228  print_liste_field_titre("Ref", $_SERVER["PHP_SELF"], "r.rowid", "", $option, '', $sortfield, $sortorder);
229  print_liste_field_titre("Company", $_SERVER["PHP_SELF"], "s.nom", "", $option, '', $sortfield, $sortorder);
230  print_liste_field_titre("SupplierCode", $_SERVER["PHP_SELF"], "s.code_fournisseur", "", $option, '', $sortfield, $sortorder);
231  print_liste_field_titre("DateCreation", $_SERVER["PHP_SELF"], "r.date_creation", "", $option, 'align="center"', $sortfield, $sortorder);
232  print_liste_field_titre('DateDeliveryPlanned', $_SERVER['PHP_SELF'], 'r.date_delivery', '', $option, 'align="center"', $sortfield, $sortorder);
233  print_liste_field_titre("Qty", $_SERVER["PHP_SELF"], "cfd.qty", "", $option, 'align="center"', $sortfield, $sortorder);
234  print_liste_field_titre("AmountHT", $_SERVER["PHP_SELF"], "total_ht", "", $option, 'align="right"', $sortfield, $sortorder);
235  print_liste_field_titre("Status", $_SERVER["PHP_SELF"], "r.fk_statut", "", $option, 'align="right"', $sortfield, $sortorder);
236  print "</tr>\n";
237 
238  if ($num > 0) {
239  while ($i < min($num, $limit)) {
240  $objp = $db->fetch_object($result);
241 
242  $objp->total_ht = price2num($objp->total_ht, 'MT');
243  $total_ht += $objp->total_ht;
244  $total_qty += $objp->qty;
245 
246  $receptionstatic->id = $objp->receptionid;
247  $receptionstatic->ref = $objp->ref;
248  $receptionstatic->ref_supplier = $objp->ref_supplier;
249  $societestatic->fetch($objp->socid);
250 
251  print '<tr class="oddeven">';
252  print '<td>';
253  print $receptionstatic->getNomUrl(1);
254  print "</td>\n";
255  print '<td>'.$societestatic->getNomUrl(1).'</td>';
256  print "<td>".$objp->code_fournisseur."</td>\n";
257  print '<td class="center">';
258  print dol_print_date($db->jdate($objp->date_creation), 'dayhour')."</td>";
259  // delivery planned date
260  print '<td class="center">';
261  print dol_print_date($db->jdate($objp->date_delivery), 'dayhour');
262  print '</td>';
263  print '<td class="center">'.$objp->qty."</td>\n";
264  print '<td align="right">'.price($objp->total_ht)."</td>\n";
265  print '<td align="right">'.$receptionstatic->LibStatut($objp->statut, 4).'</td>';
266  print "</tr>\n";
267  $i++;
268  }
269  }
270  print '<tr class="liste_total">';
271  if ($num < $limit && empty($offset)) {
272  print '<td>'.$langs->trans("Total").'</td>';
273  } else {
274  print '<td>'.$form->textwithpicto($langs->trans("Total"), $langs->trans("Totalforthispage")).'</td>';
275  }
276  print '<td colspan="3"></td>';
277  print '<td></td>';
278  print '<td class="center">'.$total_qty.'</td>';
279  print '<td align="right">'.price($total_ht).'</td>';
280  print '<td></td>';
281  print "</table>";
282  print "</div>";
283  print '</form>';
284  } else {
285  dol_print_error($db);
286  }
287  $db->free($result);
288  }
289  }
290 } else {
291  dol_print_error();
292 }
293 
294 // End of page
295 llxFooter();
296 $db->close();
if($user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition: card.php:58
if(!defined('NOREQUIRESOC')) if(!defined('NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined('NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined('NOREQUIREAJAX')) llxHeader()
Empty header.
Definition: wrapper.php:55
llxFooter()
Empty footer.
Definition: wrapper.php:69
Class to manage generation of HTML components Only common components must be here.
Class permettant la generation de composants html autre Only common components are here.
Class to manage products or services.
const TYPE_SERVICE
Service.
Class to manage receptions.
Class to manage third parties objects (customers, suppliers, prospects...)
if(isModEnabled('invoice') && $user->hasRight('facture', 'lire')) if((isModEnabled('fournisseur') &&!getDolGlobalString('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') && $user->hasRight('tax', 'charges', 'lire')) if(isModEnabled('invoice') &&isModEnabled('order') && $user->hasRight("commande", "lire") &&!getDolGlobalString('WORKFLOW_DISABLE_CREATE_INVOICE_FROM_ORDER')) $sql
Social contributions to pay.
Definition: index.php:745
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
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.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
print_liste_field_titre($name, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
print_barre_liste($title, $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.
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.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
GETPOSTISSET($paramname)
Return true if we are in a context of submitting the parameter $paramname from a POST of a form.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
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...
product_prepare_head($object)
Prepare array with list of tabs.
Definition: product.lib.php:37
show_stats_for_company($product, $socid)
Show stats for company.
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.