report.lib.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2008-2012  Laurent Destailleur <eldy@users.sourceforge.net>
 * Copyright (C) 2012   Regis Houssin   <regis.houssin@inodbox.com>
 * Copyright (C) 2024   MDW         <mdeweerd@users.noreply.github.com>
 * Copyright (C) 2026       Frédéric France         <frederic.france@free.fr>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 * or see https://www.gnu.org/
 */
 
function report_header($reportname, $notused, $period, $periodlink, $description, $builddate, $exportlink = '', $moreparam = array(), $calcmode = '', $varlink = '')
{
  global $langs;
 
  print "\n\n<!-- start banner of report -->\n";
 
  if (!empty($varlink)) {
    $varlink = '?'.$varlink;
  }
 
  $title = $langs->trans("Report");
 
  print_barre_liste($title, 0, '', '', '', '', '', -1, '', 'generic', 0, '', '', -1, 1, 1);
 
  print '<form method="POST" id="searchFormList" action="'.$_SERVER["PHP_SELF"].$varlink.'">'."\n";
  print '<input type="hidden" name="token" value="'.newToken().'">'."\n";
 
  print dol_get_fiche_head();
 
  foreach ($moreparam as $key => $value) {
    print '<input type="hidden" name="'.$key.'" value="'.$value.'">'."\n";
  }
 
  print '<table class="border tableforfield centpercent">'."\n";
 
  $variant = ($periodlink || $exportlink);
 
  // Title line
  print '<tr>';
  print '<td width="150">'.$langs->trans("ReportName").'</td>';
  print '<td>';
  print $reportname;
  print '</td>';
  if ($variant) {
    print '<td></td>';
  }
  print '</tr>'."\n";
 
  // Calculation mode
  if ($calcmode) {
    print '<tr>';
    print '<td width="150">'.$langs->trans("CalculationMode").'</td>';
    print '<td>';
    print $calcmode;
    if ($variant) {
      print '<td></td>';
    }
    print '</td>';
    print '</tr>'."\n";
  }
 
  // Report analysis period row
  print '<tr>';
  print '<td>'.$langs->trans("ReportPeriod").'</td>';
  print '<td>';
  if ($period) {
    print $period;
  }
  if ($variant) {
    print '<td class="nowraponall">'.$periodlink.'</td>';
  }
  print '</td>';
  print '</tr>'."\n";
 
  // Description row
  print '<tr>';
  print '<td>'.$langs->trans("ReportDescription").'</td>';
  print '<td>'.$description.'</td>';
  if ($variant) {
    print '<td></td>';
  }
  print '</tr>'."\n";
 
  // Export row
  print '<tr>';
  print '<td>'.$langs->trans("GeneratedOn").'</td>';
  print '<td>';
  print dol_print_date($builddate, 'dayhour');
  print '</td>';
  if ($variant) {
    print '<td>'.($exportlink ? $langs->trans("Export").': '.$exportlink : '').'</td>';
  }
  print '</tr>'."\n";
 
  print '</table>'."\n";
 
  print dol_get_fiche_end();
 
  print '<div class="center"><input type="submit" class="button" name="submit" value="'.$langs->trans("Refresh").'"></div>';
 
  print '</form>';
  print '<br>';
 
  print "\n<!-- end banner of report -->\n\n";
}