543 lines
14 KiB
PHP
543 lines
14 KiB
PHP
<?php
|
|
|
|
/*
|
|
* This file is part of PhpCompta.
|
|
*
|
|
* PhpCompta 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.
|
|
*
|
|
* PhpCompta 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 PhpCompta; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
// Copyright Author Dany De Bontridder ddebontridder@yahoo.fr
|
|
/*! \file
|
|
* \brief common utilities for a lot of procedure, classe
|
|
*/
|
|
|
|
include_once("debug.php");
|
|
include_once("constant.php");
|
|
require_once('preference.php');
|
|
require_once ("postgres.php");
|
|
/*!
|
|
* \brief log error into the /tmp/phpcompta_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="") {
|
|
$fdebug=fopen($_ENV['TMP'].DIRECTORY_SEPARATOR."phpcompta_error.log","a+");
|
|
if ( $fdebug == false) {
|
|
echo "ERREUR :".$p_log." ".$p_line." ".$p_message;
|
|
} else {
|
|
fwrite($fdebug,date("Ymd H:i:s").$p_log." ".$p_line." ".$p_message."\n");
|
|
fclose($fdebug);
|
|
echo_debug($p_log,$p_line,$p_message);
|
|
}
|
|
}
|
|
|
|
/*!
|
|
* \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 ) {
|
|
echo "erreur date";
|
|
return null;
|
|
}
|
|
$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 (! ereg ("^[0-9]{1,2}\.[0-9]{1,2}\.20[0-9]{2}",$p_date) ) {
|
|
|
|
return null;
|
|
} else {
|
|
$l_date=explode(".",$p_date);
|
|
|
|
if ( sizeof ($l_date) != 3 )
|
|
return null;
|
|
|
|
if ( $l_date[2] > 2020 ) {
|
|
return null;
|
|
}
|
|
echo_debug('ac_common.php',__LINE__,' date = '.var_export($l_date,true));
|
|
|
|
if ( checkdate ($l_date[1],$l_date[0],$l_date[2]) == false) {
|
|
return null;
|
|
}
|
|
|
|
}// !ereg
|
|
return $p_date;
|
|
}
|
|
/*!
|
|
* \brief call cmpDate & add quotes
|
|
*
|
|
* \return the date or the quoted string null
|
|
*/
|
|
function formatDate($p_date) {
|
|
if ( isDate($p_date)== null) 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
|
|
*
|
|
* \return none
|
|
*/
|
|
function html_page_start($p_theme="",$p_script="",$p_script2="")
|
|
{
|
|
|
|
$cn=DbConnect();
|
|
if ( $p_theme != "") {
|
|
$Res=ExecSql($cn,"select the_filestyle from theme
|
|
where the_name='".$p_theme."'");
|
|
if (pg_NumRows($Res)==0)
|
|
$style="style.css";
|
|
else {
|
|
$s=pg_fetch_array($Res,0);
|
|
$style=$s['the_filestyle'];
|
|
}
|
|
}else {
|
|
$style="style.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>PhpCompta</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 '<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">
|
|
</HEAD>
|
|
';
|
|
|
|
echo "<BODY $p_script>";
|
|
/* If we are on the user_login page */
|
|
if ( basename($_SERVER['PHP_SELF']) == 'user_login.php') {
|
|
return;
|
|
}
|
|
|
|
}
|
|
/*!
|
|
* \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=DbConnect();
|
|
if ( $p_theme != "") {
|
|
$Res=ExecSql($cn,"select the_filestyle from theme
|
|
where the_name='".$p_theme."'");
|
|
if (pg_NumRows($Res)==0)
|
|
$style="style.css";
|
|
else {
|
|
$s=pg_fetch_array($Res,0);
|
|
$style=$s['the_filestyle'];
|
|
}
|
|
}else {
|
|
$style="style.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>PhpCompta</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 Button logout
|
|
*
|
|
|
|
* \return nothing
|
|
*/
|
|
|
|
function html_button_logout() {
|
|
echo "<A class=\"mtitle\" HREF=logout.php> Logout </A>";
|
|
}
|
|
/*!
|
|
* \brief Echo no access and stop
|
|
*
|
|
* \return nothing
|
|
*/
|
|
|
|
|
|
function NoAccess($js=0)
|
|
{
|
|
if ( $js == 1 )
|
|
{
|
|
echo "<script>";
|
|
echo "alert ('Cette action ne vous est pas autorisée Contactez votre responsable');";
|
|
echo "</script>";
|
|
}
|
|
else
|
|
{
|
|
echo '<div class="u_redcontent">';
|
|
echo '<h2 class="error"> Cette action ne vous est pas autorisée Contactez votre responsable</h2>';
|
|
echo '</div>';
|
|
}
|
|
exit -1;
|
|
}
|
|
/*!
|
|
* \brief Fix the problem with the quote char for the database
|
|
*
|
|
* \param $p_string
|
|
* \todo replace par pg_escape_string !!!
|
|
* \return a string which won't let strange char for the database
|
|
*/
|
|
function FormatString($p_string)
|
|
{
|
|
if ( !isset ($p_string) ) {
|
|
echo_error("ac_common.php FormatString p_string empty");
|
|
return null;
|
|
}
|
|
$p_string=trim($p_string);
|
|
if (strlen($p_string) == 0 ) return null;
|
|
$p_string=str_replace("\'","'",$p_string);
|
|
$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 ( HREF reference, visible item (name),Help(opt),
|
|
* selected (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){
|
|
$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">'.$href[1].'</TD></tr>';
|
|
else
|
|
$ret.='<TR><TD CLASS="'.$class.'"><A class="'.$class_ref.'" HREF="'.$href[0].'" title="'.$title.'">'.$href[1].'</A></TD></TR>';
|
|
}
|
|
}
|
|
//direction Horizontal
|
|
else if ( $p_dir == 'H' ) {
|
|
|
|
$ret.="<TR>";
|
|
foreach ($p_array as $all=>$href){
|
|
$title="";
|
|
|
|
$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">'.$href[1].'</TD>';
|
|
|
|
} else {
|
|
$ret.='<TD CLASS="'.$class.'"><A class="'.$class_ref.'" HREF="'.$href[0].'" title="'.$title.'">'.$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="info">'.$p_string."</H2>";
|
|
}
|
|
/*!
|
|
**************************************************
|
|
* \brief make a array with the sql
|
|
*
|
|
* \param $p_cn dbatabase connection
|
|
* \param $p_sql related sql
|
|
* \param $p_null if the array start with a null value
|
|
*
|
|
* \return: a double array [value,label]
|
|
*/
|
|
function make_array($p_cn,$p_sql,$p_null=0) {
|
|
echo_debug('ac_common',__LINE__,$p_sql);
|
|
$a=ExecSql($p_cn,$p_sql);
|
|
$max=pg_NumRows($a);
|
|
if ( $max==0) return null;
|
|
for ($i=0;$i<$max;$i++) {
|
|
$row=pg_fetch_row($a);
|
|
$r[$i]['value']=$row[0];
|
|
$r[$i]['label']=$row[1];
|
|
}
|
|
// add a blank item ?
|
|
if ( $p_null == 1 ) {
|
|
for ($i=$max;$i!=0;$i--) {
|
|
$r[$i]['value']= $r[$i-1]['value'];
|
|
$r[$i]['label']= $r[$i-1]['label'];
|
|
}
|
|
$r[0]['value']=-1;
|
|
$r[0]['label']=" ";
|
|
} // if ( $p_null == 1 )
|
|
|
|
return $r;
|
|
}
|
|
/*!
|
|
**************************************************
|
|
* \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=execSql($p_cn,"select to_char($pos,'Mon YYYY') as t from parm_periode where p_id=$p_id");
|
|
if (pg_NumRows($ret) == 0) return null;
|
|
$a=pg_fetch_array($ret,0);
|
|
return $a['t'];
|
|
}
|
|
/*!
|
|
**************************************************
|
|
* \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=ExecSql($p_cn,"select p_id from parm_periode where
|
|
to_char(p_start,'DD.MM.YYYY') = '01.$p_date'");
|
|
if ( pg_NumRows($R) == 0 )
|
|
return -1;
|
|
$a=pg_fetch_array($R,0);
|
|
|
|
return $a['p_id'];
|
|
}
|
|
/*!
|
|
**************************************************
|
|
* \brief Return the period corresponding to the
|
|
* date
|
|
*
|
|
*
|
|
* \param p_cn database connection
|
|
* \param p_date the date 'DD.MM.YYYY'
|
|
* \return parm_periode.p_id
|
|
*
|
|
*/
|
|
function getPeriodeFromDate($p_cn,$p_date) {
|
|
$R=ExecSql($p_cn,"select p_id from parm_periode where
|
|
p_start <= to_date('$p_date','DD.MM.YYYY')
|
|
and p_end >= to_date('$p_date','DD.MM.YYYY')
|
|
");
|
|
if ( pg_NumRows($R) == 0 )
|
|
return -1;
|
|
$a=pg_fetch_array($R,0);
|
|
|
|
return $a['p_id'];
|
|
}
|
|
/*!\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
|
|
$a_start=get_periode($p_cn,$p_from);
|
|
$a_end=get_periode($p_cn,$p_to);
|
|
if ( $a_start == null or $a_end == null )
|
|
{
|
|
echo_debug(__FILE__,__LINE__,'Attention periode '.
|
|
' non trouvee periode p_from='.$p_from.
|
|
'p_to_periode = '.$p_to);
|
|
}
|
|
|
|
$p_from=($a_start==null)?'01.01.1900':$a_start['p_start'];
|
|
$p_to=($a_end==null)?'01.01.2100':$a_end['p_end'];
|
|
}
|
|
if ( $p_from == $p_to )
|
|
$periode=" $p_field = 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 return the label of the tva_id
|
|
* \param $p_cn database connx
|
|
* \param $p_tva_id tva_id
|
|
*/
|
|
function tva_get_label($p_cn,$p_tva_id)
|
|
{
|
|
$a=getDbValue($p_cn,"select tva_label from tva_rate where tva_id='".$p_tva_id."'");
|
|
return $a;
|
|
}
|
|
/*!\brief alert in javascript
|
|
*\param $p_msg is the message
|
|
*/
|
|
function alert($p_msg)
|
|
{
|
|
echo '<script language="javascript">';
|
|
echo 'alert(\''.FormatString($p_msg).'\')';
|
|
echo '</script>';
|
|
}
|
|
?>
|