svn+ssh://danydb@svn/svn/phpcompta/branches/rel500 ........ r2940 | danydb | 2010-02-11 19:20:28 +0100 (Thu, 11 Feb 2010) | 1 line Acc_Payment : "paiement par" is getting simpler ........ r2941 | danydb | 2010-02-11 19:41:39 +0100 (Thu, 11 Feb 2010) | 1 line Add a logout button to extension ........ r2942 | danydb | 2010-02-11 20:49:25 +0100 (Thu, 11 Feb 2010) | 1 line Translation dutch ........ r2943 | danydb | 2010-02-12 11:40:28 +0100 (Fri, 12 Feb 2010) | 1 line Add dutch translation ........ r2944 | danydb | 2010-02-12 17:09:59 +0100 (Fri, 12 Feb 2010) | 1 line Fix Bug : in quick writing you have now access to the listing ........ r2945 | danydb | 2010-02-13 14:11:36 +0100 (Sat, 13 Feb 2010) | 1 line Bug : it is not possible to change the limit of paiment : Fixed ........ r2946 | danydb | 2010-02-13 14:12:05 +0100 (Sat, 13 Feb 2010) | 1 line remove debug ........ r2947 | danydb | 2010-02-13 14:26:27 +0100 (Sat, 13 Feb 2010) | 2 lines Update Documentation ........ r2948 | danydb | 2010-02-13 17:27:07 +0100 (Sat, 13 Feb 2010) | 1 line Correction bilan belge ........ r2949 | danydb | 2010-02-13 18:07:46 +0100 (Sat, 13 Feb 2010) | 1 line Bug fixed : cannot type a middle of payment ........ r2950 | danydb | 2010-02-13 18:12:49 +0100 (Sat, 13 Feb 2010) | 1 line Fixed Bug: the amount in quant_sold in not rounded ........ r2951 | danydb | 2010-02-13 19:31:17 +0100 (Sat, 13 Feb 2010) | 1 line Add translation for payment ........ r2952 | danydb | 2010-02-13 19:40:32 +0100 (Sat, 13 Feb 2010) | 1 line Fixed Bug cannot add a new account ........ r2953 | danydb | 2010-02-21 20:31:52 +0100 (Sun, 21 Feb 2010) | 1 line Translation completed for english ........ r2954 | danydb | 2010-02-22 23:06:47 +0100 (Mon, 22 Feb 2010) | 9 lines Fix bugs : * Security was not respected, user can write in Readonly ledgers * Cannot modify or delete accounting entry with more than 8 digits * Cannot record information when not VAT * VMSKeytrade failed with ExecSql * ledger creation : cannot save the card on deb side ........ r2955 | danydb | 2010-02-22 23:17:33 +0100 (Mon, 22 Feb 2010) | 3 lines Improve Import bank must be able to import into CASH ........ r2956 | danydb | 2010-02-23 18:16:01 +0100 (Tue, 23 Feb 2010) | 1 line Fix Bug = Feb has 28 days and every 4 years 29 ........ r2957 | danydb | 2010-02-24 21:57:04 +0100 (Wed, 24 Feb 2010) | 3 lines Fix bug : warning messages when phpcompta is installed on windows about the languages ........ r2958 | danydb | 2010-02-25 23:37:40 +0100 (Thu, 25 Feb 2010) | 3 lines Update for windows ........ r2959 | danydb | 2010-02-26 00:29:06 +0100 (Fri, 26 Feb 2010) | 2 lines Fix Bug : cannot give an account to a card ........ r2960 | danydb | 2010-02-28 20:54:32 +0100 (Sun, 28 Feb 2010) | 1 line Bug Return button for IE ........ r2961 | danydb | 2010-02-28 20:54:51 +0100 (Sun, 28 Feb 2010) | 1 line Progress for Dutch translation ........
136 lines
4.9 KiB
PHP
136 lines
4.9 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
|
|
*/
|
|
/* $Revision$ */
|
|
|
|
// Copyright Author Dany De Bontridder ddebontridder@yahoo.fr
|
|
|
|
/*!\file
|
|
* \brief Display the calendar
|
|
*/
|
|
class Calendar {
|
|
var $current_date;
|
|
private static $nb_day=array(31,28,31,30,31,30,31,31,30,31,30,31);
|
|
|
|
function __construct() {
|
|
/* get the current month */
|
|
$this->current_date=getdate();
|
|
$this->month=$this->current_date['mon'];
|
|
$this->day=self::$nb_day[$this->month-1];
|
|
$this->year=$this->current_date['year'];
|
|
if ( $this->year % 4 == 0 && $this->month=2)
|
|
$this->day=29;
|
|
}
|
|
|
|
/*!\brief fill the array given as parameter with the data from action_gestion
|
|
*\param $p_array array of the date of the month
|
|
*/
|
|
function fill_from_action(&$p_array) {
|
|
$cn=new Database(dossier::id());
|
|
$sql="select ag_id,substr(ag_title,0,20) as ag_title_fmt,to_char(ag_timestamp,'DD')::integer as ag_timestamp_day ".
|
|
" from action_gestion ".
|
|
" where ".
|
|
" to_char(ag_timestamp,'MM')::integer=$1 ".
|
|
" and to_char(ag_timestamp,'YYYY')::integer=$2 ".
|
|
" and ag_cal='C' and ag_owner=$3";
|
|
$array=$cn->get_array($sql,array($this->month,$this->year,$_SESSION['g_user']));
|
|
for ($i=0;$i<count($array);$i++) {
|
|
$ind=$array[$i]['ag_timestamp_day'];
|
|
$p_array[$ind]='<A HREF="commercial.php?'.dossier::get().'&p_action=suivi_courrier&sa=detail&ag_id='.$array[$i]['ag_id'].'">';
|
|
$p_array[$ind].="<span class=\"day\">".h($array[$i]['ag_title_fmt']).'</span>';
|
|
$p_array[$ind].="</A>";
|
|
|
|
}
|
|
}
|
|
/*!\brief fill the array given as parameter with the data from todo
|
|
*\param $p_array array of the date of the month
|
|
*/
|
|
function fill_from_todo(&$p_array) {
|
|
$cn=new Database(dossier::id());
|
|
$sql="select tl_id,substr(tl_title,0,20) as tl_title_fmt,to_char(tl_date,'DD')::integer as tl_date_day ".
|
|
" from todo_list ".
|
|
" where ".
|
|
" to_char(tl_date,'MM')::integer=$1 ".
|
|
" and to_char(tl_date,'YYYY')::integer=$2 ".
|
|
" and use_login=$3";
|
|
$array=$cn->get_array($sql,array($this->month,$this->year,$_SESSION['g_user']));
|
|
for ($i=0;$i<count($array);$i++) {
|
|
$ind=$array[$i]['tl_date_day'];
|
|
$p_array[$ind].="<span class=\"todo\">".h($array[$i]['tl_title_fmt']).'</span>';
|
|
}
|
|
}
|
|
/*!\brief display a calendar after a call to Calendar::fill
|
|
*\param none
|
|
*\return HTML String
|
|
*/
|
|
function display() {
|
|
/* day */
|
|
$cell=array();
|
|
for ($i=0;$i<42;$i++) {
|
|
$cell[$i]="";
|
|
}
|
|
$this->set_month_year();
|
|
/* weekday */
|
|
$week=array(_('Dimanche'),_('Lundi'),_('Mardi'),_('Mercredi'),_('Jeudi'),_('Vendredi'),_('Samedi'));
|
|
|
|
$this->fill_from_action($cell);
|
|
$this->fill_from_todo($cell);
|
|
$wMonth=new ISelect('per');
|
|
$cn=new Database(dossier::id());
|
|
$wMonth->value=$cn->make_array("select p_id,to_char(p_start,'MM/YYYY') from parm_periode order by p_start");
|
|
$wMonth->selected=$this->default_periode;
|
|
$wMonth->javascript="onchange=change_month(this)";
|
|
$wMonth->set_attribute('gDossier',dossier::id());
|
|
$wMonth->set_attribute('phpsessid',$_REQUEST['PHPSESSID']);
|
|
$month_year=$wMonth->input().$wMonth->get_js_attr();
|
|
ob_start();
|
|
require_once('template/calendar.php');
|
|
$ret=ob_get_contents();
|
|
ob_end_clean();
|
|
return $ret;
|
|
}
|
|
/**
|
|
*@brief set correctly the month and the year with the default_periode
|
|
*/
|
|
function set_month_year() {
|
|
$cn=new Database(dossier::id());
|
|
$array=$cn->get_array("select to_char(p_start,'MM') as month, to_char(p_start,'YYYY') as year ".
|
|
" from parm_periode where p_id=$1",array($this->default_periode));
|
|
$this->month=$array[0]['month'];
|
|
$this->year=$array[0]['year'];
|
|
}
|
|
/**
|
|
*@brief get the periode from the preference of the current user
|
|
* change the value of default_periode
|
|
*@return $this->default_periode
|
|
*/
|
|
function get_preference() {
|
|
$cn=new Database(dossier::id());
|
|
$user=new User($cn);
|
|
$this->default_periode=$user->get_periode();
|
|
return $this->default_periode;
|
|
}
|
|
/**
|
|
*@brief set the periode to the parameter, change the value of $this->default_periode
|
|
* there is no check on the periode
|
|
*/
|
|
function set_periode($p_per) {
|
|
$this->default_periode=$p_per;
|
|
}
|
|
|
|
}
|