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æ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;
}
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æ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;
}
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æ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øde linjer indeholder fejl (kontonummer ikke numerisk) og bliver ikke importeret')\">";
# print "<BODY onLoad=\"javascript:alert('Kontonrnummer skal væ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\">";
}
#|| $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]);
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æ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;
}
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æ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;
}
