lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Mise jour

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2004-04-19 09:16:32 +00:00
parent e68b619dfa
commit 25cb54afd9
2 changed files with 208 additions and 35 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

135
htdocs/compta/paiement/rapport.php Normal file
View File

@ -0,0 +1,135 @@
<?PHP
/* Copyright (C) 2003 Rodolphe Quiedeville <rodolphe@quiedeville.org>
*
* This program 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.
*
* This program 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 this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
* $Id$
* $Source$
*
*/
require("./pre.inc.php");
/*
* Sécurité accés
*/
if ($user->societe_id > 0)
{
block_access();
exit;
}
require("../../includes/modules/rapport/pdf_paiement.class.php");
$dir = DOL_DOCUMENT_ROOT."/document/rapport/";
if ($HTTP_POST_VARS["action"] == 'gen')
{
$rap = new pdf_paiement($db);
$rap->write_pdf_file($dir, $HTTP_POST_VARS["remonth"], $HTTP_POST_VARS["reyear"]);
$year = $HTTP_POST_VARS["reyear"];
}
llxHeader();
/*
*
*
*/
print_titre("Rapport paiements");
print '<form method="post" action="rapport.php?year='.$year.'">';
print '<input type="hidden" name="action" value="gen">';
$cmonth = date("n", time());
$syear = date("Y", time());
$strmonth[1] = "Janvier";
$strmonth[2] = "F&eacute;vrier";
$strmonth[3] = "Mars";
$strmonth[4] = "Avril";
$strmonth[5] = "Mai";
$strmonth[6] = "Juin";
$strmonth[7] = "Juillet";
$strmonth[8] = "Ao&ucirc;t";
$strmonth[9] = "Septembre";
$strmonth[10] = "Octobre";
$strmonth[11] = "Novembre";
$strmonth[12] = "D&eacute;cembre";
print '<select name="remonth">';
for ($month = 1 ; $month < 13 ; $month++)
{
if ($month == $cmonth)
{
print "<option value=\"$month\" SELECTED>" . $strmonth[$month];
}
else
{
print "<option value=\"$month\">" . $strmonth[$month];
}
}
print "</select>";
print '<select name="reyear">';
for ($formyear = $syear - 2; $formyear < $syear +1 ; $formyear++)
{
if ($formyear == $syear)
{
print "<option value=\"$formyear\" SELECTED>$formyear";
}
else
{
print "<option value=\"$formyear\">$formyear";
}
}
print "</select>\n";
print '<input type="submit" value="Générer">';
print '</form>';
clearstatcache();
$handle=opendir($dir);
while (($file = readdir($handle))!==false)
{
if (is_dir($dir.$file) && substr($file, 0, 1) <> '.')
{
print '<a href="index.php?year='.$file.'">'.$file.'</a> ';
}
}
if ($year)
{
$handle=opendir($dir.'/'.$year);
print '<table width="100%" id="wiborder">';
print '<tr><td>Rapport</td><td>Taille</td><td>Date de génération</td></tr>';
while (($file = readdir($handle))!==false)
{
if (substr($file, 0, 8) == 'paiement')
{
$tfile = $dir . '/'.$year.'/'.$file;
print '<tr><td><a href="'.DOL_URL_ROOT.'/document/rapport/'.$year.'/'.$file.'">'.$file.'</a></td>';
print '<td align="right">'.filesize($tfile). ' bytes</td>';
print '<td align="right">'.strftime("%d %b %Y %H:%M:%S",filemtime($tfile)).'</td></tr>';
}
}
print '</table>';
}
$db->close();
llxFooter("<em>Derni&egrave;re modification $Date$ r&eacute;vision $Revision$</em>");
?>

108
htdocs/includes/modules/rapport/pdf_paiement.class.php
View File

@ -32,7 +32,7 @@ Class pdf_paiement {
$this->tab_top = 30;
$this->line_height = 8;
$this->line_height = 5;
$this->line_per_page = 25;
$this->tab_height = $this->line_height * $this->line_per_page;
@ -66,15 +66,16 @@ Class pdf_paiement {
$pdf->SetFont('Arial','',12);
$pdf->Text(11,$this->tab_top + 6,'Facture');
$pdf->Text(11,$this->tab_top + 6,'Date');
$pdf->line(40, $this->tab_top, 40, $this->tab_top + $this->tab_height + 10);
$pdf->Text(42, $this->tab_top + 6,'Date');
$pdf->Text(42, $this->tab_top + 6,'Type paiement');
$pdf->line(80, $this->tab_top, 80, $this->tab_top + $this->tab_height + 10);
$pdf->Text(82, $this->tab_top + 6,'Type paiement');
$pdf->Text(82, $this->tab_top + 6,'Facture');
$pdf->line(120, $this->tab_top, 120, $this->tab_top + $this->tab_height + 10);
$pdf->Text(122, $this->tab_top + 6,'Numéro');
$pdf->Text(122, $this->tab_top + 6,'Montant Fac');
$pdf->line(160, $this->tab_top, 160, $this->tab_top + $this->tab_height + 10);
@ -88,31 +89,51 @@ Class pdf_paiement {
Function Body(&$pdf, $page, $lines)
{
$pdf->SetFont('Arial','', 10);
for ($i = 0 ; $i < $this->line_per_page ; $i++)
$pdf->SetFont('Arial','', 9);
$oldprowid = 0;
$pdf->SetFillColor(220,220,220);
$yp = 0;
for ($j = 0 ; $j < sizeof($lines) ; $j++)
{
$j = $i + (($page - 1) * $this->line_per_page );
$pdf->SetFillColor(220,220,220);
$i = $j;
if ($oldprowid <> $lines[$j][7])
{
$pdf->SetXY (10, $this->tab_top + 10 + $yp);
$pdf->MultiCell(30, $this->line_height, $lines[$j][1], 0, 'J', 1);
$pdf->SetXY (10, $this->tab_top + 10 + ($i * $this->line_height) );
$pdf->MultiCell(30, $this->line_height, $lines[$j][0], 0, 'J', 0);
$pdf->SetXY (40, $this->tab_top + 10 + ($i * $this->line_height) );
$pdf->MultiCell(40, $this->line_height, $lines[$j][1], 0, 'J', 0);
$pdf->SetXY (40, $this->tab_top + 10 + $yp);
$pdf->MultiCell(40, $this->line_height, $lines[$j][2], 0, 'J', 1);
$pdf->SetXY (80, $this->tab_top + 10 + $yp);
$pdf->MultiCell(40, $this->line_height, '', 0, 'J', 1);
$pdf->SetXY (80, $this->tab_top + 10 + ($i * $this->line_height) );
$pdf->MultiCell(40, $this->line_height, $lines[$j][2], 0, 'J', 0);
$pdf->SetXY (120, $this->tab_top + 10 + ($i * $this->line_height) );
$pdf->MultiCell(40, $this->line_height, $lines[$j][3], 0, 'J', 0);
$pdf->SetXY (160, $this->tab_top + 10 + ($i * $this->line_height) );
$pdf->MultiCell(40, $this->line_height, $lines[$j][4], 0, 'R', 0);
if ($i < $this->line_per_page - 1)
{
$pdf->line(10, $this->tab_top + 10 + (($i+1) * $this->line_height), 200, $this->tab_top + 10 + (($i+1) * $this->line_height));
$pdf->SetXY (120, $this->tab_top + 10 + $yp);
$pdf->MultiCell(40, $this->line_height, $lines[$j][3], 0, 'J', 1);
$pdf->SetXY (160, $this->tab_top + 10 + $yp);
$pdf->MultiCell(40, $this->line_height, $lines[$j][4], 0, 'R', 1);
$yp = $yp + 5;
}
$pdf->SetXY (80, $this->tab_top + 10 + $yp);
$pdf->MultiCell(40, $this->line_height, $lines[$j][0], 0, 'J', 0);
$pdf->SetXY (120, $this->tab_top + 10 + $yp);
$pdf->MultiCell(40, $this->line_height, $lines[$j][5], 0, 'J', 0);
$pdf->SetXY (160, $this->tab_top + 10 + $yp);
$pdf->MultiCell(40, $this->line_height, $lines[$j][6], 0, 'R', 0);
$yp = $yp + 5;
if ($oldprowid <> $lines[$j][7])
{
$oldprowid = $lines[$j][7];
}
// if ($i < $this->line_per_page - 1)
// {
// $pdf->line(10, $this->tab_top + 10 + (($i+1) * $this->line_height), 200, $this->tab_top + 10 + (($i+1) * $this->line_height));
// }
}
}
@ -141,7 +162,6 @@ Class pdf_paiement {
$month = substr("0".$month, strlen("0".$month)-2,2);
$_file = $_dir . "paiements-$month-$year" . ".pdf";
$pdf = new FPDF('P','mm','A4');
$pdf->Open();
@ -150,13 +170,22 @@ Class pdf_paiement {
*
*/
$sql = "SELECT ".$this->db->pdate("p.datep")." as dp, p.amount, f.amount as fa_amount, f.facnumber";
$sql .=", f.rowid as facid, c.libelle as paiement_type, p.num_paiement";
$sql .= " FROM ".MAIN_DB_PREFIX."paiement as p, ".MAIN_DB_PREFIX."facture as f, ".MAIN_DB_PREFIX."c_paiement as c";
$sql .= " WHERE p.fk_facture = f.rowid AND p.fk_paiement = c.id";
$sql .= " AND date_format(p.datep, '%m%Y') = " . $month.$year;
$sql .= " ORDER BY p.datep ASC";
$sql = "SELECT ".$this->db->pdate("p.datep")." as dp, f.facnumber";
$sql .= ", c.libelle as paiement_type, p.num_paiement";
$sql .= ", p.amount as paiement_amount, f.total_ttc as facture_amount ";
$sql .= ", pf.amount as pf_amount ";
$sql .= ", p.rowid as prowid";
$sql .= " FROM ".MAIN_DB_PREFIX."paiement as p, ".MAIN_DB_PREFIX."facture as f, ";
$sql .= MAIN_DB_PREFIX."c_paiement as c, ".MAIN_DB_PREFIX."paiement_facture as pf";
$sql .= " WHERE pf.fk_facture = f.rowid AND pf.fk_paiement = p.rowid";
$sql .= " AND date_format(p.datep, '%Y') = " . $year;
$sql .= " AND p.fk_paiement = c.id ";
// $sql .= " AND date_format(p.datep, '%m%Y') = " . $month.$year;
$sql .= " ORDER BY p.datep ASC, pf.fk_paiement ASC";
$result = $this->db->query($sql);
// print $sql ;
if ($result)
{
@ -173,7 +202,10 @@ Class pdf_paiement {
$lines[$i][1] = strftime("%d %B %Y",$objp->dp);
$lines[$i][2] = $objp->paiement_type ;
$lines[$i][3] = $objp->num_paiement;
$lines[$i][4] = price($objp->amount);
$lines[$i][4] = price($objp->paiement_amount);
$lines[$i][5] = price($objp->facture_amount);
$lines[$i][6] = price($objp->pf_amount);
$lines[$i][7] = price($objp->prowid);
$i++;
}
}
@ -190,13 +222,19 @@ Class pdf_paiement {
// force à générer au moins une page si le rapport ne contient aucune ligne
$pages = 1;
}
/*
for ($i = 0 ; $i < $pages ; $i++)
{
$pdf->AddPage();
$this->Header($pdf, $i+1, $pages);
$this->Body($pdf, $i+1, $lines);
}
*/
$pdf->AddPage();
$this->Header($pdf, $i+1, $pages);
$this->Body($pdf, $i+1, $lines);
/*
*
*/