dolibarr 21.0.0-beta
report.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2001-2002 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3 * Copyright (C) 2004-2020 Laurent Destailleur <eldy@users.sourceforge.net>
4 * Copyright (C) 2005-2010 Regis Houssin <regis.houssin@capnetworks.com>
5 * Copyright (C) 2012 Vinícius Nogueira <viniciusvgn@gmail.com>
6 * Copyright (C) 2014 Florian Henry <florian.henry@open-cooncept.pro>
7 * Copyright (C) 2015 Jean-François Ferry <jfefe@aternatik.fr>
8 * Copyright (C) 2016 Juanjo Menent <jmenent@2byte.es>
9 * Copyright (C) 2017 Alexandre Spangaro <aspangaro@open-dsi.fr>
10 * Copyright (C) 2018 Andreu Bisquerra <jove@bisquerra.com>
11 * Copyright (C) 2024 MDW <mdeweerd@users.noreply.github.com>
12 * Copyright (C) 2024 Frédéric France <frederic.france@free.fr>
13 *
14 * This program is free software; you can redistribute it and/or modify
15 * it under the terms of the GNU General Public License as published by
16 * the Free Software Foundation; either version 3 of the License, or
17 * (at your option) any later version.
18 *
19 * This program is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 * GNU General Public License for more details.
23 *
24 * You should have received a copy of the GNU General Public License
25 * along with this program. If not, see <https://www.gnu.org/licenses/>.
26 */
27
34if (!defined('NOREQUIREMENU')) {
35 define('NOREQUIREMENU', '1'); // If there is no need to load and show top and left menu
36}
37if (!defined('NOBROWSERNOTIF')) {
38 define('NOBROWSERNOTIF', '1'); // Disable browser notification
39}
40
41$optioncss = "print";
42
43// Load Dolibarr environment
44require '../../main.inc.php';
45require_once DOL_DOCUMENT_ROOT.'/compta/cashcontrol/class/cashcontrol.class.php';
46require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
47require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
48require_once DOL_DOCUMENT_ROOT.'/compta/cashcontrol/class/cashcontrol.class.php';
49require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
50
51
61$langs->loadLangs(array("bills", "banks"));
62
63$id = GETPOSTINT('id');
64$summaryonly = GETPOSTINT('summaryonly'); // May be used for ticket Z
65
66$object = new CashControl($db);
67$object->fetch($id);
68
69//$limit = GETPOST('limit')?GETPOST('limit', 'int'):$conf->liste_limit;
70$sortorder = 'ASC';
71$sortfield = 'b.datev,b.dateo,b.rowid';
72
73$arrayfields = array(
74 'b.rowid' => array('label' => $langs->trans("Ref"), 'checked' => 1),
75 'b.dateo' => array('label' => $langs->trans("DateOperationShort"), 'checked' => 1),
76 'b.num_chq' => array('label' => $langs->trans("Number"), 'checked' => 1),
77 'ba.ref' => array('label' => $langs->trans("BankAccount"), 'checked' => 1),
78 'cp.code' => array('label' => $langs->trans("PaymentMode"), 'checked' => 1),
79 'b.debit' => array('label' => $langs->trans("Debit"), 'checked' => 1, 'position' => 600),
80 'b.credit' => array('label' => $langs->trans("Credit"), 'checked' => 1, 'position' => 605),
81);
82
83$syear = $object->year_close;
84$smonth = $object->month_close;
85$sday = $object->day_close;
86
87$posmodule = $object->posmodule;
88$terminalid = $object->posnumber;
89
90// Security check
91if ($user->socid > 0) { // Protection if external user
92 //$socid = $user->socid;
94}
95if (!$user->hasRight('cashdesk', 'run') && !$user->hasRight('takepos', 'run')) {
97}
98
99
100/*
101 * View
102 */
103
104$title = $langs->trans("CashControl");
105$param = '';
106
107$conf->dol_hide_topmenu = 1;
108$conf->dol_hide_leftmenu = 1;
109
110llxHeader('', $title, '', '', 0, 0, array(), array(), $param);
111
112print '<!-- Begin div id-container --><div id="id-container" class="id-container center">';
113
114/*$sql = "SELECT b.rowid, b.dateo as do, b.datev as dv, b.amount, b.label, b.rappro as conciliated, b.num_releve, b.num_chq,";
115$sql.= " b.fk_account, b.fk_type,";
116$sql.= " ba.rowid as bankid, ba.ref as bankref,";
117$sql.= " bu.url_id,";
118$sql.= " f.module_source, f.ref as ref";
119$sql.= " FROM ";
120//if ($bid) $sql.= MAIN_DB_PREFIX."category_bankline as l,";
121$sql.= " ".MAIN_DB_PREFIX."bank_account as ba,";
122$sql.= " ".MAIN_DB_PREFIX."bank as b";
123$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."bank_url as bu ON bu.fk_bank = b.rowid AND type = 'payment'";
124$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."facture as f ON bu.url_id = f.rowid";
125$sql.= " WHERE b.fk_account = ba.rowid";
126// Define filter on invoice
127$sql.= " AND f.module_source = '".$db->escape($object->posmodule)."'";
128$sql.= " AND f.pos_source = '".$db->escape($object->posnumber)."'";
129$sql.= " AND f.entity IN (".getEntity('facture').")";
130// Define filter on data
131if ($syear && ! $smonth) $sql.= " AND dateo BETWEEN '".$db->idate(dol_get_first_day($syear, 1))."' AND '".$db->idate(dol_get_last_day($syear, 12))."'";
132elseif ($syear && $smonth && ! $sday) $sql.= " AND dateo BETWEEN '".$db->idate(dol_get_first_day($syear, $smonth))."' AND '".$db->idate(dol_get_last_day($syear, $smonth))."'";
133elseif ($syear && $smonth && $sday) $sql.= " AND dateo BETWEEN '".$db->idate(dol_mktime(0, 0, 0, $smonth, $sday, $syear))."' AND '".$db->idate(dol_mktime(23, 59, 59, $smonth, $sday, $syear))."'";
134else dol_print_error(null, 'Year not defined');
135// Define filter on bank account
136$sql.=" AND (b.fk_account = ".((int) $conf->global->CASHDESK_ID_BANKACCOUNT_CASH);
137$sql.=" OR b.fk_account = ".((int) $conf->global->CASHDESK_ID_BANKACCOUNT_CB);
138$sql.=" OR b.fk_account = ".((int) $conf->global->CASHDESK_ID_BANKACCOUNT_CHEQUE);
139$sql.=")";
140*/
141$sql = "SELECT f.rowid as facid, f.ref, f.datef as do, pf.amount as amount, b.fk_account as bankid, cp.code";
142$sql .= " FROM ".MAIN_DB_PREFIX."paiement_facture as pf, ".MAIN_DB_PREFIX."facture as f, ".MAIN_DB_PREFIX."paiement as p, ".MAIN_DB_PREFIX."c_paiement as cp, ".MAIN_DB_PREFIX."bank as b";
143$sql .= " WHERE pf.fk_facture = f.rowid AND p.rowid = pf.fk_paiement AND cp.id = p.fk_paiement AND p.fk_bank = b.rowid";
144$sql .= " AND f.module_source = '".$db->escape($posmodule)."'";
145$sql .= " AND f.pos_source = '".$db->escape($terminalid)."'";
146//$sql .= " AND f.paye = 1";
147$sql .= " AND p.entity = ".$conf->entity; // Never share entities for features related to accountancy
148/*if ($key == 'cash') $sql.=" AND cp.code = 'LIQ'";
149elseif ($key == 'cheque') $sql.=" AND cp.code = 'CHQ'";
150elseif ($key == 'card') $sql.=" AND cp.code = 'CB'";
151else
152{
153 dol_print_error(null, 'Value for key = '.$key.' not supported');
154 exit;
155}*/
156if ($syear && !$smonth) {
157 $sql .= " AND datef BETWEEN '".$db->idate(dol_get_first_day($syear, 1))."' AND '".$db->idate(dol_get_last_day($syear, 12))."'";
158} elseif ($syear && $smonth && !$sday) {
159 $sql .= " AND datef BETWEEN '".$db->idate(dol_get_first_day($syear, $smonth))."' AND '".$db->idate(dol_get_last_day($syear, $smonth))."'";
160} elseif ($syear && $smonth && $sday) {
161 $sql .= " AND datef BETWEEN '".$db->idate(dol_mktime(0, 0, 0, $smonth, $sday, $syear))."' AND '".$db->idate(dol_mktime(23, 59, 59, $smonth, $sday, $syear))."'";
162} else {
163 dol_print_error(null, 'Year not defined');
164}
165
166$resql = $db->query($sql);
167if ($resql) {
168 $num = $db->num_rows($resql);
169 $i = 0;
170
171 print "<!-- title of cash fence -->\n";
172 print '<center>';
173 print '<h2>';
174
175 $nameterminal = getDolGlobalString("TAKEPOS_TERMINAL_NAME_".$object->posnumber);
176 print $langs->trans("CashControl")." #".$object->id.(($nameterminal != "TAKEPOS_TERMINAL_NAME_".$object->posnumber) ? '<br>'.$nameterminal : '');
177 if ($object->status == $object::STATUS_DRAFT) {
178 print '<br><span class="opacitymedium small">('.$langs->trans("Draft").")</span>";
179 }
180 print "</h2>";
181 print $mysoc->name;
182 print '<br>'.$langs->trans("DateCreationShort").": ".dol_print_date($object->date_creation, 'dayhour');
183 $userauthor = $object->fk_user_valid;
184 if (empty($userauthor)) {
185 $userauthor = $object->fk_user_creat;
186 }
187
188 $uservalid = new User($db);
189 if ($userauthor > 0) {
190 $uservalid->fetch($userauthor);
191 print '<br>'.$langs->trans("Author").': '.$uservalid->getFullName($langs);
192 }
193 print '<br>'.$langs->trans("Period").': '.$object->year_close.($object->month_close ? '-'.$object->month_close : '').($object->day_close ? '-'.$object->day_close : '');
194 print '</center>';
195
196 $invoicetmp = new Facture($db);
197
198 if (!$summaryonly) {
199 print "<div style='text-align: right'><h2>";
200 print $langs->trans("InitialBankBalance").' - '.$langs->trans("Cash").' : <div class="inline-block amount width100">'.price($object->opening).'</div>';
201 print "</h2></div>";
202 } else {
203 print '<br>';
204 }
205
206 $param = '';
207
208 if (!$summaryonly) {
209 print '<div class="div-table-responsive">';
210 print '<table class="tagtable liste">'."\n";
211
212 // Fields title
213 print '<tr class="liste_titre">';
214 print_liste_field_titre($arrayfields['b.rowid']['label'], $_SERVER['PHP_SELF'], 'b.rowid', '', $param, '', $sortfield, $sortorder);
215 print_liste_field_titre($arrayfields['b.dateo']['label'], $_SERVER['PHP_SELF'], 'b.dateo', '', $param, '"', $sortfield, $sortorder, 'center ');
216 print_liste_field_titre($arrayfields['ba.ref']['label'], $_SERVER['PHP_SELF'], 'ba.ref', '', $param, '', $sortfield, $sortorder, 'right ');
217 print_liste_field_titre($arrayfields['cp.code']['label'], $_SERVER['PHP_SELF'], 'cp.code', '', $param, '', $sortfield, $sortorder, 'right ');
218 print_liste_field_titre($arrayfields['b.debit']['label'], $_SERVER['PHP_SELF'], 'b.amount', '', $param, '', $sortfield, $sortorder, 'right ');
219 print_liste_field_titre($arrayfields['b.credit']['label'], $_SERVER['PHP_SELF'], 'b.amount', '', $param, '', $sortfield, $sortorder, 'right ');
220 print "</tr>\n";
221 }
222
223 // Loop on each record
224 $cash = $bank = $cheque = $other = 0;
225
226 $totalqty = 0;
227 $totalvat = 0;
228 $totalvatperrate = array();
229 $totallocaltax1 = 0;
230 $totallocaltax2 = 0;
231 $cachebankaccount = array();
232 $cacheinvoiceid = array();
233 $transactionspertype = array();
234 $amountpertype = array();
235
236 $totalarray = array('nbfield' => 0, 'pos' => array());
237 while ($i < $num) {
238 $objp = $db->fetch_object($resql);
239
240 // Load bankaccount
241 if (empty($cachebankaccount[$objp->bankid])) {
242 $bankaccounttmp = new Account($db);
243 $bankaccounttmp->fetch($objp->bankid);
244 $cachebankaccount[$objp->bankid] = $bankaccounttmp;
245 $bankaccount = $bankaccounttmp;
246 } else {
247 $bankaccount = $cachebankaccount[$objp->bankid];
248 }
249
250 $invoicetmp->fetch($objp->facid);
251
252 if (empty($cacheinvoiceid[$objp->facid])) {
253 $cacheinvoiceid[$objp->facid] = $objp->facid; // First time this invoice is found into list of invoice x payments
254 foreach ($invoicetmp->lines as $line) {
255 $totalqty += $line->qty;
256 $totalvat += $line->total_tva;
257 if ($line->tva_tx) {
258 if (empty($totalvatperrate[$line->tva_tx])) {
259 $totalvatperrate[$line->tva_tx] = 0;
260 }
261 $totalvatperrate[$line->tva_tx] += $line->total_tva;
262 }
263 $totallocaltax1 += $line->total_localtax1;
264 $totallocaltax2 += $line->total_localtax2;
265 }
266 }
267
268 if ($object->posmodule == "takepos") {
269 $var1 = 'CASHDESK_ID_BANKACCOUNT_CASH'.$object->posnumber;
270 } else {
271 $var1 = 'CASHDESK_ID_BANKACCOUNT_CASH';
272 }
273
274 if ($objp->code == 'CHQ') {
275 $cheque += $objp->amount;
276 if (empty($transactionspertype[$objp->code])) {
277 $transactionspertype[$objp->code] = 0;
278 }
279 $transactionspertype[$objp->code] += 1;
280 } elseif ($objp->code == 'CB') {
281 $bank += $objp->amount;
282 if (empty($transactionspertype[$objp->code])) {
283 $transactionspertype[$objp->code] = 0;
284 }
285 $transactionspertype[$objp->code] += 1;
286 } else {
287 if (getDolGlobalString($var1) == $bankaccount->id) {
288 $cash += $objp->amount;
289 // } elseif (getDolGlobalString($var2) == $bankaccount->id) $bank+=$objp->amount;
290 //elseif (getDolGlobalString($var3) == $bankaccount->id) $cheque+=$objp->amount;
291 if (empty($transactionspertype['CASH'])) {
292 $transactionspertype['CASH'] = 0;
293 }
294 $transactionspertype['CASH'] += 1;
295 } else {
296 $other += $objp->amount;
297 if (empty($transactionspertype['OTHER'])) {
298 $transactionspertype['OTHER'] = 0;
299 }
300 $transactionspertype['OTHER'] += 1;
301 }
302 }
303
304 if (empty($amountpertype[$objp->code])) {
305 $amountpertype[$objp->code] = 0;
306 }
307
308 if ($objp->amount < 0) {
309 $amountpertype[$objp->code] += $objp->amount;
310 }
311 if ($objp->amount > 0) {
312 $amountpertype[$objp->code] -= $objp->amount;
313 }
314
315 if (!$summaryonly) {
316 print '<tr class="oddeven">';
317
318 // Ref
319 print '<td class="nowrap left">';
320 print $invoicetmp->getNomUrl(1);
321 print '</td>';
322 if (!$i) {
323 $totalarray['nbfield']++;
324 }
325
326 // Date ope
327 print '<td class="nowrap left">';
328 print '<span id="dateoperation_'.$objp->rowid.'">'.dol_print_date($db->jdate($objp->do), "day")."</span>";
329 print "</td>\n";
330 if (!$i) {
331 $totalarray['nbfield']++;
332 }
333
334 // Bank account
335 print '<td class="nowrap right">';
336 print $bankaccount->getNomUrl(1);
337 print "</td>\n";
338 if (!$i) {
339 $totalarray['nbfield']++;
340 }
341
342 // Type
343 print '<td class="right">';
344 print $objp->code;
345 print "</td>\n";
346 if (!$i) {
347 $totalarray['nbfield']++;
348 }
349
350 // Debit
351 print '<td class="right">';
352 if ($objp->amount < 0) {
353 print '<span class="amount">'.price($objp->amount * -1).'</span>';
354 $totalarray['val']['totaldebfield'] += $objp->amount;
355 }
356 print "</td>\n";
357 if (!$i) {
358 $totalarray['nbfield']++;
359 }
360 if (!$i) {
361 $totalarray['pos'][$totalarray['nbfield']] = 'totaldebfield';
362 }
363
364 // Credit
365 print '<td class="right">';
366 if ($objp->amount > 0) {
367 print '<span class="amount">'.price($objp->amount).'</span>';
368 $totalarray['val']['totalcredfield'] += $objp->amount;
369 }
370 print "</td>\n";
371 if (!$i) {
372 $totalarray['nbfield']++;
373 }
374 if (!$i) {
375 $totalarray['pos'][$totalarray['nbfield']] = 'totalcredfield';
376 }
377
378 print "</tr>";
379 }
380
381 $i++;
382 }
383
384 if (!$summaryonly) {
385 // Show total line
386 include DOL_DOCUMENT_ROOT.'/core/tpl/list_print_total.tpl.php';
387
388 print "</table>";
389 print "</div>";
390 }
391
392 //$cash = $amountpertype['LIQ'] + $object->opening;
393 $newcash = price2num($cash + (float) $object->opening, 'MT');
394
395 print '<div style="text-align: right">';
396 print '<h2>';
397
398 print $langs->trans("Cash").(!empty($transactionspertype['CASH']) ? ' ('.$transactionspertype['CASH'].' '.$langs->trans("Articles").')' : '').' : ';
399 if (!$summaryonly) {
400 print '<div class="inline-block amount width100">'.($cash >= 0 ? '+' : '').price($cash).'</div>';
401 print '<div class="inline-block amount width100">'.price($newcash).'</div>';
402 } else {
403 print '<div class="inline-block amount width100"></div>';
404 print '<div class="inline-block amount width100">'.price($cash).'</div>';
405 }
406 if (!$summaryonly && $object->status == $object::STATUS_VALIDATED && $newcash != $object->cash) {
407 print ' <div class="inline-block amountremaintopay fontsizeunset small"><> '.$langs->trans("Declared").': '.price($object->cash).'</div>';
408 }
409 print "<br>";
410
411 //print '<br>';
412 print $langs->trans("PaymentTypeCHQ").(!empty($transactionspertype['CHQ']) ? ' ('.$transactionspertype['CHQ'].' '.$langs->trans("Articles").')' : '').' : ';
413 print '<div class="inline-block amount width100"></div>';
414 print '<div class="inline-block amount width100">'.price($cheque).'</div>';
415 if (!$summaryonly && $object->status == $object::STATUS_VALIDATED && $cheque != $object->cheque) {
416 print ' <div class="inline-block amountremaintopay fontsizeunset small"><> '.$langs->trans("Declared").' : '.price($object->cheque).'</div>';
417 }
418 print "<br>";
419
420 //print '<br>';
421 print $langs->trans("PaymentTypeCB").(!empty($transactionspertype['CB']) ? ' ('.$transactionspertype['CB'].' '.$langs->trans("Articles").')' : '').' : ';
422 print '<div class="inline-block amount width100"></div>';
423 print '<div class="inline-block amount width100">'.price($bank).'</div>';
424 if (!$summaryonly && $object->status == $object::STATUS_VALIDATED && $bank != $object->card) {
425 print ' <div class="inline-block amountremaintopay fontsizeunset small"><> '.$langs->trans("Declared").': '.price($object->card).'</div>';
426 }
427 print "<br>";
428
429 // print '<br>';
430 if ($other) {
431 print ''.$langs->trans("Other").(!empty($transactionspertype['OTHER']) ? ' ('.$transactionspertype['OTHER'].' '.$langs->trans("Articles").')' : '').' : ';
432 print '<div class="inline-block amount width100"></div>';
433 print '<div class="inline-block amount width100">'.price($other)."</div>";
434 print '<br>';
435 }
436
437 print "<br>";
438
439 print $langs->trans("Total").' ('.$totalqty.' '.$langs->trans("Articles").') : <div class="inline-block amount width100"></div><div class="inline-block amount width100">'.price((float) $cash + (float) $cheque + (float) $bank + (float) $other).'</div>';
440
441 print '<br>'.$langs->trans("TotalVAT").' : <div class="inline-block amount width100"></div><div class="inline-block amount width100">'.price($totalvat).'</div>';
442
443 if ($mysoc->useLocalTax(1)) {
444 print '<br>'.$langs->trans("TotalLT1").' : <div class="inline-block amount width100"></div><div class="inline-block amount width100">'.price($totallocaltax1).'</div>';
445 }
446 if ($mysoc->useLocalTax(1)) {
447 print '<br>'.$langs->trans("TotalLT2").' : <div class="inline-block amount width100"></div><div class="inline-block amount width100">'.price($totallocaltax2).'</div>';
448 }
449
450 if (!empty($totalvatperrate) && is_array($totalvatperrate)) {
451 print '<br><br><div class="small inline-block">'.$langs->trans("VATRate").'</div>';
452 foreach ($totalvatperrate as $keyrate => $valuerate) {
453 print '<br><div class="small">'.$langs->trans("VATRate").' '.vatrate($keyrate, 1).' : <div class="inline-block amount width100"></div><div class="inline-block amount width100">'.price($valuerate).'</div></div>';
454 }
455 }
456
457 print '</h2>';
458 print '</div>';
459
460 print '</form>';
461
462 $db->free($resql);
463} else {
464 dol_print_error($db);
465}
466
467print '</div>';
468
469llxFooter();
470
471$db->close();
$id
Definition account.php:48
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:66
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Definition wrapper.php:71
Class to manage bank accounts.
Class to manage cash fence.
Class to manage invoices.
Class to manage Dolibarr users.
dol_get_first_day($year, $month=1, $gm=false)
Return GMT time for first day of a month or year.
Definition date.lib.php:600
dol_get_last_day($year, $month=12, $gm=false)
Return GMT time for last day of a month or year.
Definition date.lib.php:619
llxFooter()
Footer empty.
Definition document.php:107
dol_mktime($hour, $minute, $second, $month, $day, $year, $gm='auto', $check=1)
Return a timestamp date built from detailed information (by default a local PHP server timestamp) Rep...
vatrate($rate, $addpercent=false, $info_bits=0, $usestarfornpr=0, $html=0)
Return a string with VAT rate label formatted for view output Used into pdf and HTML pages.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
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.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
print_liste_field_titre($name, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
global $conf
The following vars must be defined: $type2label $form $conf, $lang, The following vars may also be de...
Definition member.php:79
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.