222 lines
No EOL
6.7 KiB
PHP
222 lines
No EOL
6.7 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 this file is to be included to handle the financial ledger
|
|
*/
|
|
require_once ('class_acc_ledger_fin.php');
|
|
require_once ('check_priv.php');
|
|
$gDossier=dossier::id();
|
|
$p_action=(isset ($_REQUEST['p_action']))?$_REQUEST['p_action']:'';
|
|
|
|
$cn=DbConnect(dossier::id());
|
|
$menu_action="?p_action=bank&".dossier::get();
|
|
$menu=array(
|
|
array($menu_action.'&sa=n','Nouvel extrait','Encodage d\'un nouvel extrait',1),
|
|
array($menu_action.'&sa=l','Liste','Liste opération bancaire',2),
|
|
array($menu_action.'&sa=s','Solde','Solde des comptes',3),
|
|
array('?p_action=impress&type=jrn&'.dossier::get(),'Impression','Impression')
|
|
);
|
|
$sa=(isset($_REQUEST['sa']))?$_REQUEST['sa']:-1;
|
|
|
|
switch ($sa) {
|
|
case 'n':
|
|
$def=1;
|
|
break;
|
|
case 'l':
|
|
$def=2;
|
|
break;
|
|
case 's':
|
|
$def=3;
|
|
break;
|
|
default:
|
|
$def=1;
|
|
}
|
|
echo '<div class="lmenu">';
|
|
echo ShowItem($menu,'H','mtitle','mtitle',$def);
|
|
echo '</div>';
|
|
|
|
$href=basename($_SERVER['PHP_SELF']);
|
|
$Ledger=new Acc_Ledger_Fin($cn,0);
|
|
//--------------------------------------------------------------------------------
|
|
// Encode a new financial operation
|
|
//--------------------------------------------------------------------------------
|
|
if ( $def == 1 ) {
|
|
// Check privilege
|
|
if ( isset($_REQUEST['p_jrn']) &&
|
|
CheckJrn($gDossier,$_SESSION['g_user'],$_REQUEST ['p_jrn']) != 2 ) {
|
|
NoAccess();
|
|
exit -1;
|
|
}
|
|
|
|
$href=basename($_SERVER['PHP_SELF']);
|
|
|
|
if ( isset($_REQUEST['p_jrn']))
|
|
$Ledger->id=$_REQUEST['p_jrn'];
|
|
else {
|
|
$def_ledger=$Ledger->get_first('fin');
|
|
$Ledger->id=$def_ledger['jrn_def_id'];
|
|
}
|
|
//----------------------------------------
|
|
// Confirm the operations
|
|
//----------------------------------------
|
|
if ( isset($_POST['save'])) {
|
|
try {
|
|
$Ledger->verify($_POST);
|
|
} catch (AcException $e) {
|
|
echo '<script> alert("'.$e->getMessage().'");</script>';
|
|
$correct=1;
|
|
}
|
|
if ( ! isset ($correct )) {
|
|
echo '<div class="content">';
|
|
echo '<form name="form_detail" enctype="multipart/form-data" ACTION="'.$href.'" METHOD="POST">';
|
|
echo widget::hidden('p_action','bank');
|
|
echo $Ledger->confirm($_POST);
|
|
echo widget::submit('confirm','Confirmer');
|
|
echo widget::submit('correct','Corriger');
|
|
|
|
echo '</form>';
|
|
echo '</div>';
|
|
exit();
|
|
}
|
|
}
|
|
//----------------------------------------
|
|
// Confirm and save the operations
|
|
// into the database
|
|
//----------------------------------------
|
|
if ( isset($_POST['confirm'])) {
|
|
try {
|
|
$Ledger->verify($_POST);
|
|
} catch (AcException $e) {
|
|
echo '<script> alert("'.$e->getMessage().'");</script>';
|
|
$correct=1;
|
|
}
|
|
if ( !isset($correct)) {
|
|
echo '<div class="content">';
|
|
$a= $Ledger->insert($_POST);
|
|
echo '<h2 class="info">Opération sauvée </h2>';
|
|
echo widget::button_href('Nouvelle extrait',$href.'?p_action=bank&sa=n&'.dossier::get());
|
|
echo $a;
|
|
echo '</div>';
|
|
exit();
|
|
}
|
|
}
|
|
//----------------------------------------
|
|
// Correct the operations
|
|
//----------------------------------------
|
|
if ( isset($_POST['correct'])) {
|
|
$correct=1;
|
|
}
|
|
//----------------------------------------
|
|
// Blank form
|
|
//----------------------------------------
|
|
echo JS_PROTOTYPE;
|
|
echo '<div class="content">';
|
|
|
|
|
|
echo '<form name="form_detail" enctype="multipart/form-data" ACTION="'.$href.'" METHOD="POST">';
|
|
echo widget::hidden('p_action','bank');
|
|
echo widget::hidden('sa','n');
|
|
$array=( isset($correct))?$_POST:null;
|
|
// show select ledger
|
|
echo $Ledger->display_form($array);
|
|
echo widget::button('add_item','Ajout article', ' onClick="ledger_fin_add_row()"');
|
|
echo widget::submit('save','Sauve');
|
|
echo widget::reset('Effacer ');
|
|
|
|
|
|
echo '</form>';
|
|
echo JS_CALC_LINE;
|
|
echo '</div>';
|
|
exit();
|
|
}
|
|
//--------------------------------------------------------------------------------
|
|
// Show the listing
|
|
//--------------------------------------------------------------------------------
|
|
if ( $def == 2) {
|
|
// Check privilege
|
|
if ( isset($_REQUEST['p_jrn']) &&
|
|
CheckJrn($gDossier,$_SESSION['g_user'],$_GET['p_jrn']) ==0 ) {
|
|
NoAccess();
|
|
exit -1;
|
|
}
|
|
|
|
echo '<div class="content">';
|
|
if ( isset($_REQUEST['p_jrn']))
|
|
$Ledger->id=$_REQUEST['p_jrn'];
|
|
else {
|
|
$def_ledger=$Ledger->get_first('fin');
|
|
$Ledger->id=$def_ledger['jrn_def_id'];
|
|
}
|
|
$Ledger->show_ledger();
|
|
echo '</div>';
|
|
exit();
|
|
}
|
|
//--------------------------------------------------------------------------------
|
|
// Show the saldo
|
|
//--------------------------------------------------------------------------------
|
|
if ( $def==3) {
|
|
require_once("poste.php");
|
|
require_once ('class_acc_parm_code.php');
|
|
echo '<div class="content">';
|
|
|
|
// find the bank account
|
|
// NOTE : those values are in a table because
|
|
// they are _national_ parameters
|
|
$banque=new Acc_Parm_Code($cn,'BANQUE');
|
|
$caisse=new Acc_Parm_Code($cn,'CAISSE');
|
|
$vir_interne=new Acc_Parm_Code($cn,'VIREMENT_INTERNE');
|
|
$accountSql="select distinct pcm_val::text,pcm_lib from
|
|
tmp_pcmn
|
|
where pcm_val::text like '".$banque->p_value."%' or pcm_val::text like '".$vir_interne->p_value."%'
|
|
or pcm_val::text like '".$caisse->p_value."%'
|
|
order by pcm_val::text";
|
|
$ResAccount=ExecSql($cn,$accountSql);
|
|
echo '<div class="content">';
|
|
|
|
echo "<table>";
|
|
// Filter the saldo
|
|
// on the current year
|
|
$filter_year=" and j_tech_per in (select p_id from parm_periode where p_exercice='".$User->get_exercice()."')";
|
|
|
|
// for each account
|
|
for ( $i = 0; $i < pg_NumRows($ResAccount);$i++) {
|
|
// get the saldo
|
|
$l=pg_fetch_array($ResAccount,$i);
|
|
$m=get_solde($cn,$l['pcm_val'],$filter_year);
|
|
// print the result if the saldo is not equal to 0
|
|
if ( $m != 0.0 ) {
|
|
echo "<tr>";
|
|
echo "<TD>".
|
|
$l['pcm_val'].
|
|
"</TD>".
|
|
"<TD>".
|
|
$l['pcm_lib'].
|
|
"</TD>"."<TD>".
|
|
$m.
|
|
"</TD>"."</TR>";
|
|
}
|
|
}// for
|
|
echo "</table>";
|
|
echo "</div>";
|
|
exit();
|
|
} |