140 lines
3.6 KiB
PHP
140 lines
3.6 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 Send the poste list in csv
|
||
*/
|
||
include_once("ac_common.php");
|
||
include_once ("postgres.php");
|
||
include ('class_user.php');
|
||
require_once("class_acc_account_ledger.php");
|
||
require_once ('class_acc_operation.php');
|
||
|
||
header('Content-type: application/csv');
|
||
header('Content-Disposition: attachment;filename="poste.csv"',FALSE);
|
||
require_once('class_dossier.php');
|
||
$gDossier=dossier::id();
|
||
|
||
/* Admin. Dossier */
|
||
$cn=DbConnect($gDossier);
|
||
|
||
|
||
$User=new User($cn);
|
||
$User->Check();
|
||
if ( isset ( $_REQUEST['poste_fille']) )
|
||
{ //choisit de voir tous les postes
|
||
$a_poste=get_array($cn,"select pcm_val from tmp_pcmn where pcm_val::text like '".$_REQUEST["poste_id"]."%'");
|
||
}
|
||
else
|
||
{
|
||
$a_poste=get_array($cn,"select pcm_val from tmp_pcmn where pcm_val = '".$_REQUEST['poste_id']."'");
|
||
}
|
||
|
||
if ( ! isset ($_REQUEST['oper_detail'])) {
|
||
if ( count($a_poste) == 0 )
|
||
exit;
|
||
|
||
foreach ($a_poste as $pos)
|
||
{
|
||
$Poste=new Acc_Account_Ledger($cn,$pos['pcm_val']);
|
||
$Poste->get_name();
|
||
list($array,$tot_deb,$tot_cred)=$Poste->get_row( $_REQUEST['from_periode'],
|
||
$_REQUEST['to_periode']
|
||
);
|
||
if ( count($Poste->row ) == 0 )
|
||
continue;
|
||
|
||
echo '"Poste";'.
|
||
"\"Code interne\";".
|
||
"\"Date\";".
|
||
"\"Description\";".
|
||
"\"D<EFBFBD>bit\";".
|
||
"\"Cr<EFBFBD>dit\"";
|
||
printf("\n");
|
||
|
||
|
||
foreach ( $Poste->row as $op ) {
|
||
echo '"'.$pos['pcm_val'].'";'.
|
||
'"'.$op['jr_internal'].'"'.";".
|
||
'"'.$op['j_date'].'"'.";".
|
||
'"'.$op['description'].'"'.";".
|
||
sprintf("%8.4f",$op['deb_montant']).";".
|
||
sprintf("%8.4f",$op['cred_montant']);
|
||
printf("\n");
|
||
|
||
|
||
}
|
||
$solde_type=($tot_deb>$tot_cred)?"solde d<>biteur":"solde cr<63>diteur";
|
||
$diff=abs($tot_deb-$tot_cred);
|
||
printf(
|
||
'"'."$solde_type".'"'.";".
|
||
sprintf("%8.4f",$diff).";".
|
||
sprintf("%8.4f",$tot_deb).";".
|
||
sprintf("%8.4f",$tot_cred)."\n");
|
||
}
|
||
} else {
|
||
/* detail of all operation */
|
||
if ( count($a_poste) == 0 )
|
||
exit;
|
||
|
||
foreach ($a_poste as $pos)
|
||
{
|
||
$Poste=new Acc_Account_Ledger($cn,$pos['pcm_val']);
|
||
$Poste->get_name();
|
||
list($array,$tot_deb,$tot_cred)=$Poste->get_row( $_REQUEST['from_periode'],
|
||
$_REQUEST['to_periode']
|
||
);
|
||
if ( count($Poste->row ) == 0 )
|
||
continue;
|
||
|
||
echo '"Poste";'.
|
||
'"QuickCode";'.
|
||
"\"Code interne\";".
|
||
"\"Date\";".
|
||
"\"Description\";".
|
||
"\"Montant\";".
|
||
"\"D/C\"";
|
||
printf("\n");
|
||
|
||
|
||
foreach ( $Poste->row as $a ) {
|
||
$op=new Acc_Operation($cn);
|
||
$op->jr_id=$a['jr_id'];
|
||
$result=$op->get_jrnx_detail();
|
||
foreach ( $result as $r) {
|
||
printf('"%s";"%s";"%s";"%s";"%s";%12.2f;"%s"',
|
||
$r['j_poste'],
|
||
$r['j_qcode'],
|
||
$r['jr_internal'],
|
||
$r['j_date'],
|
||
$a['description'],
|
||
$r['j_montant'],
|
||
$r['debit']);
|
||
printf("\r\n");
|
||
|
||
}
|
||
|
||
|
||
|
||
}
|
||
}
|
||
exit;
|
||
}
|
||
?>
|