altocompta/html/poste_csv.php

89 lines
2.5 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');
include("class_poste.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 cl_user($cn);
$User->Check();
if ( isset ( $_POST['poste_fille']) )
{ //choisit de voir tous les postes
$a_poste=getarray($cn,"select pcm_val from tmp_pcmn where pcm_val like '".$_POST["poste_id"]."%'");
}
else
{
$a_poste=getarray($cn,"select pcm_val from tmp_pcmn where pcm_val = '".$_POST['poste_id']."'");
}
if ( count($a_poste) == 0 )
exit;
foreach ($a_poste as $pos)
{
$Poste=new poste($cn,$pos['pcm_val']);
$Poste->GetName();
list($array,$tot_deb,$tot_cred)=$Poste->GetRow( $_POST['from_periode'],
$_POST['to_periode']
);
if ( count($Poste->row ) == 0 )
continue;
echo '"Poste";'.
"\"Code interne\";".
"\"Date\";".
"\"Description\";".
"\"Débit\";".
"\"Cré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é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");
}
exit;
?>