dolibarr  13.0.2
index.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2001-2003 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3  * Copyright (C) 2004-2016 Laurent Destailleur <eldy@users.sourceforge.net>
4  * Copyright (C) 2005-2010 Regis Houssin <regis.houssin@inodbox.com>
5  * Copyright (C) 2011-2016 Alexandre Spangaro <aspangaro@open-dsi.fr>
6  * Copyright (C) 2011-2014 Juanjo Menent <jmenent@2byte.es>
7  * Copyright (C) 2015 Jean-François Ferry <jfefe@aternatik.fr>
8  * Copyright (C) 2019 Nicolas ZABOURI <info@inovea-conseil.com>
9  *
10  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 3 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program. If not, see <https://www.gnu.org/licenses/>.
22  */
23 
30 require '../../main.inc.php';
31 require_once DOL_DOCUMENT_ROOT.'/compta/tva/class/tva.class.php';
32 require_once DOL_DOCUMENT_ROOT.'/compta/sociales/class/chargesociales.class.php';
33 require_once DOL_DOCUMENT_ROOT.'/compta/sociales/class/paymentsocialcontribution.class.php';
34 require_once DOL_DOCUMENT_ROOT.'/salaries/class/paymentsalary.class.php';
35 require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
36 require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
37 
38 
39 $hookmanager = new HookManager($db);
40 
41 // Initialize technical object to manage hooks. Note that conf->hooks_modules contains array
42 $hookmanager->initHooks(array('specialexpensesindex'));
43 
44 // Load translation files required by the page
45 $langs->loadLangs(array('compta', 'bills'));
46 
47 // Security check
48 if ($user->socid) $socid = $user->socid;
49 $result = restrictedArea($user, 'tax|salaries', '', '', 'charges|');
50 
51 $mode = GETPOST("mode", 'alpha');
52 $year = GETPOST("year", 'int');
53 $filtre = GETPOST("filtre", 'alpha');
54 if (!$year) { $year = date("Y", time()); }
55 
56 $search_account = GETPOST('search_account', 'int');
57 
58 $limit = GETPOST('limit', 'int') ?GETPOST('limit', 'int') : $conf->liste_limit;
59 $sortfield = GETPOST("sortfield", 'alpha');
60 $sortorder = GETPOST("sortorder", 'alpha');
61 $page = GETPOSTISSET('pageplusone') ? (GETPOST('pageplusone') - 1) : GETPOST("page", 'int');
62 if (empty($page) || $page == -1) { $page = 0; } // If $page is not defined, or '' or -1
63 $offset = $limit * $page;
64 $pageprev = $page - 1;
65 $pagenext = $page + 1;
66 if (!$sortfield) $sortfield = "cs.date_ech";
67 if (!$sortorder) $sortorder = "DESC";
68 
69 
70 /*
71  * View
72  */
73 
74 $tva_static = new Tva($db);
75 $socialcontrib = new ChargeSociales($db);
76 $payment_sc_static = new PaymentSocialContribution($db);
77 $sal_static = new PaymentSalary($db);
78 $accountstatic = new Account($db);
79 
80 llxHeader('', $langs->trans("SpecialExpensesArea"));
81 
82 $title = $langs->trans("SpecialExpensesArea");
83 
84 $param = '';
85 if (!empty($contextpage) && $contextpage != $_SERVER["PHP_SELF"]) $param .= '&contextpage='.$contextpage;
86 if ($limit > 0 && $limit != $conf->liste_limit) $param .= '&limit='.$limit;
87 if ($sortfield) $param .= '&sortfield='.$sortfield;
88 if ($sortorder) $param .= '&sortorder='.$sortorder;
89 
90 $totalnboflines = 0;
91 $num = 0;
92 
93 print '<form method="POST" action="'.$_SERVER["PHP_SELF"].'">';
94 if ($optioncss != '') print '<input type="hidden" name="optioncss" value="'.$optioncss.'">';
95 print '<input type="hidden" name="token" value="'.newToken().'">';
96 print '<input type="hidden" name="formfilteraction" id="formfilteraction" value="list">';
97 print '<input type="hidden" name="sortfield" value="'.$sortfield.'">';
98 print '<input type="hidden" name="sortorder" value="'.$sortorder.'">';
99 print '<input type="hidden" name="page" value="'.$page.'">';
100 print '<input type="hidden" name="mode" value="'.$mode.'">';
101 
102 $nav = ($year ? '<a href="index.php?year='.($year - 1).$param.'">'.img_previous($langs->trans("Previous"), 'class="valignbottom"')."</a> ".$langs->trans("Year").' '.$year.' <a href="index.php?year='.($year + 1).$param.'">'.img_next($langs->trans("Next"), 'class="valignbottom"')."</a>" : "");
103 print_barre_liste($title, $page, $_SERVER["PHP_SELF"], $param, $sortfield, $sortorder, '', $num, $totalnboflines, 'object_payment', 0, $nav, '', $limit, 1);
104 
105 if ($year) $param .= '&year='.$year;
106 
107 print '<span class="opacitymedium">'.$langs->trans("DescTaxAndDividendsArea").'</span><br>';
108 print "<br>";
109 
110 if (!empty($conf->tax->enabled) && $user->rights->tax->charges->lire)
111 {
112  // Social contributions only
113  print load_fiche_titre($langs->trans("SocialContributionsPayments").($year ? ' ('.$langs->trans("Year").' '.$year.')' : ''), '', '');
114 
115  print '<table class="noborder centpercent">';
116  print '<tr class="liste_titre">';
117  print_liste_field_titre("PeriodEndDate", $_SERVER["PHP_SELF"], "cs.date_ech", "", $param, 'width="140px"', $sortfield, $sortorder);
118  print_liste_field_titre("Label", $_SERVER["PHP_SELF"], "c.libelle", "", $param, '', $sortfield, $sortorder);
119  print_liste_field_titre("Type", $_SERVER["PHP_SELF"], "cs.fk_type", "", $param, '', $sortfield, $sortorder);
120  print_liste_field_titre("ExpectedToPay", $_SERVER["PHP_SELF"], "cs.amount", "", $param, 'class="right"', $sortfield, $sortorder);
121  print_liste_field_titre("RefPayment", $_SERVER["PHP_SELF"], "pc.rowid", "", $param, '', $sortfield, $sortorder);
122  print_liste_field_titre("DatePayment", $_SERVER["PHP_SELF"], "pc.datep", "", $param, 'align="center"', $sortfield, $sortorder);
123  print_liste_field_titre("Type", $_SERVER["PHP_SELF"], "pct.code", "", $param, '', $sortfield, $sortorder);
124  if (!empty($conf->banque->enabled)) print_liste_field_titre("Account", $_SERVER["PHP_SELF"], "ba.label", "", $param, "", $sortfield, $sortorder);
125  print_liste_field_titre("PayedByThisPayment", $_SERVER["PHP_SELF"], "pc.amount", "", $param, 'class="right"', $sortfield, $sortorder);
126  print "</tr>\n";
127 
128  $sql = "SELECT c.id, c.libelle as label,";
129  $sql .= " cs.rowid, cs.libelle, cs.fk_type as type, cs.periode, cs.date_ech, cs.amount as total,";
130  $sql .= " pc.rowid as pid, pc.datep, pc.amount as totalpaye, pc.num_paiement as num_payment, pc.fk_bank,";
131  $sql .= " pct.code as payment_code,";
132  $sql .= " ba.rowid as bid, ba.ref as bref, ba.number as bnumber, ba.account_number, ba.fk_accountancy_journal, ba.label as blabel";
133  $sql .= " FROM ".MAIN_DB_PREFIX."c_chargesociales as c,";
134  $sql .= " ".MAIN_DB_PREFIX."chargesociales as cs";
135  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."paiementcharge as pc ON pc.fk_charge = cs.rowid";
136  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_paiement as pct ON pc.fk_typepaiement = pct.id";
137  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."bank as b ON pc.fk_bank = b.rowid";
138  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."bank_account as ba ON b.fk_account = ba.rowid";
139  $sql .= " WHERE cs.fk_type = c.id";
140  $sql .= " AND cs.entity IN (".getEntity("tax").")";
141  if ($year > 0)
142  {
143  $sql .= " AND (";
144  // Si period renseignee on l'utilise comme critere de date, sinon on prend date echeance,
145  // ceci afin d'etre compatible avec les cas ou la periode n'etait pas obligatoire
146  $sql .= " (cs.periode IS NOT NULL AND cs.periode between '".$db->idate(dol_get_first_day($year))."' AND '".$db->idate(dol_get_last_day($year))."')";
147  $sql .= " OR (cs.periode IS NULL AND cs.date_ech between '".$db->idate(dol_get_first_day($year))."' AND '".$db->idate(dol_get_last_day($year))."')";
148  $sql .= ")";
149  }
150  if (preg_match('/^cs\./', $sortfield) || preg_match('/^c\./', $sortfield) || preg_match('/^pc\./', $sortfield) || preg_match('/^pct\./', $sortfield)) $sql .= $db->order($sortfield, $sortorder);
151  //$sql.= $db->plimit($limit+1,$offset);
152  //print $sql;
153 
154  dol_syslog("compta/charges/index.php: select payment", LOG_DEBUG);
155  $resql = $db->query($sql);
156  if ($resql)
157  {
158  $num = $db->num_rows($resql);
159  $i = 0;
160  $total = 0;
161  $totalnb = 0;
162  $totalpaye = 0;
163 
164  while ($i < min($num, $limit))
165  {
166  $obj = $db->fetch_object($resql);
167  print '<tr class="oddeven">';
168  // Date
169  $date = $obj->periode;
170  if (empty($date)) $date = $obj->date_ech;
171  print '<td>'.dol_print_date($date, 'day').'</td>';
172  // Label
173  print '<td>';
174  $socialcontrib->id = $obj->rowid;
175  $socialcontrib->ref = $obj->label;
176  $socialcontrib->label = $obj->label;
177  print $socialcontrib->getNomUrl(1, '20');
178  print '</td>';
179  // Type
180  print '<td><a href="../sociales/list.php?filtre=cs.fk_type:'.$obj->type.'">'.$obj->label.'</a></td>';
181  // Expected to pay
182  print '<td class="right">'.price($obj->total).'</td>';
183  // Ref payment
184  $payment_sc_static->id = $obj->pid;
185  $payment_sc_static->ref = $obj->pid;
186  print '<td>'.$payment_sc_static->getNomUrl(1)."</td>\n";
187  // Date payment
188  print '<td class="center">'.dol_print_date($db->jdate($obj->datep), 'day').'</td>';
189  // Type payment
190  print '<td>';
191  if ($obj->payment_code) print $langs->trans("PaymentTypeShort".$obj->payment_code).' ';
192  print $obj->num_payment.'</td>';
193  // Account
194  if (!empty($conf->banque->enabled))
195  {
196  print '<td>';
197  if ($obj->fk_bank > 0)
198  {
199  //$accountstatic->fetch($obj->fk_bank);
200  $accountstatic->id = $obj->bid;
201  $accountstatic->ref = $obj->bref;
202  $accountstatic->number = $obj->bnumber;
203  $accountstatic->accountancy_number = $obj->account_number;
204  $accountstatic->accountancy_journal = $obj->accountancy_journal;
205  $accountstatic->label = $obj->blabel;
206  print $accountstatic->getNomUrl(1);
207  } else print '&nbsp;';
208  print '</td>';
209  }
210  // Paid
211  print '<td class="right">';
212  if ($obj->totalpaye) print price($obj->totalpaye);
213  print '</td>';
214  print '</tr>';
215 
216  $total = $total + $obj->total;
217  $totalnb = $totalnb + $obj->nb;
218  $totalpaye = $totalpaye + $obj->totalpaye;
219  $i++;
220  }
221  print '<tr class="liste_total"><td colspan="3" class="liste_total">'.$langs->trans("Total").'</td>';
222  print '<td class="liste_total right"></td>'; // A total here has no sense
223  print '<td align="center" class="liste_total">&nbsp;</td>';
224  print '<td align="center" class="liste_total">&nbsp;</td>';
225  print '<td align="center" class="liste_total">&nbsp;</td>';
226  if (!empty($conf->banque->enabled)) print '<td></td>';
227  print '<td class="liste_total right">'.price($totalpaye)."</td>";
228  print "</tr>";
229  } else {
230  dol_print_error($db);
231  }
232  print '</table>';
233 }
234 
235 // VAT
236 if (!empty($conf->tax->enabled) && $user->rights->tax->charges->lire)
237 {
238  print "<br>";
239 
240  $tva = new Tva($db);
241 
242  print load_fiche_titre($langs->trans("VATPayments").($year ? ' ('.$langs->trans("Year").' '.$year.')' : ''), '', '');
243 
244  $sql = "SELECT pv.rowid, pv.amount, pv.label, pv.datev as dm, pv.fk_bank,";
245  $sql .= " pct.code as payment_code,";
246  $sql .= " ba.rowid as bid, ba.ref as bref, ba.number as bnumber, ba.account_number, ba.fk_accountancy_journal, ba.label as blabel";
247  $sql .= " FROM ".MAIN_DB_PREFIX."tva as pv";
248  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."bank as b ON pv.fk_bank = b.rowid";
249  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."bank_account as ba ON b.fk_account = ba.rowid";
250  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_paiement as pct ON pv.fk_typepayment = pct.id";
251  $sql .= " WHERE pv.entity IN (".getEntity("tax").")";
252  if ($year > 0)
253  {
254  // Si period renseignee on l'utilise comme critere de date, sinon on prend date echeance,
255  // ceci afin d'etre compatible avec les cas ou la periode n'etait pas obligatoire
256  $sql .= " AND pv.datev between '".$db->idate(dol_get_first_day($year, 1, false))."' AND '".$db->idate(dol_get_last_day($year, 12, false))."'";
257  }
258  if (preg_match('/^pv\./', $sortfield)) $sql .= $db->order($sortfield, $sortorder);
259 
260  $result = $db->query($sql);
261  if ($result)
262  {
263  $num = $db->num_rows($result);
264  $i = 0;
265  $total = 0;
266  print '<table class="noborder centpercent">';
267  print '<tr class="liste_titre">';
268  print_liste_field_titre("PeriodEndDate", $_SERVER["PHP_SELF"], "pv.datev", "", $param, 'width="140px"', $sortfield, $sortorder);
269  print_liste_field_titre("Label", $_SERVER["PHP_SELF"], "pv.label", "", $param, '', $sortfield, $sortorder);
270  print_liste_field_titre("ExpectedToPay", $_SERVER["PHP_SELF"], "pv.amount", "", $param, 'class="right"', $sortfield, $sortorder);
271  print_liste_field_titre("RefPayment", $_SERVER["PHP_SELF"], "pv.rowid", "", $param, '', $sortfield, $sortorder);
272  print_liste_field_titre("DatePayment", $_SERVER["PHP_SELF"], "pv.datev", "", $param, 'align="center"', $sortfield, $sortorder);
273  print_liste_field_titre("Type", $_SERVER["PHP_SELF"], "pct.code", "", $param, '', $sortfield, $sortorder);
274  if (!empty($conf->banque->enabled)) print_liste_field_titre("Account", $_SERVER["PHP_SELF"], "ba.label", "", $param, "", $sortfield, $sortorder);
275  print_liste_field_titre("PayedByThisPayment", $_SERVER["PHP_SELF"], "pv.amount", "", $param, 'class="right"', $sortfield, $sortorder);
276  print "</tr>\n";
277  $var = 1;
278  while ($i < $num)
279  {
280  $obj = $db->fetch_object($result);
281 
282  $total = $total + $obj->amount;
283 
284 
285  print '<tr class="oddeven">';
286  print '<td class="left">'.dol_print_date($db->jdate($obj->dm), 'day').'</td>'."\n";
287 
288  print "<td>".$obj->label."</td>\n";
289 
290  print '<td class="right">'.price($obj->amount)."</td>";
291 
292  // Ref payment
293  $tva_static->id = $obj->rowid;
294  $tva_static->ref = $obj->rowid;
295  print '<td class="left">'.$tva_static->getNomUrl(1)."</td>\n";
296 
297  // Date
298  print '<td class="center">'.dol_print_date($db->jdate($obj->dm), 'day')."</td>\n";
299 
300  // Type payment
301  print '<td>';
302  if ($obj->payment_code) print $langs->trans("PaymentTypeShort".$obj->payment_code).' ';
303  print $obj->num_payment.'</td>';
304 
305  // Account
306  if (!empty($conf->banque->enabled))
307  {
308  print '<td>';
309  if ($obj->fk_bank > 0)
310  {
311  //$accountstatic->fetch($obj->fk_bank);
312  $accountstatic->id = $obj->bid;
313  $accountstatic->ref = $obj->bref;
314  $accountstatic->number = $obj->bnumber;
315  $accountstatic->accountancy_number = $obj->account_number;
316  $accountstatic->accountancy_journal = $obj->accountancy_journal;
317  $accountstatic->label = $obj->blabel;
318  print $accountstatic->getNomUrl(1);
319  } else print '&nbsp;';
320  print '</td>';
321  }
322 
323  // Paid
324  print '<td class="right">'.price($obj->amount)."</td>";
325  print "</tr>\n";
326 
327  $i++;
328  }
329  print '<tr class="liste_total"><td colspan="2">'.$langs->trans("Total").'</td>';
330  print '<td class="right">'.price($total).'</td>';
331  print '<td>&nbsp;</td>';
332  print '<td>&nbsp;</td>';
333  print '<td>&nbsp;</td>';
334  print '<td>&nbsp;</td>';
335  print '<td class="right">'.price($total)."</td>";
336  print "</tr>";
337 
338  print "</table>";
339  $db->free($result);
340  } else {
341  dol_print_error($db);
342  }
343 }
344 
345 // Localtax
346 if ($mysoc->localtax1_assuj == "1" && $mysoc->localtax2_assuj == "1")
347 {
348  $j = 1;
349  $numlt = 3;
350 } elseif ($mysoc->localtax1_assuj == "1")
351 {
352  $j = 1;
353  $numlt = 2;
354 } elseif ($mysoc->localtax2_assuj == "1")
355 {
356  $j = 2;
357  $numlt = 3;
358 } else {
359  $j = 0;
360  $numlt = 0;
361 }
362 
363 while ($j < $numlt)
364 {
365  print "<br>";
366 
367  $tva = new Tva($db);
368 
369  print load_fiche_titre($langs->transcountry(($j == 1 ? "LT1Payments" : "LT2Payments"), $mysoc->country_code).($year ? ' ('.$langs->trans("Year").' '.$year.')' : ''), '', '');
370 
371 
372  $sql = "SELECT pv.rowid, pv.amount, pv.label, pv.datev as dm, pv.datep as dp";
373  $sql .= " FROM ".MAIN_DB_PREFIX."localtax as pv";
374  $sql .= " WHERE pv.entity = ".$conf->entity." AND localtaxtype = ".$j;
375  if ($year > 0)
376  {
377  // Si period renseignee on l'utilise comme critere de date, sinon on prend date echeance,
378  // ceci afin d'etre compatible avec les cas ou la periode n'etait pas obligatoire
379  $sql .= " AND pv.datev between '".$db->idate(dol_get_first_day($year, 1, false))."' AND '".$db->idate(dol_get_last_day($year, 12, false))."'";
380  }
381  if (preg_match('/^pv/', $sortfield)) $sql .= $db->order($sortfield, $sortorder);
382 
383  $result = $db->query($sql);
384  if ($result)
385  {
386  $num = $db->num_rows($result);
387  $i = 0;
388  $total = 0;
389  print '<table class="noborder centpercent">';
390  print '<tr class="liste_titre">';
391  print_liste_field_titre("PeriodEndDate", $_SERVER["PHP_SELF"], "pv.datev", "", $param, 'width="120"', $sortfield, $sortorder);
392  print_liste_field_titre("Label", $_SERVER["PHP_SELF"], "pv.label", "", $param, '', $sortfield, $sortorder);
393  print_liste_field_titre("ExpectedToPay", $_SERVER["PHP_SELF"], "pv.amount", "", $param, 'class="right"', $sortfield, $sortorder);
394  print_liste_field_titre("RefPayment", $_SERVER["PHP_SELF"], "pv.rowid", "", $param, '', $sortfield, $sortorder);
395  print_liste_field_titre("DatePayment", $_SERVER["PHP_SELF"], "pv.datep", "", $param, 'align="center"', $sortfield, $sortorder);
396  print_liste_field_titre("PayedByThisPayment", $_SERVER["PHP_SELF"], "pv.amount", "", $param, 'class="right"', $sortfield, $sortorder);
397  print "</tr>\n";
398 
399  while ($i < $num)
400  {
401  $obj = $db->fetch_object($result);
402 
403  $total = $total + $obj->amount;
404 
405  print '<tr class="oddeven">';
406  print '<td class="left">'.dol_print_date($db->jdate($obj->dm), 'day').'</td>'."\n";
407 
408  print "<td>".$obj->label."</td>\n";
409 
410  print '<td class="right">'.price($obj->amount)."</td>";
411 
412  // Ref payment
413  $tva_static->id = $obj->rowid;
414  $tva_static->ref = $obj->rowid;
415  print '<td class="left">'.$tva_static->getNomUrl(1)."</td>\n";
416 
417  print '<td class="center">'.dol_print_date($db->jdate($obj->dp), 'day')."</td>\n";
418  print '<td class="right">'.price($obj->amount)."</td>";
419  print "</tr>\n";
420 
421  $i++;
422  }
423  print '<tr class="liste_total"><td class="right" colspan="2">'.$langs->trans("Total").'</td>';
424  print '<td class="right">'.price($total)."</td>";
425  print '<td align="center">&nbsp;</td>';
426  print '<td align="center">&nbsp;</td>';
427  print '<td class="right">'.price($total)."</td>";
428  print "</tr>";
429 
430  print "</table>";
431  $db->free($result);
432  } else {
433  dol_print_error($db);
434  }
435 
436  $j++;
437 }
438 
439 
440 // Payment Salary
441 /*
442 if (!empty($conf->salaries->enabled) && !empty($user->rights->salaries->read))
443 {
444  $sal = new PaymentSalary($db);
445 
446  print "<br>";
447 
448  print load_fiche_titre($langs->trans("SalariesPayments").($year ? ' ('.$langs->trans("Year").' '.$year.')' : ''), '', '');
449 
450  $sql = "SELECT s.rowid, s.amount, s.label, s.datep as datep, s.datev as datev, s.datesp, s.dateep, s.salary, s.fk_bank, u.salary as current_salary,";
451  $sql .= " pct.code as payment_code,";
452  $sql .= " ba.rowid as bid, ba.ref as bref, ba.number as bnumber, ba.account_number, ba.fk_accountancy_journal, ba.label as blabel";
453  $sql .= " FROM ".MAIN_DB_PREFIX."payment_salary as s";
454  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."bank as b ON s.fk_bank = b.rowid";
455  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."bank_account as ba ON b.fk_account = ba.rowid";
456  $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_paiement as pct ON s.fk_typepayment = pct.id";
457  $sql .= " , ".MAIN_DB_PREFIX."user as u";
458  $sql .= " WHERE s.entity IN (".getEntity('user').")";
459  $sql .= " AND u.rowid = s.fk_user";
460  if ($year > 0)
461  {
462  $sql .= " AND (s.datesp between '".$db->idate(dol_get_first_day($year, 1, false))."' AND '".$db->idate(dol_get_last_day($year, 12, false))."'";
463  $sql .= " OR s.dateep between '".$db->idate(dol_get_first_day($year, 1, false))."' AND '".$db->idate(dol_get_last_day($year, 12, false))."')";
464  }
465  if (preg_match('/^s\./', $sortfield)) $sql .= $db->order($sortfield, $sortorder);
466 
467  $result = $db->query($sql);
468  if ($result)
469  {
470  $num = $db->num_rows($result);
471  $i = 0;
472  $total = 0;
473  print '<table class="noborder centpercent">';
474  print '<tr class="liste_titre">';
475  print_liste_field_titre("PeriodEndDate", $_SERVER["PHP_SELF"], "s.dateep", "", $param, 'width="140px"', $sortfield, $sortorder);
476  print_liste_field_titre("Label", $_SERVER["PHP_SELF"], "s.label", "", $param, '', $sortfield, $sortorder);
477  print_liste_field_titre("RefPayment", $_SERVER["PHP_SELF"], "s.rowid", "", $param, '', $sortfield, $sortorder);
478  print_liste_field_titre("DatePayment", $_SERVER["PHP_SELF"], "s.datep", "", $param, 'align="center"', $sortfield, $sortorder);
479  print_liste_field_titre("Type", $_SERVER["PHP_SELF"], "pct.code", "", $param, '', $sortfield, $sortorder);
480  if (!empty($conf->banque->enabled)) print_liste_field_titre("Account", $_SERVER["PHP_SELF"], "ba.label", "", $param, "", $sortfield, $sortorder);
481  print_liste_field_titre("PayedByThisPayment", $_SERVER["PHP_SELF"], "s.amount", "", $param, 'class="right"', $sortfield, $sortorder);
482  print "</tr>\n";
483 
484  while ($i < $num)
485  {
486  $obj = $db->fetch_object($result);
487 
488  $total = $total + $obj->amount;
489 
490 
491  print '<tr class="oddeven">';
492 
493  print '<td class="left">'.dol_print_date($db->jdate($obj->dateep), 'day').'</td>'."\n";
494 
495  print "<td>".$obj->label."</td>\n";
496 
497  // Ref payment
498  $sal_static->id = $obj->rowid;
499  $sal_static->ref = $obj->rowid;
500  print '<td class="left">'.$sal_static->getNomUrl(1)."</td>\n";
501 
502  // Date
503  print '<td class="center">'.dol_print_date($db->jdate($obj->datep), 'day')."</td>\n";
504 
505  // Type payment
506  print '<td>';
507  if ($obj->payment_code) print $langs->trans("PaymentTypeShort".$obj->payment_code).' ';
508  print $obj->num_payment.'</td>';
509 
510  // Account
511  if (!empty($conf->banque->enabled))
512  {
513  print '<td>';
514  if ($obj->fk_bank > 0)
515  {
516  //$accountstatic->fetch($obj->fk_bank);
517  $accountstatic->id = $obj->bid;
518  $accountstatic->ref = $obj->bref;
519  $accountstatic->number = $obj->bnumber;
520  $accountstatic->accountancy_number = $obj->account_number;
521  $accountstatic->accountancy_journal = $obj->accountancy_journal;
522  $accountstatic->label = $obj->blabel;
523  print $accountstatic->getNomUrl(1);
524  } else print '&nbsp;';
525  print '</td>';
526  }
527 
528  // Paid
529  print '<td class="right">'.price($obj->amount)."</td>";
530  print "</tr>\n";
531 
532  $i++;
533  }
534  print '<tr class="liste_total"><td colspan="6">'.$langs->trans("Total").'</td>';
535  print '<td class="right">'.price($total)."</td>";
536  print "</tr>";
537 
538  print "</table>";
539  $db->free($result);
540 
541  print "<br>";
542  } else {
543  dol_print_error($db);
544  }
545 }
546 */
547 
548 print '</form>';
549 
550 $parameters = array('user' => $user);
551 $reshook = $hookmanager->executeHooks('dashboardSpecialBills', $parameters, $object); // Note that $action and $object may have been modified by hook
552 
553 // End of page
554 llxFooter();
555 $db->close();
GETPOST($paramname, $check= 'alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
Class to manage salary payments.
Class to manage payments of social contributions.
dol_get_first_day($year, $month=1, $gm=false)
Return GMT time for first day of a month or year.
Definition: date.lib.php:481
Class to manage bank accounts.
Put here description of your class.
Definition: tva.class.php:34
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...
llxHeader()
Empty header.
Definition: wrapper.php:45
Class to manage hooks.
print_barre_liste($titre, $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.
GETPOSTISSET($paramname)
Return true if we are in a context of submitting the parameter $paramname.
print_liste_field_titre($name, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
load_fiche_titre($titre, $morehtmlright= '', $picto= 'generic', $pictoisfullpath=0, $id= '', $morecssontable= '', $morehtmlcenter= '')
Load a title with picto.
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename= '', $restricttologhandler= '', $logcontext=null)
Write log message into outputs.
restrictedArea($user, $features, $objectid=0, $tableandshare= '', $feature2= '', $dbt_keyfield= 'fk_soc', $dbt_select= 'rowid', $isdraft=0)
Check permissions of a user to show a page and an object.
print $_SERVER["PHP_SELF"]
Edit parameters.
img_next($titlealt= 'default', $moreatt= '')
Show next logo.
dol_get_last_day($year, $month=12, $gm=false)
Return GMT time for last day of a month or year.
Definition: date.lib.php:498
print
Draft customers invoices.
Definition: index.php:89
img_previous($titlealt= 'default', $moreatt= '')
Show previous logo.
if(!empty($conf->facture->enabled)&&$user->rights->facture->lire) if((!empty($conf->fournisseur->enabled)&&empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD)||!empty($conf->supplier_invoice->enabled))&&$user->rights->fournisseur->facture->lire) if(!empty($conf->don->enabled)&&$user->rights->don->lire) if(!empty($conf->tax->enabled)&&$user->rights->tax->charges->lire) if(!empty($conf->facture->enabled)&&!empty($conf->commande->enabled)&&$user->rights->commande->lire &&empty($conf->global->WORKFLOW_DISABLE_CREATE_INVOICE_FROM_ORDER)) if(!empty($conf->facture->enabled)&&$user->rights->facture->lire) if((!empty($conf->fournisseur->enabled)&&empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD)||!empty($conf->supplier_invoice->enabled))&&$user->rights->fournisseur->facture->lire) $resql
Social contributions to pay.
Definition: index.php:1232
dol_print_error($db= '', $error= '', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
llxFooter()
Empty footer.
Definition: wrapper.php:59
Classe permettant la gestion des paiements des charges La tva collectee n&#39;est calculee que sur les fa...