mirror of
https://github.com/YunoHost-Apps/noalyss_ynh.git
synced 2024-09-03 19:46:20 +02:00
3a905a4a87
Update files from sources with last update on noalyss.eu
724 lines
25 KiB
PHP
724 lines
25 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 definition of the class periode
|
|
*/
|
|
/* !
|
|
* \brief For the periode tables parm_periode and jrn_periode
|
|
*/
|
|
require_once NOALYSS_INCLUDE.'/lib/ac_common.php';
|
|
require_once NOALYSS_INCLUDE.'/lib/database.class.php';
|
|
require_once NOALYSS_INCLUDE."/database/parm_periode_sql.class.php";
|
|
|
|
class Periode
|
|
{
|
|
|
|
var $cn; /* !< database connection */
|
|
var $jrn_def_id; /* !< the jr, 0 means all the ledger */
|
|
var $p_id; /* !< pk of parm_periode */
|
|
var $status; /* !< status is CL for closed, OP for
|
|
open and CE for centralized */
|
|
var $p_start; /* !< start of the periode */
|
|
var $p_end; /* !< end of the periode */
|
|
|
|
function __construct($p_cn, $p_id=0)
|
|
{
|
|
$this->p_id=$p_id;
|
|
$this->cn=$p_cn;
|
|
$this->jrn_def_id=0;
|
|
}
|
|
|
|
function set_ledger($p_jrn)
|
|
{
|
|
$this->jrn_def_id=$p_jrn;
|
|
}
|
|
|
|
function set_periode($pp_id)
|
|
{
|
|
$this->p_id=$pp_id;
|
|
}
|
|
|
|
/* !\brief return the p_id of the start and the end of the exercice
|
|
* into an array
|
|
* \param $p_exercice
|
|
* \return array [start]=>,[end]=>
|
|
*/
|
|
|
|
function limit_year($p_exercice)
|
|
{
|
|
$sql_start="select p_id from parm_periode where p_exercice=$1 order by p_start ASC limit 1";
|
|
$start=$this->cn->get_value($sql_start, array($p_exercice));
|
|
$sql_end="select p_id from parm_periode where p_exercice=$1 order by p_end DESC limit 1";
|
|
$end=$this->cn->get_value($sql_end, array($p_exercice));
|
|
return array("start"=>$start, "end"=>$end);
|
|
}
|
|
|
|
/* !\brief check if a periode is closed. If jrn_def_id is set to a no zero value then check only for this ledger
|
|
* @see Periode::set_ledger
|
|
* \return 1 is the periode is closed otherwise return 0
|
|
*/
|
|
|
|
function is_closed()
|
|
{
|
|
if ($this->jrn_def_id!=0)
|
|
$sql="select status from jrn_periode ".
|
|
" where jrn_def_id=".$this->jrn_def_id.
|
|
" and p_id =".$this->p_id;
|
|
else
|
|
$sql="select p_closed as status from parm_periode ".
|
|
" where ".
|
|
" p_id =".$this->p_id;
|
|
$res=$this->cn->exec_sql($sql);
|
|
$status=Database::fetch_result($res, 0, 0);
|
|
if ($status=='CL'||$status=='t'||$status=='CE')
|
|
return 1;
|
|
return 0;
|
|
}
|
|
|
|
///Return 1 if the periode is open otherwise 0
|
|
//!\note For only a ledger you must set Periode::jrn_def_id to the ledger id
|
|
///@see Periode::set_ledger
|
|
function is_open()
|
|
{
|
|
/* if jrn_Def_id == 0 then we check the global otherwise we check
|
|
a ledger */
|
|
if ($this->jrn_def_id!=0)
|
|
$sql="select status from jrn_periode ".
|
|
" where jrn_def_id=".$this->jrn_def_id.
|
|
" and p_id =".$this->p_id;
|
|
else
|
|
$sql="select p_closed as status from parm_periode ".
|
|
" where ".
|
|
" p_id =".$this->p_id;
|
|
$res=$this->cn->exec_sql($sql);
|
|
$status=Database::fetch_result($res, 0, 0);
|
|
if ($status=='OP'||$status=='f')
|
|
return 1;
|
|
return 0;
|
|
}
|
|
|
|
///Return 1 if periode is centralized
|
|
///@deprecated
|
|
//!\note deprecated , centralization not used anymore
|
|
function is_centralized()
|
|
{
|
|
if ($this->jrn_def_id!=0)
|
|
$sql="select status from jrn_periode ".
|
|
" where jrn_def_id=".$this->jrn_def_id.
|
|
" and p_id =".$this->p_id;
|
|
else
|
|
$sql="select p_centralized as status from parm_periode ".
|
|
" where ".
|
|
" p_id =".$this->p_id;
|
|
$res=$this->cn->exec_sql($sql);
|
|
$status=Database::fetch_result($res, 0, 0);
|
|
if ($status=='CE'||$status=='t')
|
|
return 1;
|
|
return 0;
|
|
}
|
|
|
|
function reopen()
|
|
{
|
|
if ($this->jrn_def_id==0)
|
|
{
|
|
$this->cn->exec_sql("update parm_periode set p_closed='f',p_central='f' where p_id=$1",
|
|
array($this->p_id));
|
|
|
|
$this->cn->exec_sql("update jrn_periode set status='OP' ".
|
|
" where p_id = $1", [$this->p_id]);
|
|
|
|
return;
|
|
}
|
|
else
|
|
{
|
|
$this->cn->exec_sql("update jrn_periode set status='OP'
|
|
where jrn_def_id=$1 and
|
|
p_id = $2 ", [$this->jrn_def_id, $this->p_id]);
|
|
/* if one ledger is open then the periode is open */
|
|
$this->cn->exec_sql("update parm_periode set p_closed=false where p_id=".$this->p_id);
|
|
return;
|
|
}
|
|
}
|
|
|
|
///Close a periode , if Periode::jrn_def_id is set to a different value
|
|
/// than 0 , it close only for this ledger id ; otherwise close for all
|
|
/// periode
|
|
function close()
|
|
{
|
|
if ($this->jrn_def_id==0)
|
|
{
|
|
$this->cn->exec_sql("update parm_periode set p_closed=true where p_id=$1",
|
|
[$this->p_id]);
|
|
$this->cn->exec_sql("update jrn_periode set status='CL'
|
|
where p_id = $1", [$this->p_id]);
|
|
|
|
return;
|
|
}
|
|
else
|
|
{
|
|
$this->cn->exec_sql("update jrn_periode set status='CL' ".
|
|
" where jrn_def_id=$1 and
|
|
p_id = $2", [$this->jrn_def_id, $this->p_id]);
|
|
/* if all ledgers have this periode closed then synchro with
|
|
the table parm_periode
|
|
*/
|
|
$nJrn=$this->cn->count_sql("select * from jrn_periode where ".
|
|
" p_id=$1", [$this->p_id]);
|
|
$nJrnPeriode=$this->cn->count_sql("select * from jrn_periode where ".
|
|
" p_id=$1 and status='CL'", [$this->p_id]);
|
|
|
|
if ($nJrnPeriode==$nJrn)
|
|
$this->cn->exec_sql("update parm_periode set p_closed=true where p_id=$1",
|
|
[$this->p_id]);
|
|
return;
|
|
}
|
|
}
|
|
/**
|
|
* @deprecated since version 5
|
|
* @return type
|
|
*/
|
|
function centralized()
|
|
{
|
|
if ($this->jrn_def_id==0)
|
|
{
|
|
$this->cn->exec_sql("update parm_periode set p_central=true");
|
|
return;
|
|
}
|
|
else
|
|
{
|
|
$this->cn->exec_sql("update jrn_periode set status='CE' ".
|
|
" where ".
|
|
" p_id = $1", [$this->p_id]);
|
|
return;
|
|
}
|
|
}
|
|
/**
|
|
* Add new periode
|
|
* @param date $p_date_start
|
|
* @param date $p_date_end
|
|
* @param int $p_exercice
|
|
* @return int p_id of the new periode
|
|
* @exception Exception 10 Invalide date or exercice, 20 overlapping periode
|
|
*/
|
|
function insert($p_date_start, $p_date_end, $p_exercice)
|
|
{
|
|
try
|
|
{
|
|
|
|
if (isDate($p_date_start)==null ||
|
|
isDate($p_date_end)==null ||
|
|
strlen(trim($p_exercice))==0 ||
|
|
isNumber($p_exercice) ==0 ||
|
|
$p_exercice<COMPTA_MIN_YEAR ||
|
|
$p_exercice>COMPTA_MAX_YEAR)
|
|
{
|
|
throw new Exception(_("Paramètre invalide"),10);
|
|
}
|
|
$overlap_start=$this->cn->get_value("select count(*) from parm_periode
|
|
where
|
|
p_start <= to_date($1,'DD-MM-YYYY')
|
|
and p_end >= to_date($1,'DD-MM-YYYY')
|
|
|
|
",[$p_date_start]);
|
|
$overlap_end=$this->cn->get_value("select count(*) from parm_periode
|
|
where
|
|
p_start <= to_date($1,'DD-MM-YYYY')
|
|
and p_end >= to_date($1,'DD-MM-YYYY')
|
|
|
|
",[$p_date_end]);
|
|
if ( $overlap_start > 0 || $overlap_end > 0)
|
|
{
|
|
throw new Exception (_("Période chevauchant une autre"),20);
|
|
}
|
|
$p_id=$this->cn->get_next_seq('s_periode');
|
|
$sql=" insert into parm_periode(p_id,p_start,p_end,p_closed,p_exercice)
|
|
values
|
|
($1,
|
|
to_date($2,'DD.MM.YYYY'),
|
|
to_date($3,'DD.MM.YYYY'),
|
|
'f',
|
|
$4)";
|
|
|
|
$this->cn->start();
|
|
$Res=$this->cn->exec_sql($sql,[$p_id, $p_date_start, $p_date_end, $p_exercice]);
|
|
$Res=$this->cn->exec_sql("insert into jrn_periode (jrn_def_id,p_id,status) ".
|
|
"select jrn_def_id,$p_id,'OP' from jrn_def");
|
|
$this->cn->commit();
|
|
return $p_id;
|
|
}
|
|
catch (Exception $e)
|
|
{
|
|
record_log($e->getTraceAsString());
|
|
$this->cn->rollback();
|
|
throw $e;
|
|
}
|
|
}
|
|
|
|
/* !\brief load data from database
|
|
* \return 0 on success and -1 on error
|
|
*/
|
|
|
|
function load()
|
|
{
|
|
if ($this->p_id=='')
|
|
$this->p_id=-1;
|
|
$row=$this->cn->get_array("select p_start,p_end,p_exercice,p_closed,p_central from parm_periode where p_id=$1",
|
|
array($this->p_id));
|
|
if ($row==null)
|
|
return -1;
|
|
|
|
$this->p_start=$row[0]['p_start'];
|
|
$this->p_end=$row[0]['p_end'];
|
|
$this->p_exercice=$row[0]['p_exercice'];
|
|
$this->p_closed=$row[0]['p_closed'];
|
|
$this->p_central=$row[0]['p_central'];
|
|
return 0;
|
|
}
|
|
|
|
/* !\brief return the max and the min periode of the exercice given
|
|
* in parameter
|
|
* \param $p_exercice is the exercice
|
|
* \return an array of Periode object
|
|
*/
|
|
|
|
function get_limit($p_exercice)
|
|
{
|
|
|
|
$max=$this->cn->get_value("select p_id from parm_periode where p_exercice=$1 order by p_start asc limit 1",
|
|
array($p_exercice));
|
|
$min=$this->cn->get_value("select p_id from parm_periode where p_exercice=$1 order by p_start desc limit 1",
|
|
array($p_exercice));
|
|
$rMax=new Periode($this->cn);
|
|
$rMax->p_id=$max;
|
|
if ($rMax->load())
|
|
throw new Exception('Periode n\'existe pas');
|
|
$rMin=new Periode($this->cn);
|
|
$rMin->p_id=$min;
|
|
if ($rMin->load())
|
|
throw new Exception('Periode n\'existe pas');
|
|
return array($rMax, $rMin);
|
|
}
|
|
|
|
/* !
|
|
* \brief Give the start & end date of a periode
|
|
* \param $p_periode is the periode id, if omitted the value is the current object
|
|
* \return array containing the start date & the end date, index are p_start and p_end or NULL if
|
|
* nothing is found
|
|
\verbatim
|
|
$ret['p_start']=>'01.01.2009'
|
|
$ret['p_end']=>'31.01.2009'
|
|
\endverbatim
|
|
*/
|
|
|
|
public function get_date_limit($p_periode=0)
|
|
{
|
|
if ($p_periode==0)
|
|
$p_periode=$this->p_id;
|
|
$sql="select to_char(p_start,'DD.MM.YYYY') as p_start,
|
|
to_char(p_end,'DD.MM.YYYY') as p_end
|
|
from parm_periode
|
|
where p_id=$1";
|
|
$Res=$this->cn->exec_sql($sql, array($p_periode));
|
|
if (Database::num_row($Res)==0)
|
|
return null;
|
|
return Database::fetch_array($Res, 0);
|
|
}
|
|
|
|
/* !\brief return the first day of periode
|
|
* the this->p_id must be set
|
|
* \return a string with the date (DD.MM.YYYY)
|
|
*/
|
|
|
|
public function first_day($p=0)
|
|
{
|
|
if ($p==0)
|
|
$p=$this->p_id;
|
|
list($p_start, $p_end)=$this->get_date_limit($p);
|
|
return $p_start;
|
|
}
|
|
|
|
/* !\brief return the last day of periode
|
|
* the this->p_id must be set
|
|
* \return a string with the date (DD.MM.YYYY)
|
|
*/
|
|
|
|
public function last_day($p=0)
|
|
{
|
|
if ($p==0)
|
|
$p=$this->p_id;
|
|
list($p_start, $p_end)=$this->get_date_limit($p);
|
|
return $p_end;
|
|
}
|
|
|
|
function get_exercice($p_id=0)
|
|
{
|
|
if ($p_id==0)
|
|
$p_id=$this->p_id;
|
|
$sql="select p_exercice from parm_periode where p_id=".$p_id;
|
|
$Res=$this->cn->exec_sql($sql);
|
|
if (Database::num_row($Res)==0)
|
|
return null;
|
|
return Database::fetch_result($Res, 0, 0);
|
|
}
|
|
|
|
/* !\brief retrieve the periode thanks the date_end
|
|
* \param $p_date format DD.MM.YYYY
|
|
* \return the periode id
|
|
* \exception if not periode is found or if more than one periode is found
|
|
*/
|
|
|
|
function find_periode($p_date)
|
|
{
|
|
$sql="select p_id from parm_periode where p_start <= to_date($1,'DD.MM.YYYY') and p_end >= to_date($1,'DD.MM.YYYY') ";
|
|
$ret=$this->cn->exec_sql($sql, array($p_date));
|
|
$nb_periode=Database::num_row($ret);
|
|
if ($nb_periode==0)
|
|
throw (new Exception('Aucune période trouvée', 101));
|
|
if ($nb_periode>1)
|
|
throw (new Exception("Trop de périodes trouvées $nb_periode pour $p_date",
|
|
100));
|
|
$per=Database::fetch_result($ret, 0);
|
|
$this->p_id=$per;
|
|
return $per;
|
|
}
|
|
|
|
/**
|
|
* add a exercice starting in year p_year with p_month month, with a starting
|
|
* and a closing
|
|
* @param $p_exercice the exercice
|
|
* @param $p_year the starting year
|
|
* @param $p_from_month starting month
|
|
* @param $p_month number of month of the exercice
|
|
* @param $p_opening 1 if we create a one-day periode for opening writings
|
|
* @param $p_closing 1 if we create a one-day periode for closing writings
|
|
*/
|
|
function insert_exercice($p_exercice, $p_year, $p_from_month, $p_month,
|
|
$p_opening, $p_closing)
|
|
{
|
|
try
|
|
{
|
|
if (isNumber($p_exercice)==0)
|
|
throw new Exception(_("Exercice n'est pas un nombre"));
|
|
|
|
if ($p_exercice>COMPTA_MAX_YEAR||$p_exercice<COMPTA_MIN_YEAR)
|
|
throw new Exception(sprintf(_("Exercice doit être entre %s et %s "), COMPTA_MIN_YEAR,
|
|
COMPTA_MAX_YEAR));
|
|
if (isNumber($p_year)==0)
|
|
throw new Exception(_("Année n'est pas un nombre"));
|
|
|
|
if ($p_year>COMPTA_MAX_YEAR||$p_year<COMPTA_MIN_YEAR)
|
|
throw new Exception(sprintf(_("Année doit être entre %s et %s "), COMPTA_MIN_YEAR,
|
|
COMPTA_MAX_YEAR));
|
|
|
|
if (isNumber($p_month)==0)
|
|
throw new Exception(_("Nombre de mois n'est pas un nombre"));
|
|
if ($p_month<1||$p_month>60)
|
|
throw new Exception(_("Nombre de mois doit être compris entre 1 & 60 "));
|
|
if (isNumber($p_month)==0)
|
|
throw new Exception(_("Mois de début n'existe pas "));
|
|
if ($p_from_month>13||$p_from_month<1)
|
|
throw new Exception(_("Mois de début n'existe pas "));
|
|
|
|
$this->cn->start();
|
|
$year=$p_year;
|
|
$month=$p_from_month;
|
|
for ($i=1; $i<=$p_month; $i++)
|
|
{
|
|
|
|
// create first a periode of day
|
|
if ($i==1&&$p_opening==1)
|
|
{
|
|
$fdate_start=sprintf('01.%02d.%d', $month, $year);
|
|
$this->insert($fdate_start, $fdate_start, $p_exercice);
|
|
|
|
$date_start=sprintf('02.%02d.%d', $month, $year);
|
|
$date_end=$this->cn->get_value("select to_char(to_date($1,'DD.MM.YYYY')+interval '1 month'-interval '1 day','DD.MM.YYYY')",
|
|
array($fdate_start));
|
|
|
|
$this->insert($date_start, $date_end, $p_exercice);
|
|
}
|
|
// The last month, we create a one-day periode for closing
|
|
elseif ($i==$p_month && $p_closing ==1 )
|
|
{
|
|
$fdate_start=sprintf('01.%02d.%d', $month, $year);
|
|
$date_end=$this->cn->get_value("select to_char(to_date($1,'DD.MM.YYYY')+interval '1 month'-interval '2 day','DD.MM.YYYY')",
|
|
array($fdate_start));
|
|
$this->insert($fdate_start, $date_end, $p_exercice);
|
|
|
|
$date_end=$this->cn->get_value("select to_char(to_date($1,'DD.MM.YYYY')+interval '1 month'-interval '1 day','DD.MM.YYYY')",
|
|
array($fdate_start));
|
|
|
|
$this->insert($date_end, $date_end, $p_exercice);
|
|
|
|
}
|
|
else
|
|
{
|
|
$date_start=sprintf('01.%02d.%d', $month, $year);
|
|
$date_end=$this->cn->get_value("select to_char(to_date($1,'DD.MM.YYYY')+interval '1 month'-interval '1 day','DD.MM.YYYY')",
|
|
array($date_start));
|
|
$this->insert($date_start, $date_end, $p_exercice);
|
|
}
|
|
$month++;
|
|
if ($month == 13 )
|
|
{
|
|
$year++;
|
|
$month=1;
|
|
}
|
|
}
|
|
|
|
$this->cn->commit();
|
|
}
|
|
catch (Exception $e)
|
|
{
|
|
record_log($e->getTraceAsString());
|
|
$this->cn->rollback();
|
|
throw $e;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Display a table with all the periode
|
|
* @param $p_js javascript variable
|
|
* @see scripts.js
|
|
*/
|
|
static function display_periode_global($p_js)
|
|
{
|
|
$cn=Dossier::connect();
|
|
$periode=new Parm_Periode_SQL($cn);
|
|
$ret=$periode->seek(" order by p_start asc");
|
|
$nb_periode=Database::num_row($ret);
|
|
|
|
if ($nb_periode==0)
|
|
return;
|
|
echo '<table class="result" id="periode_tbl">';
|
|
echo "<thead>";
|
|
echo "<tr>";
|
|
echo th("");
|
|
echo th(_("Date Début"));
|
|
echo th(_("Date Fin"));
|
|
echo th(_("Exercice"));
|
|
echo th(_("nb opérations"));
|
|
echo th(_("Status"));
|
|
echo "</tr>";
|
|
echo "</thead>";
|
|
echo '<tbody>';
|
|
|
|
for ($i=0; $i<$nb_periode; $i++)
|
|
{
|
|
$obj=$periode->next($ret, $i);
|
|
Periode::display_row_global($obj, $i, $p_js);
|
|
}
|
|
echo '</tbody>';
|
|
echo '</table>';
|
|
}
|
|
|
|
/**
|
|
* count the number of operation of a Periode
|
|
* @return integer
|
|
*/
|
|
function count_operation()
|
|
{
|
|
$count=$this->cn->get_value("
|
|
select count(*)
|
|
from
|
|
jrn
|
|
where
|
|
jr_tech_per = $1", [$this->p_id]);
|
|
return $count;
|
|
}
|
|
|
|
/**
|
|
* @brief Display each row for the global
|
|
* @param $obj Parm_Periode_SQL
|
|
* @param $p_nb not used so far
|
|
* @param $p_js javascript variable
|
|
*/
|
|
static function display_row_global(Parm_Periode_SQL $obj, $p_nb, $p_js)
|
|
{
|
|
$periode=new Periode($obj->cn, $obj->p_id);
|
|
$class=($p_nb%2==0)?"even":"odd";
|
|
printf('<tr id="row_per_%d" customkey="%s" per_exercice="%s" p_id="%s" class="%s"> ',
|
|
$obj->getp("p_id"),
|
|
$obj->getp("p_start"),
|
|
$obj->getp("p_exercice"),
|
|
$obj->getp("p_id"), $class);
|
|
/**
|
|
* Display a checkbox to select several month to close
|
|
*/
|
|
if ($obj->getp("p_closed")=="f")
|
|
{
|
|
$checkbox=new ICheckBox("sel_per_close[]");
|
|
$checkbox->set_attribute("per_id", $obj->getp("p_id"));
|
|
$checkbox->value=$obj->getp("p_id");
|
|
echo "<td>".$checkbox->input()."</td>";
|
|
}
|
|
else
|
|
{
|
|
echo td("");
|
|
}
|
|
echo td(format_date($obj->getp("p_start"), "YYYY-MM-DD", "DD.MM.YYYY"));
|
|
echo td(format_date($obj->getp("p_end"), "YYYY-MM-DD", "DD.MM.YYYY"));
|
|
echo td($obj->getp("p_exercice"));
|
|
$nb_operation=$periode->count_operation();
|
|
echo td($nb_operation);
|
|
$closed=$obj->getp('p_closed');
|
|
$status=($closed=='t')?_("Fermée"):_("Ouvert");
|
|
echo td($status);
|
|
|
|
// if no operation then this periode can be removed or updated
|
|
if ($nb_operation==0)
|
|
{
|
|
// Updatable
|
|
$js=sprintf("%s.box_display('%d')", $p_js, $obj->p_id);
|
|
echo "<td>";
|
|
echo HtmlInput::image_click("crayon-mod-b24.png", $js, _("Effacer"));
|
|
echo "</td>";
|
|
//removable
|
|
$js=sprintf("%s.remove('%d')", $p_js, $obj->p_id);
|
|
echo "<td>";
|
|
echo HtmlInput::image_click("trash-24.gif", $js, _("Effacer"));
|
|
echo "</td>";
|
|
}
|
|
else
|
|
{
|
|
echo td(""), td("");
|
|
}
|
|
|
|
/// Can close if open
|
|
echo "<td>";
|
|
if ($obj->getp("p_closed")=='f')
|
|
{
|
|
$javascript=sprintf('%s.close_periode(\'%d\')', $p_js, $obj->p_id);
|
|
echo Icon_Action::iconon(uniqid(), $javascript);
|
|
}
|
|
else
|
|
{
|
|
$javascript=sprintf("%s.open_periode('%d')", $p_js, $obj->p_id);
|
|
echo Icon_Action::iconoff(uniqid(),$javascript );
|
|
}
|
|
echo "</td>";
|
|
echo "</tr>";
|
|
}
|
|
|
|
/**
|
|
* @brief display a form (method POST) to input a new exercice
|
|
* variable in the FORM
|
|
* - p_exercice
|
|
* - p_year
|
|
* - nb_month
|
|
* - from_month
|
|
* - day_opening
|
|
* - day_closing
|
|
*/
|
|
static function form_exercice_add()
|
|
{
|
|
$cn=Dossier::connect();
|
|
$exercice=new INum('p_exercice');
|
|
$exercice->prec=0;
|
|
$exercice->value=$cn->get_value('select max(p_exercice::float)+1 from parm_periode');
|
|
$year=new INum('p_year');
|
|
$year->prec=0;
|
|
$year->value=$exercice->value;
|
|
$nb_month=new INum('nb_month');
|
|
$nb_month->prec=0;
|
|
$nb_month->value=12;
|
|
$from=new ISelect('from_month');
|
|
$amonth=array();
|
|
$month=[_('Janvier'), _('Février'), _('Mars'), _('Avril'),
|
|
_('Mai'), _('Juin'), _('Juillet'), _('Août'), _('Septembre'),
|
|
_('Octobre'), _('Novembre'), _('Décembre')];
|
|
for ($i=1; $i<13; $i++)
|
|
{
|
|
$strMonth=$month[($i-1)];
|
|
$amonth[]=array("value"=>$i, "label"=>$strMonth);
|
|
}
|
|
$from->value=$amonth;
|
|
$day_opening=new ICheckBox("day_opening");
|
|
$day_closing=new ICheckBox("day_closing");
|
|
$day_closing->value=1;
|
|
$day_opening->value=1;
|
|
$day_closing->set_check(1);
|
|
require_once NOALYSS_TEMPLATE.'/periode_add_exercice.php';
|
|
}
|
|
function delete() {
|
|
$this->cn->exec_sql("delete from parm_periode where p_id=$1",[$this->p_id]);
|
|
}
|
|
/**
|
|
* Verify before delete that the month is not used
|
|
* @exception Exception code 1 if periode used
|
|
*/
|
|
function verify_delete() {
|
|
try {
|
|
if ( $this->cn->get_value("select count(*) from jrn where jr_tech_per =$1 ",[$this->p_id]) > 0) {
|
|
throw new Exception(_("Effacement impossible"), 1);
|
|
}
|
|
} catch (Exception $ex) {
|
|
throw $ex;
|
|
}
|
|
}
|
|
/**
|
|
* @brief Display a form for the input of a new periode
|
|
*/
|
|
static function form_periode_add($p_js_var)
|
|
{
|
|
$cn=Dossier::connect();
|
|
$p_exercice=new ISelect('p_exercice');
|
|
$p_exercice->value=$cn->make_array("select distinct p_exercice,p_exercice from parm_periode order by 1 desc");
|
|
$title=_('Ajout période');
|
|
$title_par="<p>"._('On ne peut ajouter une période que sur un exercice qui existe déjà').
|
|
"</p>";
|
|
|
|
$p_start=new IDate('p_start');
|
|
$p_end=new IDate('p_end');
|
|
|
|
$html='';
|
|
$html.=HtmlInput::title_box($title, 'periode_add','hide');
|
|
$html.=$title_par;
|
|
$html.='<form method="post" id="insert_periode_frm" onsubmit="'.$p_js_var.'.insert_periode();return false;">' ;
|
|
$html.=HtmlInput::hidden("ac", $_REQUEST['ac']);
|
|
$html.=Dossier::hidden();
|
|
$html.='<table>';
|
|
|
|
$html.=tr(td(_(' Début période : ')).td($p_start->input()));
|
|
$html.=tr(td(_(' Fin période : ')).td($p_end->input()));
|
|
$html.=tr(td(_(' Exercice : ')).td($p_exercice->input()));
|
|
$html.='</table>';
|
|
$html.=HtmlInput::submit('add_per', _('sauver'));
|
|
$html.=HtmlInput::button('close', _('fermer'),
|
|
'onclick="$(\'periode_add\').hide()"');
|
|
$html.='</form>';
|
|
echo $html;
|
|
}
|
|
/**
|
|
*@brief
|
|
*/
|
|
static function filter_exercice($p_sel)
|
|
{
|
|
$cn=Dossier::connect();
|
|
$i_exercice=new ISelect("p_exercice_sel");
|
|
$i_exercice->value=$cn->make_array("select distinct p_exercice,p_exercice from parm_periode order by 1 desc", 1);
|
|
$i_exercice->javascript="onchange=\"Periode.filter_exercice('periode_tbl')\"";
|
|
$i_exercice->selected=$p_sel;
|
|
echo $i_exercice->input();
|
|
}
|
|
}
|