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: -
Autor: Łukasz Dąbrowski
Wydanie: 1.2
Nie możesz komentować tego wpisu