// täällä pilkotaan Finvoiceaineiston laskut omiksi tiedostoikseen
// Käsitellään ensin kaikki Finvoicet
if ($handle = opendir($laskut)) {
while (($file = readdir($handle)) !== FALSE) {
if (!is_file($laskut . "/" . $file)) {
continue;
}
$nimi = $laskut . "/" . $file;
// Muutetaan oikeaan merkistöön
$encoding = exec("file -b --mime-encoding '{$nimi}'");
if (!PUPE_UNICODE and $encoding != "" and strtoupper($encoding) != 'ISO-8859-15') {
exec("recode -f {$encoding}..ISO-8859-15 '{$nimi}'");
} elseif (PUPE_UNICODE and $encoding != "" and strtoupper($encoding) != 'UTF-8') {
exec("recode -f {$encoding}..UTF8 '{$nimi}'");
}
$luotiinlaskuja = erittele_laskut($nimi);
// Jos tiedostosta luotiin laskuja siirretään se tieltä pois
if ($luotiinlaskuja > 0) {
// Logitetaan ajo
cron_log($origlaskut . "/" . $file);
rename($laskut . "/" . $file, $origlaskut . "/" . $file);
}
}
}
if ($handle = opendir($laskut)) {
while (($file = readdir($handle)) !== FALSE) {
if (!is_file($laskut . "/" . $file)) {
continue;
}
// $yhtiorow ja $xmlstr
unset($yhtiorow);
require "inc/verkkolasku-in.inc";
echo "<table><tr>";
echo "<th>" . t("Vastaanottaja") . "<br>" . t("Yhtiö") . "</th><th>" . t("Toiminto") . "</th><th>" . t("Ovttunnus") . "<br>" . t("Y-tunnus") . "</th><th>" . t("Toimittaja") . "</th><th>" . t("Laskunumero") . "<br>" . t("Maksutili") . "<br>" . t("Summa") . "</th><th>" . t("Pvm") . "</th></tr><tr>";
while (($file = readdir($handle)) !== FALSE) {
if (is_file($verkkolaskuvirheet_vaarat . "/" . $file) and substr($file, 0, 1) != ".") {
unset($yhtiorow);
unset($xmlstr);
// Napataan alkuperäinen kukarow
$vv_kukarow = $kukarow;
$returni = verkkolasku_in($verkkolaskuvirheet_vaarat . "/" . $file, FALSE);
if (is_array($returni)) {
$lasku_yhtio = $returni[0];
$lasku_toimittaja = $returni[1];
} elseif (stripos($returni, "ei ole validi XML") !== FALSE) {
$laskut = $verkkolaskuvirheet_vaarat;
$luotiinlaskuja = erittele_laskut($verkkolaskuvirheet_vaarat . "/" . $file);
// Jos tiedostosta luotiin laskuja siirretään se tieltä pois
if ($luotiinlaskuja > 0) {
rename($verkkolaskuvirheet_vaarat . "/" . $file, $verkkolaskut_orig . "/" . $file);
}
$lasku_yhtio["yhtio"] = "EI KIITOS TÄLLÄ KERTAA";
}
// Palautetaan alkuperäinen kukarow
$kukarow = $vv_kukarow;
if ($lasku_yhtio["yhtio"] == $kukarow["yhtio"] or $lasku_yhtio["yhtio"] == "") {
$valitutlaskut++;
// Otetaan tarvittavat muuttujat tännekin
$xml = simplexml_load_string($xmlstr);
// Katsotaan mitä aineistoa käpistellään
if (strpos($file, "finvoice") !== false or strpos($file, "maventa") !== false or strpos($file, "apix") !== false) {
require "inc/verkkolasku-in-finvoice.inc";
