cfe31a1afe
1. Remplace le caractère x pour enlever des opérations par une constante 2. Ajoute les numéros de pièces dans le tableau de bord pour client, fournisseur et dernières opérations 3. Enlève les boutons "Ajout tag" et ajout concernés si l'utilisateur n'a pas accès
1190 lines
No EOL
29 KiB
PHP
1190 lines
No EOL
29 KiB
PHP
<?php
|
|
|
|
/*
|
|
* This file is part of NOALYSS.
|
|
*
|
|
* NOALYSS 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 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* NOALYSS 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 NOALYSS; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
// Copyright Author Dany De Bontridder danydb@aevalys.eu
|
|
|
|
/**
|
|
* @file
|
|
* @brief common utilities for a lot of procedure, classe
|
|
*/
|
|
|
|
include_once("constant.php");
|
|
require_once('class_database.php');
|
|
require_once('class_periode.php');
|
|
|
|
/**\brief to protect again bad characters which can lead to a cross scripting attack
|
|
the string to be diplayed must be protected
|
|
*/
|
|
|
|
function h($p_string)
|
|
{
|
|
return htmlspecialchars($p_string);
|
|
}
|
|
|
|
function span($p_string, $p_extra='')
|
|
{
|
|
return '<span ' . $p_extra . '>' . $p_string . '</span>';
|
|
}
|
|
|
|
function hi($p_string)
|
|
{
|
|
return '<i>' . htmlspecialchars($p_string) . '</i>';
|
|
}
|
|
|
|
function hb($p_string)
|
|
{
|
|
return '<b>' . htmlspecialchars($p_string) . '</b>';
|
|
}
|
|
|
|
function th($p_string, $p_extra='',$raw='')
|
|
{
|
|
return '<th ' . $p_extra . '>' . htmlspecialchars($p_string).$raw . '</th>';
|
|
}
|
|
|
|
function h2info($p_string)
|
|
{
|
|
return '<h2 class="info">' . htmlspecialchars($p_string) . '</h2>';
|
|
}
|
|
|
|
function h2($p_string, $p_class="",$raw="")
|
|
{
|
|
return '<h2 ' . $p_class . '>' . $raw.htmlspecialchars($p_string) . '</h2>';
|
|
}
|
|
function h1($p_string, $p_class="")
|
|
{
|
|
return '<h1 ' . $p_class . '>' . htmlspecialchars($p_string) . '</h1>';
|
|
}
|
|
/**
|
|
* \brief surround the string with td
|
|
* \param $p_string string to surround by TD
|
|
* \param $p_extra extra info (class, style, javascript...)
|
|
* \return string surrounded by td
|
|
*/
|
|
|
|
function td($p_string='', $p_extra='')
|
|
{
|
|
return '<td ' . $p_extra . '>' . $p_string . '</td>';
|
|
}
|
|
|
|
function tr($p_string, $p_extra='')
|
|
{
|
|
return '<tr ' . $p_extra . '>' . $p_string . '</tr>';
|
|
}
|
|
|
|
/**
|
|
* @brief escape correctly php string to javascript
|
|
*/
|
|
function j($p_string)
|
|
{
|
|
$a = preg_replace("/\r?\n/", "\\n", addslashes($p_string));
|
|
$a = str_replace("'", '\'', $a);
|
|
return $a;
|
|
}
|
|
|
|
/**
|
|
* format the number for the CSV export
|
|
* @param $p_number number
|
|
*/
|
|
function nb($p_number)
|
|
{
|
|
$r = sprintf('%.2f', $p_number);
|
|
$r = str_replace('.', ',', $r);
|
|
|
|
return $r;
|
|
}
|
|
|
|
/**
|
|
* format the number with a sep. for the thousand
|
|
* @param $p_number number
|
|
*/
|
|
function nbm($p_number)
|
|
{
|
|
|
|
if (trim($p_number) == '')
|
|
return '';
|
|
if ($p_number == 0)
|
|
return "0,00";
|
|
|
|
$a = doubleval($p_number);
|
|
$r = number_format($a, 2, ",", ".");
|
|
if (trim($r) == '')
|
|
{
|
|
var_dump($r);
|
|
var_dump($p_number);
|
|
var_dump($a);
|
|
exit();
|
|
}
|
|
|
|
return $r;
|
|
}
|
|
|
|
/**
|
|
* \brief log error into the /tmp/noalyss_error.log it doesn't work on windows
|
|
*
|
|
* \param p_log message
|
|
* \param p_line line number
|
|
* \param p_message is the message
|
|
*
|
|
* \return nothing
|
|
*
|
|
*/
|
|
|
|
function echo_error($p_log, $p_line="", $p_message="")
|
|
{
|
|
echo "ERREUR :" . $p_log . " " . $p_line . " " . $p_message;
|
|
$fdebug = fopen($_ENV['TMP'] . DIRECTORY_SEPARATOR . "noalyss_error.log", "a+");
|
|
if ($fdebug != null)
|
|
{
|
|
fwrite($fdebug, date("Ymd H:i:s") . $p_log . " " . $p_line . " " . $p_message . "\n");
|
|
fclose($fdebug);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Compare 2 dates
|
|
* \param p_date
|
|
* \param p_date_oth
|
|
*
|
|
* \return
|
|
* - == 0 les dates sont identiques
|
|
* - > 0 date1 > date2
|
|
* - < 0 date1 < date2
|
|
*/
|
|
|
|
function cmpDate($p_date, $p_date_oth)
|
|
{
|
|
date_default_timezone_set('Europe/Brussels');
|
|
|
|
$l_date = isDate($p_date);
|
|
$l2_date = isDate($p_date_oth);
|
|
if ($l_date == null || $l2_date == null)
|
|
{
|
|
throw new Exception("erreur date [$p_date] [$p_date_oth]");
|
|
}
|
|
$l_adate = explode(".", $l_date);
|
|
$l2_adate = explode(".", $l2_date);
|
|
$l_mkdate = mktime(0, 0, 0, $l_adate[1], $l_adate[0], $l_adate[2]);
|
|
$l2_mkdate = mktime(0, 0, 0, $l2_adate[1], $l2_adate[0], $l2_adate[2]);
|
|
// si $p_date > $p_date_oth return > 0
|
|
return $l_mkdate - $l2_mkdate;
|
|
}
|
|
|
|
/***!
|
|
* @brief check if the argument is a number
|
|
*
|
|
* \param $p_int number to test
|
|
*
|
|
* \return
|
|
* - 1 it's a number
|
|
* - 0 it is not
|
|
*/
|
|
function isNumber(&$p_int)
|
|
{
|
|
if (strlen(trim($p_int)) == 0)
|
|
return 0;
|
|
if (is_numeric($p_int) === true)
|
|
return 1;
|
|
else
|
|
return 0;
|
|
}
|
|
|
|
/***
|
|
* \brief Verifie qu'une date est bien formaté
|
|
* en d.m.y et est valable
|
|
* \param $p_date
|
|
*
|
|
* \return
|
|
* - null si la date est invalide ou malformaté
|
|
* - $p_date si tout est bon
|
|
*
|
|
*/
|
|
|
|
function isDate($p_date)
|
|
{
|
|
if (strlen(trim($p_date)) == 0)
|
|
return null;
|
|
if (preg_match("/^[0-9]{1,2}\.[0-9]{1,2}\.20[0-9]{2}$/", $p_date) == 0)
|
|
{
|
|
|
|
return null;
|
|
}
|
|
else
|
|
{
|
|
$l_date = explode(".", $p_date);
|
|
|
|
if (sizeof($l_date) != 3)
|
|
return null;
|
|
|
|
if ($l_date[2] > COMPTA_MAX_YEAR || $l_date[2] < COMPTA_MIN_YEAR)
|
|
{
|
|
return null;
|
|
}
|
|
|
|
if (checkdate($l_date[1], $l_date[0], $l_date[2]) == false)
|
|
{
|
|
return null;
|
|
}
|
|
}
|
|
return $p_date;
|
|
}
|
|
|
|
/**
|
|
* \brief Default page header for each page
|
|
*
|
|
* \param p_theme default theme
|
|
* \param $p_script
|
|
* \param $p_script2 another js script
|
|
* Must be called only once
|
|
* \return none
|
|
*/
|
|
|
|
function html_page_start($p_theme="", $p_script="", $p_script2="")
|
|
{
|
|
require_once 'class_html_input.php';
|
|
// check not called twiced
|
|
static $already_call=0;
|
|
if ( $already_call==1)return;
|
|
$already_call=1;
|
|
|
|
$cn = new Database();
|
|
if ($p_theme != "")
|
|
{
|
|
$Res = $cn->exec_sql("select the_filestyle from theme
|
|
where the_name='" . $p_theme . "'");
|
|
if (Database::num_row($Res) == 0)
|
|
$style = "style-classic.css";
|
|
else
|
|
{
|
|
$s = Database::fetch_array($Res, 0);
|
|
$style = $s['the_filestyle'];
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$style = "style-classic.css";
|
|
} // end if
|
|
$title="NOALYSS";
|
|
|
|
if ( isset ($_REQUEST['ac'])) {
|
|
if (strpos($_REQUEST['ac'],'/') <> 0)
|
|
{
|
|
$m= explode('/',$_REQUEST['ac']);
|
|
$title=$m[count($m)-1]." ".$title;
|
|
}
|
|
else
|
|
$title=$_REQUEST['ac']." ".$title;
|
|
}
|
|
$is_msie=is_msie();
|
|
|
|
if ($is_msie == 0 )
|
|
echo '<!doctype html>';
|
|
else
|
|
echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 FINAL//EN" >';
|
|
|
|
echo "<HTML>";
|
|
|
|
if ($p_script2 != "")
|
|
$p_script2 = '<script src="' . $p_script2 . '" type="text/javascript"></script>';
|
|
$style=trim($style);
|
|
$DIR=dirname(__FILE__);
|
|
echo "<HEAD>";
|
|
if ( $is_msie == 1 )echo ' <meta http-equiv="x-ua-compatible" content="IE=edge"/>';
|
|
echo "
|
|
<TITLE>$title</TITLE>
|
|
<link rel=\"icon\" type=\"image/ico\" href=\"favicon.ico\" />
|
|
<META http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">
|
|
<LINK REL=\"stylesheet\" type=\"text/css\" href=\"./$style\" media=\"screen\">
|
|
<link rel=\"stylesheet\" type=\"text/css\" href=\"style-print.css\" media=\"print\">" .
|
|
$p_script2 . "
|
|
";
|
|
echo '<script language="javascript" src="js/calendar.js"></script>
|
|
<script type="text/javascript" src="js/lang/calendar-en.js"></script>
|
|
<script language="javascript" src="js/calendar-setup.js"></script>
|
|
<LINK REL="stylesheet" type="text/css" href="calendar-blue.css" media="screen">';
|
|
|
|
echo ' </HEAD> ';
|
|
|
|
echo "<BODY $p_script>";
|
|
echo '<div id="info_div"></div>';
|
|
echo '<div id="error_div">'.
|
|
HtmlInput::title_box(_("Erreur"), 'error_div','hide').
|
|
'<div id="error_content_div">'.
|
|
'</div>'.
|
|
'<p style="text-align:center">'.
|
|
HtmlInput::button_action('Valider','$(\'error_div\').style.visibility=\'hidden\';$(\'error_content_div\').innerHTML=\'\';').
|
|
'</p>'.
|
|
'</div>';
|
|
// language
|
|
if (isset($_SESSION['g_lang']))
|
|
{
|
|
set_language();
|
|
}
|
|
|
|
}
|
|
|
|
/**
|
|
* \brief Minimal page header for each page, used for small popup window
|
|
*
|
|
* \param p_theme default theme
|
|
* \param $p_script
|
|
* \param $p_script2 another js script
|
|
*
|
|
* \return none
|
|
*/
|
|
|
|
function html_min_page_start($p_theme="", $p_script="", $p_script2="")
|
|
{
|
|
|
|
$cn = new Database();
|
|
if ($p_theme != "")
|
|
{
|
|
$Res = $cn->exec_sql("select the_filestyle from theme
|
|
where the_name='" . $p_theme . "'");
|
|
if (Database::num_row($Res) == 0)
|
|
$style = "style-classic.css";
|
|
else
|
|
{
|
|
$s = Database::fetch_array($Res, 0);
|
|
$style = $s['the_filestyle'];
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$style = "style-classic.css";
|
|
} // end if
|
|
echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 FINAL//EN">';
|
|
echo "<HTML>";
|
|
|
|
|
|
if ($p_script2 != "")
|
|
$p_script2 = '<script src="' . $p_script2 . '" type="text/javascript"></script>';
|
|
|
|
echo "<HEAD>
|
|
<TITLE>NOALYSS</TITLE>
|
|
<META http-equiv=\"Content-Type\" content=\"text/html; charset=UTF8\">
|
|
<LINK REL=\"stylesheet\" type=\"text/css\" href=\"$style\" media=\"screen\">
|
|
<link rel=\"stylesheet\" type=\"text/css\" href=\"style-print.css\" media=\"print\">" .
|
|
$p_script2 . "
|
|
<script src=\"js/scripts.js\" type=\"text/javascript\"></script>";
|
|
echo '</HEAD>
|
|
';
|
|
|
|
echo "<BODY $p_script>";
|
|
/* If we are on the user_login page */
|
|
if (basename($_SERVER['PHP_SELF']) == 'user_login.php')
|
|
{
|
|
return;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief end tag
|
|
*
|
|
*/
|
|
|
|
function html_page_stop()
|
|
{
|
|
echo "</BODY>";
|
|
echo "</HTML>";
|
|
}
|
|
|
|
/**
|
|
* \brief Echo no access and stop
|
|
*
|
|
* \return nothing
|
|
*/
|
|
|
|
function NoAccess($js=1)
|
|
{
|
|
if ($js == 1)
|
|
{
|
|
echo "<script>";
|
|
echo "alert ('" . _('Cette action ne vous est pas autorisée Contactez votre responsable') . "');";
|
|
echo "</script>";
|
|
}
|
|
else
|
|
{
|
|
echo '<div class="redcontent">';
|
|
echo '<h2 class="error">' . _(' Cette action ne vous est pas autorisée Contactez votre responsable') . '</h2>';
|
|
echo '</div>';
|
|
}
|
|
exit - 1;
|
|
}
|
|
/**
|
|
* replaced by sql_string
|
|
* @deprecated
|
|
*/
|
|
function FormatString($p_string)
|
|
{
|
|
return sql_string($p_string);
|
|
}
|
|
/**
|
|
* \brief Fix the problem with the quote char for the database
|
|
*
|
|
* \param $p_string
|
|
* \return a string which won't let strange char for the database
|
|
*/
|
|
|
|
function sql_string($p_string)
|
|
{
|
|
$p_string = trim($p_string);
|
|
if (strlen($p_string) == 0)
|
|
return null;
|
|
$p_string = str_replace("'", "''", $p_string);
|
|
$p_string = str_replace('\\', '\\\\', $p_string);
|
|
return $p_string;
|
|
}
|
|
|
|
/**
|
|
/* \brief store the string which print
|
|
* the content of p_array in a table
|
|
* used to display the menu
|
|
* \param $p_array array like ( 0=>HREF reference, 1=>visible item (name),2=>Help(opt),
|
|
* 3=>selected (opt) 4=>javascript (normally a onclick event) (opt)
|
|
* \param $p_dir direction of the menu (H Horizontal V vertical)
|
|
* \param $class CSS for TD tag
|
|
* \param $class_ref CSS for the A tag
|
|
* \param $default selected item
|
|
* \param $p_extra extra code for the table tag (CSS or javascript)
|
|
*
|
|
/* \return : string */
|
|
|
|
function ShowItem($p_array, $p_dir='V', $class="mtitle", $class_ref="mtitle", $default="", $p_extra="")
|
|
{
|
|
|
|
$ret = "<TABLE $p_extra>";
|
|
// direction Vertical
|
|
if ($p_dir == 'V')
|
|
{
|
|
foreach ($p_array as $all => $href)
|
|
{
|
|
$javascript = (isset($href[4])) ? $href[4] : "";
|
|
$title = "";
|
|
$set = "XX";
|
|
if (isset($href[2]))
|
|
$title = $href[2];
|
|
if (isset($href[3]))
|
|
$set = $href[3];
|
|
|
|
if ($set == $default)
|
|
$ret.='<TR><TD CLASS="selectedcell"><A class="' . $class_ref . '" HREF="' . $href[0] . '" title="' . $title . '" ' . $javascript . '>' . $href[1] . '</A></TD></TR>';
|
|
else
|
|
$ret.='<TR><TD CLASS="' . $class . '"><A class="' . $class_ref . '" HREF="' . $href[0] . '" title="' . $title . '" ' . $javascript . '>' . $href[1] . '</A></TD></TR>';
|
|
}
|
|
}
|
|
//direction Horizontal
|
|
else if ($p_dir == 'H')
|
|
{
|
|
|
|
$ret.="<TR>";
|
|
foreach ($p_array as $all => $href)
|
|
{
|
|
$title = "";
|
|
$javascript = (isset($href[4])) ? $href[4] : "";
|
|
|
|
$set = "A";
|
|
if (isset($href[2]))
|
|
$title = $href[2];
|
|
|
|
if (isset($href[3]))
|
|
$set = $href[3];
|
|
|
|
if ($default === $href[0] || $set === $default)
|
|
{
|
|
$ret.='<TD CLASS="selectedcell"><A class="' . $class_ref . '" HREF="' . $href[0] . '" title="' . $title . '" ' . $javascript . '>' . $href[1] . '</A></TD>';
|
|
}
|
|
else
|
|
{
|
|
$ret.='<TD CLASS="' . $class . '"><A class="' . $class_ref . '" HREF="' . $href[0] . '" title="' . $title . '" ' . $javascript . '>' . $href[1] . '</A></TD>';
|
|
}
|
|
}
|
|
$ret.="</TR>";
|
|
}
|
|
$ret.="</TABLE>";
|
|
return $ret;
|
|
}
|
|
|
|
/**
|
|
* \brief warns
|
|
*
|
|
* \param p_string error message
|
|
* gen :
|
|
* - none
|
|
* \return:
|
|
* - none
|
|
*/
|
|
|
|
function echo_warning($p_string)
|
|
{
|
|
echo '<H2 class="error">' . $p_string . "</H2>";
|
|
}
|
|
|
|
/**
|
|
* \brief Show the periode which found thanks its id
|
|
*
|
|
*
|
|
* \param $p_cn database connection
|
|
* \param p_id
|
|
* \param pos Start or end
|
|
*
|
|
* \return: string
|
|
*/
|
|
|
|
function getPeriodeName($p_cn, $p_id, $pos='p_start')
|
|
{
|
|
if ($pos != 'p_start' and
|
|
$pos != 'p_end')
|
|
echo_error('ac_common.php' . "-" . __LINE__ . ' UNDEFINED PERIODE');
|
|
$ret = $p_cn->get_value("select to_char($pos,'Mon YYYY') as t from parm_periode where p_id=$p_id");
|
|
return $ret;
|
|
}
|
|
|
|
/**
|
|
* \brief Return the period corresponding to the
|
|
* date
|
|
*
|
|
* \param p_cn database connection
|
|
* \param p_date the month + year 'MM.YYYY'
|
|
*
|
|
* \return:
|
|
* parm_periode.p_id
|
|
*/
|
|
|
|
function getPeriodeFromMonth($p_cn, $p_date)
|
|
{
|
|
$R = $p_cn->get_value("select p_id from parm_periode where
|
|
to_char(p_start,'DD.MM.YYYY') = '01.$p_date'");
|
|
if ($R == "")
|
|
return -1;
|
|
return $R;
|
|
}
|
|
|
|
/**\brief Decode the html for the widegt richtext and remove newline
|
|
* \param $p_html string to decode
|
|
* \return the html code without new line
|
|
*/
|
|
|
|
function Decode($p_html)
|
|
{
|
|
$p_html = str_replace('%0D', '', $p_html);
|
|
$p_html = str_replace('%0A', '', $p_html);
|
|
$p_html = urldecode($p_html);
|
|
return $p_html;
|
|
}
|
|
|
|
/**\brief Create the condition to filter on the j_tech_per
|
|
* thanks a from and to date.
|
|
* \param $p_cn database conx
|
|
* \param $p_from start date (date)
|
|
* \param $p_to end date (date)
|
|
* \param $p_form if the p_from and p_to are date or p_id
|
|
* \param $p_field column name
|
|
* \return a string containg the query
|
|
*/
|
|
|
|
function sql_filter_per($p_cn, $p_from, $p_to, $p_form='p_id', $p_field='jr_tech_per')
|
|
{
|
|
|
|
if ($p_form != 'p_id' &&
|
|
$p_form != 'date')
|
|
{
|
|
echo_error(__FILE__, __LINE__, 'Mauvais parametres ');
|
|
exit(-1);
|
|
}
|
|
if ($p_form == 'p_id')
|
|
{
|
|
// retrieve the date
|
|
$pPeriode = new Periode($p_cn);
|
|
$a_start = $pPeriode->get_date_limit($p_from);
|
|
$a_end = $pPeriode->get_date_limit($p_to);
|
|
if ($a_start == null || $a_end == null)
|
|
throw new Exception(__FILE__ . __LINE__ . sprintf(_('Attention periode
|
|
non trouvee periode p_from= %s p_to_periode = %s'), $p_from ,
|
|
$p_to));
|
|
|
|
|
|
$p_from = $a_start['p_start'];
|
|
$p_to = $a_end['p_end'];
|
|
}
|
|
if ($p_from == $p_to)
|
|
$periode = " $p_field = (select p_id from parm_periode " .
|
|
" where " .
|
|
" p_start = to_date('$p_from','DD.MM.YYYY')) ";
|
|
else
|
|
$periode = "$p_field in (select p_id from parm_periode " .
|
|
" where p_start >= to_date('$p_from','DD.MM.YYYY') and p_end <= to_date('$p_to','DD.MM.YYYY')) ";
|
|
return $periode;
|
|
}
|
|
|
|
/**\brief alert in javascript
|
|
* \param $p_msg is the message
|
|
* \param $buffer if false, echo directly and execute the javascript, if $buffer is true, the alert javascript
|
|
* is in the return string
|
|
* \return string with alert javascript if $buffer is true
|
|
*/
|
|
|
|
function alert($p_msg, $buffer=false)
|
|
{
|
|
$r = '<script>';
|
|
$r.= 'alert(\'' . j($p_msg) . '\')';
|
|
$r.= '</script>';
|
|
|
|
if ($buffer)
|
|
return $r;
|
|
echo $r;
|
|
}
|
|
|
|
/**
|
|
* @brief set the lang thanks the _SESSION['g_lang'] var.
|
|
*/
|
|
function set_language()
|
|
{
|
|
// desactivate local check
|
|
if ( defined("LOCALE") && LOCALE==0 ) return;
|
|
if ( ! isset ($_SESSION['g_lang'])) return;
|
|
$dir = "";
|
|
// set differently the language depending of the operating system
|
|
if (what_os() == 1)
|
|
{
|
|
$dir = setlocale(LC_MESSAGES, $_SESSION['g_lang']);
|
|
if ($dir == "")
|
|
{
|
|
$g_lang = 'fr_FR.utf8';
|
|
$dir = setlocale(LC_MESSAGES, $g_lang);
|
|
// echo '<span class="notice">' . $_SESSION['g_lang'] . ' domaine non supporté</h2>';
|
|
}
|
|
bindtextdomain('messages', './lang');
|
|
textdomain('messages');
|
|
bind_textdomain_codeset('messages', 'UTF8');
|
|
|
|
return;
|
|
}
|
|
// for windows
|
|
putenv('LANG=' . $_SESSION['g_lang']);
|
|
$dir = setlocale(LC_ALL, $_SESSION['g_lang']);
|
|
bindtextdomain('messages', '.\\lang');
|
|
textdomain('messages');
|
|
bind_textdomain_codeset('messages', 'UTF8');
|
|
}
|
|
|
|
/**
|
|
* @brief try to determine on what os you are running the pĥpcompte
|
|
* server
|
|
* @return
|
|
* 0 it is a windows
|
|
* 1 it is a Unix like
|
|
*/
|
|
function what_os()
|
|
{
|
|
$inc_path = get_include_path();
|
|
|
|
if (strpos($inc_path, ";") != 0)
|
|
{
|
|
$os = 0; /* $os is 0 for windoz */
|
|
}
|
|
else
|
|
{
|
|
$os = 1; /* $os is 1 for unix */
|
|
}
|
|
return $os;
|
|
}
|
|
|
|
/**
|
|
* @brief shrink the date, make a date shorter for the printing
|
|
* @param $p_date format DD.MM.YYYY
|
|
* @return date in the format DDMMYY (size = 13 mm in arial 8)
|
|
*/
|
|
function shrink_date($p_date)
|
|
{
|
|
$date = str_replace('.', '', $p_date);
|
|
$str_date = substr($date, 0, 4) . substr($date, 6, 2);
|
|
return $str_date;
|
|
}
|
|
/**
|
|
* @brief shrink the date, make a date shorter for the printing
|
|
* @param $p_date format DD.MM.YYYY
|
|
* @return date in the format DDMMYY (size = 13 mm in arial 8)
|
|
*/
|
|
function smaller_date($p_date)
|
|
{
|
|
$str_date = substr($p_date, 0, 6) . substr($p_date, 8, 2);
|
|
return $str_date;
|
|
}
|
|
|
|
/**
|
|
* @brief format the date, when taken from the database the format
|
|
* is MM-DD-YYYY
|
|
* @param $p_date format
|
|
* @param
|
|
* @return date in the format DD.MM.YYYY
|
|
*/
|
|
function format_date($p_date, $p_from_format = 'YYYY-MM-DD',$p_to_format='DD.MM.YYYY')
|
|
{
|
|
if ($p_from_format == 'YYYY-MM-DD')
|
|
{
|
|
$date = explode('-', $p_date);
|
|
if (count($date) != 3)
|
|
return $p_date;
|
|
}
|
|
if ($p_from_format == 'DD.MM.YYYY')
|
|
{
|
|
$temp_date = explode('.', $p_date);
|
|
if (count($temp_date) != 3)
|
|
return $p_date;
|
|
$date[0] = $temp_date[2]; // 0 is year
|
|
$date[1] = $temp_date[1]; // 1 for month
|
|
$date[2] = $temp_date[0]; // 2 for day
|
|
}
|
|
|
|
switch ($p_to_format)
|
|
{
|
|
case 'DD.MM.YYYY':
|
|
$str_date = $date[2] . '.' . $date[1] . '.' . $date[0];
|
|
break;
|
|
case 'YYYY-MM-DD':
|
|
$str_date = $date[0] . '-' . $date[1] . '-' . $date[2];
|
|
break;
|
|
case 'YYYYMMDD':
|
|
$str_date = $date[0] . $date[1] . $date[2];
|
|
break;
|
|
case 'YYYY/MM/DD':
|
|
$str_date = $date[0] . '/' . $date[1] . '/' . $date[2];
|
|
break;
|
|
|
|
}
|
|
return $str_date;
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
* Should a dialog box that you are disconnected for ajax
|
|
*/
|
|
function ajax_disconnected($div)
|
|
{
|
|
/**
|
|
* if $_SESSION['g_user'] is not set : echo a warning
|
|
*/
|
|
if (!isset($_SESSION['g_user']))
|
|
{
|
|
$script = 'var a=$("' . $div . '");a.style.height="70%";a.style.width="70%";';
|
|
$script.='a.style.top=posY-20+offsetY;a.style.left=posX+offsetX;';
|
|
$script = create_script($script);
|
|
$html = $script;
|
|
$html.=HtmlInput::anchor_close($div);
|
|
$html.='<div>';
|
|
$html.=h2(_('Données non disponibles'), 'class="title" style="width:auto"');
|
|
$html.=h2(_('Veuillez vous reconnecter'), 'class="error"');
|
|
$html.=alert(_("Déconnecté"), true);
|
|
$html.="<script>logout();</script>";
|
|
$html = escape_xml($html);
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<ctl>$div</ctl>
|
|
<code>$html</code>
|
|
</data>
|
|
EOF;
|
|
exit();
|
|
}
|
|
}
|
|
|
|
/**
|
|
*
|
|
* @param int $selected module selected
|
|
*/
|
|
function show_module($selected)
|
|
{
|
|
global $g_user;
|
|
$cn = Dossier::connect();
|
|
$amodule = $cn->get_array("select
|
|
me_code,me_menu,me_url,me_javascript,p_order,me_type,me_description
|
|
from v_all_menu
|
|
where
|
|
user_name=$1
|
|
and p_type_display='M'
|
|
order by p_order", array($g_user->login));
|
|
|
|
if ($selected != -1)
|
|
{
|
|
require_once('template/module.php');
|
|
$file = $cn->get_array("select me_file,me_parameter,me_javascript,me_type,me_description from v_all_menu
|
|
where me_code=$1 and user_name=$2", array($selected,$g_user->login));
|
|
if ( count($file ) == 0 )
|
|
{
|
|
echo '</div>';
|
|
echo '</div>';
|
|
echo '<div class="content">';
|
|
echo_warning(_("Module inexistant")."[ $selected ] ");
|
|
echo '</div>';
|
|
exit();
|
|
}
|
|
if ($file[0]['me_file'] != '')
|
|
{
|
|
if ($file[0]['me_parameter'] != "")
|
|
{
|
|
// if there are paramter put them in superglobal
|
|
$array=compute_variable($file[0]['me_parameter']);
|
|
put_global($array);
|
|
}
|
|
|
|
// if file is not a plugin, include the file, otherwise
|
|
// include the plugin launcher
|
|
if ($file[0]['me_type'] != 'PL')
|
|
{
|
|
require_once $file[0]['me_file'];
|
|
}
|
|
else
|
|
{
|
|
// nothing : direct call to plugin
|
|
}
|
|
}
|
|
if ( $file[0]['me_javascript'] != '')
|
|
{
|
|
create_script($file[0]['me_javascript']);
|
|
}
|
|
}
|
|
}
|
|
/**
|
|
* Find the default module or the first one
|
|
* @global $g_user $g_user
|
|
* @return default module (string)
|
|
*/
|
|
function find_default_module()
|
|
{
|
|
global $g_user;
|
|
$cn = Dossier::connect();
|
|
|
|
$default_module = $cn->get_array("select me_code
|
|
from profile_menu join profile_user using (p_id)
|
|
where
|
|
p_type_display='M' and
|
|
user_name=$1 and pm_default=1", array($g_user->login));
|
|
|
|
/*
|
|
* Try to find the smallest order for module
|
|
*/
|
|
if (empty($default_module))
|
|
{
|
|
$default_module = $cn->get_array("select me_code
|
|
from profile_menu join profile_user using (p_id)
|
|
where
|
|
p_type_display='M' and
|
|
user_name=$1 order by p_order limit 1", array($g_user->login));
|
|
|
|
// if no default try to find the default menu
|
|
if ( empty ($default_module))
|
|
{
|
|
$default_module = $cn->get_array("select me_code
|
|
from profile_menu join profile_user using (p_id)
|
|
where
|
|
p_type_display='E' and
|
|
user_name=$1 and pm_default=1 ", array($g_user->login));
|
|
/*
|
|
* Try to find a default menu by order
|
|
*/
|
|
if (empty ($default_module))
|
|
{
|
|
$default_module = $cn->get_array("select me_code
|
|
from profile_menu join profile_user using (p_id)
|
|
where
|
|
user_name=$1 and p_order=(select min(p_order) from profile_menu join profile_user using (p_id)
|
|
where user_name=$2) limit 1", array($g_user->login, $g_user->login));
|
|
}
|
|
|
|
/*
|
|
* if nothing found, there is no profile for this user => exit
|
|
*/
|
|
if (empty ($default_module))
|
|
{
|
|
echo_warning(_("Utilisateur n'a pas de profile, votre administrateur doit en configurer un dans CFGSEC"));
|
|
exit();
|
|
}
|
|
}
|
|
return $default_module[0]['me_code'];
|
|
}
|
|
|
|
if (count($default_module) > 1)
|
|
{
|
|
// return the first module found
|
|
return $default_module[0]['me_code'];
|
|
}
|
|
elseif (count($default_module) == 1)
|
|
{
|
|
return $default_module[0]['me_code'];
|
|
}
|
|
}
|
|
|
|
/**
|
|
* show the module
|
|
* @global $g_user
|
|
* @param $module the $_REQUEST['ac'] exploded into an array
|
|
* @param $idx the index of the array : the AD code is splitted into an array thanks the slash
|
|
*/
|
|
function show_menu($module, $idx)
|
|
{
|
|
global $g_user;
|
|
$cn = Dossier::connect();
|
|
$amenu = $cn->get_array("select
|
|
me_menu,me_code,me_url,me_javascript,me_type,me_description
|
|
from v_all_menu
|
|
where
|
|
me_code_dep=$1 and user_name=$2 order by p_order", array($module[$idx], $g_user->login));
|
|
|
|
if (!empty($amenu) && count($amenu) > 1)
|
|
{
|
|
$a_style_menu=array('topmenu','menu2','menu3');
|
|
if ( $idx > count($a_style_menu))
|
|
$style_menu='menu3';
|
|
else {
|
|
$style_menu=$a_style_menu[$idx];
|
|
}
|
|
require 'template/menu.php';
|
|
}
|
|
elseif (count($amenu) == 1)
|
|
{
|
|
echo '<div class="topmenu">';
|
|
echo h2info($amenu[0]['me_menu']);
|
|
echo '</div>';
|
|
$module[$idx] = $amenu[0]['me_code'];
|
|
}
|
|
|
|
if (empty($amenu) || count($amenu) == 1)
|
|
{
|
|
$file = $cn->get_array("select me_file,me_parameter,me_javascript,me_type
|
|
from menu_ref
|
|
join profile_menu using (me_code)
|
|
join profile_user using (p_id)
|
|
where
|
|
me_code=$1 and
|
|
user_name=$2 and
|
|
(me_file is not null or trim(me_file) <>'' or
|
|
me_javascript is not null or trim (me_javascript) <> '')", array($module[$idx],$g_user->login));
|
|
|
|
if (count($file)==0)
|
|
{
|
|
echo "Configuration incorrecte pour ce module ".$module[$idx];
|
|
exit;
|
|
}
|
|
|
|
if ($file[0]['me_file'] != "")
|
|
{
|
|
if ($file[0]['me_parameter'] !== "")
|
|
{
|
|
// if there are paramter put them in superglobal
|
|
$array=compute_variable($file[0]['me_parameter']);
|
|
put_global($array);
|
|
}
|
|
/*
|
|
* Log the file we input to put in the folder test-noalyss for replaying it
|
|
*/
|
|
if (LOGINPUT) {
|
|
$file_loginput=fopen($_ENV['TMP'].'/scenario-'.$_SERVER['REQUEST_TIME'].'.php','a+');
|
|
fwrite($file_loginput, "include '".$file[0]['me_file']."';");
|
|
fwrite($file_loginput,"\n");
|
|
fclose($file_loginput);
|
|
}
|
|
// if file is not a plugin, include the file, otherwise
|
|
// include the plugin launcher
|
|
if ( $file[0]['me_type'] != 'PL')
|
|
require_once $file[0]['me_file'];
|
|
else
|
|
require 'extension_get.inc.php';
|
|
|
|
exit();
|
|
}
|
|
if ( $file[0]['me_javascript'] != '')
|
|
{
|
|
$js= str_replace('<DOSSIER>', dossier::id(), $file[0]['me_javascript']);
|
|
echo create_script($js);
|
|
}
|
|
}
|
|
}
|
|
/**
|
|
* Put in superglobal (get,post,request) the value contained in
|
|
* the parameter field (me_parameter)
|
|
* @param $array [key] [value]
|
|
*/
|
|
function put_global($array)
|
|
{
|
|
for ($i=0;$i<count($array);$i++)
|
|
{
|
|
$key=$array[$i]['key'];
|
|
$value=$array[$i]['value'];
|
|
$_GET[$key]=$value;
|
|
$_POST[$key]=$value;
|
|
$_REQUEST[$key]=$value;
|
|
}
|
|
}
|
|
/**
|
|
* the string has the format a=b&c=d, it is parsed and an array[][key,value]
|
|
* is returned
|
|
* @param $p_string
|
|
* @return $array usable in put_global
|
|
*/
|
|
function compute_variable($p_string)
|
|
{
|
|
$array=array();
|
|
if ($p_string == '') return $array;
|
|
|
|
$var=explode("&",$p_string);
|
|
if (empty ($var)) return $array;
|
|
for ($i=0;$i < count($var);$i++)
|
|
{
|
|
$var2=explode('=',$var[$i]);
|
|
$array[$i]['key']=$var2[0];
|
|
$array[$i]['value']=$var2[1];
|
|
}
|
|
return $array;
|
|
}
|
|
function ajax_xml_error($p_code,$p_string)
|
|
{
|
|
$html = escape_xml($p_string);
|
|
header('Content-type: text/xml; charset=UTF-8');
|
|
echo <<<EOF
|
|
<?xml version="1.0" encoding="UTF-8"?>
|
|
<data>
|
|
<code>$p_code</code>
|
|
<value>$html</value>
|
|
</data>
|
|
EOF;
|
|
}
|
|
/**
|
|
* @brief Display a box with the contains
|
|
* @param type $p_array Data to display
|
|
* @param type $p_title Title of the box
|
|
* @param type $p_div id of the box
|
|
*/
|
|
function display_dashboard_operation($p_array,$p_title,$p_div)
|
|
{
|
|
?>
|
|
<div id="<?php echo $p_div;?>" class="inner_box" style="display:none;top:250;left:25%;width: 50%;min-height:50%;overflow:auto;">
|
|
<?php
|
|
echo HtmlInput::title_box($p_title, $p_div, "hide");
|
|
?>
|
|
<?php if (count($p_array)>0) :?>
|
|
<table class="result">
|
|
<tr>
|
|
<th><?php echo _('Date')?></th>
|
|
<th><?php echo _('Pièce')?></th>
|
|
<th><?php echo _('Code Interne')?></th>
|
|
<th><?php echo _('Description')?></th>
|
|
<th>
|
|
<?php echo _('Montant')?>
|
|
</th>
|
|
|
|
</tr>
|
|
<?php
|
|
for ($i=0;$i<count($p_array);$i++):
|
|
?>
|
|
<tr class="<?php echo (($i%2)==0)?'odd':'even';?>">
|
|
<td>
|
|
<?php echo smaller_date(format_date($p_array[$i]['jr_date']) );?>
|
|
</td>
|
|
<td>
|
|
<?php echo HtmlInput::detail_op($p_array[$i]['jr_id'], $p_array[$i]['jr_internal']) ?>
|
|
</td>
|
|
<td>
|
|
<?php echo h($p_array[$i]['jr_pj_number'])?>
|
|
</td>
|
|
<td>
|
|
<?php echo h($p_array[$i]['jr_comment']) ?>
|
|
</td>
|
|
<td>
|
|
<?php echo nbm($p_array[$i]['jr_montant']) ?>
|
|
</td>
|
|
</tr>
|
|
<?php
|
|
endfor;
|
|
?>
|
|
</table>
|
|
<?php else: ?>
|
|
<h2 class="notice"><?php echo _('Aucune donnée')?></h2>
|
|
<?php
|
|
endif;
|
|
?>
|
|
</div>
|
|
<?php
|
|
}
|
|
function get_array_column($p_array,$key)
|
|
{
|
|
$array=array();
|
|
for ($i=0;$i<count($p_array);$i++)
|
|
{
|
|
$r=$p_array[$i];
|
|
if ( isset($r[$key])) {
|
|
$array[]=$r[$key];
|
|
}
|
|
}
|
|
return $array;
|
|
}
|
|
|
|
/**
|
|
* This function create a ledger object and return the right one.
|
|
* It uses the factory pattern
|
|
* @param Database $p_cn
|
|
* @param type $ledger_id
|
|
* @return Acc_Ledger
|
|
* @throws Exception
|
|
*/
|
|
function factory_Ledger(Database &$p_cn, $ledger_id)
|
|
{
|
|
include_once 'class_acc_ledger_sold.php';
|
|
include_once 'class_acc_ledger_purchase.php';
|
|
include_once 'class_acc_ledger_fin.php';
|
|
|
|
$ledger=new Acc_Ledger($p_cn, $ledger_id);
|
|
$type=$ledger->get_type();
|
|
|
|
switch ($type)
|
|
{
|
|
case 'VEN':
|
|
$obj=new Acc_Ledger_Sold($p_cn, $ledger_id);
|
|
break;
|
|
case 'ACH':
|
|
$obj=new Acc_Ledger_Purchase($p_cn, $ledger_id);
|
|
break;
|
|
case 'FIN':
|
|
$obj= new Acc_Ledger_Fin($p_cn, $ledger_id);
|
|
break;
|
|
case 'ODS':
|
|
$obj=$ledger;
|
|
break;
|
|
|
|
default:
|
|
throw new Exception('Ledger type not found');
|
|
}
|
|
return $obj;
|
|
}
|
|
/**
|
|
* Check if we use IE 8 or 9
|
|
* @return int 1 for IE8-9;0 otherwise
|
|
*/
|
|
function is_msie()
|
|
{
|
|
if ( strpos ($_SERVER['HTTP_USER_AGENT'],'MSIE 8.0') != 0 ||
|
|
strpos ($_SERVER['HTTP_USER_AGENT'],'MSIE 9.0') != 0 )
|
|
$is_msie=1;
|
|
else
|
|
$is_msie=0;
|
|
return $is_msie;
|
|
}
|
|
?>
|