altocompta/html/poste_pdf.php

102 lines
3 KiB
PHP
Raw Blame History

<?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$
/*! \file
* \brief send the account list in PDF
*/
include_once("class_acc_account.php");
include_once("ac_common.php");
include_once("postgres.php");
include_once("class.ezpdf.php");
include_once("impress_inc.php");
require_once("poste.php");
require_once ('header_print.php');
require_once('class_dossier.php');
$gDossier=dossier::id();
$cn=DbConnect($gDossier);
foreach ($_POST as $key=>$element) {
${"$key"}=$element;
}
if ( isset ( $poste_fille) ){ //choisit de voir tous les postes
$a_poste=getarray($cn,"select pcm_val from tmp_pcmn where pcm_val like '$poste_id%'");
} else
$a_poste=getarray($cn,"select pcm_val from tmp_pcmn where pcm_val = '$poste_id'");
$ret="";
$pdf=new Cezpdf();
$pdf->selectFont('./addon/fonts/Helvetica.afm');
header_pdf($cn,$pdf);
if ( count($a_poste) == 0 ) {
$pdf->ezStream();
return;
}
foreach ($a_poste as $poste)
{
echo_debug("poste_pdf",__LINE__,$poste);
$Poste=new Acc_Account($cn,$poste['pcm_val']);
list($array,$tot_deb,$tot_cred)=$Poste->get_row($from_periode,$to_periode);
// don't print empty account
if ( count($array) == 0 ) {
continue;
}
$Libelle=sprintf("(%s) %s ",$Poste->id,$Poste->get_name());
// $pdf->ezText($Libelle,30);
$pdf->ezTable($array,
array ('jr_internal'=>'Op<4F>ration',
'j_date' => 'Date',
'jrn_name'=>'Journal',
'description'=>'Description',
'deb_montant'=> 'Montant',
'cred_montant'=> 'Montant'
),$Libelle,
array('shaded'=>1,'showHeadings'=>1,'width'=>500,
'cols'=>array('montant'=> array('justification'=>'right'),
)));
$str_debit=sprintf("D<EFBFBD>bit % 12.2f",$tot_deb);
$str_cred=sprintf("Cr<EFBFBD>dit % 12.2f",$tot_cred);
$diff_solde=$tot_deb-$tot_cred;
if ( $diff_solde < 0 ) {
$solde=" C ";
$diff_solde*=-1;
} else
{
$solde=" D ";
}
$str_solde=sprintf(" Solde %s %12.2f",$solde,$diff_solde);
$pdf->ezText($str_debit,10,array('justification'=>'right'));
$pdf->ezText($str_cred,10,array('justification'=>'right'));
$pdf->ezText($str_solde,14,array('justification'=>'right'));
//New page
$pdf->ezNewPage();
header_pdf($cn,$pdf);
}
$pdf->ezStream();
?>