206 lines
5.9 KiB
PHP
206 lines
5.9 KiB
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
|
||
/* $Revision$ */
|
||
include_once ("ac_common.php");
|
||
include_once ("poste.php");
|
||
include_once("preference.php");
|
||
include_once("central_inc.php");
|
||
include_once("user_common.php");
|
||
include_once("form_input.php");
|
||
include_once("check_priv.php");
|
||
|
||
html_page_start($g_UserProperty['use_theme']);
|
||
if ( ! isset ( $g_dossier ) ) {
|
||
echo "You must choose a Dossier ";
|
||
exit -2;
|
||
}
|
||
include_once ("postgres.php");
|
||
include_once("jrn.php");
|
||
/* Admin. Dossier */
|
||
CheckUser();
|
||
|
||
if ( isset( $p_jrn )) {
|
||
session_register("g_jrn");
|
||
$g_jrn=$p_jrn;
|
||
}
|
||
|
||
// Check privilege
|
||
// CheckJrn verify that the user is not an admin
|
||
// an admin has all right
|
||
if ( CheckJrn($g_dossier,$g_user,$g_jrn) != 2 ) {
|
||
NoAccess();
|
||
exit -1;
|
||
}
|
||
|
||
|
||
$l_Db=sprintf("dossier%d",$g_dossier);
|
||
$cn=DbConnect($l_Db);
|
||
|
||
list ($l_array,$max_deb,$max_cred)=GetData($cn,$jrn_op);
|
||
foreach ($l_array as $key=>$element) {
|
||
${"e_$key"}=$element;
|
||
echo_debug("e_$key =$element");
|
||
}
|
||
|
||
// annulate a operation
|
||
if ( isset ($annul) ) {
|
||
if ( isset ($_POST['p_id'])) {
|
||
// Get the current periode
|
||
$period=GetUserPeriode($cn,$g_user);
|
||
$p_id=$_POST['p_id'];
|
||
// Get the date
|
||
$e_op_date=$_POST['op_date'];
|
||
|
||
|
||
// Test if date is valid
|
||
if ( isDate ($e_op_date) == null ) {
|
||
$msg='Invalid Date';
|
||
echo "<script> alert('$msg');</script>";
|
||
// set an incorrect pid to get out from here
|
||
$p_id=-1;
|
||
}
|
||
// userPref contient la periode par default
|
||
$userPref=GetUserPeriode($cn,$g_user);
|
||
list ($l_date_start,$l_date_end)=GetPeriode($cn,$userPref);
|
||
|
||
// Date dans la periode active
|
||
echo_debug ("date start periode $l_date_start date fin periode $l_date_end date demand<6E>e $e_op_date");
|
||
if ( cmpDate($e_op_date,$l_date_start)<0 ||
|
||
cmpDate($e_op_date,$l_date_end)>0 )
|
||
{
|
||
$msg="Not in the active periode please change your preference";
|
||
echo_error($msg); echo_error($msg);
|
||
echo "<SCRIPT>alert('$msg');</SCRIPT>";
|
||
|
||
// set an incorrect pid to get out from here
|
||
$p_id=-1;
|
||
|
||
}
|
||
// Periode ferm<72>e
|
||
if ( PeriodeClosed ($cn,$userPref)=='t' )
|
||
{
|
||
$msg="This periode is closed please change your preference";
|
||
echo_error($msg); echo_error($msg);
|
||
echo "<SCRIPT>alert('$msg');</SCRIPT>";
|
||
// set an incorrect pid to get out from here
|
||
$p_id=-1;
|
||
}
|
||
|
||
// Test is date is not in a closed periode
|
||
|
||
// Check if it a centralize operation
|
||
if ( isValid($cn,$p_id) == 1 ) {
|
||
|
||
|
||
// get the next op id
|
||
$seq=GetNextId($cn,'j_grpt')+1;
|
||
|
||
// build the sql stmt for jrnx
|
||
$sql="insert into jrnx (
|
||
j_date,
|
||
j_montant, j_poste,j_grpt,j_jrn_def, j_debit,
|
||
j_text,j_internal,j_tech_user,j_tech_per
|
||
)
|
||
select
|
||
to_date('$e_op_date','DD.MM.YYYY'),
|
||
j_montant, j_poste, $seq, j_jrn_def, case when j_debit=false then true else false end,
|
||
j_text,'ANNULE','$g_user',$period
|
||
from jrnx where j_grpt=".$_POST['p_id'];
|
||
$Res=ExecSql($cn,$sql);
|
||
|
||
|
||
// build the sql stmt for jrn
|
||
$sql= "insert into jrn (
|
||
jr_def_id,jr_montant,jr_comment, jr_date,jr_grpt_id,jr_internal ,jr_tech_per,
|
||
jr_valid
|
||
) select
|
||
jr_def_id,jr_montant,'Annulation '||jr_comment,to_date('$e_op_date','DD.MM.YYYY'),$seq ,'ANNULE', $period,
|
||
false
|
||
from
|
||
jrn
|
||
where jr_grpt_id=".$_POST['p_id'];
|
||
$Res=ExecSql($cn,$sql);
|
||
|
||
// also in the stock table
|
||
$sql="delete from stock_goods where sg_id = any ( select sg_id
|
||
from stock_goods natural join jrnx where j_grpt=".$_POST['p_id'].")";
|
||
$Res=ExecSql($cn,$sql);
|
||
// Update jr_valid
|
||
$Res=ExecSql($cn,"update jrn set jr_valid=false where jr_grpt_id=$p_id");
|
||
echo '<h2 class="info"> Op<4F>ration annul<75>e</h2>';
|
||
?>
|
||
<script>
|
||
window.close();
|
||
self.opener.RefreshMe();
|
||
</script>
|
||
<?
|
||
|
||
}// if isValid
|
||
|
||
} // if Post['p_id']
|
||
}// if annul
|
||
echo '<div align="center"> Op<4F>ration '.$l_array['jr_internal'].'</div>
|
||
<div>
|
||
<form action="'.$_SERVER['REQUEST_URI'].'" method="post" >';
|
||
|
||
$a=InputType("Date","text", "op_date",$e_op_date,false);
|
||
//echo 'Date : '.$e_op_date;
|
||
echo $a;
|
||
echo '<div style="border-style:solid;border-width:1pt;">';
|
||
$a=InputType("Description:","text","comment",$e_comment,false);
|
||
echo $a;
|
||
echo '</DIV>';
|
||
|
||
if ( isset ($e_ech) ) {
|
||
echo "<DIV> Echeance $e_ech </DIV>";
|
||
}
|
||
for ( $i = 0; $i < $max_deb;$i++) {
|
||
$lib=GetPosteLibelle($g_dossier,${"e_class_deb$i"});
|
||
echo '<div style="background-color:#BFC2D5;">';
|
||
echo ${"e_class_deb$i"}." $lib "."<B>".${"e_mont_deb$i"}."</B>";
|
||
echo "</div>";
|
||
}
|
||
for ( $i = 0; $i < $max_cred;$i++) {
|
||
$lib=GetPosteLibelle($g_dossier,${"e_class_cred$i"});
|
||
echo '<div style="background-color:#E8F4FF;">';
|
||
echo ${"e_class_cred$i"}." $lib "."<B>".${"e_mont_cred$i"}."</B>";
|
||
echo '</div>';
|
||
}
|
||
//echo "operation concern<72>e $e_rapt<br><br>
|
||
//";
|
||
$a=GetConcerned($cn,$e_jr_id);
|
||
|
||
if ( $a != null ) {
|
||
foreach ($a as $key => $element) {
|
||
echo "operation concern<72>e <br>";
|
||
|
||
echo "<A HREF=\"jrn_op_detail.php?jrn_op=".GetGrpt($cn,$element)."\"> ".GetInternal($cn,$element)."</A><br>";
|
||
}//for
|
||
}// if ( $a != null ) {
|
||
|
||
echo '
|
||
|
||
<input type="hidden" name="p_id" value="'.$_GET['jrn_op'].'">
|
||
<input type="submit" name="annul" value="Effacer">
|
||
<input type="button" name="cancel" value="Escape" onClick="window.close();">
|
||
</form>';
|
||
|
||
html_page_stop();
|
||
?>
|