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