MIOD

ID #1398

Przykładowy plik eksportu treści faktury do formatu TXT.

 
<?php

//  Wskazanie katalogu, do którergo będą zapisywane eksportowane dokumenty.
$sDirForExpFile = "c:\\EksportElektroniczny";

// Sprawdzenie czy katalog określony powyżej istnieje, jeżeli nie to należy taki katalog założyc.
if (!is_dir($sDirForExpFile)){
  mkdir($sDirForExpFile);
}

// Podłączenie się do wygenerowanego przez Hermes pliku DBF zawierającego treść faktruy. Pod zmienną $MIOD_FILEFROMHERM znaduje się ścieżka do pliku DBF.
$hDbfInHandle = dbase_open($MIOD_FILEFROMHERM, 0);

// Sprawdzenie czy udało się otworzyć plik DBF.
if (!$hDbfInHandle){
  HNG_Komunikat("Bład podczas podłaczania się do pliku DBF", "Bład");
  exit;
}
 
// Utworzenie nazwy dla wyjściowego pliku TXT. Nazwa takiego pliku jest w tym przydku równoznaczna z nazwą dokumentu.
$sOutFileName = $sDirForExpFile."\\".$DOK_DOKUMENT.".txt";
  
// Utworzenie wyjściowego pliku TXT
$hOutFileHandle = fopen($sOutFileName, "w");
 
// Sprawdzenie czy udało się utworzyć plik wyjściowy.
if (!$hOutFileHandle){
  HNG_Komunikat("Bład podczas tworzenia pliku TXT", "Bład");
  // Odłączenie się od wejściowego pliku DBF.
  dbase_close($hDbfInHandle);
  exit;
}

// Pobieranie ilość wierszy(rekordów) zawierających się w wejściowym pliku DBF. Każdy rekord to pojedyncza pozycja na fakturze.
$iDbfInRecordCount = dbase_numrecords($hDbfInHandle);

// Dla każdego wiersza wejściowego plik wykonywane są poniższe operacje;
for ($iDbfInRecordNo = 1; $iDbfInRecordNo<=$iDbfInRecordCount$iDbfInRecordNo++){
  // Pobieranie wiersz z pliku wejściowego.
  $aWierszWejscowy = dbase_get_record_with_names($hDbfInHandle$iDbfInRecordNo);
 
  // Utworzenie wiersza wyjściowego. 
  $sWierszWyjsciowy =$aWierszWejscowy['KRESKI'].";".$aWierszWejscowy['ILOSC'].";".$aWierszWejscowy['CENA_NETTO'].";";
  $sWierszWyjsciowy =$sWierszWyjsciowy.trim($aWierszWejscowy['ARTYKUL']).";".trim($aWierszWejscowy['VAT']).";";
  $sWierszWyjsciowy =$sWierszWyjsciowy.trim($aWierszWejscowy['PKWIU']).";".trim($aWierszWejscowy['JM']).";".$DOK_DOKUMENT.chr(13).chr(10);

  // Dodanie wiersza do pliku wyjściowego.
  fwrite($hOutFileHandle$sWierszWyjsciowy); 
 
}

// Zamknięcie pliku wyjściowego.
fclose($hOutFileHandle);
// odłączenie się od pliku DBF.
dbase_close($hDbfInHandle);
unset($hDbfInHandle);

?>

pliki dołączone: FakturaEksportTXT.zip



Powiązane wpisy: -

Zaktualizowano: 2011-01-24 10:45
Autor: Łukasz Dąbrowski
Wydanie: 1.2

Digg it! wydrukuj ten wpis wyślij do znajomego Wyświetl jako plik PDF
Oceń ten wpis:

Średnia ocena: 0 z 5 (0 głosów)

bezużyteczny 1 2 3 4 5 najlepszy

Nie możesz komentować tego wpisu