dolibarr  17.0.4
order.lib.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2006-2012 Laurent Destailleur <eldy@users.sourceforge.net>
3  * Copyright (C) 2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
4  * Copyright (C) 2010-2012 Regis Houssin <regis.houssin@inodbox.com>
5  * Copyright (C) 2010 Juanjo Menent <jmenent@2byte.es>
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program. If not, see <https://www.gnu.org/licenses/>.
19  * or see https://www.gnu.org/
20  */
21 
35 {
36  global $db, $langs, $conf, $user;
37  if (isModEnabled("expedition")) {
38  $langs->load("sendings");
39  }
40  $langs->load("orders");
41 
42  $h = 0;
43  $head = array();
44 
45  if (isModEnabled('commande') && $user->hasRight('commande', 'lire')) {
46  $head[$h][0] = DOL_URL_ROOT.'/commande/card.php?id='.$object->id;
47  $head[$h][1] = $langs->trans("CustomerOrder");
48  $head[$h][2] = 'order';
49  $h++;
50  }
51 
52  if (empty($conf->global->MAIN_DISABLE_CONTACTS_TAB)) {
53  $nbContact = count($object->liste_contact(-1, 'internal')) + count($object->liste_contact(-1, 'external'));
54  $head[$h][0] = DOL_URL_ROOT.'/commande/contact.php?id='.$object->id;
55  $head[$h][1] = $langs->trans('ContactsAddresses');
56  if ($nbContact > 0) {
57  $head[$h][1] .= '<span class="badge marginleftonlyshort">'.$nbContact.'</span>';
58  }
59  $head[$h][2] = 'contact';
60  $h++;
61  }
62 
63  if ((isModEnabled('expedition_bon') && $user->hasRight('expedition', 'lire'))
64  || (isModEnabled('delivery_note') && $user->hasRight('expedition', 'delivery', 'lire'))) {
65  $nbShipments = $object->getNbOfShipments();
66  $nbReceiption = 0;
67  $head[$h][0] = DOL_URL_ROOT.'/expedition/shipment.php?id='.$object->id;
68  $text = '';
69  if (isModEnabled('expedition_bon')) {
70  $text .= $langs->trans("Shipments");
71  }
72  if (isModEnabled('expedition_bon') && isModEnabled('delivery_note')) {
73  $text .= ' - ';
74  }
75  if (isModEnabled('delivery_note')) {
76  $text .= $langs->trans("Receivings");
77  }
78  if ($nbShipments > 0 || $nbReceiption > 0) {
79  $text .= '<span class="badge marginleftonlyshort">'.($nbShipments ? $nbShipments : 0);
80  }
81  if (isModEnabled('expedition_bon') && isModEnabled('delivery_note') && ($nbShipments > 0 || $nbReceiption > 0)) {
82  $text .= ' - ';
83  }
84  if (isModEnabled('expedition_bon') && isModEnabled('delivery_note') && ($nbShipments > 0 || $nbReceiption > 0)) {
85  $text .= ($nbReceiption ? $nbReceiption : 0);
86  }
87  if ($nbShipments > 0 || $nbReceiption > 0) {
88  $text .= '</span>';
89  }
90  $head[$h][1] = $text;
91  $head[$h][2] = 'shipping';
92  $h++;
93  }
94 
95  // Show more tabs from modules
96  // Entries must be declared in modules descriptor with line
97  // $this->tabs = array('entity:+tabname:Title:@mymodule:/mymodule/mypage.php?id=__ID__'); to add new tab
98  // $this->tabs = array('entity:-tabname); to remove a tab
99  complete_head_from_modules($conf, $langs, $object, $head, $h, 'order', 'add', 'core');
100 
101  if (empty($conf->global->MAIN_DISABLE_NOTES_TAB)) {
102  $nbNote = 0;
103  if (!empty($object->note_private)) {
104  $nbNote++;
105  }
106  if (!empty($object->note_public)) {
107  $nbNote++;
108  }
109  $head[$h][0] = DOL_URL_ROOT.'/commande/note.php?id='.$object->id;
110  $head[$h][1] = $langs->trans('Notes');
111  if ($nbNote > 0) {
112  $head[$h][1] .= '<span class="badge marginleftonlyshort">'.$nbNote.'</span>';
113  }
114  $head[$h][2] = 'note';
115  $h++;
116  }
117 
118  require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
119  require_once DOL_DOCUMENT_ROOT.'/core/class/link.class.php';
120  $upload_dir = $conf->commande->multidir_output[$object->entity]."/".dol_sanitizeFileName($object->ref);
121  $nbFiles = count(dol_dir_list($upload_dir, 'files', 0, '', '(\.meta|_preview.*\.png)$'));
122  $nbLinks = Link::count($db, $object->element, $object->id);
123  $head[$h][0] = DOL_URL_ROOT.'/commande/document.php?id='.$object->id;
124  $head[$h][1] = $langs->trans('Documents');
125  if (($nbFiles + $nbLinks) > 0) {
126  $head[$h][1] .= '<span class="badge marginleftonlyshort">'.($nbFiles + $nbLinks).'</span>';
127  }
128  $head[$h][2] = 'documents';
129  $h++;
130 
131  $head[$h][0] = DOL_URL_ROOT.'/commande/info.php?id='.$object->id;
132  $head[$h][1] = $langs->trans("Info");
133  $head[$h][2] = 'info';
134  $h++;
135 
136  complete_head_from_modules($conf, $langs, $object, $head, $h, 'order', 'add', 'external');
137 
138  complete_head_from_modules($conf, $langs, $object, $head, $h, 'order', 'remove');
139 
140  return $head;
141 }
142 
149 {
150  global $langs, $conf, $user, $db;
151 
152  $extrafields = new ExtraFields($db);
153  $extrafields->fetch_name_optionals_label('commande');
154  $extrafields->fetch_name_optionals_label('commandedet');
155 
156  $h = 0;
157  $head = array();
158 
159  $head[$h][0] = DOL_URL_ROOT.'/admin/commande.php';
160  $head[$h][1] = $langs->trans("Miscellaneous");
161  $head[$h][2] = 'general';
162  $h++;
163 
164  complete_head_from_modules($conf, $langs, null, $head, $h, 'order_admin');
165 
166  $head[$h][0] = DOL_URL_ROOT.'/admin/order_extrafields.php';
167  $head[$h][1] = $langs->trans("ExtraFields");
168  $nbExtrafields = $extrafields->attributes['commande']['count'];
169  if ($nbExtrafields > 0) {
170  $head[$h][1] .= '<span class="badge marginleftonlyshort">'.$nbExtrafields.'</span>';
171  }
172  $head[$h][2] = 'attributes';
173  $h++;
174 
175  $head[$h][0] = DOL_URL_ROOT.'/admin/orderdet_extrafields.php';
176  $head[$h][1] = $langs->trans("ExtraFieldsLines");
177  $nbExtrafields = $extrafields->attributes['commandedet']['count'];
178  if ($nbExtrafields > 0) {
179  $head[$h][1] .= '<span class="badge marginleftonlyshort">'.$nbExtrafields.'</span>';
180  }
181  $head[$h][2] = 'attributeslines';
182  $h++;
183 
184  complete_head_from_modules($conf, $langs, null, $head, $h, 'order_admin', 'remove');
185 
186  return $head;
187 }
188 
189 
190 
197 function getCustomerOrderPieChart($socid = 0)
198 {
199  global $conf, $db, $langs, $user;
200 
201  $result = '';
202 
203  if (!isModEnabled('commande') || !$user->hasRight('commande', 'lire')) {
204  return '';
205  }
206 
207  $commandestatic = new Commande($db);
208 
209  /*
210  * Statistics
211  */
212 
213  $sql = "SELECT count(c.rowid) as nb, c.fk_statut as status";
214  $sql .= " FROM ".MAIN_DB_PREFIX."societe as s";
215  $sql .= ", ".MAIN_DB_PREFIX."commande as c";
216  if (empty($user->rights->societe->client->voir) && !$socid) {
217  $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
218  }
219  $sql .= " WHERE c.fk_soc = s.rowid";
220  $sql .= " AND c.entity IN (".getEntity('societe').")";
221  if ($user->socid) {
222  $sql .= ' AND c.fk_soc = '.((int) $user->socid);
223  }
224  if (empty($user->rights->societe->client->voir) && !$socid) {
225  $sql .= " AND s.rowid = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
226  }
227  $sql .= " GROUP BY c.fk_statut";
228 
229  $resql = $db->query($sql);
230  if ($resql) {
231  $num = $db->num_rows($resql);
232  $i = 0;
233 
234  $total = 0;
235  $totalinprocess = 0;
236  $dataseries = array();
237  $colorseries = array();
238  $vals = array();
239  // -1=Canceled, 0=Draft, 1=Validated, 2=Accepted/On process, 3=Closed (Sent/Received, billed or not)
240  while ($i < $num) {
241  $row = $db->fetch_row($resql);
242  if ($row) {
243  //if ($row[1]!=-1 && ($row[1]!=3 || $row[2]!=1))
244  {
245  if (!isset($vals[$row[1]])) {
246  $vals[$row[1]] = 0;
247  }
248  $vals[$row[1]] += $row[0];
249  $totalinprocess += $row[0];
250  }
251  $total += $row[0];
252  }
253  $i++;
254  }
255  $db->free($resql);
256 
257  include DOL_DOCUMENT_ROOT.'/theme/'.$conf->theme.'/theme_vars.inc.php';
258 
259  $result = '<div class="div-table-responsive-no-min">';
260  $result .= '<table class="noborder nohover centpercent">';
261  $result .= '<tr class="liste_titre"><th colspan="2">'.$langs->trans("Statistics").' - '.$langs->trans("CustomersOrders").'</th></tr>'."\n";
262  $listofstatus = array(0, 1, 2, 3, -1);
263  foreach ($listofstatus as $status) {
264  $dataseries[] = array($commandestatic->LibStatut($status, 0, 1, 1), (isset($vals[$status]) ? (int) $vals[$status] : 0));
265  if ($status == Commande::STATUS_DRAFT) {
266  $colorseries[$status] = '-'.$badgeStatus0;
267  }
268  if ($status == Commande::STATUS_VALIDATED) {
269  $colorseries[$status] = $badgeStatus1;
270  }
271  if ($status == Commande::STATUS_SHIPMENTONPROCESS) {
272  $colorseries[$status] = $badgeStatus4;
273  }
274  if ($status == Commande::STATUS_CLOSED && empty($conf->global->WORKFLOW_BILL_ON_SHIPMENT)) {
275  $colorseries[$status] = $badgeStatus6;
276  }
277  if ($status == Commande::STATUS_CLOSED && (!empty($conf->global->WORKFLOW_BILL_ON_SHIPMENT))) {
278  $colorseries[$status] = $badgeStatus6;
279  }
280  if ($status == Commande::STATUS_CANCELED) {
281  $colorseries[$status] = $badgeStatus9;
282  }
283 
284  if (empty($conf->use_javascript_ajax)) {
285  $result .= '<tr class="oddeven">';
286  $result .= '<td>'.$commandestatic->LibStatut($status, 0, 0, 1).'</td>';
287  $result .= '<td class="right"><a href="list.php?statut='.$status.'">'.(isset($vals[$status]) ? $vals[$status] : 0).' ';
288  $result .= $commandestatic->LibStatut($status, 0, 3, 1);
289  $result .= '</a></td>';
290  $result .= "</tr>\n";
291  }
292  }
293  if (!empty($conf->use_javascript_ajax)) {
294  $result .= '<tr class="impair"><td align="center" colspan="2">';
295 
296  include_once DOL_DOCUMENT_ROOT.'/core/class/dolgraph.class.php';
297  $dolgraph = new DolGraph();
298  $dolgraph->SetData($dataseries);
299  $dolgraph->SetDataColor(array_values($colorseries));
300  $dolgraph->setShowLegend(2);
301  $dolgraph->setShowPercent(1);
302  $dolgraph->SetType(array('pie'));
303  $dolgraph->setHeight('150');
304  $dolgraph->setWidth('300');
305  $dolgraph->draw('idgraphstatus');
306  $result .= $dolgraph->show($total ? 0 : 1);
307 
308  $result .= '</td></tr>';
309  }
310 
311  //if ($totalinprocess != $total)
312  $result .= '<tr class="liste_total"><td>'.$langs->trans("Total").'</td><td class="right">'.$total.'</td></tr>';
313  $result .= "</table></div><br>";
314  } else {
315  dol_print_error($db);
316  }
317 
318  return $result;
319 }
Class to manage customers orders.
const STATUS_SHIPMENTONPROCESS
Shipment on process.
const STATUS_CLOSED
Closed (Sent, billed or not)
const STATUS_CANCELED
Canceled status.
const STATUS_DRAFT
Draft status.
const STATUS_VALIDATED
Validated status.
Class to build graphs.
Class to manage standard extra fields.
if(isModEnabled('facture') &&!empty($user->rights->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') &&!empty($user->rights->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)) $resql
Social contributions to pay.
Definition: index.php:745
dol_dir_list($path, $types="all", $recursive=0, $filter="", $excludefilter=null, $sortcriteria="name", $sortorder=SORT_ASC, $mode=0, $nohook=0, $relativename="", $donotfollowsymlinks=0, $nbsecondsold=0)
Scan a directory and return a list of files/directories.
Definition: files.lib.php:61
dol_print_error($db='', $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
complete_head_from_modules($conf, $langs, $object, &$head, &$h, $type, $mode='add', $filterorigmodule='')
Complete or removed entries into a head array (used to build tabs).
isModEnabled($module)
Is Dolibarr module enabled.
order_admin_prepare_head()
Return array head with list of tabs to view object informations.
Definition: order.lib.php:148
getCustomerOrderPieChart($socid=0)
Return a HTML table that contains a pie chart of sales orders.
Definition: order.lib.php:197
commande_prepare_head(Commande $object)
Prepare array with list of tabs.
Definition: order.lib.php:34