Пример #1
0
function overfoer_data($filnavn, $splitter, $feltnavn, $feltantal)
{
    global $charset;
    global $kontotype;
    global $art;
    $x = 0;
    $fp = fopen("../importfiler/postnr.csv", "r");
    if ($fp) {
        while (!feof($fp)) {
            $x++;
            $linje = trim(fgets($fp));
            list($postnr[$x], $bynavn[$x]) = explode(chr(9), $linje);
        }
    }
    fclose($fp);
    $postnr_antal = $x;
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        for ($y = 1; $y < 4; $y++) {
            $linje = fgets($fp);
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ";"), 1)) {
            $semikolon++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ","), 1)) {
            $komma++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, chr(9)), 1)) {
            $tabulator++;
        }
        $tmp = '';
        if ($komma > $semikolon && $komma > $tabulator) {
            $tmp = 'Komma';
            $feltantal = $komma;
        } elseif ($semikolon > $tabulator && $semikolon > $komma) {
            $tmp = 'Semikolon';
            $feltantal = $semikolon;
        } elseif ($tabulator > $semikolon && $tabulator > $komma) {
            $tmp = 'Tabulator';
            $feltantal = $tabulator;
        }
        if (!$splitter) {
            $splitter = $tmp;
        }
        $cols = $feltantal + 1;
    }
    fclose($fp);
    for ($y = 0; $y <= $feltantal; $y++) {
        for ($x = 0; $x <= $felt_antal; $x++) {
            if ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x] && $felt_aktiv[$x] == 1) {
                print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med {$felt_navn[$x]}')\">";
                $feltnavn[$y] = '';
            } elseif ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x]) {
                $felt_aktiv[$x] = 1;
            }
        }
    }
    print "<tr><td colspan={$cols}><hr></td></tr>\n";
    if (!$splitter || $splitter == 'Semikolon') {
        $splitter = ';';
    } elseif ($splitter == 'Komma') {
        $splitter = ',';
    } elseif ($splitter == 'Tabulator') {
        $splitter = chr(9);
    }
    transaktion('begin');
    #$felt_antal=$feltantal;
    $ryd_firmanavn = 0;
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        $kontonumre = array();
        $x = 0;
        $imp_antal = 0;
        while (!feof($fp)) {
            #			$feltantal=$felt_antal;
            $skriv_linje = 0;
            if ($linje = trim(fgets($fp))) {
                $x++;
                $skriv_linje = 1;
                if ($charset == 'UTF-8') {
                    $linje = utf8_encode($linje);
                }
                $felt = array();
                $felt = opdel($splitter, $linje);
                #			if ($ryd_firmanavn) $felt[$ryd_firmanavn]='';
                if (in_array('pbs_nr', $feltnavn) && !in_array('pbs', $feltnavn)) {
                    $feltantal++;
                    $pbs = $feltantal;
                    $feltnavn[$feltantal] = 'pbs';
                    $felt[$feltantal] = '';
                }
                if (in_array('husnr', $feltnavn)) {
                    $felt = add2felt($feltantal, 'husnr', 'addr1', $feltnavn, $felt);
                }
                if (in_array('etage', $feltnavn)) {
                    $felt = add2felt($feltantal, 'etage', 'addr1', $feltnavn, $felt);
                }
                if (in_array('fornavn', $feltnavn) && !in_array('firmanavn', $feltnavn)) {
                    $feltantal++;
                    $ryd_firmanavn = $feltantal;
                    $feltnavn[$feltantal] = 'firmanavn';
                    $felt[$feltantal] = '';
                }
                if (in_array('efternavn', $feltnavn) && !in_array('firmanavn', $feltnavn)) {
                    $feltantal++;
                    $ryd_firmanavn = $feltantal;
                    $feltnavn[$feltantal] = 'firmanavn';
                    $felt[$feltantal] = '';
                }
                if (in_array('fornavn', $feltnavn)) {
                    $felt = add2felt($feltantal, 'fornavn', 'firmanavn', $feltnavn, $felt);
                }
                if (in_array('efternavn', $feltnavn)) {
                    $felt = add2felt($feltantal, 'efternavn', 'firmanavn', $feltnavn, $felt);
                }
                for ($y = 0; $y <= $feltantal; $y++) {
                    $felt[$y] = trim($felt[$y]);
                    $feltnavn[$y] = strtolower($feltnavn[$y]);
                    if (substr($felt[$y], 0, 1) == '"' && substr($felt[$y], -1) == '"') {
                        $felt[$y] = substr($felt[$y], 1, strlen($felt[$y]) - 2);
                    }
                    if ($feltnavn[$y] == 'kontonr' && !is_numeric($felt[$y])) {
                        $kontonr = 0;
                        $skriv_linje = 2;
                    } elseif ($feltnavn[$y] == 'kontonr') {
                        $kontonr = $felt[$y];
                    }
                    if ($feltnavn[$y] == 'pbs_nr' && $felt[$y]) {
                        $felt[$pbs] = 'on';
                    }
                    if ($feltnavn[$y] == "postnr") {
                        list($felt[$y], $bynavn[$y]) = explode(" ", $felt[$y], 2);
                    }
                    if ($feltnavn[$y] == 'kontoansvarlig' && $felt[$y] && $kontonr) {
                        $r = db_fetch_array(db_select("select id from adresser where kontonr='{$kontonr}'", __FILE__ . " linje " . __LINE__));
                        $konto_id = $r['id'] * 1;
                        $r = db_fetch_array(db_select("select id from ansatte where initialer='{$felt[$y]}' and konto_id={$konto_id}", __FILE__ . " linje " . __LINE__));
                        $felt[$y] = $r['id'] * 1;
                    } elseif ($feltnavn[$y] == 'kontoansvarlig') {
                        $felt[$y] = '0';
                    }
                    if ($feltnavn[$y] == 'oprettet' && $felt[$y] && $kontonr) {
                        $felt[$y] = usdate($felt[$y]);
                    } elseif ($feltnavn[$y] == 'oprettet') {
                        $felt[$y] = date("Y-m-d");
                    }
                    if ($feltnavn[$y] == 'kreditmax') {
                        $felt[$y] = usdecimal($felt[$y]);
                    }
                    if ($feltnavn[$y] == 'betalingsdage') {
                        $felt[$y] = $felt[$y] * 1;
                    }
                }
            }
            if ($skriv_linje == 1) {
                $addr_a = '';
                $addr_b = '';
                $upd = '';
                $kontakt_a = '';
                $kontakt_b = '';
                for ($y = 0; $y <= $feltantal; $y++) {
                    if ($feltnavn[$y] && $feltnavn[$y] != 'husnr' && $feltnavn[$y] != 'etage') {
                        $felt[$y] = trim(addslashes($felt[$y]));
                        if (!strstr($feltnavn[$y], "kontakt_")) {
                            if ($y > 0) {
                                $addr_a = $addr_a . ",";
                                $addr_b = $addr_b . ",";
                                $upd = $upd . ",";
                            }
                            $addr_a = $addr_a . $feltnavn[$y];
                            $addr_b = $addr_b . "'" . $felt[$y] . "'";
                            $upd = $upd . $feltnavn[$y] . "='" . $felt[$y] . "'";
                        } else {
                            if ($kontakt_a) {
                                $kontakt_a = $kontakt_a . ",";
                                $kontakt_b = $kontakt_b . ",";
                            }
                            $tmp = substr($feltnavn[$y], 8);
                            $kontakt_a = $kontakt_a . $tmp;
                            $kontakt_b = $kontakt_b . "'" . $felt[$y] . "'";
                        }
                    }
                }
                if (!strpos($addr_a, 'lukket')) {
                    $addr_a = $addr_a . ",lukket";
                    $addr_b = $addr_b . ",''";
                }
                if (!strpos($addr_a, 'gruppe')) {
                    $addr_a = $addr_a . ",gruppe";
                    $addr_b = $addr_b . ",'1'";
                    $upd = $upd . ",gruppe='1'";
                }
                if (!strpos($addr_a, 'art')) {
                    $addr_a = $addr_a . ",art";
                    $addr_b = $addr_b . ",'{$art}'";
                    $upd = $upd . ",art='{$art}'";
                } else {
                    for ($y = 0; $y <= $feltantal; $y++) {
                        if ($feltnavn[$y] == 'art') {
                            $art = $felt[$y];
                        }
                    }
                }
                if ($r = db_fetch_array(db_select("select id from adresser where kontonr='{$kontonr}' and art='{$art}'", __FILE__ . " linje " . __LINE__))) {
                    $konto_id = $r['id'];
                    $imp_antal++;
                    # echo "update adresser set $upd where id='$konto_id'<br>";
                    db_modify("update adresser set {$upd} where id='{$konto_id}'", __FILE__ . " linje " . __LINE__);
                } else {
                    $imp_antal++;
                    db_modify("insert into adresser({$addr_a},kontotype) values ({$addr_b},'{$kontotype}')", __FILE__ . " linje " . __LINE__);
                    $r = db_fetch_array(db_select("select id from adresser where kontonr='{$kontonr}' and art = 'D'", __FILE__ . " linje " . __LINE__));
                    $konto_id = $r['id'];
                }
                if ($kontakt_a && !($r = db_fetch_array(db_select("select id from ansatte where konto_id='{$konto_id}'", __FILE__ . " linje " . __LINE__)))) {
                    db_modify("insert into ansatte({$kontakt_a},konto_id) values ({$kontakt_b},'{$konto_id}')", __FILE__ . " linje " . __LINE__);
                }
            }
        }
    }
    fclose($fp);
    transaktion('commit');
    print "</tbody></table>";
    print "</td></tr>";
    print "<BODY onLoad=\"javascript:alert('{$imp_antal} adresser importeret')\">";
    if ($popup) {
        print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/luk.php\">";
    } else {
        print "<meta http-equiv=\"refresh\" content=\"0;URL=../systemdata/diverse.php\">";
    }
    #exit;
}
Пример #2
0
function overfoer_data($filnavn, $splitter, $feltnavn, $feltantal, $tegnset)
{
    global $charset;
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        for ($y = 1; $y < 4; $y++) {
            $tmp = fgets($fp);
            if ($tmp) {
                $linje = $tmp;
            }
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ";"), 1)) {
            $semikolon++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ","), 1)) {
            $komma++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, chr(9)), 1)) {
            $tabulator++;
        }
        $tmp = '';
        if ($komma > $semikolon && $komma > $tabulator) {
            $tmp = 'Komma';
            $feltantal = $komma;
        } elseif ($semikolon > $tabulator && $semikolon > $komma) {
            $tmp = 'Semikolon';
            $feltantal = $semikolon;
        } elseif ($tabulator > $semikolon && $tabulator > $komma) {
            $tmp = 'Tabulator';
            $feltantal = $tabulator;
        }
        if (!$splitter) {
            $splitter = $tmp;
        }
        $cols = $feltantal + 1;
    }
    fclose($fp);
    $x = 0;
    $q = db_select("select * from varianter", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        $varianter_id[$x] = $r['id'];
        $varianter_beskrivelse[$x] = strtolower($r['beskrivelse']);
        $varianter_shop_id[$x] = $r['shop_id'];
        $x++;
    }
    $q = db_select("select * from variant_varer order by variant_stregkode", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        if ($stregkode == $r['variant_stregkode']) {
            db_modify("delete from variant_varer where id='{$r['id']}'", __FILE__ . " linje " . __LINE__);
        } else {
            $stregkode = $r['variant_stregkode'];
        }
    }
    $x = 0;
    $q = db_select("select * from variant_typer", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        $variant_type_id[$x] = $r['id'];
        $variant_type_variant_id[$x] = $r['variant_id'];
        $variant_type_beskrivelse[$x] = strtolower($r['beskrivelse']);
        $variant_type_shop_id[$x] = $r['shop_id'];
        $x++;
    }
    $x = 0;
    $q = db_select("select varenr,id,varianter from varer", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        $varer_id[$x] = $r['id'];
        $varer_nr[$x] = $r['varenr'];
        $varer_varianter[$x] = $r['varianter'];
        $x++;
    }
    for ($y = 0; $y <= $feltantal; $y++) {
        for ($x = 0; $x <= $felt_antal; $x++) {
            if ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x] && $felt_aktiv[$x] == 1) {
                print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med {$felt_navn[$x]}')\">";
                $feltnavn[$y] = '';
            } elseif ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x]) {
                $felt_aktiv[$x] = 1;
            }
        }
    }
    print "<tr><td colspan={$cols}><hr></td></tr>\n";
    if (!$splitter || $splitter == 'Semikolon') {
        $splitter = ';';
    } elseif ($splitter == 'Komma') {
        $splitter = ',';
    } elseif ($splitter == 'Tabulator') {
        $splitter = chr(9);
    }
    # print "<tr><td><span title='Angiv 1. bilagsnummer'><input type=text size=4 name=bilag value=$bilag></span></td>";
    transaktion('begin');
    #echo "delete from kontoplan where regnskabsaar='$regnskabsaar'<br>";
    #db_modify("delete from de where regnskabsaar='$regnskabsaar'");attrelid    	attname
    $r = db_fetch_array(db_select("SELECT relfilenode FROM pg_class WHERE relname = 'variant_varer'", __FILE__ . " linje " . __LINE__));
    $relfilenode = $r['relfilenode'] * 1;
    $r = db_fetch_array(db_select("SELECT * FROM pg_attribute WHERE attrelid= '{$relfilenode}' and attname = 'variant_salgspris'", __FILE__ . " linje " . __LINE__));
    if ($r['attisdropped'] != 'f' || !$r['attname']) {
        db_modify("alter TABLE variant_varer ADD variant_salgspris numeric(15,3)", __FILE__ . " linje " . __LINE__);
    }
    $r = db_fetch_array(db_select("SELECT * FROM pg_attribute WHERE attrelid= '{$relfilenode}' and attname = 'variant_kostpris'", __FILE__ . " linje " . __LINE__));
    if ($r['attisdropped'] != 'f' || !$r['attname']) {
        db_modify("alter TABLE variant_varer ADD variant_kostpris numeric(15,3)", __FILE__ . " linje " . __LINE__);
    }
    $r = db_fetch_array(db_select("SELECT * FROM pg_attribute WHERE attrelid= '{$relfilenode}' and attname = 'variant_vejlpris'", __FILE__ . " linje " . __LINE__));
    if ($r['attisdropped'] != 'f' || !$r['attname']) {
        db_modify("alter TABLE variant_varer ADD variant_vejlpris numeric(15,3)", __FILE__ . " linje " . __LINE__);
    }
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        $kontonumre = array();
        $x = 0;
        $imp_antal = 0;
        $upd_antal = 0;
        $kostpris = 0;
        $salgspris = 0;
        $variant_type = NULL;
        $varenr = "";
        while (!feof($fp)) {
            $skriv_linje = 0;
            if ($linje = fgets($fp)) {
                $x++;
                $skriv_linje = 1;
                if ($charset == 'UTF-8' && $tegnset != 'UTF-8') {
                    $linje = utf8_encode($linje);
                } elseif ($charset != 'UTF-8' && $tegnset == 'UTF-8') {
                    $linje = utf8_decode($linje);
                }
                $variant_type = NULL;
                $felt = array();
                $felt = opdel($splitter, $linje);
                for ($y = 0; $y < count($felt); $y++) {
                    $medtag_felt[$y] = 1;
                    if ($feltnavn[$y] == 'salgspris') {
                        $feltnavn[$y] = "variant_salgspris";
                    }
                    if ($feltnavn[$y] == 'kostpris') {
                        $feltnavn[$y] = "variant_kostpris";
                    }
                    if ($feltnavn[$y] == 'vejl.pris') {
                        $feltnavn[$y] = "variant_vejlpris";
                    }
                    if ($feltnavn[$y] == 'varenr') {
                        $feltnavn[$y] = "vare_id";
                    }
                    if ($feltnavn[$y] == 'stregkode') {
                        $feltnavn[$y] = "variant_stregkode";
                    }
                    $felt[$y] = trim($felt[$y]);
                    $feltnavn[$y] = strtolower($feltnavn[$y]);
                    if (substr($felt[$y], 0, 1) == '"' && substr($felt[$y], -1) == '"') {
                        $felt[$y] = substr($felt[$y], 1, strlen($felt[$y]) - 2);
                    }
                    if ($feltnavn[$y] == 'stregkode') {
                        if (!($stregkode = $felt[$y])) {
                            $skriv_linje = 0;
                        }
                    }
                    if ($feltnavn[$y] == 'vare_id') {
                        for ($i = 0; $i < count($varer_id); $i++) {
                            if ($felt[$y] == $varer_nr[$i]) {
                                $felt[$y] = $varer_id[$i];
                                $vare_id = $varer_id[$i];
                                break 1;
                            }
                        }
                        $felt[$y] *= 1;
                    }
                    if ($feltnavn[$y] == 'variant_kostpris') {
                        $tmp = str_replace(",", "", $felt[$y]);
                        $tmp = str_replace(".", "", $tmp);
                        if ($tmp && !is_numeric($tmp)) {
                            $skriv_linje = 0;
                        } elseif (!is_numeric($felt[$y])) {
                            $felt[$y] = usdecimal($felt[$y]);
                        }
                        $kostpris = $felt[$y] * 1;
                    }
                    if ($feltnavn[$y] == 'variant_salgspris') {
                        $tmp = str_replace(",", "", $felt[$y]);
                        $tmp = str_replace(".", "", $tmp);
                        if ($tmp && !is_numeric($tmp)) {
                            $skriv_linje = 0;
                        } elseif (!is_numeric($felt[$y])) {
                            $felt[$y] = usdecimal($felt[$y]);
                        }
                        $salgspris = $felt[$y] * 1;
                    }
                    if ($feltnavn[$y] == 'variant_vejlpris') {
                        $tmp = str_replace(",", "", $felt[$y]);
                        $tmp = str_replace(".", "", $tmp);
                        if ($tmp && !is_numeric($tmp)) {
                            $skriv_linje = 0;
                        } elseif (!is_numeric($felt[$y])) {
                            $felt[$y] = usdecimal($felt[$y]);
                        }
                        $vejlpris = $felt[$y] * 1;
                    }
                    #cho "F $feltnavn[$y]<br>";
                    if (in_array(strtolower($feltnavn[$y]), $varianter_beskrivelse)) {
                        $medtag_felt[$y] = 0;
                        for ($i = 0; $i < count($varianter_id); $i++) {
                            if (strtolower($feltnavn[$y]) == $varianter_beskrivelse[$i]) {
                                for ($v = 0; $v < count($varer_id); $v++) {
                                    if ($varer_id[$v] == $vare_id) {
                                        $v_var = explode(chr(9), $varer_varianter[$v]);
                                        if (!in_array($varianter_id[$i], $v_var)) {
                                            if ($varer_varianter[$v]) {
                                                $varer_varianter[$v] .= chr(9) . $varianter_id[$i];
                                            } else {
                                                $varer_varianter[$v] = $varianter_id[$i];
                                            }
                                        }
                                    }
                                }
                                #echo strtolower($feltnavn[$y])."==".$varianter_beskrivelse[$i]."<br>";
                                #echo "Felt = $felt[$y]<br>";
                                $tmp = NULL;
                                for ($t = 0; $t < count($variant_type_id); $t++) {
                                    #cho "$felt[$y]!=$variant_type_beskrivelse[$t]<br>";
                                    if (strtolower($felt[$y]) == strtolower($variant_type_beskrivelse[$t])) {
                                        #							$nyt_feltnavn[$y]=$feltnavn[$y];
                                        $tmp = $variant_type_id[$t];
                                    }
                                    #						$variant_type_id[$x]=$r['id'];
                                    #	$variant_type_variant_id[$x]=$r['variant_id'];
                                    #	$variant_type_beskrivelse[$x]=strtolower($r['beskrivelse']);
                                    #	$variant_type_shop_id[$x]=$r['shop_id'];
                                }
                                $felt[$y] = $tmp;
                                if ($variant_type) {
                                    #cho "$variant_type.=chr(9).$tmp<br>";
                                    $variant_type .= chr(9) . $tmp;
                                } else {
                                    #cho "$variant_type.=chr(9).$tmp<br>";
                                    $variant_type = $tmp;
                                }
                            }
                        }
                    }
                    if ($feltnavn[$y] == 'variant_stregkode') {
                        $stregkode = $felt[$y];
                    }
                }
            }
            if ($skriv_linje == 1) {
                $vare_a = "variant_type";
                $vare_b = "'" . $variant_type . "'";
                $upd = "variant_type='" . $variant_type . "'";
                for ($y = 0; $y <= $feltantal; $y++) {
                    if ($feltnavn[$y] && $medtag_felt[$y]) {
                        if ($nyt_feltnavn[$y]) {
                            $feltnavn[$y] = $nyt_feltnavn[$y];
                        }
                        $felt[$y] = db_escape_string($felt[$y]);
                        $vare_a .= "," . $feltnavn[$y];
                        $vare_b .= ",'" . $felt[$y] . "'";
                        $upd = $upd . "," . $feltnavn[$y] . "='" . $felt[$y] . "'";
                    }
                }
                #cho "select id from variant_varer where variant_stregkode='$stregkode'<br>";
                if ($r = db_fetch_array(db_select("select id from variant_varer where variant_stregkode='{$stregkode}'", __FILE__ . " linje " . __LINE__))) {
                    $variant_id = $r['id'];
                    $upd_antal++;
                    #cho "update variant_varer set $upd where id='$variant_id'<br>";
                    db_modify("update variant_varer set {$upd} where id='{$variant_id}'", __FILE__ . " linje " . __LINE__);
                } else {
                    $imp_antal++;
                    #cho "insert into variant_varer($vare_a) values ($vare_b)<br>";
                    db_modify("insert into variant_varer({$vare_a}) values ({$vare_b})", __FILE__ . " linje " . __LINE__);
                }
            }
        }
    }
    fclose($fp);
    for ($v = 0; $v < count($varer_id); $v++) {
        if ($varer_varianter[$v]) {
            $v_var = explode(chr(9), $varer_varianter[$v]);
            $v2 = array();
            $tmp = NULL;
            for ($i = 0; $i < count($v_var); $i++) {
                if (!in_array($v_var[$i], $v2)) {
                    $tmp ? $tmp .= chr(9) . $v_var[$i] : ($tmp = $v_var[$i]);
                }
                $v2[$i] = $v_var[$i];
            }
            db_modify("update varer set varianter = '{$tmp}' where id='{$varer_id[$v]}'", __FILE__ . " linje " . __LINE__);
        }
    }
    transaktion('commit');
    print "</tbody></table>";
    print "</td></tr>";
    print "<BODY onLoad=\"javascript:alert('{$imp_antal} variant_varer importeret, {$upd_antal} variant_varer opdateret')\">";
    #print "<BODY onLoad=\"javascript:alert('$imp_antal varianter importeret')\">";
    #print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/luk.php\">";
    exit;
}
Пример #3
0
function overfoer_data($filnavn, $splitter, $feltnavn, $feltantal)
{
    global $charset;
    $x = 0;
    $fp = fopen("../importfiler/postnr.csv", "r");
    if ($fp) {
        while (!feof($fp)) {
            $x++;
            $linje = trim(fgets($fp));
            list($postnr[$x], $bynavn[$x]) = split(chr(9), $linje);
        }
    }
    fclose($fp);
    $postnr_antal = $x;
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        for ($y = 1; $y < 4; $y++) {
            $linje = fgets($fp);
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ";"), 1)) {
            $semikolon++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ","), 1)) {
            $komma++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, chr(9)), 1)) {
            $tabulator++;
        }
        $tmp = '';
        if ($komma > $semikolon && $komma > $tabulator) {
            $tmp = 'Komma';
            $feltantal = $komma;
        } elseif ($semikolon > $tabulator && $semikolon > $komma) {
            $tmp = 'Semikolon';
            $feltantal = $semikolon;
        } elseif ($tabulator > $semikolon && $tabulator > $komma) {
            $tmp = 'Tabulator';
            $feltantal = $tabulator;
        }
        if (!$splitter) {
            $splitter = $tmp;
        }
        $cols = $feltantal + 1;
    }
    fclose($fp);
    for ($y = 0; $y <= $feltantal; $y++) {
        for ($x = 0; $x <= $felt_antal; $x++) {
            if ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x] && $felt_aktiv[$x] == 1) {
                print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med {$felt_navn[$x]}')\">";
                $feltnavn[$y] = '';
            } elseif ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x]) {
                $felt_aktiv[$x] = 1;
            }
        }
    }
    print "<tr><td colspan={$cols}><hr></td></tr>\n";
    if (!$splitter || $splitter == 'Semikolon') {
        $splitter = ';';
    } elseif ($splitter == 'Komma') {
        $splitter = ',';
    } elseif ($splitter == 'Tabulator') {
        $splitter = chr(9);
    }
    # print "<tr><td><span title='Angiv 1. bilagsnummer'><input type=text size=4 name=bilag value=$bilag></span></td>";
    transaktion('begin');
    #echo "delete from kontoplan where regnskabsaar='$regnskabsaar'<br>";
    #db_modify("delete from de where regnskabsaar='$regnskabsaar'");
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        $kontonumre = array();
        $x = 0;
        $imp_antal = 0;
        while (!feof($fp)) {
            $skriv_linje = 0;
            if ($linje = trim(fgets($fp))) {
                $x++;
                $skriv_linje = 1;
                if ($charset == 'UTF-8') {
                    $linje = utf8_encode($linje);
                }
                $felt = array();
                $felt = opdel($splitter, $linje);
                for ($y = 0; $y <= $feltantal; $y++) {
                    $felt[$y] = trim($felt[$y]);
                    $feltnavn[$y] = strtolower($feltnavn[$y]);
                    if (substr($felt[$y], 0, 1) == '"' && substr($felt[$y], -1) == '"') {
                        $felt[$y] = substr($felt[$y], 1, strlen($felt[$y]) - 2);
                    }
                    if ($feltnavn[$y] == 'kontonr' && !is_numeric($felt[$y])) {
                        $kontonr = 0;
                        $skriv_linje = 2;
                        #					print "<BODY onLoad=\"javascript:alert('R&oslash;de linjer indeholder fejl (kontonummer ikke numerisk) og bliver ikke importeret')\">";
                        #					print "<BODY onLoad=\"javascript:alert('Kontonrnummer skal v&aelig;re numerisk')\">";
                    } elseif ($feltnavn[$y] == 'kontonr') {
                        $kontonr = $felt[$y];
                    }
                    if ($feltnavn[$y] == "postnr") {
                        list($felt[$y], $bynavn[$y]) = split(" ", $felt[$y], 2);
                    }
                    if ($feltnavn[$y] == 'kontoansvarlig' && $felt[$y] && $kontonr) {
                        $r = db_fetch_array(db_select("select id from adresser where kontonr='{$kontonr}'", __FILE__ . " linje " . __LINE__));
                        $konto_id = $r['id'] * 1;
                        $r = db_fetch_array(db_select("select id from ansatte where initialer='{$felt[$y]}' and konto_id={$konto_id}", __FILE__ . " linje " . __LINE__));
                        $felt[$y] = $r['id'] * 1;
                    } elseif ($feltnavn[$y] == 'kontoansvarlig') {
                        $felt[$y] = '0';
                    }
                    if ($feltnavn[$y] == 'oprettet' && $felt[$y] && $kontonr) {
                        $felt[$y] = usdate($felt[$y]);
                    } elseif ($feltnavn[$y] == 'oprettet') {
                        $felt[$y] = date("Y-m-d");
                    }
                    if ($feltnavn[$y] == 'kreditmax') {
                        $felt[$y] = usdecimal($felt[$y]);
                    }
                    if ($feltnavn[$y] == 'betalingsdage') {
                        $felt[$y] = $felt[$y] * 1;
                    }
                }
            }
            if ($skriv_linje == 1) {
                $addr_a = '';
                $addr_b = '';
                $kontakt_a = '';
                $kontakt_b = '';
                for ($y = 0; $y <= $feltantal; $y++) {
                    if ($feltnavn[$y]) {
                        $felt[$y] = addslashes($felt[$y]);
                        if (!strstr($feltnavn[$y], "kontakt_")) {
                            if ($y > 0) {
                                $addr_a = $addr_a . ",";
                                $addr_b = $addr_b . ",";
                            }
                            $addr_a = $addr_a . $feltnavn[$y];
                            $addr_b = $addr_b . "'" . $felt[$y] . "'";
                        } else {
                            if ($kontakt_a) {
                                $kontakt_a = $kontakt_a . ",";
                                $kontakt_b = $kontakt_b . ",";
                            }
                            $tmp = substr($feltnavn[$y], 8);
                            $kontakt_a = $kontakt_a . $tmp;
                            $kontakt_b = $kontakt_b . "'" . $felt[$y] . "'";
                        }
                    }
                }
                if ($r = db_fetch_array(db_select("select id from adresser where kontonr='{$kontonr}'", __FILE__ . " linje " . __LINE__))) {
                    $imp_antal++;
                    db_modify("delete from adresser where id = '{$r['id']}'", __FILE__ . " linje " . __LINE__);
                    db_modify("insert into adresser(id,{$addr_a},art) values ({$r['id']},{$addr_b},'K')", __FILE__ . " linje " . __LINE__);
                } else {
                    $imp_antal++;
                    db_modify("insert into adresser({$addr_a}, art) values ({$addr_b}, 'K')", __FILE__ . " linje " . __LINE__);
                }
                $r = db_fetch_array(db_select("select id from adresser where kontonr='{$kontonr}' and art = 'K'", __FILE__ . " linje " . __LINE__));
                $konto_id = $r['id'];
                if ($kontakt_a && !($r = db_fetch_array(db_select("select id from ansatte where konto_id='{$konto_id}'", __FILE__ . " linje " . __LINE__)))) {
                    db_modify("insert into ansatte({$kontakt_a}, konto_id) values ({$kontakt_b}, '{$konto_id}')", __FILE__ . " linje " . __LINE__);
                }
            }
        }
    }
    fclose($fp);
    transaktion('commit');
    print "</tbody></table>";
    print "</td></tr>";
    print "<BODY onLoad=\"javascript:alert('{$imp_antal} adresser importeret')\">";
    print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/luk.php\">";
}
Пример #4
0
         #|| $ean[0] || $prisgruppe[0] || $beskrivelse[0] || $enhed[0] || $salgspris[0] || $kostpris[0]) {
     }
     if ($x > $s**t) {
         break 1;
     }
     # S**t solar (fast format)
 } elseif (stristr($prisfil, "maxmc")) {
     $x++;
     $splitter = ",";
     if ($charset == 'UTF-8' && $tegnset != 'UTF-8') {
         $linje = utf8_encode($linje);
     } elseif ($charset != 'UTF-8' && $tegnset == 'UTF-8') {
         $linje = utf8_decode($linje);
     }
     $felt = array();
     $felt = opdel($splitter, $linje);
     $varenr[$x] = $felt['1'];
     $salgspris[$x] = $felt[3];
     $beskrivelse[$x] = $felt[2];
     #$enhed[$x]=$felt[?];
     $prisgruppe[$x] = $felt[0];
     if (strstr($rabatter, $prisgruppe[$x])) {
         $rabat[$x] = -1;
         #if ($prisgruppe[$x]=='0004') echo "A1 rabat $rabat[$x]<br>";
         $rabatarray = array();
         #if ($prisgruppe[$x]=='0004') echo "A2 rabat $rabat[$x]<br>";
         $rabatarray = explode(chr(9), $rabatter);
         #if ($prisgruppe[$x]=='0004') echo "A3 rabat $rabat[$x]<br>";
         for ($y = 0; $y <= count($rabatarray); $y++) {
             #if ($prisgruppe[$x]=='0004') echo "A4 rabat $rabat[$x]<br>";
             list($a, $b) = explode("|", $rabatarray[$y]);
Пример #5
0
function overfoer_data($filnavn, $splitter, $feltnavn, $feltantal, $charset)
{
    global $charset;
    $x = 0;
    $fp = fopen("../importfiler/postnr.csv", "r");
    if ($fp) {
        while (!feof($fp)) {
            $x++;
            $linje = fgets($fp);
            list($postnr[$x], $bynavn[$x]) = explode(chr(9), $linje);
        }
    }
    fclose($fp);
    $postnr_antal = $x;
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        for ($y = 1; $y < 4; $y++) {
            $tmp = fgets($fp);
            if ($tmp) {
                $linje = $tmp;
            }
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ";"), 1)) {
            $semikolon++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ","), 1)) {
            $komma++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, chr(9)), 1)) {
            $tabulator++;
        }
        $tmp = '';
        if ($komma > $semikolon && $komma > $tabulator) {
            $tmp = 'Komma';
            $feltantal = $komma;
        } elseif ($semikolon > $tabulator && $semikolon > $komma) {
            $tmp = 'Semikolon';
            $feltantal = $semikolon;
        } elseif ($tabulator > $semikolon && $tabulator > $komma) {
            $tmp = 'Tabulator';
            $feltantal = $tabulator;
        }
        if (!$splitter) {
            $splitter = $tmp;
        }
        $cols = $feltantal + 1;
    }
    fclose($fp);
    for ($y = 0; $y <= $feltantal; $y++) {
        for ($x = 0; $x <= $felt_antal; $x++) {
            if ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x] && $felt_aktiv[$x] == 1) {
                print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med {$felt_navn[$x]}')\">";
                $feltnavn[$y] = '';
            } elseif ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x]) {
                $felt_aktiv[$x] = 1;
            }
        }
    }
    print "<tr><td colspan={$cols}><hr></td></tr>\n";
    if (!$splitter || $splitter == 'Semikolon') {
        $splitter = ';';
    } elseif ($splitter == 'Komma') {
        $splitter = ',';
    } elseif ($splitter == 'Tabulator') {
        $splitter = chr(9);
    }
    # print "<tr><td><span title='Angiv 1. bilagsnummer'><input type=text size=4 name=bilag value=$bilag></span></td>";
    transaktion('begin');
    #echo "delete from kontoplan where regnskabsaar='$regnskabsaar'<br>";
    #db_modify("delete from de where regnskabsaar='$regnskabsaar'");
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        $kontonumre = array();
        $x = 0;
        $imp_antal = 0;
        $upd_antal = 0;
        $kostpris = 0;
        $salgspris = 0;
        $varenr = "";
        while (!feof($fp)) {
            $skriv_linje = 0;
            if ($linje = fgets($fp)) {
                $x++;
                $skriv_linje = 1;
                if ($charset == 'UTF-8' && $tegnset != 'UTF-8') {
                    $linje = utf8_encode($linje);
                } elseif ($charset != 'UTF-8' && $tegnset == 'UTF-8') {
                    $linje = utf8_decode($linje);
                }
                $felt = array();
                $felt = opdel($splitter, $linje);
                for ($y = 0; $y < count($felt); $y++) {
                    $medtag_felt[$y] = 1;
                    if (!trim($feltnavn[$y])) {
                        $medtag_felt[$y] = 0;
                    }
                    $felt[$y] = trim($felt[$y]);
                    $feltnavn[$y] = strtolower($feltnavn[$y]);
                    if (substr($felt[$y], 0, 1) == '"' && substr($felt[$y], -1) == '"') {
                        $felt[$y] = substr($felt[$y], 1, strlen($felt[$y]) - 2);
                    }
                    if ($feltnavn[$y] == 'varenr') {
                        if (!($varenr = $felt[$y])) {
                            $skriv_linje = 0;
                        }
                    }
                    if ($feltnavn[$y] == 'vejl.pris') {
                        $feltnavn[$y] = 'retail_price';
                    }
                    if ($feltnavn[$y] == 'vejl.pris') {
                        $feltnavn[$y] = 'retail_price';
                    }
                    if ($feltnavn[$y] == 'lokation') {
                        $feltnavn[$y] = 'location';
                    }
                    if ($feltnavn[$y] == 'kostpris') {
                        $tmp = str_replace(",", "", $felt[$y]);
                        $tmp = str_replace(".", "", $tmp);
                        if ($tmp && !is_numeric($tmp)) {
                            $skriv_linje = 0;
                        } elseif (!is_numeric($felt[$y])) {
                            $felt[$y] = usdecimal($felt[$y]);
                        }
                        $kostpris = $felt[$y] * 1;
                    }
                    if ($feltnavn[$y] == 'salgspris') {
                        $tmp = str_replace(",", "", $felt[$y]);
                        $tmp = str_replace(".", "", $tmp);
                        if ($tmp && !is_numeric($tmp)) {
                            $skriv_linje = 0;
                        } elseif (!is_numeric($felt[$y])) {
                            $felt[$y] = usdecimal($felt[$y]);
                        }
                        $salgspris = $felt[$y] * 1;
                    }
                    if ($feltnavn[$y] == 'retail_price') {
                        $tmp = str_replace(",", "", $felt[$y]);
                        $tmp = str_replace(".", "", $tmp);
                        if ($tmp && !is_numeric($tmp)) {
                            $skriv_linje = 0;
                        } elseif (!is_numeric($felt[$y])) {
                            $felt[$y] = usdecimal($felt[$y]);
                        }
                        $retail_price = $felt[$y] * 1;
                    }
                    if ($feltnavn[$y] == 'min_lager') {
                        $tmp = str_replace(",", "", $felt[$y]);
                        $tmp = str_replace(".", "", $tmp);
                        if ($tmp && !is_numeric($tmp)) {
                            $skriv_linje = 2;
                        } else {
                            $felt[$y] = usdecimal($felt[$y]);
                        }
                    }
                    if ($feltnavn[$y] == 'max_lager') {
                        $tmp = str_replace(",", "", $felt[$y]);
                        $tmp = str_replace(".", "", $tmp);
                        if ($tmp && !is_numeric($tmp)) {
                            $skriv_linje = 2;
                        } else {
                            $felt[$y] = usdecimal($felt[$y]);
                        }
                    }
                    if ($feltnavn[$y] == 'gruppe') {
                        if ($tmp = find_varegrp($felt[$y])) {
                            $felt[$y] = $tmp;
                        } else {
                            $felt[$y] = 1;
                        }
                    }
                    if ($feltnavn[$y] == 'leverandor') {
                        if ($felt[$y] && !($tmp = find_lev_id($felt[$y]))) {
                        }
                        $leverandor = $tmp;
                        $levfelt = $y;
                    }
                }
            }
            if ($skriv_linje == 1) {
                $vare_a = '';
                $vare_b = '';
                $upd = '';
                for ($y = 0; $y <= $feltantal; $y++) {
                    if ($feltnavn[$y] && $medtag_felt[$y] && $feltnavn[$y] != 'leverandor') {
                        if ($nyt_feltnavn[$y]) {
                            $feltnavn[$y] = $nyt_feltnavn[$y];
                        }
                        $felt[$y] = db_escape_string($felt[$y]);
                        $vare_a ? $vare_a .= "," . $feltnavn[$y] : ($vare_a = $feltnavn[$y]);
                        $vare_b ? $vare_b .= ",'" . $felt[$y] . "'" : ($vare_b = "'" . $felt[$y] . "'");
                        $upd ? $upd .= "," . $feltnavn[$y] . "='" . $felt[$y] . "'" : ($upd = $feltnavn[$y] . "='" . $felt[$y] . "'");
                    }
                }
                $vare_a = $vare_a . ",lukket";
                $vare_b = $vare_b . ",''";
                if ($varenr && ($r = db_fetch_array(db_select("select id from varer where varenr='{$varenr}' or lower(varenr)='" . strtolower($varenr) . "' or upper(varenr)='" . strtoupper($varenr) . "'", __FILE__ . " linje " . __LINE__)))) {
                    #20140201
                    $vare_id = $r['id'];
                    $upd_antal++;
                    db_modify("update varer set {$upd} where id='{$vare_id}'", __FILE__ . " linje " . __LINE__);
                } else {
                    $imp_antal++;
                    db_modify("insert into varer({$vare_a}) values ({$vare_b})", __FILE__ . " linje " . __LINE__);
                    $r = db_fetch_array(db_select("select id from varer where varenr='{$varenr}'", __FILE__ . " linje " . __LINE__));
                    $vare_id = $r['id'];
                }
                $dd = date("Y-m-d");
                $qtxt = "select id,kostpris,transdate from kostpriser where vare_id='{$vare_id}' order by transdate desc limit 1";
                #20150224
                $r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__));
                if ($r['transdate'] != $dd && $r['kostpris'] != $kostpris) {
                    $qtxt = "insert into kostpriser (vare_id,kostpris,transdate) values ('{$vare_id}','{$kostpris}','{$dd}')";
                } elseif ($r['transdate'] == $dd && $r['kostpris'] != $kostpris) {
                    $qtxt = "update kostpriser set kostpris={$kostpris} where id = '{$r['id']}'";
                }
                if ($qtxt) {
                    db_modify($qtxt, __FILE__ . " linje " . __LINE__);
                }
                if ($leverandor && $vare_id) {
                    if ($r = db_fetch_array(db_select("select id from vare_lev where vare_id='{$vare_id}' and lev_id='{$leverandor}'", __FILE__ . " linje " . __LINE__))) {
                        db_modify("update vare_lev set kostpris='{$kostpris}' where id='{$r['id']}'", __FILE__ . " linje " . __LINE__);
                    } else {
                        db_modify("insert into vare_lev (vare_id,lev_id,kostpris,posnr) values ({$vare_id},'{$leverandor}','{$kostpris}','1')", __FILE__ . " linje " . __LINE__);
                    }
                }
            }
        }
    }
    fclose($fp);
    transaktion('commit');
    print "</tbody></table>";
    print "</td></tr>";
    print "<BODY onLoad=\"javascript:alert('{$imp_antal} varer importeret, {$upd_antal} varer opdateret')\">";
    #print "<BODY onLoad=\"javascript:alert('$imp_antal varer importeret')\">";
    #print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/luk.php\">";
    exit;
}
Пример #6
0
function overfoer_data($filnavn, $splitter, $feltnavn, $feltantal)
{
    global $charset;
    global $kontotype;
    global $art;
    global $opdat;
    $x = 0;
    $fp = fopen("../importfiler/postnr.csv", "r");
    if ($fp) {
        while (!feof($fp)) {
            $x++;
            $linje = trim(fgets($fp));
            list($postnr[$x], $bynavn[$x]) = explode(chr(9), $linje);
        }
    }
    fclose($fp);
    $postnr_antal = $x;
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        for ($y = 1; $y < 4; $y++) {
            $linje = fgets($fp);
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ";"), 1)) {
            $semikolon++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, ","), 1)) {
            $komma++;
        }
        $tmp = $linje;
        while ($tmp = substr(strstr($tmp, chr(9)), 1)) {
            $tabulator++;
        }
        $tmp = '';
        if ($komma > $semikolon && $komma > $tabulator) {
            $tmp = 'Komma';
            $feltantal = $komma;
        } elseif ($semikolon > $tabulator && $semikolon > $komma) {
            $tmp = 'Semikolon';
            $feltantal = $semikolon;
        } elseif ($tabulator > $semikolon && $tabulator > $komma) {
            $tmp = 'Tabulator';
            $feltantal = $tabulator;
        }
        if (!$splitter) {
            $splitter = $tmp;
        }
        $cols = $feltantal + 1;
    }
    fclose($fp);
    for ($y = 0; $y <= $feltantal; $y++) {
        for ($x = 0; $x <= $felt_antal; $x++) {
            if ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x] && $felt_aktiv[$x] == 1) {
                print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med {$felt_navn[$x]}')\">";
                $feltnavn[$y] = '';
            } elseif ($felt_navn[$x] && $feltnavn[$y] == $felt_navn[$x]) {
                $felt_aktiv[$x] = 1;
            }
        }
    }
    print "<tr><td colspan={$cols}><hr></td></tr>\n";
    if (!$splitter || $splitter == 'Semikolon') {
        $splitter = ';';
    } elseif ($splitter == 'Komma') {
        $splitter = ',';
    } elseif ($splitter == 'Tabulator') {
        $splitter = chr(9);
    }
    transaktion('begin');
    #$felt_antal=$feltantal;
    if ($r = db_fetch_array(db_select("select * from grupper where art='DebInfo'", __FILE__ . " linje " . __LINE__))) {
        $status_id = explode(chr(9), $r['box3']);
        $status_beskrivelse = explode(chr(9), $r['box4']);
        $status_antal = count($status_id);
        #	for ($x=0;$x<$status_antal;$x++)$status_beskrivelse[$x]=addslashes($status_beskrivelse[$x]);
    } else {
        db_modify("insert into grupper(beskrivelse,art) values ('Div DebitorInfo','DebInfo')", __FILE__ . " linje " . __LINE__);
        db_fetch_array(db_select("select box3 from grupper where art='DebInfo'", __FILE__ . " linje " . __LINE__));
        $status_id = array();
        $status_beskrivelse = array();
        $status_antal = 0;
    }
    $ryd_firmanavn = 0;
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        $kontonumre = array();
        $x = 0;
        $imp_antal = 0;
        while (!feof($fp)) {
            #			$feltantal=$felt_antal;
            $skriv_linje = 0;
            if ($linje = fgets($fp)) {
                $x++;
                $skriv_linje = 1;
                if ($charset == 'UTF-8') {
                    $linje = utf8_encode($linje);
                }
                $felt = array();
                $felt = opdel($splitter, $linje);
                #			if ($ryd_firmanavn) $felt[$ryd_firmanavn]='';
                if (in_array('pbs_nr', $feltnavn) && !in_array('pbs', $feltnavn)) {
                    $feltantal++;
                    $pbs = $feltantal;
                    $feltnavn[$feltantal] = 'pbs';
                    $felt[$feltantal] = '';
                }
                if (in_array('husnr', $feltnavn)) {
                    $felt = add2felt($feltantal, 'husnr', 'addr1', $feltnavn, $felt);
                }
                if (in_array('etage', $feltnavn)) {
                    $felt = add2felt($feltantal, 'etage', 'addr1', $feltnavn, $felt);
                }
                if (in_array('fornavn', $feltnavn) && !in_array('firmanavn', $feltnavn)) {
                    $feltantal++;
                    $ryd_firmanavn = $feltantal;
                    $feltnavn[$feltantal] = 'firmanavn';
                    $felt[$feltantal] = '';
                }
                if (in_array('efternavn', $feltnavn) && !in_array('firmanavn', $feltnavn)) {
                    $feltantal++;
                    $ryd_firmanavn = $feltantal;
                    $feltnavn[$feltantal] = 'firmanavn';
                    $felt[$feltantal] = '';
                }
                if (in_array('fornavn', $feltnavn)) {
                    $felt = add2felt($feltantal, 'fornavn', 'firmanavn', $feltnavn, $felt);
                }
                if (in_array('efternavn', $feltnavn)) {
                    $felt = add2felt($feltantal, 'efternavn', 'firmanavn', $feltnavn, $felt);
                }
                for ($y = 0; $y <= $feltantal; $y++) {
                    #				$felt[$y]=addslashes(trim($felt[$y]));
                    $feltnavn[$y] = strtolower($feltnavn[$y]);
                    if (substr($felt[$y], 0, 1) == '"' && substr($felt[$y], -1) == '"') {
                        $felt[$y] = substr($felt[$y], 1, strlen($felt[$y]) - 2);
                    }
                    if ($feltnavn[$y] == 'kontonr' && !is_numeric($felt[$y])) {
                        $kontonr = 0;
                        $skriv_linje = 2;
                    } elseif ($feltnavn[$y] == 'kontonr') {
                        $kontonr = $felt[$y];
                    }
                    if ($feltnavn[$y] == 'pbs_nr' && $felt[$y]) {
                        $felt[$pbs] = 'on';
                    }
                    if ($feltnavn[$y] == "postnr") {
                        list($felt[$y], $bynavn[$y]) = explode(" ", $felt[$y], 2);
                    }
                    if ($feltnavn[$y] == 'kontoansvarlig' && $felt[$y] && $kontonr) {
                        $r = db_fetch_array(db_select("select id from adresser where kontonr='{$kontonr}'", __FILE__ . " linje " . __LINE__));
                        $konto_id = $r['id'] * 1;
                        $r = db_fetch_array(db_select("select id from ansatte where initialer='{$felt[$y]}' and konto_id={$konto_id}", __FILE__ . " linje " . __LINE__));
                        $felt[$y] = $r['id'] * 1;
                    } elseif ($feltnavn[$y] == 'kontoansvarlig') {
                        $felt[$y] = '0';
                    }
                    if ($feltnavn[$y] == 'oprettet' && $felt[$y] && $kontonr) {
                        $felt[$y] = usdate($felt[$y]);
                    } elseif ($feltnavn[$y] == 'oprettet') {
                        $felt[$y] = date("Y-m-d");
                    }
                    if ($feltnavn[$y] == 'kreditmax') {
                        $felt[$y] = usdecimal($felt[$y]);
                    }
                    if ($feltnavn[$y] == 'betalingsbet') {
                        $tmp = strtolower($felt[$y]);
                        if ($tmp == 'lb.md.') {
                            $felt[$y] = 'Lb.Md.';
                        } elseif ($tmp == 'forud') {
                            $felt[$y] = 'Forud';
                        } elseif ($tmp == 'kontant') {
                            $felt[$y] = 'Kontant';
                        } elseif ($tmp == 'efterkrav') {
                            $felt[$y] = 'Efterkrav';
                        } else {
                            $felt[$y] = 'Netto';
                        }
                    }
                }
            }
            if ($skriv_linje == 1) {
                $addr_a = '';
                $addr_b = '';
                $upd = '';
                $kontakt_a = '';
                $kontakt_b = '';
                $find_kontakt = '';
                for ($y = 0; $y <= $feltantal; $y++) {
                    if ($felt[$y] && $feltnavn[$y] == 'status' && !in_array($felt[$y], $status_beskrivelse)) {
                        $x = 1;
                        while (in_array($x, $status_id)) {
                            $x++;
                        }
                        #finder laveste ledige vaerdi
                        $status = $x;
                        $status_id[$status_antal] = $x;
                        $status_beskrivelse[$status_antal] = $felt[$y];
                        $felt[$y] = $x;
                        $status_antal++;
                        $box3 = NULL;
                        $box4 = NULL;
                        for ($x = 0; $x < $status_antal; $x++) {
                            #							if ($status_id[$x]==$rename_status) $status_beskrivelse[$x]=$ny_status;
                            $box3 ? $box3 .= chr(9) . $status_id[$x] : ($box3 = $status_id[$x]);
                            $box4 ? $box4 .= chr(9) . $status_beskrivelse[$x] : ($box4 = $status_beskrivelse[$x]);
                        }
                        db_modify("update grupper set box3='{$box3}',box4='{$box4}' where art = 'DebInfo'", __FILE__ . " linje " . __LINE__);
                    } else {
                        for ($x = 0; $x < $status_antal; $x++) {
                            if ($felt[$y] == $status_beskrivelse[$x]) {
                                $felt[$y] = $status_id[$x];
                                break 1;
                            }
                        }
                    }
                    #cho "$feltnavn[$y]<br>";
                    if ($feltnavn[$y] && $feltnavn[$y] != 'husnr' && $feltnavn[$y] != 'etage') {
                        $felt[$y] = trim(addslashes($felt[$y]));
                        if ($feltnavn[$y] == 'betalingsdage') {
                            $felt[$y] *= 1;
                        }
                        if (!strstr($feltnavn[$y], "kontakt_")) {
                            if ($addr_a) {
                                $addr_a = $addr_a . ",";
                                $addr_b = $addr_b . ",";
                                $upd = $upd . ",";
                            }
                            $addr_a = $addr_a . $feltnavn[$y];
                            $addr_b = $addr_b . "'" . $felt[$y] . "'";
                            $upd = $upd . $feltnavn[$y] . "='" . $felt[$y] . "'";
                        } else {
                            if ($kontakt_a) {
                                $kontakt_a = $kontakt_a . ",";
                                $kontakt_b = $kontakt_b . ",";
                                $find_kontakt .= " and ";
                            }
                            $tmp = substr($feltnavn[$y], 8);
                            $kontakt_a = $kontakt_a . $tmp;
                            $kontakt_b = $kontakt_b . "'" . $felt[$y] . "'";
                            $find_kontakt ? $find_kontakt .= "{$tmp}='" . $felt[$y] . "'" : ($find_kontakt = "{$kontakt_a}={$kontakt_b}");
                        }
                    }
                }
                if (!strstr($addr_a, 'lukket')) {
                    $addr_a = $addr_a . ",lukket";
                    $addr_b = $addr_b . ",''";
                }
                if (!strstr($addr_a, 'gruppe')) {
                    $addr_a = $addr_a . ",gruppe";
                    $addr_b = $addr_b . ",'1'";
                    $upd = $upd . ",gruppe='1'";
                }
                #			if (!strpos($addr_a,'art')) {
                #				$addr_a=$addr_a.",art";
                #				$addr_b=$addr_b.",'$art'";
                #				$upd=$upd.",art='$art'";
                #			} else {
                #				for ($y=0; $y<=$feltantal; $y++) {
                #				if ($feltnavn[$y]=='art') $art=$felt[$y];
                #				}
                #			}
                if ($r = db_fetch_array(db_select("select id from adresser where kontonr='{$kontonr}' and art='{$art}'", __FILE__ . " linje " . __LINE__))) {
                    if ($opdat) {
                        $konto_id = $r['id'];
                        $imp_antal++;
                        db_modify("update adresser set {$upd} where id='{$konto_id}'", __FILE__ . " linje " . __LINE__);
                        #cho "kontonr=$kontonr opdateret<br>";
                    } else {
                        #cho "kontonr=$kontonr ikke opdateret<br>";
                        $konto_id = 0;
                    }
                } else {
                    $imp_antal++;
                    db_modify("insert into adresser({$addr_a},kontotype,art) values ({$addr_b},'{$kontotype}','{$art}')", __FILE__ . " linje " . __LINE__);
                    $r = db_fetch_array(db_select("select id from adresser where kontonr='{$kontonr}' and art = '{$art}'", __FILE__ . " linje " . __LINE__));
                    $konto_id = $r['id'];
                }
                if (in_array('kontakt', $feltnavn)) {
                    for ($y = 0; $y <= $feltantal; $y++) {
                        if ($feltnavn[$y] == 'kontakt') {
                            $kontakt = $felt[$y];
                        }
                    }
                }
                if ($kontakt && !($r = db_fetch_array(db_select("select id from ansatte where konto_id='{$konto_id}' and navn = '{$kontakt}'", __FILE__ . " linje " . __LINE__)))) {
                    db_modify("update ansatte set posnr=posnr+1 where konto_id= '{$konto_id}'", __FILE__ . " linje " . __LINE__);
                    db_modify("insert into ansatte(navn,posnr,konto_id) values ('{$kontakt}',1,'{$konto_id}')", __FILE__ . " linje " . __LINE__);
                }
                if ($kontakt_a && $kontakt_b) {
                    if (!($r = db_fetch_array(db_select("select id from ansatte where konto_id='{$konto_id}' and {$find_kontakt}", __FILE__ . " linje " . __LINE__)))) {
                        db_modify("update ansatte set posnr=posnr+1 where konto_id= '{$konto_id}'", __FILE__ . " linje " . __LINE__);
                        db_modify("insert into ansatte({$kontakt_a},posnr,konto_id) values ({$kontakt_b},1,'{$konto_id}')", __FILE__ . " linje " . __LINE__);
                    }
                    if ($kontakt_b) {
                        list($tmp, $null) = explode(",", $kontakt_b, 2);
                        db_modify("update adresser set kontakt={$tmp} where id = '{$konto_id}'", __FILE__ . " linje " . __LINE__);
                    }
                }
            }
        }
    }
    fclose($fp);
    transaktion('commit');
    print "</tbody></table>";
    print "</td></tr>";
    print "<BODY onLoad=\"javascript:alert('{$imp_antal} adresser importeret')\">";
    if ($popup) {
        print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/luk.php\">";
    } else {
        print "<meta http-equiv=\"refresh\" content=\"0;URL=../systemdata/diverse.php\">";
    }
    exit;
}