dolibarr 20.0.0
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
29require '../../main.inc.php';
30require_once DOL_DOCUMENT_ROOT.'/core/lib/product.lib.php';
31require_once DOL_DOCUMENT_ROOT.'/reception/class/reception.class.php';
32require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
33require_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 = '';
45if (!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");
57if (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;
63if (!$sortorder) {
64 $sortorder = "DESC";
65}
66if (!$sortfield) {
67 $sortfield = "r.date_creation";
68}
69$search_month = GETPOSTINT('search_month');
70$search_year = GETPOSTINT('search_year');
71
72if (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
90if ($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), '', '', 0, 0, '', '', '', 'mod-product page-stats_reception');
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 {
292}
293
294// End of page
295llxFooter();
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...)
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...
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.
show_stats_for_company($product, $socid)
Show stats for a product.
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.