dolibarr 18.0.6
index.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2013-2014 Olivier Geffroy <jeff@jeffinfo.com>
3 * Copyright (C) 2013-2014 Florian Henry <florian.henry@open-concept.pro>
4 * Copyright (C) 2013-2016 Alexandre Spangaro <aspangaro@open-dsi.fr>
5 * Copyright (C) 2014 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 */
20
27// Load Dolibarr environment
28require '../../main.inc.php';
29require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
30require_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
31require_once DOL_DOCUMENT_ROOT.'/expensereport/class/expensereport.class.php';
32
33// Load translation files required by the page
34$langs->loadLangs(array("compta", "bills", "other", "accountancy"));
35
36$validatemonth = GETPOST('validatemonth', 'int');
37$validateyear = GETPOST('validateyear', 'int');
38
39$month_start = ($conf->global->SOCIETE_FISCAL_MONTH_START ? ($conf->global->SOCIETE_FISCAL_MONTH_START) : 1);
40if (GETPOST("year", 'int')) {
41 $year_start = GETPOST("year", 'int');
42} else {
43 $year_start = dol_print_date(dol_now(), '%Y');
44 if (dol_print_date(dol_now(), '%m') < $month_start) {
45 $year_start--; // If current month is lower that starting fiscal month, we start last year
46 }
47}
48$year_end = $year_start + 1;
49$month_end = $month_start - 1;
50if ($month_end < 1) {
51 $month_end = 12;
52 $year_end--;
53}
54$search_date_start = dol_mktime(0, 0, 0, $month_start, 1, $year_start);
55$search_date_end = dol_get_last_day($year_end, $month_end);
56$year_current = $year_start;
57
58// Validate History
59$action = GETPOST('action', 'aZ09');
60
61$chartaccountcode = dol_getIdFromCode($db, getDolGlobalInt('CHARTOFACCOUNTS'), 'accounting_system', 'rowid', 'pcg_version');
62
63// Security check
64if (!isModEnabled('accounting')) {
65 accessforbidden();
66}
67if ($user->socid > 0) {
68 accessforbidden();
69}
70if (!$user->hasRight('accounting', 'mouvements', 'lire')) {
71 accessforbidden();
72}
73
74
75/*
76 * Actions
77 */
78
79if (($action == 'clean' || $action == 'validatehistory') && $user->hasRight('accounting', 'bind', 'write')) {
80 // Clean database
81 $db->begin();
82 $sql1 = "UPDATE ".MAIN_DB_PREFIX."expensereport_det as erd";
83 $sql1 .= " SET fk_code_ventilation = 0";
84 $sql1 .= ' WHERE erd.fk_code_ventilation NOT IN';
85 $sql1 .= ' (SELECT accnt.rowid ';
86 $sql1 .= ' FROM '.MAIN_DB_PREFIX.'accounting_account as accnt';
87 $sql1 .= ' INNER JOIN '.MAIN_DB_PREFIX.'accounting_system as syst';
88 $sql1 .= ' ON accnt.fk_pcg_version = syst.pcg_version AND syst.rowid='.((int) getDolGlobalInt('CHARTOFACCOUNTS')).' AND accnt.entity = '.((int) $conf->entity).')';
89 $sql1 .= ' AND erd.fk_expensereport IN (SELECT rowid FROM '.MAIN_DB_PREFIX.'expensereport WHERE entity = '.((int) $conf->entity).')';
90 $sql1 .= ' AND fk_code_ventilation <> 0';
91 dol_syslog("htdocs/accountancy/customer/index.php fixaccountancycode", LOG_DEBUG);
92 $resql1 = $db->query($sql1);
93 if (!$resql1) {
94 $error++;
95 $db->rollback();
96 setEventMessages($db->lasterror(), null, 'errors');
97 } else {
98 $db->commit();
99 }
100 // End clean database
101}
102
103if ($action == 'validatehistory') {
104 $error = 0;
105 $nbbinddone = 0;
106 $nbbindfailed = 0;
107 $notpossible = 0;
108
109 $db->begin();
110
111 // Now make the binding
112 $sql1 = "SELECT erd.rowid, accnt.rowid as suggestedid";
113 $sql1 .= " FROM ".MAIN_DB_PREFIX."expensereport_det as erd";
114 $sql1 .= " LEFT JOIN ".MAIN_DB_PREFIX."c_type_fees as t ON erd.fk_c_type_fees = t.id";
115 $sql1 .= " LEFT JOIN ".MAIN_DB_PREFIX."accounting_account as accnt ON t.accountancy_code = accnt.account_number AND accnt.active = 1 AND accnt.fk_pcg_version = '".$db->escape($chartaccountcode)."' AND accnt.entity =".((int) $conf->entity).",";
116 $sql1 .= " ".MAIN_DB_PREFIX."expensereport as er";
117 $sql1 .= " WHERE erd.fk_expensereport = er.rowid AND er.entity = ".((int) $conf->entity);
118 $sql1 .= " AND er.fk_statut IN (".ExpenseReport::STATUS_APPROVED.", ".ExpenseReport::STATUS_CLOSED.") AND erd.fk_code_ventilation <= 0";
119 if ($validatemonth && $validateyear) {
120 $sql1 .= dolSqlDateFilter('erd.date', 0, $validatemonth, $validateyear);
121 }
122
123 dol_syslog('htdocs/accountancy/expensereport/index.php');
124
125 $result = $db->query($sql1);
126 if (!$result) {
127 $error++;
128 setEventMessages($db->lasterror(), null, 'errors');
129 } else {
130 $num_lines = $db->num_rows($result);
131
132 $i = 0;
133 while ($i < min($num_lines, 10000)) { // No more than 10000 at once
134 $objp = $db->fetch_object($result);
135
136 $lineid = $objp->rowid;
137 $suggestedid = $objp->suggestedid;
138
139 if ($suggestedid > 0) {
140 $sqlupdate = "UPDATE ".MAIN_DB_PREFIX."expensereport_det";
141 $sqlupdate .= " SET fk_code_ventilation = ".((int) $suggestedid);
142 $sqlupdate .= " WHERE fk_code_ventilation <= 0 AND rowid = ".((int) $lineid);
143
144 $resqlupdate = $db->query($sqlupdate);
145 if (!$resqlupdate) {
146 $error++;
147 setEventMessages($db->lasterror(), null, 'errors');
148 $nbbindfailed++;
149 break;
150 } else {
151 $nbbinddone++;
152 }
153 } else {
154 $notpossible++;
155 $nbbindfailed++;
156 }
157
158 $i++;
159 }
160 if ($num_lines > 10000) {
161 $notpossible += ($num_lines - 10000);
162 }
163 }
164
165 if ($error) {
166 $db->rollback();
167 } else {
168 $db->commit();
169 setEventMessages($langs->trans('AutomaticBindingDone', $nbbinddone, $notpossible), null, ($notpossible ? 'warnings' : 'mesgs'));
170 if ($nbbindfailed) {
171 setEventMessages($langs->trans('DoManualBindingForFailedRecord', $nbbindfailed), null, 'warnings');
172 }
173 }
174}
175
176
177/*
178 * View
179 */
180
181llxHeader('', $langs->trans("ExpenseReportsVentilation"));
182
183$textprevyear = '<a href="'.$_SERVER["PHP_SELF"].'?year='.($year_current - 1).'">'.img_previous().'</a>';
184$textnextyear = '&nbsp;<a href="'.$_SERVER["PHP_SELF"].'?year='.($year_current + 1).'">'.img_next().'</a>';
185
186
187print load_fiche_titre($langs->trans("ExpenseReportsVentilation")."&nbsp;".$textprevyear."&nbsp;".$langs->trans("Year")."&nbsp;".$year_start."&nbsp;".$textnextyear, '', 'title_accountancy');
188
189print '<span class="opacitymedium">'.$langs->trans("DescVentilExpenseReport").'</span><br>';
190print '<span class="opacitymedium hideonsmartphone">'.$langs->trans("DescVentilExpenseReportMore", $langs->transnoentitiesnoconv("ValidateHistory"), $langs->transnoentitiesnoconv("ToBind")).'<br>';
191print '</span><br>';
192
193
194$y = $year_current;
195
196$buttonbind = '<a class="butAction smallpaddingimp" href="'.$_SERVER['PHP_SELF'].'?action=validatehistory&token='.newToken().'&year='.$year_current.'">'.img_picto('', 'link', 'class="paddingright fa-color-unset"').$langs->trans("ValidateHistory").'</a>';
197
198
199print_barre_liste(img_picto('', 'unlink', 'class="paddingright fa-color-unset"').$langs->trans("OverviewOfAmountOfLinesNotBound"), '', '', '', '', '', '', -1, '', '', 0, '', '', 0, 1, 1, 0, $buttonbind);
200//print load_fiche_titre($langs->trans("OverviewOfAmountOfLinesNotBound"), $buttonbind, '');
201
202print '<div class="div-table-responsive-no-min">';
203print '<table class="noborder centpercent">';
204print '<tr class="liste_titre"><td class="minwidth100">'.$langs->trans("Account").'</td>';
205print '<td>'.$langs->trans("Label").'</td>';
206for ($i = 1; $i <= 12; $i++) {
207 $j = $i + ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1) - 1;
208 if ($j > 12) {
209 $j -= 12;
210 }
211 $cursormonth = $j;
212 if ($cursormonth > 12) {
213 $cursormonth -= 12;
214 }
215 $cursoryear = ($cursormonth < ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1)) ? $y + 1 : $y;
216 $tmp = dol_getdate(dol_get_last_day($cursoryear, $cursormonth, 'gmt'), false, 'gmt');
217
218 print '<td width="60" class="right">';
219 if (!empty($tmp['mday'])) {
220 $param = 'search_date_startday=1&search_date_startmonth='.$cursormonth.'&search_date_startyear='.$cursoryear;
221 $param .= '&search_date_endday='.$tmp['mday'].'&search_date_endmonth='.$tmp['mon'].'&search_date_endyear='.$tmp['year'];
222 $param .= '&search_month='.$tmp['mon'].'&search_year='.$tmp['year'];
223 print '<a href="'.DOL_URL_ROOT.'/accountancy/expensereport/list.php?'.$param.'">';
224 }
225 print $langs->trans('MonthShort'.str_pad($j, 2, '0', STR_PAD_LEFT));
226 if (!empty($tmp['mday'])) {
227 print '</a>';
228 }
229 print '</td>';
230}
231print '<td width="60" class="right"><b>'.$langs->trans("Total").'</b></td></tr>';
232
233$sql = "SELECT ".$db->ifsql('aa.account_number IS NULL', "'tobind'", 'aa.account_number')." AS codecomptable,";
234$sql .= " ".$db->ifsql('aa.label IS NULL', "'tobind'", 'aa.label')." AS intitule,";
235for ($i = 1; $i <= 12; $i++) {
236 $j = $i + ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1) - 1;
237 if ($j > 12) {
238 $j -= 12;
239 }
240 $sql .= " SUM(".$db->ifsql("MONTH(er.date_debut)=".$j, "erd.total_ht", "0").") AS month".str_pad($j, 2, "0", STR_PAD_LEFT).",";
241}
242$sql .= " SUM(erd.total_ht) as total";
243$sql .= " FROM ".MAIN_DB_PREFIX."expensereport_det as erd";
244$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."expensereport as er ON er.rowid = erd.fk_expensereport";
245$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."accounting_account as aa ON aa.rowid = erd.fk_code_ventilation";
246$sql .= " WHERE er.date_debut >= '".$db->idate($search_date_start)."'";
247$sql .= " AND er.date_debut <= '".$db->idate($search_date_end)."'";
248// Define begin binding date
249if (!empty($conf->global->ACCOUNTING_DATE_START_BINDING)) {
250 $sql .= " AND er.date_debut >= '".$db->idate($conf->global->ACCOUNTING_DATE_START_BINDING)."'";
251}
252$sql .= " AND er.fk_statut IN (".ExpenseReport::STATUS_APPROVED.", ".ExpenseReport::STATUS_CLOSED.")";
253$sql .= " AND er.entity IN (".getEntity('expensereport', 0).")"; // We don't share object for accountancy
254$sql .= " AND aa.account_number IS NULL";
255$sql .= " GROUP BY erd.fk_code_ventilation,aa.account_number,aa.label";
256$sql .= ' ORDER BY aa.account_number';
257
258dol_syslog('/accountancy/expensereport/index.php', LOG_DEBUG);
259$resql = $db->query($sql);
260if ($resql) {
261 $num = $db->num_rows($resql);
262
263 while ($row = $db->fetch_row($resql)) {
264 print '<tr class="oddeven">';
265 print '<td>';
266 if ($row[0] == 'tobind') {
267 print '<span class="opacitymedium">'.$langs->trans("Unknown").'</span>';
268 } else {
269 print length_accountg($row[0]);
270 }
271 print '</td>';
272 print '<td>';
273 if ($row[0] == 'tobind') {
274 $startmonth = ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1);
275 if ($startmonth > 12) {
276 $startmonth -= 12;
277 }
278 $startyear = ($startmonth < ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1)) ? $y + 1 : $y;
279 $endmonth = ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1) + 11;
280 if ($endmonth > 12) {
281 $endmonth -= 12;
282 }
283 $endyear = ($endmonth < ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1)) ? $y + 1 : $y;
284 print $langs->trans("UseMenuToSetBindindManualy", DOL_URL_ROOT.'/accountancy/expensereport/list.php?search_date_startday=1&search_date_startmonth='.((int) $startmonth).'&search_date_startyear='.((int) $startyear).'&search_date_endday=&search_date_endmonth='.((int) $endmonth).'&search_date_endyear='.((int) $endyear), $langs->transnoentitiesnoconv("ToBind"));
285 } else {
286 print $row[1];
287 }
288 print '</td>';
289 for ($i = 2; $i <= 13; $i++) {
290 $cursormonth = (($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1) + $i - 2);
291 if ($cursormonth > 12) {
292 $cursormonth -= 12;
293 }
294 $cursoryear = ($cursormonth < ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1)) ? $y + 1 : $y;
295 $tmp = dol_getdate(dol_get_last_day($cursoryear, $cursormonth, 'gmt'), false, 'gmt');
296
297 print '<td class="right nowraponall amount">';
298 print price($row[$i]);
299 // Add link to make binding
300 if (!empty(price2num($row[$i]))) {
301 print '<a href="'.$_SERVER['PHP_SELF'].'?action=validatehistory&year='.$y.'&validatemonth='.((int) $cursormonth).'&validateyear='.((int) $cursoryear).'&token='.newToken().'">';
302 print img_picto($langs->trans("ValidateHistory").' ('.$langs->trans('Month'.str_pad($cursormonth, 2, '0', STR_PAD_LEFT)).' '.$cursoryear.')', 'link', 'class="marginleft2"');
303 print '</a>';
304 }
305 print '</td>';
306 }
307 print '<td class="right nowraponall amount"><b>'.price($row[14]).'</b></td>';
308 print '</tr>';
309 }
310 $db->free($resql);
311
312 if ($num == 0) {
313 print '<tr class="oddeven"><td colspan="16">';
314 print '<span class="opacitymedium">'.$langs->trans("NoRecordFound").'</span>';
315 print '</td></tr>';
316 }
317} else {
318 print $db->lasterror(); // Show last sql error
319}
320print "</table>\n";
321print '</div>';
322
323
324print '<br>';
325
326
327print_barre_liste(img_picto('', 'link', 'class="paddingright fa-color-unset"').$langs->trans("OverviewOfAmountOfLinesBound"), '', '', '', '', '', '', -1, '', '', 0, '', '', 0, 1, 1);
328//print load_fiche_titre($langs->trans("OverviewOfAmountOfLinesBound"), '', '');
329
330
331print '<div class="div-table-responsive-no-min">';
332print '<table class="noborder centpercent">';
333print '<tr class="liste_titre"><td class="minwidth100">'.$langs->trans("Account").'</td>';
334print '<td>'.$langs->trans("Label").'</td>';
335for ($i = 1; $i <= 12; $i++) {
336 $j = $i + ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1) - 1;
337 if ($j > 12) {
338 $j -= 12;
339 }
340 print '<td width="60" class="right">'.$langs->trans('MonthShort'.str_pad($j, 2, '0', STR_PAD_LEFT)).'</td>';
341}
342print '<td width="60" class="right"><b>'.$langs->trans("Total").'</b></td></tr>';
343
344$sql = "SELECT ".$db->ifsql('aa.account_number IS NULL', "'tobind'", 'aa.account_number')." AS codecomptable,";
345$sql .= " ".$db->ifsql('aa.label IS NULL', "'tobind'", 'aa.label')." AS intitule,";
346for ($i = 1; $i <= 12; $i++) {
347 $j = $i + ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1) - 1;
348 if ($j > 12) {
349 $j -= 12;
350 }
351 $sql .= " SUM(".$db->ifsql("MONTH(er.date_debut)=".$j, "erd.total_ht", "0").") AS month".str_pad($j, 2, "0", STR_PAD_LEFT).",";
352}
353$sql .= " ROUND(SUM(erd.total_ht),2) as total";
354$sql .= " FROM ".MAIN_DB_PREFIX."expensereport_det as erd";
355$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."expensereport as er ON er.rowid = erd.fk_expensereport";
356$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."accounting_account as aa ON aa.rowid = erd.fk_code_ventilation";
357$sql .= " WHERE er.date_debut >= '".$db->idate($search_date_start)."'";
358$sql .= " AND er.date_debut <= '".$db->idate($search_date_end)."'";
359// Define begin binding date
360if (!empty($conf->global->ACCOUNTING_DATE_START_BINDING)) {
361 $sql .= " AND er.date_debut >= '".$db->idate($conf->global->ACCOUNTING_DATE_START_BINDING)."'";
362}
363$sql .= " AND er.fk_statut IN (".ExpenseReport::STATUS_APPROVED.", ".ExpenseReport::STATUS_CLOSED.")";
364$sql .= " AND er.entity IN (".getEntity('expensereport', 0).")"; // We don't share object for accountancy
365$sql .= " AND aa.account_number IS NOT NULL";
366$sql .= " GROUP BY erd.fk_code_ventilation,aa.account_number,aa.label";
367
368dol_syslog('htdocs/accountancy/expensereport/index.php');
369$resql = $db->query($sql);
370if ($resql) {
371 $num = $db->num_rows($resql);
372
373 while ($row = $db->fetch_row($resql)) {
374 print '<tr class="oddeven">';
375 print '<td>';
376 if ($row[0] == 'tobind') {
377 print '<span class="opacitymedium">'.$langs->trans("Unknown").'</span>';
378 } else {
379 print length_accountg($row[0]);
380 }
381 print '</td>';
382
383 print '<td>';
384 if ($row[0] == 'tobind') {
385 print $langs->trans("UseMenuToSetBindindManualy", DOL_URL_ROOT.'/accountancy/expensereport/list.php?search_year='.((int) $y), $langs->transnoentitiesnoconv("ToBind"));
386 } else {
387 print $row[1];
388 }
389 print '</td>';
390 for ($i = 2; $i <= 13; $i++) {
391 print '<td class="right nowraponall amount">';
392 print price($row[$i]);
393 print '</td>';
394 }
395 print '<td class="right nowraponall amount"><b>'.price($row[14]).'</b></td>';
396 print '</tr>';
397 }
398 $db->free($resql);
399
400 if ($num == 0) {
401 print '<tr class="oddeven"><td colspan="16">';
402 print '<span class="opacitymedium">'.$langs->trans("NoRecordFound").'</span>';
403 print '</td></tr>';
404 }
405} else {
406 print $db->lasterror(); // Show last sql error
407}
408print "</table>\n";
409print '</div>';
410
411
412
413if (getDolGlobalString('SHOW_TOTAL_OF_PREVIOUS_LISTS_IN_LIN_PAGE')) { // This part of code looks strange. Why showing a report that should rely on result of this step ?
414 print '<br>';
415 print '<br>';
416
417 print_barre_liste($langs->trans("OtherInfo"), '', '', '', '', '', '', -1, '', '', 0, '', '', 0, 1, 1);
418 //print load_fiche_titre($langs->trans("OtherInfo"), '', '');
419
420 print '<div class="div-table-responsive-no-min">';
421 print '<table class="noborder centpercent">';
422 print '<tr class="liste_titre"><td class="left">'.$langs->trans("Total").'</td>';
423 for ($i = 1; $i <= 12; $i++) {
424 $j = $i + ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1) - 1;
425 if ($j > 12) {
426 $j -= 12;
427 }
428 print '<td width="60" class="right">'.$langs->trans('MonthShort'.str_pad($j, 2, '0', STR_PAD_LEFT)).'</td>';
429 }
430 print '<td width="60" class="right"><b>'.$langs->trans("Total").'</b></td></tr>';
431
432 $sql = "SELECT '".$db->escape($langs->trans("TotalExpenseReport"))."' AS label,";
433 for ($i = 1; $i <= 12; $i++) {
434 $j = $i + ($conf->global->SOCIETE_FISCAL_MONTH_START ? $conf->global->SOCIETE_FISCAL_MONTH_START : 1) - 1;
435 if ($j > 12) {
436 $j -= 12;
437 }
438 $sql .= " SUM(".$db->ifsql("MONTH(er.date_create)=".$j, "erd.total_ht", "0").") AS month".str_pad($j, 2, "0", STR_PAD_LEFT).",";
439 }
440 $sql .= " SUM(erd.total_ht) as total";
441 $sql .= " FROM ".MAIN_DB_PREFIX."expensereport_det as erd";
442 $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."expensereport as er ON er.rowid = erd.fk_expensereport";
443 $sql .= " WHERE er.date_debut >= '".$db->idate($search_date_start)."'";
444 $sql .= " AND er.date_debut <= '".$db->idate($search_date_end)."'";
445 // Define begin binding date
446 if (!empty($conf->global->ACCOUNTING_DATE_START_BINDING)) {
447 $sql .= " AND er.date_debut >= '".$db->idate($conf->global->ACCOUNTING_DATE_START_BINDING)."'";
448 }
449 $sql .= " AND er.fk_statut IN (".ExpenseReport::STATUS_APPROVED.", ".ExpenseReport::STATUS_CLOSED.")";
450 $sql .= " AND er.entity IN (".getEntity('expensereport', 0).")"; // We don't share object for accountancy
451
452 dol_syslog('htdocs/accountancy/expensereport/index.php');
453 $resql = $db->query($sql);
454 if ($resql) {
455 $num = $db->num_rows($resql);
456
457 while ($row = $db->fetch_row($resql)) {
458 print '<tr><td>'.$row[0].'</td>';
459 for ($i = 1; $i <= 12; $i++) {
460 print '<td class="right nowraponall amount">'.price($row[$i]).'</td>';
461 }
462 print '<td class="right nowraponall amount"><b>'.price($row[13]).'</b></td>';
463 print '</tr>';
464 }
465
466 $db->free($resql);
467 } else {
468 print $db->lasterror(); // Show last sql error
469 }
470 print "</table>\n";
471 print '</div>';
472}
473
474// End of page
475llxFooter();
476$db->close();
length_accountg
length_accountg($account)
Return General accounting account with defined length (used for product and miscellaneous)
Definition accounting.lib.php:94
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:56
llxFooter
llxFooter()
Empty footer.
Definition wrapper.php:70
ExpenseReport\STATUS_CLOSED
const STATUS_CLOSED
Classified paid.
Definition expensereport.class.php:213
dolSqlDateFilter
dolSqlDateFilter($datefield, $day_date, $month_date, $year_date, $excludefirstand=0, $gm=false)
Generate a SQL string to make a filter into a range (for second of date until last second of date).
Definition date.lib.php:361
dol_get_last_day
dol_get_last_day($year, $month=12, $gm=false)
Return GMT time for last day of a month or year.
Definition date.lib.php:597
dol_mktime
dol_mktime($hour, $minute, $second, $month, $day, $year, $gm='auto', $check=1)
Return a timestamp date built from detailed informations (by default a local PHP server timestamp) Re...
Definition functions.lib.php:3024
load_fiche_titre
load_fiche_titre($titre, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
Definition functions.lib.php:5535
price2num
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
Definition functions.lib.php:6014
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:5887
dol_print_date
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs='', $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
Definition functions.lib.php:2731
dol_now
dol_now($mode='auto')
Return date for now.
Definition functions.lib.php:3112
getDolGlobalInt
getDolGlobalInt($key, $default=0)
Return dolibarr global constant int value.
Definition functions.lib.php:156
img_picto
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
Definition functions.lib.php:4191
dol_getIdFromCode
dol_getIdFromCode($db, $key, $tablename, $fieldkey='code', $fieldid='id', $entityfilter=0, $filters='')
Return an id or code from a code or id.
Definition functions.lib.php:9155
img_previous
img_previous($titlealt='default', $moreatt='')
Show previous logo.
Definition functions.lib.php:4895
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:614
setEventMessages
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
Definition functions.lib.php:8737
print_barre_liste
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.
Definition functions.lib.php:5588
img_next
img_next($titlealt='default', $moreatt='')
Show next logo.
Definition functions.lib.php:4876
getDolGlobalString
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
Definition functions.lib.php:142
dol_syslog
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
Definition functions.lib.php:1788
dol_getdate
dol_getdate($timestamp, $fast=false, $forcetimezone='')
Return an array with locale date info.
Definition functions.lib.php:2981
accessforbidden
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.
Definition security.lib.php:1185
Generated on Sat Nov 2 2024 01:00:29 for dolibarr by Doxygen 1.11.0