MIOD
ID #1399
Przykładowy plik eksportu treści faktury do formatu DBF.
<?php
// Wskazanie katalogu, do którergo będą zapisywane eksportowane dokumenty.
$sDirForExpFile = "c:\\EksportElektroniczny";
// Sprawdzamy czy katalog określony powyżej istnieje, jeżeli nie to go zakładamy.
if (!is_dir($sDirForExpFile)){
mkdir($sDirForExpFile);
}
// Podłączamy 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);
// Sprawdzamy czy udało się otworzyć plik DBF.
if (!$hDbfInHandle){
HNG_Komunikat("Bład podczas podłaczania się do pliku DBF", "Bład");
exit;
}
// Definiowanie pól składowych dla wynikowego pliku DBF.
$aDbfFieldsDef = array(
array("EAN", "C", 13),
array("ILOSC", "N", 20, 4),
array("CENA_NETTO", "N", 20, 4),
array("ARTYKUL", "C", 50),
array("VAT", "C", 5),
array("PKWIU", "C", 15),
array("JM", "C", 3),
array("DOKUMENT", "C", 10)
);
// Utworzenie nazwy dla wynikowego pliku DBF. Nazwa takiego pliku jest w tym przydku równoznaczna z nazwą dokumentu.
$sOutFileName = $sDirForExpFile."\\".$DOK_DOKUMENT.".dbf";
// utworzenie wynikowego pliku DBF
$hDbfOutHandle = dbase_create($sOutFileName, $aDbfFieldsDef);
if (!$hDbfOutHandle){
HNG_Komunikat("Bład podczas tworzenia pliku DBF", "Bład");
// Musimy odłączyć się od wejściowego pliku DBF.
dbase_close($hDbfInHandle);
exit;
}
// Pobieramy 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++){
// Pobieramy wiersz z pliku wejściowego.
$aWierszWejscowy = dbase_get_record_with_names($hDbfInHandle, $iDbfInRecordNo);
// Dodajemy wiersz do pliku wyjściowego.
dbase_add_record($hDbfOutHandle, array(
$aWierszWejscowy['KRESKI'],
$aWierszWejscowy['ILOSC'],
$aWierszWejscowy['CENA_NETTO'],
trim($aWierszWejscowy['ARTYKUL']),
trim($aWierszWejscowy['VAT']),
trim($aWierszWejscowy['PKWIU']),
trim($aWierszWejscowy['JM']),
trim($DOK_DOKUMENT)
));
}
// odłączenie się od plików DBF
dbase_close($hDbfOutHandle);
unset($hDbfOutHandle);
dbase_close($hDbfInHandle);
unset($hDbfInHandle);
?>
pliki dołączone: FakturaEksportDBF.zip
Powiązane wpisy: -
Autor: Łukasz Dąbrowski
Wydanie: 1.3
Nie możesz komentować tego wpisu