dolibarr 20.0.5
index.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2001-2005 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3 * Copyright (C) 2004-2022 Laurent Destailleur <eldy@users.sourceforge.net>
4 * Copyright (C) 2005-2015 Regis Houssin <regis.houssin@inodbox.com>
5 * Copyright (C) 2015-2020 Juanjo Menent <jmenent@2byte.es>
6 * Copyright (C) 2015 Jean-François Ferry <jfefe@aternatik.fr>
7 * Copyright (C) 2015 Raphaël Doursenaud <rdoursenaud@gpcsolutions.fr>
8 * Copyright (C) 2016 Marcos García <marcosgdf@gmail.com>
9 * Copyright (C) 2019 Nicolas ZABOURI <info@inovea-conseil.com>
10 * Copyright (C) 2020 Tobias Sekan <tobias.sekan@startmail.com>
11 * Copyright (C) 2020 Josep Lluís Amador <joseplluis@lliuretic.cat>
12 * Copyright (C) 2021-2024 Frédéric France <frederic.france@free.fr>
13 * Copyright (C) 2024 Rafael San José <rsanjose@alxarafe.com>
14 * Copyright (C) 2024 MDW <mdeweerd@users.noreply.github.com>
15 *
16 * This program is free software; you can redistribute it and/or modify
17 * it under the terms of the GNU General Public License as published by
18 * the Free Software Foundation; either version 3 of the License, or
19 * (at your option) any later version.
20 *
21 * This program is distributed in the hope that it will be useful,
22 * but WITHOUT ANY WARRANTY; without even the implied warranty of
23 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
24 * GNU General Public License for more details.
25 *
26 * You should have received a copy of the GNU General Public License
27 * along with this program. If not, see <https://www.gnu.org/licenses/>.
28 */
29
37// Load Dolibarr environment
38require '../main.inc.php';
39require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
40require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
41require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php';
42require_once DOL_DOCUMENT_ROOT.'/commande/class/commande.class.php';
43require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.class.php';
44require_once DOL_DOCUMENT_ROOT.'/compta/sociales/class/chargesociales.class.php';
45require_once DOL_DOCUMENT_ROOT.'/core/class/dolgraph.class.php';
46require_once DOL_DOCUMENT_ROOT.'/core/lib/invoice.lib.php';
47
48// L'espace compta/treso doit toujours etre actif car c'est un espace partage
49// par de nombreux modules (banque, facture, commande a facturer, etc...) independamment
50// de l'utilisation de la compta ou non. C'est au sein de cet espace que chaque sous fonction
51// est protegee par le droit qui va bien du module concerne.
52
53// Load translation files required by the page
54$langs->loadLangs(array('compta', 'bills'));
55if (isModEnabled('order')) {
56 $langs->load("orders");
57}
58
59// Get parameters
60$action = GETPOST('action', 'aZ09');
61$bid = GETPOSTINT('bid');
62
63// Security check
64$socid = '';
65if ($user->socid > 0) {
66 $action = '';
67 $socid = $user->socid;
68}
69
70// Maximum elements of the tables
71$max = getDolGlobalInt('MAIN_SIZE_SHORTLIST_LIMIT', 5);
72$maxDraftCount = !getDolGlobalString('MAIN_MAXLIST_OVERLOAD') ? 500 : $conf->global->MAIN_MAXLIST_OVERLOAD;
73$maxLatestEditCount = 5;
74$maxOpenCount = !getDolGlobalString('MAIN_MAXLIST_OVERLOAD') ? 500 : $conf->global->MAIN_MAXLIST_OVERLOAD;
75
76// Initialize technical object to manage hooks. Note that conf->hooks_modules contains array
77$hookmanager->initHooks(array('invoiceindex'));
78
79
80$maxofloop = (!getDolGlobalString('MAIN_MAXLIST_OVERLOAD') ? 500 : $conf->global->MAIN_MAXLIST_OVERLOAD);
81
82
83/*
84 * Actions
85 */
86
87// None
88
89
90/*
91 * View
92 */
93
94$now = dol_now();
95
96$form = new Form($db);
97$formfile = new FormFile($db);
98$thirdpartystatic = new Societe($db);
99
100llxHeader("", $langs->trans("InvoicesArea"));
101
102print load_fiche_titre($langs->trans("InvoicesArea"), '', 'bill');
103
104
105print '<div class="fichecenter">';
106
107print '<div class="twocolumns">';
108
109print '<div class="firstcolumn fichehalfleft boxhalfleft" id="boxhalfleft">';
110
111
112if (isModEnabled('invoice')) {
113 print getNumberInvoicesPieChart('customers');
114 print '<br>';
115}
116
117if (isModEnabled('fournisseur') || isModEnabled('supplier_invoice')) {
118 print getNumberInvoicesPieChart('suppliers');
119 print '<br>';
120}
121
122if (isModEnabled('invoice')) {
123 print getCustomerInvoiceDraftTable($max, $socid);
124 print '<br>';
125}
126
127if (isModEnabled('fournisseur') || isModEnabled('supplier_invoice')) {
128 print getDraftSupplierTable($max, $socid);
129 print '<br>';
130}
131
132
133print '</div><div class="secondcolumn fichehalfright boxhalfright" id="boxhalfright">';
134
135
136// Latest modified customer invoices
137if (isModEnabled('invoice') && $user->hasRight('facture', 'lire')) {
138 $langs->load("boxes");
139 $tmpinvoice = new Facture($db);
140
141 $sql = "SELECT f.rowid, f.ref, f.fk_statut as status, f.type, f.total_ht, f.total_tva, f.total_ttc, f.paye, f.tms";
142 $sql .= ", f.date_lim_reglement as datelimite";
143 $sql .= ", s.nom as name";
144 $sql .= ", s.rowid as socid";
145 $sql .= ", s.code_client, s.code_compta, s.email";
146 $sql .= ", cc.rowid as country_id, cc.code as country_code";
147 $sql .= ", (SELECT SUM(pf.amount) FROM ".$db->prefix()."paiement_facture as pf WHERE pf.fk_facture = f.rowid) as am";
148 $sql .= " FROM ".MAIN_DB_PREFIX."facture as f";
149 $sql .= " INNER JOIN ".MAIN_DB_PREFIX."societe as s ON s.rowid = f.fk_soc";
150 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_country as cc ON cc.rowid = s.fk_pays";
151 $sql .= " WHERE f.entity IN (".getEntity('invoice').")";
152 if ($socid > 0) {
153 $sql .= " AND f.fk_soc = ".((int) $socid);
154 }
155 // Filter on sale representative
156 if (empty($user->socid) && !$user->hasRight('societe', 'client', 'voir')) {
157 $sql .= " AND EXISTS (SELECT sc.fk_soc FROM ".MAIN_DB_PREFIX."societe_commerciaux as sc WHERE sc.fk_soc = f.fk_soc AND sc.fk_user = ".((int) $user->id).")";
158 }
159 // Add where from hooks
160 $parameters = array();
161 $reshook = $hookmanager->executeHooks('printFieldListWhereCustomerLastModified', $parameters);
162 $sql .= $hookmanager->resPrint;
163
164 $sql .= " ORDER BY f.tms DESC";
165 $sql .= $db->plimit($max, 0);
166
167 $resql = $db->query($sql);
168 if ($resql) {
169 $num = $db->num_rows($resql);
170 $i = 0;
171 $othernb = 0;
172
173 print '<div class="div-table-responsive-no-min">';
174 print '<table class="noborder centpercent">';
175
176 print '<tr class="liste_titre"><th colspan="2">'.$langs->trans("BoxTitleLastCustomerBills", $max);
177 print '<a href="'.DOL_URL_ROOT.'/compta/facture/list.php?sortfield=f.tms&sortorder=desc"><span class="badge marginleftonly">...</span></a>';
178 print '</th>';
179 if (getDolGlobalString('MAIN_SHOW_HT_ON_SUMMARY')) {
180 print '<th class="right">'.$langs->trans("AmountHT").'</th>';
181 }
182 print '<th class="right">'.$langs->trans("AmountTTC").'</th>';
183 print '<th class="right">'.$langs->trans("DateModificationShort").'</th>';
184 print '<th width="16">&nbsp;</th>';
185 print '</tr>';
186 if ($num) {
187 $total_ttc = $totalam = $total_ht = 0;
188 while ($i < $num && $i < $conf->liste_limit) {
189 $obj = $db->fetch_object($resql);
190
191 if ($i >= $max) {
192 $othernb += 1;
193 $i++;
194 $total_ht += $obj->total_ht;
195 $total_ttc += $obj->total_ttc;
196 continue;
197 }
198
199 $tmpinvoice->ref = $obj->ref;
200 $tmpinvoice->id = $obj->rowid;
201 $tmpinvoice->total_ht = $obj->total_ht;
202 $tmpinvoice->total_tva = $obj->total_tva;
203 $tmpinvoice->total_ttc = $obj->total_ttc;
204 $tmpinvoice->statut = $obj->status;
205 $tmpinvoice->status = $obj->status;
206 $tmpinvoice->paye = $obj->paye;
207 $tmpinvoice->date_lim_reglement = $db->jdate($obj->datelimite);
208 $tmpinvoice->type = $obj->type;
209
210 $thirdpartystatic->id = $obj->socid;
211 $thirdpartystatic->name = $obj->name;
212 $thirdpartystatic->email = $obj->email;
213 $thirdpartystatic->country_id = $obj->country_id;
214 $thirdpartystatic->country_code = $obj->country_code;
215 $thirdpartystatic->email = $obj->email;
216 $thirdpartystatic->client = 1;
217 $thirdpartystatic->code_client = $obj->code_client;
218 //$thirdpartystatic->code_fournisseur = $obj->code_fournisseur;
219 $thirdpartystatic->code_compta_client = $obj->code_compta;
220 //$thirdpartystatic->code_compta_fournisseur = $obj->code_compta_fournisseur;
221
222 $totalallpayments = $tmpinvoice->getSommePaiement(0);
223 $totalallpayments += $tmpinvoice->getSumCreditNotesUsed(0);
224 $totalallpayments += $tmpinvoice->getSumDepositsUsed(0);
225 print '<tr class="oddeven">';
226 print '<td class="nowrap">';
227
228 print '<table class="nobordernopadding"><tr class="nocellnopadd">';
229
230 print '<td class="nobordernopadding nowraponall">';
231 print $tmpinvoice->getNomUrl(1, '');
232 print '</td>';
233 if ($tmpinvoice->hasDelay()) {
234 print '<td width="20" class="nobordernopadding nowrap">';
235 print img_warning($langs->trans("Late"));
236 print '</td>';
237 }
238 print '<td width="16" class="nobordernopadding hideonsmartphone right">';
239 $filename = dol_sanitizeFileName($obj->ref);
240 $filedir = $conf->facture->dir_output.'/'.dol_sanitizeFileName($obj->ref);
241 $urlsource = $_SERVER['PHP_SELF'].'?facid='.$obj->rowid;
242 print $formfile->getDocumentsLink($tmpinvoice->element, $filename, $filedir);
243 print '</td></tr></table>';
244
245 print '</td>';
246
247 print '<td class="tdoverflowmax150">';
248 print $thirdpartystatic->getNomUrl(1, 'customer', 44);
249 print '</td>';
250 if (getDolGlobalString('MAIN_SHOW_HT_ON_SUMMARY')) {
251 print '<td class="nowrap right"><span class="amount">'.price($obj->total_ht).'</span></td>';
252 }
253 print '<td class="nowrap right"><span class="amount">'.price($obj->total_ttc).'</span></td>';
254
255 print '<td class="right" title="'.dol_escape_htmltag($langs->trans("DateModificationShort").' : '.dol_print_date($db->jdate($obj->tms), 'dayhour', 'tzuserrel')).'">'.dol_print_date($db->jdate($obj->tms), 'day', 'tzuserrel').'</td>';
256
257 print '<td>'.$tmpinvoice->getLibStatut(3, $totalallpayments).'</td>';
258
259 print '</tr>';
260
261 $total_ttc += $obj->total_ttc;
262 $total_ht += $obj->total_ht;
263 $totalam += $obj->am;
264
265 $i++;
266 }
267
268 if ($othernb) {
269 print '<tr class="oddeven">';
270 print '<td class="nowrap" colspan="5">';
271 print '<span class="opacitymedium">'.$langs->trans("More").'... ('.$othernb.')</span>';
272 print '</td>';
273 print "</tr>\n";
274 }
275 } else {
276 $colspan = 5;
277 if (getDolGlobalString('MAIN_SHOW_HT_ON_SUMMARY')) {
278 $colspan++;
279 }
280 print '<tr class="oddeven"><td colspan="'.$colspan.'"><span class="opacitymedium">'.$langs->trans("NoInvoice").'</span></td></tr>';
281 }
282 print '</table></div><br>';
283 $db->free($resql);
284 } else {
285 dol_print_error($db);
286 }
287}
288
289
290// Last modified supplier invoices
291if ((isModEnabled('fournisseur') && !getDolGlobalString('MAIN_USE_NEW_SUPPLIERMOD') && $user->hasRight("fournisseur", "facture", "lire")) || (isModEnabled('supplier_invoice') && $user->hasRight("supplier_invoice", "lire"))) {
292 $langs->load("boxes");
293 $facstatic = new FactureFournisseur($db);
294
295 $sql = "SELECT ff.rowid, ff.ref, ff.fk_statut as status, ff.type, ff.libelle, ff.total_ht, ff.total_tva, ff.total_ttc, ff.tms, ff.paye, ff.ref_supplier";
296 $sql .= ", s.nom as name";
297 $sql .= ", s.rowid as socid";
298 $sql .= ", s.code_fournisseur, s.code_compta_fournisseur, s.email";
299 $sql .= ", (SELECT SUM(pf.amount) FROM ".$db->prefix()."paiementfourn_facturefourn as pf WHERE pf.fk_facturefourn = ff.rowid) as am";
300 $sql .= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."facture_fourn as ff";
301 $sql .= " WHERE s.rowid = ff.fk_soc";
302 $sql .= " AND ff.entity IN (".getEntity('facture_fourn').")";
303 if ($socid > 0) {
304 $sql .= " AND ff.fk_soc = ".((int) $socid);
305 }
306 // Filter on sale representative
307 if (empty($user->socid) && !$user->hasRight('societe', 'client', 'voir')) {
308 $sql .= " AND EXISTS (SELECT sc.fk_soc FROM ".MAIN_DB_PREFIX."societe_commerciaux as sc WHERE sc.fk_soc = ff.fk_soc AND sc.fk_user = ".((int) $user->id).")";
309 }
310 // Add where from hooks
311 $parameters = array();
312 $reshook = $hookmanager->executeHooks('printFieldListWhereSupplierLastModified', $parameters);
313 $sql .= $hookmanager->resPrint;
314
315 $sql .= " ORDER BY ff.tms DESC";
316 $sql .= $db->plimit($max, 0);
317
318 $resql = $db->query($sql);
319 if ($resql) {
320 $num = $db->num_rows($resql);
321
322 print '<div class="div-table-responsive-no-min">';
323 print '<table class="noborder centpercent">';
324 print '<tr class="liste_titre"><th colspan="2">'.$langs->trans("BoxTitleLastSupplierBills", $max);
325 print '<a href="'.DOL_URL_ROOT.'/fourn/facture/list.php?sortfield=f.tms&sortorder=desc"><span class="badge marginleftonly">...</span></a>';
326 print '</th>';
327 if (getDolGlobalString('MAIN_SHOW_HT_ON_SUMMARY')) {
328 print '<th class="right">'.$langs->trans("AmountHT").'</th>';
329 }
330 print '<th class="right">'.$langs->trans("AmountTTC").'</th>';
331 print '<th class="right">'.$langs->trans("DateModificationShort").'</th>';
332 print '<th width="16">&nbsp;</th>';
333 print "</tr>\n";
334 if ($num) {
335 $i = 0;
336 $total_ht = $total_ttc = $totalam = 0;
337 $othernb = 0;
338
339 while ($i < $num) {
340 $obj = $db->fetch_object($resql);
341
342 if ($i >= $max) {
343 $othernb += 1;
344 $i++;
345 $total_ht += $obj->total_ht;
346 $total_ttc += $obj->total_ttc;
347 continue;
348 }
349
350 $facstatic->ref = $obj->ref;
351 $facstatic->id = $obj->rowid;
352 $facstatic->total_ht = $obj->total_ht;
353 $facstatic->total_tva = $obj->total_tva;
354 $facstatic->total_ttc = $obj->total_ttc;
355 $facstatic->statut = $obj->status;
356 $facstatic->status = $obj->status;
357 $facstatic->paye = $obj->paye;
358 $facstatic->paid = $obj->paye;
359 $facstatic->type = $obj->type;
360 $facstatic->ref_supplier = $obj->ref_supplier;
361
362 $thirdpartystatic->id = $obj->socid;
363 $thirdpartystatic->name = $obj->name;
364 $thirdpartystatic->email = $obj->email;
365 $thirdpartystatic->country_id = 0;
366 $thirdpartystatic->country_code = '';
367 $thirdpartystatic->client = 0;
368 $thirdpartystatic->fournisseur = 1;
369 $thirdpartystatic->code_client = '';
370 $thirdpartystatic->code_fournisseur = $obj->code_fournisseur;
371 $thirdpartystatic->code_compta_client = '';
372 $thirdpartystatic->code_compta_fournisseur = $obj->code_compta_fournisseur;
373
374 print '<tr class="oddeven nowraponall tdoverflowmax100"><td>';
375 print $facstatic->getNomUrl(1, '');
376 print '</td>';
377 print '<td class="nowrap tdoverflowmax100">';
378 print $thirdpartystatic->getNomUrl(1, 'supplier');
379 print '</td>';
380 if (getDolGlobalString('MAIN_SHOW_HT_ON_SUMMARY')) {
381 print '<td class="right"><span class="amount">'.price($obj->total_ht).'</span></td>';
382 }
383 print '<td class="nowrap right"><span class="amount">'.price($obj->total_ttc).'</span></td>';
384 print '<td class="right" title="'.dol_escape_htmltag($langs->trans("DateModificationShort").' : '.dol_print_date($db->jdate($obj->tms), 'dayhour', 'tzuserrel')).'">'.dol_print_date($db->jdate($obj->tms), 'day', 'tzuserrel').'</td>';
385 $alreadypaid = $facstatic->getSommePaiement();
386 $alreadypaid += $facstatic->getSumCreditNotesUsed();
387 $alreadypaid += $facstatic->getSumDepositsUsed();
388 print '<td>'.$facstatic->getLibStatut(3, $alreadypaid).'</td>';
389 print '</tr>';
390 $total_ht += $obj->total_ht;
391 $total_ttc += $obj->total_ttc;
392 $totalam += $obj->am;
393 $i++;
394 }
395
396 if ($othernb) {
397 print '<tr class="oddeven">';
398 print '<td class="nowrap" colspan="5">';
399 print '<span class="opacitymedium">'.$langs->trans("More").'... ('.$othernb.')</span>';
400 print '</td>';
401 print "</tr>\n";
402 }
403 } else {
404 $colspan = 5;
405 if (getDolGlobalString('MAIN_SHOW_HT_ON_SUMMARY')) {
406 $colspan++;
407 }
408 print '<tr class="oddeven"><td colspan="'.$colspan.'"><span class="opacitymedium">'.$langs->trans("NoInvoice").'</span></td></tr>';
409 }
410 print '</table></div><br>';
411 } else {
412 dol_print_error($db);
413 }
414}
415
416
417
418// Latest donations
419if (isModEnabled('don') && $user->hasRight('don', 'lire')) {
420 include_once DOL_DOCUMENT_ROOT.'/don/class/don.class.php';
421
422 $langs->load("boxes");
423 $donationstatic = new Don($db);
424
425 $sql = "SELECT d.rowid, d.lastname, d.firstname, d.societe, d.datedon as date, d.tms as dm, d.amount, d.fk_statut as status, d.fk_soc as socid";
426 $sql .= " FROM ".MAIN_DB_PREFIX."don as d";
427 $sql .= " WHERE d.entity IN (".getEntity('donation').")";
428 // Add where from hooks
429 $parameters = array();
430 $reshook = $hookmanager->executeHooks('printFieldListWhereLastDonations', $parameters);
431 $sql .= $hookmanager->resPrint;
432
433 $sql .= $db->order("d.tms", "DESC");
434 $sql .= $db->plimit($max, 0);
435
436 $result = $db->query($sql);
437 if ($result) {
438 $num = $db->num_rows($result);
439
440 $i = 0;
441 $othernb = 0;
442
443 print '<div class="div-table-responsive-no-min">';
444 print '<table class="noborder centpercent">';
445 print '<tr class="liste_titre">';
446 print '<th colspan="2">'.$langs->trans("BoxTitleLastModifiedDonations", $max);
447 print '<a href="'.DOL_URL_ROOT.'/don/list.php?sortfield=d.tms&sortorder=desc"><span class="badge marginleftonly">...</span></a>';
448 print '</th>';
449 print '<th class="right">'.$langs->trans("AmountTTC").'</th>';
450 print '<th class="right">'.$langs->trans("DateModificationShort").'</th>';
451 print '<th width="16">&nbsp;</th>';
452 print '</tr>';
453
454 if ($num) {
455 $total_ttc = $totalam = $total_ht = 0;
456
457 while ($i < $num && $i < $max) {
458 $obj = $db->fetch_object($result);
459
460 if ($i >= $max) {
461 $othernb += 1;
462 $i++;
463 $total_ht += $obj->total_ht;
464 $total_ttc += $obj->total_ttc;
465 continue;
466 }
467
468 $donationstatic->id = $obj->rowid;
469 $donationstatic->ref = $obj->rowid;
470 $donationstatic->lastname = $obj->lastname;
471 $donationstatic->firstname = $obj->firstname;
472 $donationstatic->date = $db->jdate($obj->date);
473 $donationstatic->statut = $obj->status;
474 $donationstatic->status = $obj->status;
475
476 $label = '';
477 if (!empty($obj->socid)) {
478 $companystatic = new Societe($db);
479 $ret = $companystatic->fetch($obj->socid);
480 if ($ret > 0) {
481 $label = $companystatic->getNomUrl(1);
482 }
483 } else {
484 $label = $donationstatic->getFullName($langs);
485 if ($obj->societe) {
486 $label .= ($label ? ' - ' : '').$obj->societe;
487 }
488 }
489
490 print '<tr class="oddeven tdoverflowmax100">';
491 print '<td>'.$donationstatic->getNomUrl(1).'</td>';
492 print '<td>'.$label.'</td>';
493 print '<td class="nowrap right"><span class="amount">'.price($obj->amount).'</span></td>';
494 print '<td class="right" title="'.dol_escape_htmltag($langs->trans("DateModificationShort").' : '.dol_print_date($db->jdate($obj->dm), 'dayhour', 'tzuserrel')).'">'.dol_print_date($db->jdate($obj->dm), 'day', 'tzuserrel').'</td>';
495 print '<td>'.$donationstatic->getLibStatut(3).'</td>';
496 print '</tr>';
497
498 $i++;
499 }
500
501 if ($othernb) {
502 print '<tr class="oddeven">';
503 print '<td class="nowrap" colspan="5">';
504 print '<span class="opacitymedium">'.$langs->trans("More").'... ('.$othernb.')</span>';
505 print '</td>';
506 print "</tr>\n";
507 }
508 } else {
509 print '<tr class="oddeven"><td colspan="5"><span class="opacitymedium">'.$langs->trans("None").'</span></td></tr>';
510 }
511 print '</table></div><br>';
512 } else {
513 dol_print_error($db);
514 }
515}
516
520if (isModEnabled('tax') && $user->hasRight('tax', 'charges', 'lire')) {
521 if (!$socid) {
522 $chargestatic = new ChargeSociales($db);
523
524 $sql = "SELECT c.rowid, c.amount, c.date_ech, c.paye,";
525 $sql .= " cc.libelle as label,";
526 $sql .= " SUM(pc.amount) as sumpaid";
527 $sql .= " FROM (".MAIN_DB_PREFIX."c_chargesociales as cc, ".MAIN_DB_PREFIX."chargesociales as c)";
528 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."paiementcharge as pc ON pc.fk_charge = c.rowid";
529 $sql .= " WHERE c.fk_type = cc.id";
530 $sql .= " AND c.entity IN (".getEntity('tax').')';
531 $sql .= " AND c.paye = 0";
532 // Add where from hooks
533 $parameters = array();
534 $reshook = $hookmanager->executeHooks('printFieldListWhereSocialContributions', $parameters);
535 $sql .= $hookmanager->resPrint;
536
537 $sql .= " GROUP BY c.rowid, c.amount, c.date_ech, c.paye, cc.libelle";
538
539 $resql = $db->query($sql);
540 if ($resql) {
541 $num = $db->num_rows($resql);
542
543 print '<div class="div-table-responsive-no-min">';
544 print '<table class="noborder centpercent">';
545 print '<tr class="liste_titre">';
546 print '<th>'.$langs->trans("ContributionsToPay").($num ? '<a href="'.DOL_URL_ROOT.'/compta/sociales/list.php?status=0"><span class="badge marginleftonly">'.$num.'</span></a>' : '').'</th>';
547 print '<th align="center">'.$langs->trans("DateDue").'</th>';
548 print '<th class="right">'.$langs->trans("AmountTTC").'</th>';
549 print '<th class="right">'.$langs->trans("Paid").'</th>';
550 print '<th align="center" width="16">&nbsp;</th>';
551 print '</tr>';
552 if ($num) {
553 $i = 0;
554 $tot_ttc = 0;
555 $tot_paid = 0;
556 $othernb = 0;
557
558 while ($i < $num) {
559 $obj = $db->fetch_object($resql);
560
561 if ($i >= $max) {
562 $othernb += 1;
563 $tot_ttc += $obj->amount;
564 $tot_paid += $obj->sumpaid;
565 $i++;
566 continue;
567 }
568
569 $chargestatic->id = $obj->rowid;
570 $chargestatic->ref = $obj->rowid;
571 $chargestatic->label = $obj->label;
572 $chargestatic->paye = $obj->paye;
573 $chargestatic->status = $obj->paye;
574
575 print '<tr class="oddeven">';
576 print '<td class="nowraponall">'.$chargestatic->getNomUrl(1).'</td>';
577 print '<td class="center">'.dol_print_date($db->jdate($obj->date_ech), 'day').'</td>';
578 print '<td class="nowrap right"><span class="amount">'.price($obj->amount).'</span></td>';
579 print '<td class="nowrap right"><span class="amount">'.price($obj->sumpaid).'</span></td>';
580 print '<td class="center">'.$chargestatic->getLibStatut(3).'</td>';
581 print '</tr>';
582
583 $tot_ttc += $obj->amount;
584 $i++;
585 }
586
587 if ($othernb) {
588 print '<tr class="oddeven">';
589 print '<td class="nowrap" colspan="5">';
590 print '<span class="opacitymedium">'.$langs->trans("More").'... ('.$othernb.')</span>';
591 print '</td>';
592 print "</tr>\n";
593 }
594
595 print '<tr class="liste_total"><td class="left" colspan="2">'.$langs->trans("Total").'</td>';
596 print '<td class="nowrap right">'.price($tot_ttc).'</td>';
597 print '<td class="nowrap right">'.price($tot_paid).'</td>';
598 print '<td class="right">&nbsp;</td>';
599 print '</tr>';
600 } else {
601 print '<tr class="oddeven"><td colspan="5"><span class="opacitymedium">'.$langs->trans("None").'</span></td></tr>';
602 }
603 print "</table></div><br>";
604 $db->free($resql);
605 } else {
606 dol_print_error($db);
607 }
608 }
609}
610
611/*
612 * Customers orders to be billed
613 */
614if (isModEnabled('invoice') && isModEnabled('order') && $user->hasRight("commande", "lire") && !getDolGlobalString('WORKFLOW_DISABLE_CREATE_INVOICE_FROM_ORDER')) {
615 $commandestatic = new Commande($db);
616 $langs->load("orders");
617
618 $sql = "SELECT sum(f.total_ht) as tot_fht, sum(f.total_ttc) as tot_fttc";
619 $sql .= ", s.nom as name, s.email";
620 $sql .= ", s.rowid as socid";
621 $sql .= ", s.code_client, s.code_compta";
622 $sql .= ", c.rowid, c.ref, c.facture, c.fk_statut as status, c.total_ht, c.total_tva, c.total_ttc,";
623 $sql .= " cc.rowid as country_id, cc.code as country_code";
624 $sql .= " FROM ".MAIN_DB_PREFIX."societe as s LEFT JOIN ".MAIN_DB_PREFIX."c_country as cc ON cc.rowid = s.fk_pays";
625 $sql .= ", ".MAIN_DB_PREFIX."commande as c";
626 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."element_element as el ON el.fk_source = c.rowid AND el.sourcetype = 'commande'";
627 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."facture AS f ON el.fk_target = f.rowid AND el.targettype = 'facture'";
628 $sql .= " WHERE c.fk_soc = s.rowid";
629 $sql .= " AND c.entity IN (".getEntity('commande').")";
630 if ($socid) {
631 $sql .= " AND c.fk_soc = ".((int) $socid);
632 }
633 $sql .= " AND c.fk_statut = ".((int) Commande::STATUS_CLOSED);
634 $sql .= " AND c.facture = 0";
635 // Filter on sale representative
636 if (empty($user->socid) && !$user->hasRight('societe', 'client', 'voir')) {
637 $sql .= " AND EXISTS (SELECT sc.fk_soc FROM ".MAIN_DB_PREFIX."societe_commerciaux as sc WHERE sc.fk_soc = c.fk_soc AND sc.fk_user = ".((int) $user->id).")";
638 }
639
640 // Add where from hooks
641 $parameters = array();
642 $reshook = $hookmanager->executeHooks('printFieldListWhereCustomerOrderToBill', $parameters);
643 $sql .= $hookmanager->resPrint;
644
645 $sql .= " GROUP BY s.nom, s.email, s.rowid, s.code_client, s.code_compta, c.rowid, c.ref, c.facture, c.fk_statut, c.total_ht, c.total_tva, c.total_ttc, cc.rowid, cc.code";
646
647 $resql = $db->query($sql);
648 if ($resql) {
649 $num = $db->num_rows($resql);
650
651 if ($num) {
652 $i = 0;
653 $othernb = 0;
654
655 print '<div class="div-table-responsive-no-min">';
656 print '<table class="noborder centpercent">';
657
658 print '<tr class="liste_titre">';
659 print '<th colspan="2">';
660 print $langs->trans("OrdersDeliveredToBill");
661 print '<a href="'.DOL_URL_ROOT.'/commande/list.php?search_status='.Commande::STATUS_CLOSED.'&search_billed=0">';
662 print '<span class="badge marginleftonly">'.$num.'</span>';
663 print '</a>';
664 print '</th>';
665
666 if (getDolGlobalString('MAIN_SHOW_HT_ON_SUMMARY')) {
667 print '<th class="right">'.$langs->trans("AmountHT").'</th>';
668 }
669 print '<th class="right">'.$langs->trans("AmountTTC").'</th>';
670 print '<th class="right">'.$langs->trans("ToBill").'</th>';
671 print '<th align="center" width="16">&nbsp;</th>';
672 print '</tr>';
673
674 $tot_ht = $tot_ttc = $tot_tobill = 0;
675 $societestatic = new Societe($db);
676 while ($i < $num) {
677 $obj = $db->fetch_object($resql);
678
679 if ($i >= $max) {
680 $othernb += 1;
681 $i++;
682 $total_ht += $obj->total_ht;
683 $total_ttc += $obj->total_ttc;
684 continue;
685 }
686
687 $societestatic->id = $obj->socid;
688 $societestatic->name = $obj->name;
689 $societestatic->email = $obj->email;
690 $societestatic->country_id = $obj->country_id;
691 $societestatic->country_code = $obj->country_code;
692 $societestatic->client = 1;
693 $societestatic->code_client = $obj->code_client;
694 //$societestatic->code_fournisseur = $obj->code_fournisseur;
695 $societestatic->code_compta_client = $obj->code_compta;
696 //$societestatic->code_compta_fournisseur = $obj->code_compta_fournisseur;
697
698 $commandestatic->id = $obj->rowid;
699 $commandestatic->ref = $obj->ref;
700 $commandestatic->statut = $obj->status;
701 $commandestatic->billed = $obj->facture;
702
703 print '<tr class="oddeven">';
704 print '<td class="nowrap">';
705
706 print '<table class="nobordernopadding"><tr class="nocellnopadd">';
707 print '<td class="nobordernopadding nowrap">';
708 print $commandestatic->getNomUrl(1);
709 print '</td>';
710 print '<td width="20" class="nobordernopadding nowrap">';
711 print '&nbsp;';
712 print '</td>';
713 print '<td width="16" class="nobordernopadding hideonsmartphone right">';
714 $filename = dol_sanitizeFileName($obj->ref);
715 $filedir = $conf->commande->dir_output.'/'.dol_sanitizeFileName($obj->ref);
716 $urlsource = $_SERVER['PHP_SELF'].'?id='.$obj->rowid;
717 print $formfile->getDocumentsLink($commandestatic->element, $filename, $filedir);
718 print '</td></tr></table>';
719
720 print '</td>';
721
722 print '<td class="nowrap tdoverflowmax100">';
723 print $societestatic->getNomUrl(1, 'customer');
724 print '</td>';
725 if (getDolGlobalString('MAIN_SHOW_HT_ON_SUMMARY')) {
726 print '<td class="right"><span class="amount">'.price($obj->total_ht).'</span></td>';
727 }
728 print '<td class="nowrap right"><span class="amount">'.price($obj->total_ttc).'</span></td>';
729 print '<td class="nowrap right"><span class="amount">'.price($obj->total_ttc - $obj->tot_fttc).'</span></td>';
730 print '<td>'.$commandestatic->getLibStatut(3).'</td>';
731 print '</tr>';
732 $tot_ht += $obj->total_ht;
733 $tot_ttc += $obj->total_ttc;
734 //print "x".$tot_ttc."z".$obj->tot_fttc;
735 $tot_tobill += ($obj->total_ttc - $obj->tot_fttc);
736 $i++;
737 }
738
739 if ($othernb) {
740 print '<tr class="oddeven">';
741 print '<td class="nowrap" colspan="5">';
742 print '<span class="opacitymedium">'.$langs->trans("More").'... ('.$othernb.')</span>';
743 print '</td>';
744 print "</tr>\n";
745 }
746
747 print '<tr class="liste_total"><td colspan="2">'.$langs->trans("Total").' &nbsp; <span style="font-weight: normal">('.$langs->trans("RemainderToBill").': '.price($tot_tobill).')</span> </td>';
748 if (getDolGlobalString('MAIN_SHOW_HT_ON_SUMMARY')) {
749 print '<td class="right">'.price($tot_ht).'</td>';
750 }
751 print '<td class="nowrap right">'.price($tot_ttc).'</td>';
752 print '<td class="nowrap right">'.price($tot_tobill).'</td>';
753 print '<td>&nbsp;</td>';
754 print '</tr>';
755 print '</table></div><br>';
756 }
757 $db->free($resql);
758 } else {
759 dol_print_error($db);
760 }
761}
762
763
764// TODO Mettre ici recup des actions en rapport avec la compta
765$sql = '';
766if ($sql) {
767 print '<div class="div-table-responsive-no-min">';
768 print '<table class="noborder centpercent">';
769 print '<tr class="liste_titre"><th colspan="2">'.$langs->trans("TasksToDo").'</th>';
770 print "</tr>\n";
771 $i = 0;
772 $resql = $db->query($sql);
773 if ($resql) {
774 $num_rows = $db->num_rows($resql);
775 while ($i < $num_rows) {
776 $obj = $db->fetch_object($resql);
777
778 print '<tr class="oddeven"><td>'.dol_print_date($db->jdate($obj->da), "day").'</td>';
779 print '<td><a href="action/card.php">'.$obj->label.'</a></td></tr>';
780 $i++;
781 }
782 $db->free($resql);
783 }
784 print "</table></div><br>";
785}
786
787
788print '</div></div></div>';
789
790$parameters = array('user' => $user);
791$reshook = $hookmanager->executeHooks('dashboardAccountancy', $parameters, $object); // Note that $action and $object may have been modified by hook
792
793// End of page
794llxFooter();
795$db->close();
llxHeader
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
llxFooter()
Empty footer.
Definition wrapper.php:69
ChargeSociales
Class for managing the social charges.
Definition chargesociales.class.php:36
Commande
Class to manage customers orders.
Definition commande.class.php:51
Commande\STATUS_CLOSED
const STATUS_CLOSED
Closed (Sent, billed or not)
Definition commande.class.php:372
Don
Class to manage donations.
Definition don.class.php:41
FactureFournisseur
Class to manage suppliers invoices.
Definition fournisseur.facture.class.php:54
Facture
Class to manage invoices.
Definition facture.class.php:64
FormFile
Class to offer components to list and upload files.
Definition html.formfile.class.php:38
Form
Class to manage generation of HTML components Only common components must be here.
Definition html.form.class.php:56
Societe
Class to manage third parties objects (customers, suppliers, prospects...)
Definition societe.class.php:55
load_fiche_titre
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
Definition functions.lib.php:6240
img_warning
img_warning($titlealt='default', $moreatt='', $morecss='pictowarning')
Show warning logo.
Definition functions.lib.php:5536
GETPOSTINT
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
Definition functions.lib.php:1085
price
price($amount, $form=0, $outlangs='', $trunc=1, $rounding=-1, $forcerounding=-1, $currency_code='')
Function to format a value into an amount for visual output Function used into PDF and HTML pages.
Definition functions.lib.php:6609
dol_now
dol_now($mode='auto')
Return date for now.
Definition functions.lib.php:3661
getDolGlobalInt
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
Definition functions.lib.php:230
dol_print_date
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).
Definition functions.lib.php:3272
GETPOST
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
Definition functions.lib.php:760
dol_sanitizeFileName
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
Definition functions.lib.php:1555
dol_print_error
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
Definition functions.lib.php:5866
getDolGlobalString
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
Definition functions.lib.php:215
getNumberInvoicesPieChart
getNumberInvoicesPieChart($mode)
Return an HTML table that contains a pie chart of the number of customers or supplier invoices.
Definition invoice.lib.php:344
getCustomerInvoiceDraftTable
getCustomerInvoiceDraftTable($maxCount=500, $socid=0)
Return a HTML table that contains a list with customer invoice drafts.
Definition invoice.lib.php:488
getDraftSupplierTable
getDraftSupplierTable($maxCount=500, $socid=0)
Return a HTML table that contains a list with customer invoice drafts.
Definition invoice.lib.php:639
Generated on Wed Mar 5 2025 01:00:27 for dolibarr by Doxygen 1.11.0