dolibarr 21.0.0-alpha
commande.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 Frédéric France <frederic.france@free.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.'/commande/class/commande.class.php';
32require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
33require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
34require_once DOL_DOCUMENT_ROOT.'/core/class/html.formorder.class.php';
35
36// Load translation files required by the page
37$langs->loadLangs(array('orders', 'products', 'companies'));
38
39$id = GETPOSTINT('id');
40$ref = GETPOST('ref', 'alpha');
41
42// Security check
43$fieldvalue = (!empty($id) ? $id : (!empty($ref) ? $ref : ''));
44$fieldtype = (!empty($ref) ? 'ref' : 'rowid');
45$socid = '';
46if (!empty($user->socid)) {
47 $socid = $user->socid;
48}
49
50// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
51$hookmanager->initHooks(array('productstatsorder'));
52
53// Load variable for pagination
54$limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
55$sortfield = GETPOST('sortfield', 'aZ09comma');
56$sortorder = GETPOST('sortorder', 'aZ09comma');
57$page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
58if (empty($page) || $page == -1) {
59 $page = 0;
60} // If $page is not defined, or '' or -1
61$offset = $limit * $page;
62$pageprev = $page - 1;
63$pagenext = $page + 1;
64if (!$sortorder) {
65 $sortorder = "DESC";
66}
67if (!$sortfield) {
68 $sortfield = "c.date_commande";
69}
70$search_month = GETPOSTINT('search_month');
71$search_year = GETPOSTINT('search_year');
72if (GETPOSTISARRAY('search_status')) {
73 $search_status = implode(',', GETPOST('search_status', 'array:intcomma'));
74} else {
75 $search_status = (GETPOST('search_status', 'intcomma') != '' ? GETPOST('search_status', 'intcomma') : GETPOST('statut', 'intcomma'));
76}
77
78if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter', 'alpha')) {
79 $search_month = '';
80 $search_year = '';
81 $search_status = '';
82}
83
84$result = restrictedArea($user, 'produit|service', $fieldvalue, 'product&product', '', '', $fieldtype);
85
86
87/*
88 * View
89 */
90
91$orderstatic = new Commande($db);
92$societestatic = new Societe($db);
93
94$form = new Form($db);
95$formother = new FormOther($db);
96$formorder = new FormOrder($db);
97
98if ($id > 0 || !empty($ref)) {
99 $product = new Product($db);
100 $result = $product->fetch($id, $ref);
101
102 $object = $product;
103
104 $parameters = array('id' => $id);
105 $reshook = $hookmanager->executeHooks('doActions', $parameters, $product, $action); // Note that $action and $object may have been modified by some hooks
106 if ($reshook < 0) {
107 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
108 }
109
110 llxHeader("", "", $langs->trans("CardProduct".$product->type), '', 0, 0, '', '', 'mod-product page-stats_commande');
111
112 if ($result > 0) {
113 $head = product_prepare_head($product);
114 $titre = $langs->trans("CardProduct".$product->type);
115 $picto = ($product->type == Product::TYPE_SERVICE ? 'service' : 'product');
116 print dol_get_fiche_head($head, 'referers', $titre, -1, $picto);
117
118 $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $product, $action); // Note that $action and $object may have been modified by hook
119 print $hookmanager->resPrint;
120 if ($reshook < 0) {
121 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
122 }
123
124 $linkback = '<a href="'.DOL_URL_ROOT.'/product/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
125
126 $shownav = 1;
127 if ($user->socid && !in_array('product', explode(',', getDolGlobalString('MAIN_MODULES_FOR_EXTERNAL')))) {
128 $shownav = 0;
129 }
130
131 dol_banner_tab($object, 'ref', $linkback, $shownav, 'ref');
132
133 print '<div class="fichecenter">';
134
135 print '<div class="underbanner clearboth"></div>';
136 print '<table class="border tableforfield" width="100%">';
137
138 $nboflines = show_stats_for_company($product, $socid);
139
140 print "</table>";
141
142 print '</div>';
143 print '<div class="clearboth"></div>';
144
145 print dol_get_fiche_end();
146
147
148 if ($user->hasRight('commande', 'lire')) {
149 $sql = "SELECT DISTINCT s.nom as name, s.rowid as socid, s.code_client, c.rowid, d.total_ht as total_ht, c.ref,";
150 $sql .= " c.ref_client,";
151 $sql .= " c.date_commande, c.fk_statut as statut, c.facture, c.rowid as commandeid, d.rowid, d.qty,";
152 $sql .= " c.date_livraison as delivery_date";
153 if (!$user->hasRight('societe', 'client', 'voir')) {
154 $sql .= ", sc.fk_soc, sc.fk_user ";
155 }
156 $sql .= " FROM ".MAIN_DB_PREFIX."societe as s";
157 $sql .= ", ".MAIN_DB_PREFIX."commande as c";
158 $sql .= ", ".MAIN_DB_PREFIX."commandedet as d";
159 if (!$user->hasRight('societe', 'client', 'voir')) {
160 $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
161 }
162 $sql .= " WHERE c.fk_soc = s.rowid";
163 $sql .= " AND c.entity IN (".getEntity('commande').")";
164 $sql .= " AND d.fk_commande = c.rowid";
165 $sql .= " AND d.fk_product = ".((int) $product->id);
166 if (!empty($search_month)) {
167 $sql .= " AND MONTH(c.date_commande) IN (".$db->sanitize($search_month).")";
168 }
169 if (!empty($search_year)) {
170 $sql .= " AND YEAR(c.date_commande) IN (".$db->sanitize($search_year).")";
171 }
172 if (!$user->hasRight('societe', 'client', 'voir')) {
173 $sql .= " AND s.rowid = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
174 }
175 if ($socid) {
176 $sql .= " AND c.fk_soc = ".((int) $socid);
177 }
178
179 if ($search_status != '') {
180 $sql .= " AND c.fk_statut IN (".$db->sanitize($search_status).")";
181 }
182
183 $sql .= $db->order($sortfield, $sortorder);
184
185 //Calcul total qty and amount for global if full scan list
186 $total_ht = 0;
187 $total_qty = 0;
188
189 // Count total nb of records
190 $totalofrecords = '';
191 if (!getDolGlobalInt('MAIN_DISABLE_FULL_SCANLIST')) {
192 $result = $db->query($sql);
193 $totalofrecords = $db->num_rows($result);
194 }
195
196 $sql .= $db->plimit($limit + 1, $offset);
197
198 $result = $db->query($sql);
199 if ($result) {
200 $num = $db->num_rows($result);
201
202 $option = '&id='.$product->id;
203
204 if ($limit > 0 && $limit != $conf->liste_limit) {
205 $option .= '&limit='.((int) $limit);
206 }
207 if (!empty($search_month)) {
208 $option .= '&search_month='.urlencode((string) ($search_month));
209 }
210 if (!empty($search_year)) {
211 $option .= '&search_year='.urlencode((string) ($search_year));
212 }
213
214 if ($search_status != '') {
215 $option .= '&search_status='.urlencode($search_status);
216 }
217
218 print '<form method="post" action="'.$_SERVER ['PHP_SELF'].'?id='.$product->id.'" name="search_form">'."\n";
219 print '<input type="hidden" name="token" value="'.newToken().'">';
220 if (!empty($sortfield)) {
221 print '<input type="hidden" name="sortfield" value="'.$sortfield.'"/>';
222 }
223 if (!empty($sortorder)) {
224 print '<input type="hidden" name="sortorder" value="'.$sortorder.'"/>';
225 }
226
227 // @phan-suppress-next-line PhanPluginSuspiciousParamOrder
228 print_barre_liste($langs->trans("CustomersOrders"), $page, $_SERVER["PHP_SELF"], $option, $sortfield, $sortorder, '', $num, $totalofrecords, '', 0, '', '', $limit, 0, 0, 1);
229
230 if (!empty($page)) {
231 $option .= '&page='.urlencode((string) ($page));
232 }
233
234 print '<div class="liste_titre liste_titre_bydiv centpercent">';
235 print '<div class="divsearchfield">';
236 print $langs->trans('Period').' ('.$langs->trans("OrderDate").') - ';
237 print $langs->trans('Month').':<input class="flat" type="text" size="4" name="search_month" value="'.($search_month > 0 ? $search_month : '').'"> ';
238 print $langs->trans('Year').':'.$formother->selectyear($search_year ? $search_year : - 1, 'search_year', 1, 20, 5);
239 print $langs->trans('Status');
240 $formorder->selectOrderStatus($search_status, 1, 'search_status');
241 print '<div style="vertical-align: middle; display: inline-block">';
242 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")).'">';
243 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")).'">';
244 print '</div>';
245 print '</div>';
246 print '</div>';
247
248 $i = 0;
249 print '<div class="div-table-responsive">';
250 print '<table class="tagtable liste listwithfilterbefore" width="100%">';
251 print '<tr class="liste_titre">';
252 print_liste_field_titre("Ref", $_SERVER["PHP_SELF"], "c.rowid", "", $option, '', $sortfield, $sortorder);
253 print_liste_field_titre("Company", $_SERVER["PHP_SELF"], "s.nom", "", $option, '', $sortfield, $sortorder);
254 print_liste_field_titre("CustomerCode", $_SERVER["PHP_SELF"], "s.code_client", "", $option, '', $sortfield, $sortorder);
255 print_liste_field_titre("OrderDate", $_SERVER["PHP_SELF"], "c.date_commande", "", $option, '', $sortfield, $sortorder, 'center ');
256 print_liste_field_titre('DateDeliveryPlanned', $_SERVER['PHP_SELF'], 'c.date_livraison', '', $option, '', $sortfield, $sortorder, 'center ');
257 print_liste_field_titre("Qty", $_SERVER["PHP_SELF"], "d.qty", "", $option, '', $sortfield, $sortorder, 'center ');
258 print_liste_field_titre("AmountHT", $_SERVER["PHP_SELF"], "c.total_ht", "", $option, '', $sortfield, $sortorder, 'right ');
259 print_liste_field_titre("Status", $_SERVER["PHP_SELF"], "c.fk_statut", "", $option, '', $sortfield, $sortorder, 'right ');
260 print "</tr>\n";
261
262 if ($num > 0) {
263 while ($i < min($num, $limit)) {
264 $objp = $db->fetch_object($result);
265
266 $total_ht += $objp->total_ht;
267 $total_qty += $objp->qty;
268
269 $orderstatic->id = $objp->commandeid;
270 $orderstatic->ref = $objp->ref;
271 $orderstatic->ref_client = $objp->ref_client;
272 $societestatic->fetch($objp->socid);
273
274 print '<tr class="oddeven">';
275 print '<td>';
276 print $orderstatic->getNomUrl(1);
277 print "</td>\n";
278 print '<td>'.$societestatic->getNomUrl(1).'</td>';
279 print "<td>".$objp->code_client."</td>\n";
280 print '<td class="center">';
281 print dol_print_date($db->jdate($objp->date_commande), 'dayhour')."</td>";
282 // delivery planned date
283 print '<td class="center">';
284 print dol_print_date($db->jdate($objp->delivery_date), 'dayhour');
285 print '</td>';
286 print '<td class="center">'.$objp->qty."</td>\n";
287 print '<td align="right">'.price($objp->total_ht)."</td>\n";
288 print '<td align="right">'.$orderstatic->LibStatut($objp->statut, $objp->facture, 5).'</td>';
289 print "</tr>\n";
290 $i++;
291 }
292 }
293 print '<tr class="liste_total">';
294 if ($num < $limit && empty($offset)) {
295 print '<td>'.$langs->trans("Total").'</td>';
296 } else {
297 print '<td>'.$form->textwithpicto($langs->trans("Total"), $langs->trans("Totalforthispage")).'</td>';
298 }
299 print '<td colspan="3"></td>';
300 // delivery planned date
301 print '<td></td>';
302 print '<td class="center">'.$total_qty.'</td>';
303 print '<td align="right">'.price($total_ht).'</td>';
304 print '<td></td>';
305 print "</table>";
306 print "</div>";
307 print '</form>';
308 } else {
309 dol_print_error($db);
310 }
311 $db->free($result);
312 }
313 }
314} else {
316}
317
318// End of page
319llxFooter();
320$db->close();
$id
Definition account.php:39
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($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Definition wrapper.php:70
Class to manage customers orders.
Class to manage generation of HTML components Only common components must be here.
Class to manage HTML output components for orders Before adding component here, check they are not in...
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 third parties objects (customers, suppliers, prospects...)
llxFooter()
Footer empty.
Definition document.php:107
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
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.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
GETPOSTISARRAY($paramname, $method=0)
Return true if the parameter $paramname is submit from a POST OR GET as an array.
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.
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 a 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.