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