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

Bugfix

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2004-12-07 13:55:56 +00:00
parent a962584fb4
commit 86710acae5
1 changed files with 27 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
htdocs/compta/export/modules/compta.export.poivre.class.php
View File

@ -72,30 +72,28 @@ class ComptaExportPoivre
$j = 0;
$n = sizeof($line_in);
$oldfacture = $line_in[0][1];
// On commence par la ligne 0
$line_out[$j] = $line_in[$i];
$this->line_out[$j] = $line_in[$i];
for ( $i = 1 ; $i < $n ; $i++)
{
// On agrège les lignes avec le même code comptable
if ( $line_in[$i][1] == $line_in[$i-1][1] && $line_in[$i][4] == $line_in[$i-1][4])
if ( ($line_in[$i][1] == $line_in[$i-1][1]) && ($line_in[$i][4] == $line_in[$i-1][4]) )
{
$line_out[$j][8] = ($line_out[$j][8] + $line_in[$i][8]);
$this->line_out[$j][8] = ($this->line_out[$j][8] + $line_in[$i][8]);
}
else
{
$line_out[$j] = $line_in[$i];
$j++;
$this->line_out[$j] = $line_in[$i];
}
}
dolibarr_syslog("ComptaExportPoivre::Agregate " . sizeof($line_out) . " lignes en sorties");
dolibarr_syslog("ComptaExportPoivre::Agregate " . sizeof($this->line_out) . " lignes en sorties");
return $line_out;
return 0;
}
function Export($linec)
@ -104,7 +102,8 @@ class ComptaExportPoivre
dolibarr_syslog("ComptaExportPoivre::Export");
dolibarr_syslog("ComptaExportPoivre::Export " . sizeof($linec) . " lignes en entrées");
$lines = $this->Agregate($linec);
$this->Agregate($linec);
$fname = "/tmp/exportcompta";
@ -127,53 +126,53 @@ class ComptaExportPoivre
$i = 0;
$j = 0;
$n = sizeof($lines);
$n = sizeof($this->line_out);
$oldfacture = 0;
for ( $i = 0 ; $i < $n ; $i++)
{
if ( $oldfacture <> $lines[$i][1])
if ( $oldfacture <> $this->line_out[$i][1])
{
// Ligne client
fputs($fp, strftime("%d%m%y",$lines[$i][0]) . "\t");
fputs($fp, strftime("%d%m%y",$this->line_out[$i][0]) . "\t");
fputs($fp, "VE" ."\t");
fputs($fp, "\t");
fputs($fp, '411000000' ."\t");
fputs($fp, $lines[$i][3]." Facture" ."\t");
fputs($fp, $lines[$i][5] . "\t"); // Numéro de facture
fputs($fp, ereg_replace(",",".",$lines[$i][7]) ."\t"); // Montant total TTC de la facture
fputs($fp, $this->line_out[$i][3]." Facture" ."\t");
fputs($fp, $this->line_out[$i][5] . "\t"); // Numéro de facture
fputs($fp, ereg_replace(",",".",$this->line_out[$i][7]) ."\t"); // Montant total TTC de la facture
fputs($fp, 'D' . "\t"); // D pour débit
fputs($fp, strftime("%d%m%y",$lines[$i][0]) . "\t"); // Date d'échéance
fputs($fp, strftime("%d%m%y",$this->line_out[$i][0]) . "\t"); // Date d'échéance
fputs($fp, "EUR"); // Monnaie
fputs($fp, "\n");
// Ligne TVA
fputs($fp, strftime("%d%m%y",$lines[$i][0]) . "\t");
fputs($fp, strftime("%d%m%y",$this->line_out[$i][0]) . "\t");
fputs($fp, "VE" ."\t");
fputs($fp, "\t");
fputs($fp, '4457119' ."\t");
fputs($fp, $lines[$i][3]." Facture" ."\t");
fputs($fp, $lines[$i][5] . "\t"); // Numéro de facture
fputs($fp, ereg_replace(",",".",$lines[$i][6]) ."\t"); // Montant de TVA
fputs($fp, $this->line_out[$i][3]." Facture" ."\t");
fputs($fp, $this->line_out[$i][5] . "\t"); // Numéro de facture
fputs($fp, ereg_replace(",",".",$this->line_out[$i][6]) ."\t"); // Montant de TVA
fputs($fp, 'C' . "\t"); // C pour crédit
fputs($fp, strftime("%d%m%y",$lines[$i][0]) . "\t"); // Date d'échéance
fputs($fp, strftime("%d%m%y",$this->line_out[$i][0]) . "\t"); // Date d'échéance
fputs($fp, "EUR"); // Monnaie
fputs($fp, "\n");
$oldfacture = $lines[$i][1];
$oldfacture = $this->line_out[$i][1];
$j++;
}
fputs($fp, strftime("%d%m%y",$lines[$i][0]) ."\t");
fputs($fp, strftime("%d%m%y",$this->line_out[$i][0]) ."\t");
fputs($fp, 'VE' ."\t");
fputs($fp, $lines[$i][4]."\t"); // Code Comptable
fputs($fp, $this->line_out[$i][4]."\t"); // Code Comptable
fputs($fp, "\t");
fputs($fp, $lines[$i][3]." Facture" ."\t");
fputs($fp, $lines[$i][5]."\t"); // Numéro de facture
fputs($fp, ereg_replace(",",".",round($lines[$i][8], 2)) ."\t"); // Montant de la ligne
fputs($fp, $this->line_out[$i][3]." Facture" ."\t");
fputs($fp, $this->line_out[$i][5]."\t"); // Numéro de facture
fputs($fp, ereg_replace(",",".",round($this->line_out[$i][8], 2)) ."\t"); // Montant de la ligne
fputs($fp, 'C' . "\t"); // C pour crédit
fputs($fp, strftime("%d%m%y",$lines[$i][0]) . "\t"); // Date d'échéance
fputs($fp, strftime("%d%m%y",$this->line_out[$i][0]) . "\t"); // Date d'échéance
fputs($fp, "EUR"); // Monnaie
fputs($fp, "\n");