Ejemplo n.º 1
0
function singleupdate($string)
{
    $webservice = '1';
    list($s_id, $tmp) = explode(chr(9), $string);
    if (!$s_id) {
        return '1' . chr(9) . "Missing session ID";
    }
    #	include("../includes/select.php");
    include "../includes/connect.php";
    include "../includes/online.php";
    $linje = NULL;
    $tabels = array('grupper', 'varianter', 'variant_typer', 'shop_ordrer', 'shop_varer', 'adresser', 'shop_adresser');
    $singleupdate = str_replace($s_id, "", $string);
    $singleupdate = str_replace(chr(9), "", $singleupdate);
    $singleupdate = str_replace(chr(10), "", $singleupdate);
    $singleupdate = str_replace(chr(13), "", $singleupdate);
    #	$singleupdate=str_replace(" ","",$singleupdate);
    $singleupdate = strtolower($singleupdate);
    list($table, $tmp) = explode("set", $singleupdate, 2);
    $table = trim($table);
    #if ($table!='adresser')	return('1'.chr(9).$table);
    if (!in_array($table, $tabels)) {
        return '1' . chr(9) . 'Updating ' . $table . ' is not accepted';
    }
    #if ($table!='adresser')	return('1'.chr(9).$svar.":".$singleupdate);
    transaktion('begin');
    $svar = db_modify("update {$table} {$singleupdate}", __FILE__ . " linje " . __LINE__);
    list($fejl, $svar) = explode(chr(9), $svar);
    if ($fejl) {
        return $fejl . chr(9) . $svar;
    } else {
        transaktion('commit');
        return '0' . chr(9) . $id;
    }
}
Ejemplo n.º 2
0
function opdat_1_0($under_nr, $lap_nr)
{
    global $version;
    global $db;
    global $db_id;
    global $regnskab;
    global $regnaar;
    $s_id = session_id();
    if ($lap_nr < 2) {
        transaktion("begin");
        $x = 0;
        /*		
        		$query=db_select("SELECT id FROM formularer where formular = 6",__FILE__ . " linje " . __LINE__); 
        		while ($row = db_fetch_array($query)) {$x++;}
        		if ($x<=1) {
        			 $fp=fopen("../importfiler/formular.txt","r");
        			 if ($fp) {
        				while (!feof($fp)) {
        					list($formular, $art, $beskrivelse, $justering, $xa, $ya, $xb, $yb, $str, $color, $font, $fed, $kursiv, $side) = split(chr(9), fgets($fp));
        					if ($formular==6) {
        						$justering=trim($justering); $form=trim($font); $fed=trim($fed); $kursiv=trim($kursiv); $side=trim($side);
        						$xa= $xa*1; $ya= $ya*1; $xb= $xb*1; $yb=$yb*1; $str=$str*1; $color=$color*1;
        						db_modify("insert into formularer (formular, art, beskrivelse, xa, ya, xb, yb, justering, str, color, font, fed, kursiv, side) values ('$formular', '$art', '$beskrivelse', '$xa', '$ya', '$xb', '$yb', '$justering', '$str', '$color', '$font', '$fed', '$kursiv', '$side')",__FILE__ . " linje " . __LINE__); 
        					}
        				}
        			}
        			fclose($fp);
        		}
        */
        $query = db_select("SELECT id, box1 FROM grupper where art = 'DG'", __FILE__ . " linje " . __LINE__);
        while ($row = db_fetch_array($query)) {
            if (strlen(trim($row['box1'])) == 1) {
                $box1 = 'S' . trim($row['box1']);
                db_modify("UPDATE grupper set box1 = '{$box1}' where id = {$row['id']}", __FILE__ . " linje " . __LINE__);
            }
        }
        $query = db_select("SELECT id, box1 FROM grupper where art = 'KG'", __FILE__ . " linje " . __LINE__);
        while ($row = db_fetch_array($query)) {
            if (strlen(trim($row['box1'])) == 1) {
                $box1 = 'K' . trim($row['box1']);
                db_modify("UPDATE grupper set box1 = '{$box1}' where id = {$row['id']}", __FILE__ . " linje " . __LINE__);
            }
        }
        db_modify("ALTER TABLE kontoplan ADD genvej varchar", __FILE__ . " linje " . __LINE__);
        $x = 0;
        $query = db_select("SELECT kodenr FROM grupper where art = 'LG' order by kodenr", __FILE__ . " linje " . __LINE__);
        while ($row = db_fetch_array($query)) {
            $x++;
            $lagernr[$x] = $row[kodenr];
        }
        $lagerantal = $x;
        $x = 0;
        $query = db_select("SELECT id FROM varer order by id", __FILE__ . " linje " . __LINE__);
        while ($row = db_fetch_array($query)) {
            $x++;
            $vare_id[$x] = $row[id];
        }
        $vareantal = $x;
        for ($y = 1; $y <= $lagerantal; $y++) {
            for ($x = 1; $x <= $vareantal; $x++) {
                $z = 0;
                $query = db_select("SELECT rest FROM batch_kob where vare_id={$vare_id[$x]} and lager={$lagernr[$y]}", __FILE__ . " linje " . __LINE__);
                while ($row = db_fetch_array($query)) {
                    $z = $z + $row[rest];
                }
                db_modify("UPDATE lagerstatus set beholdning={$z} where vare_id = {$x} and lager = {$y}", __FILE__ . " linje " . __LINE__);
            }
        }
        db_modify("UPDATE grupper set box1 = '1.0.2' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
    }
    if ($lap_nr <= 6) {
        transaktion("begin");
        db_modify("ALTER TABLE adresser ADD kontoansvarlig integer", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '1.0.7' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
    }
    if ($lap_nr <= 7) {
        include "../includes/connect.php";
        include "../includes/online.php";
        $filnavn = "../temp/{$db}.sql";
        $fp = fopen($filnavn, "w");
        fwrite($fp, "CREATE TABLE openpost (id serial NOT NULL, konto_id integer, konto_nr varchar, faktnr varchar, amount numeric, refnr integer, beskrivelse varchar, udlignet varchar, transdate date, kladde_id integer, bilag_id integer,forfaldsdate date,betal_id varchar, PRIMARY KEY (id));\n");
        fclose($fp);
        echo "<br>export PGPASSWORD={$sqpass}\npsql {$db} -h {$sqhost} -U {$squser} < {$filnavn} > ../temp/NULL\n<br>";
        system("export PGPASSWORD={$sqpass}\npsql {$db} -h {$sqhost} -U {$squser} < {$filnavn} > ../temp/NULL\n");
        transaktion('begin');
        db_modify("ALTER TABLE openpost ADD udlign_id integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE openpost ADD udlign_date date", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE openpost SET udlign_id = '0'", __FILE__ . " linje " . __LINE__);
        include "../includes/autoudlign.php";
        autoudlign('0');
        db_modify("UPDATE grupper set box1 = '1.0.8' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion('commit');
    }
    if ($lap_nr <= 8) {
        transaktion('begin');
        db_modify("ALTER TABLE grupper ADD box9 varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE grupper ADD box10 varchar", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE provision (id serial NOT NULL, gruppe_id integer, ansat_id integer, provision numeric, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '1.0.9' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion('commit');
    }
    if ($lap_nr <= 9) {
        transaktion('begin');
        db_modify("ALTER TABLE varer ADD komplementaer varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD circulate integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD operation integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrelinjer ADD kostpris numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrelinjer ADD samlevare varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE materialer ADD materialenr varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE materialer ADD tykkelse numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE materialer ADD kgpris numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE materialer ADD avance numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE materialer ADD enhed varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE materialer ADD opdat_date date", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE materialer ADD opdat_time time", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ansatte ADD nummer integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ansatte ADD loen numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ansatte ADD hold integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ansatte ADD lukket varchar", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE ansatte set lukket = ''", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md01", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md02", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md03", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md04", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md05", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md06", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md07", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md08", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md09", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md10", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md11", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan DROP md12", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan ADD saldo numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan ADD overfor_til numeric", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE tidsreg (id serial NOT NULL, person integer, ordre integer, pnummer integer, operation integer, materiale integer, tykkelse numeric, laengde numeric, bredde numeric, antal_plader numeric,  gaa_hjem integer, tid integer, forbrugt_tid integer, opsummeret_tid integer, beregnet integer, pause integer, antal numeric,  faerdig integer, circ_time integer, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE tmpkassekl (id integer, lobenr integer, bilag varchar, transdate varchar, beskrivelse varchar, d_type varchar, debet varchar, k_type varchar, kredit varchar, faktura varchar, amount varchar, kladde_id integer, momsfri varchar, afd varchar)", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box9 = 'on' where box8 = 'on' and art = 'VG'", __FILE__ . " linje " . __LINE__);
        include "../includes/genberegn.php";
        $query = db_select("SELECT kodenr FROM grupper where art = 'RA' order by kodenr", __FILE__ . " linje " . __LINE__);
        while ($row = db_fetch_array($query)) {
            genberegn($row[kodenr]);
        }
        db_modify("UPDATE grupper set box1 = '1.1.0' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion('commit');
        # Husk opret.php.... (internt notat)
    }
    db_modify("UPDATE grupper set box1 ='{$version}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
}
Ejemplo n.º 3
0
function opdat_0($version, $dbver)
{
    global $db_id;
    global $s_id;
    global $backup;
    include "../includes/connect.php";
    include "../includes/online.php";
    include "../includes/db_query.php";
    $returside = "../index/logud.php";
    $db = trim($db);
    if (!$backup) {
        system("pg_dump -h {$sqhost} -U {$squser} -W {$sqpass} -f '../temp/{$db}.sql' {$db}");
        print "<table align=center valign=center cellpadding=1 cellspacing=1 border=0\theight=100% width=100%><tbody>";
        print "<tr><td>";
        print "<table align=center valign=center cellpadding=1 cellspacing=1 border=0\theight=25% width=50%><tbody>";
        print "<tr><td align=center>{$font} Systemet opdateres . . . . . .<br></td></tr>";
        print "<tr><td align=center>{$font} Backup foretages . . . . . .<br></td></tr>";
        print "<tr><td align=center><br></td></tr>";
        print "<tr><td align=center>{$font} H&oslash;jreklik her: <a href='../temp/{$db}.sql'>{$db}.sql</a></td></tr>";
        print "<tr><td align=center>{$font} V&aelig;lg \"gem link som\" (eller \"save link as\")</td></tr>";
        print "<tr><td align=center>{$font} og gem backup'en et passende sted</td></tr>";
        print "<tr><td><br></td></tr>";
        print "<tr><td align=center><a href=../includes/opdat_0.php?version={$version}&dbver={$dbver}&backup=OK accesskey=F>{$font} Forts&aelig;t</a><br></td></tr>";
        print "</tbody></table>";
        print "</td></tr>";
        print "</tbody></table>";
        print "<br>";
    }
    if (!$dbver) {
        echo "Variablen dbver ikke sat - kontakt systemansvarlig!!";
        exit;
    }
    if ($dbver < 0.23) {
        transaktion("begin");
        db_modify("ALTER TABLE kladdeliste add bogforingsdate date");
        db_modify("UPDATE grupper set box1 = '0.23' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.24) {
        transaktion("begin");
        $x = 0;
        $maxval = 0;
        $query = db_select("SELECT * FROM ordrelinjer");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $varenr[$x] = $row['varenr'];
            $text[$x] = $row['text'];
            $posnr[$x] = $row['posnr'] * 1;
            $pris[$x] = $row['pris'] * 1;
            $rabat[$x] = $row['rabat'] * 1;
            $lev_varenr[$x] = $row['lev_varenr'];
            $ordre_id[$x] = $row['ordre_id'] * 1;
            $serienr[$x] = $row['serienr'];
            $antal[$x] = $row['antal'] * 1;
            $bogf_konto[$x] = $row['bogf_konto'] * 1;
            if ($maxval < $id[$x]) {
                $maxval = $id[$x];
            }
        }
        $linjeantal = $x;
        db_modify("DROP TABLE ordrelinjer");
        db_modify("CREATE TABLE ordrelinjer (id serial NOT NULL, varenr varchar, text r varchar, posnr smallint, pris numeric, rabat numeric, lev_varenr varchar, ordre_id integer, serienr varchar, antal numeric, bogf_konto integer, PRIMARY KEY (id))");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("INSERT INTO ordrelinjer (id, varenr, text, posnr, pris, rabat, lev_varenr, ordre_id, serienr, antal, bogf_konto) values ({$id[$x]}, '{$varenr[$x]}', '{$text[$x]}', '{$posnr[$x]}', '{$pris[$x]}', '{$rabat[$x]}', '{$lev_varenr[$x]}', '{$ordre_id[$x]}', '{$serienr[$x]}', '{$antal[$x]}', '{$bogf_konto[$x]}')");
        }
        if ($maxval >= 1) {
            db_modify("select pg_catalog.setval('ordrelinjer_id_seq', {$maxval}, true)");
        }
        db_modify("CREATE TABLE batch_kob (id serial NOT NULL, kobsdate date, vare_id integer, ordre_id integer, pris numeric, antal integer, rest integer, PRIMARY KEY (id))");
        db_modify("CREATE TABLE batch_salg (id serial NOT NULL, salgsdate date, batch_kob_id integer, vare_id integer, ordre_id integer, pris numeric, antal integer, PRIMARY KEY (id))");
        db_modify("CREATE TABLE serienr (id serial NOT NULL, vare_id integer, kobsordre_id integer, salgsordre_id integer, serienr varchar, PRIMARY KEY (id))");
        db_modify("UPDATE grupper set box1 = '0.24' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.26) {
        transaktion("begin");
        db_modify("ALTER TABLE ordrelinjer ADD vare_id integer");
        db_modify("ALTER TABLE ordrer ADD kred_ord_id integer");
        db_modify("UPDATE grupper set box1 = '0.26' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.27) {
        transaktion("begin");
        print "Opdaterer til ver. 0.27<br>";
        db_modify("ALTER TABLE varer ADD samlevare varchar");
        db_modify("ALTER TABLE varer ADD delvare varchar");
        db_modify("ALTER TABLE ordrer ADD lev_adr text");
        db_modify("CREATE TABLE styklister (id serial NOT NULL, vare_id integer, indgaar_i integer, antal integer, PRIMARY KEY (id))");
        db_modify("UPDATE grupper set box1 = '0.27' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.29) {
        transaktion("begin");
        print "Opdaterer til ver. 0.29<br>";
        db_modify("ALTER TABLE brugere ADD rettigheder varchar");
        db_modify("UPDATE brugere set rettigheder='1111111111'");
        db_modify("ALTER TABLE styklister ADD posnr integer");
        transaktion("commit");
        include "../includes/connect.php";
        $query = db_select("SELECT * FROM online");
        $row = db_fetch_array($query);
        if (!$row[rettigheder]) {
            db_modify("ALTER TABLE online ADD rettigheder varchar");
        }
        include "../includes/online.php";
        transaktion("begin");
        db_modify("UPDATE grupper set box1 = '0.29' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.31) {
        transaktion("begin");
        print "Opdaterer til ver. 0.31<br>";
        db_modify("ALTER TABLE varer ADD enhed varchar");
        db_modify("ALTER TABLE varer ADD enhed2 varchar");
        db_modify("ALTER TABLE varer ADD forhold numeric");
        db_modify("ALTER TABLE ordrelinjer ADD enhed varchar");
        db_modify("CREATE TABLE enheder (id serial NOT NULL, betegnelse varchar, beskrivelse varchar, PRIMARY KEY (id))");
        db_modify("INSERT into enheder (betegnelse, beskrivelse) values ('m', 'meter')");
        db_modify("INSERT into enheder (betegnelse, beskrivelse) values ('m2', 'kvadratmeter')");
        db_modify("INSERT into enheder (betegnelse, beskrivelse) values ('m3', 'kubikmeter')");
        db_modify("INSERT into enheder (betegnelse, beskrivelse) values ('l', 'liter')");
        db_modify("INSERT into enheder (betegnelse, beskrivelse) values ('kg', 'kilogram')");
        db_modify("INSERT into enheder (betegnelse, beskrivelse) values ('stk', 'styk')");
        db_modify("CREATE TABLE materialer (id serial NOT NULL, beskrivelse varchar, densitet numeric, PRIMARY KEY (id))");
        db_modify("CREATE TABLE vare_lev (id serial NOT NULL, posnr integer, lev_id integer, vare_id integer, lev_varenr varchar, kostpris numeric, PRIMARY KEY (id))");
        $x = 0;
        $query = db_select("SELECT * FROM varer where leverandor > 0");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $leverandor[$x] = $row[leverandor];
            $lev_varenr[$x] = $row['lev_varenr'];
            $kostpris[$x] = $row['kostpris'];
        }
        $linjeantal = $x;
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("INSERT into vare_lev (lev_id, vare_id, lev_varenr, kostpris) values ({$leverandor[$x]}, {$id[$x]}, '{$lev_varenr[$x]}', '{$kostpris[$x]}')");
        }
        db_modify("UPDATE grupper set box1 = '0.31' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.33) {
        transaktion("begin");
        print "Opdaterer til ver. 0.33<br>";
        db_modify("CREATE TABLE ansatte (id serial NOT NULL, adr_id integer, navn varchar, addr1 varchar, addr2 varchar, postnr varchar, bynavn varchar, tlf varchar, fax varchar, mobil varchar, email varchar, notes text, cprnr varchar, posnr integer, PRIMARY KEY (id))");
        $x = 0;
        $query = db_select("SELECT * FROM adresser order by id");
        while ($row = db_fetch_array($query)) {
            if ($row[kontakt]) {
                $x++;
                $adr_id[$x] = $row[id];
                $navn[$x] = $row['kontakt'];
            }
        }
        $linjeantal = $x;
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("INSERT into ansatte (adr_id, navn) values ({$adr_id[$x]}, '{$navn[$x]}')");
        }
        db_modify("UPDATE grupper set box1 = '0.33' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.35) {
        transaktion("begin");
        print "Opdaterer til ver. 0.35<br>";
        db_modify("ALTER TABLE ordrer DROP ordrenr");
        db_modify("ALTER TABLE ordrer ADD ordrenr integer");
        $x = 0;
        $maxval = 0;
        $query = db_select("SELECT id FROM ordrer order by id");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            if ($maxval < $id[$x]) {
                $maxval = $id[$x];
            }
        }
        $linjeantal = $x;
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE ordrer set ordrenr = '{$id[$x]}' where id = {$id[$x]}");
        }
        if ($maxval >= 1) {
            db_modify("select pg_catalog.setval ('ordrer_id_seq', {$maxval}, true)");
        }
        db_modify("ALTER TABLE ordrelinjer ADD leveret integer");
        db_modify("ALTER TABLE batch_kob ADD linje_id integer");
        db_modify("ALTER TABLE batch_salg ADD linje_id integer");
        db_modify("UPDATE grupper set box1 = '0.35' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.39) {
        transaktion("begin");
        print "Opdaterer til ver. 0.39<br>";
        $x = 0;
        $maxval = 0;
        $query = db_select("SELECT * FROM ordrelinjer");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $antal[$x] = $row['antal'] * 1;
            $leveres[$x] = $row['leveret'] * 1;
            if ($maxval < $id[$x]) {
                $maxval = $id[$x];
            }
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE ordrelinjer DROP antal");
        db_modify("ALTER TABLE ordrelinjer DROP leveret");
        db_modify("ALTER TABLE ordrelinjer ADD antal numeric");
        db_modify("ALTER TABLE ordrelinjer ADD leveres numeric");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE ordrelinjer set antal='{$antal[$x]}', leveres='{$leveres[$x]}' where id={$id[$x]}");
        }
        if ($maxval >= 1) {
            db_modify("select pg_catalog.setval ('ordrelinjer_id_seq', {$maxval}, true)");
        }
        $x = 0;
        $maxval = 0;
        $query = db_select("SELECT * FROM batch_kob");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $antal[$x] = $row['antal'] * 1;
            $rest[$x] = $row['rest'] * 1;
            if ($maxval < $id[$x]) {
                $maxval = $id[$x];
            }
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE batch_kob DROP antal");
        db_modify("ALTER TABLE batch_kob DROP rest");
        db_modify("ALTER TABLE batch_kob ADD antal numeric");
        db_modify("ALTER TABLE batch_kob ADD rest numeric");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE batch_kob set antal='{$antal[$x]}', rest='{$rest[$x]}' where id={$id[$x]}");
        }
        if ($maxval >= 1) {
            db_modify("select pg_catalog.setval ('batch_kob_id_seq', {$maxval}, true)");
        }
        $x = 0;
        $maxval = 0;
        $query = db_select("SELECT * FROM batch_salg");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $antal[$x] = $row['antal'] * 1;
            if ($maxval < $id[$x]) {
                $maxval = $id[$x];
            }
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE batch_salg DROP antal");
        db_modify("ALTER TABLE batch_salg ADD antal numeric");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE batch_salg set antal='{$antal[$x]}' where id={$id[$x]}");
        }
        if ($maxval >= 1) {
            db_modify("select pg_catalog.setval ('batch_salg_id_seq', {$maxval}, true)");
        }
        $x = 0;
        $maxval = 0;
        $query = db_select("SELECT * FROM varer");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beholdning[$x] = $row['beholdning'] * 1;
            if ($maxval < $id[$x]) {
                $maxval = $id[$x];
            }
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE varer DROP beholdning");
        db_modify("ALTER TABLE varer ADD beholdning numeric");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE varer set beholdning='{$beholdning[$x]}' where id={$id[$x]}");
        }
        if ($maxval >= 1) {
            db_modify("select pg_catalog.setval ('varer_id_seq', {$maxval}, true)");
        }
        $x = 0;
        $maxval = 0;
        $query = db_select("SELECT * FROM styklister");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $antal[$x] = $row['antal'] * 1;
            if ($maxval < $id[$x]) {
                $maxval = $id[$x];
            }
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE styklister DROP antal");
        db_modify("ALTER TABLE styklister ADD antal numeric");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE styklister set antal='{$antal[$x]}' where id={$id[$x]}");
        }
        if ($maxval >= 1) {
            db_modify("select pg_catalog.setval ('styklister_id_seq', {$maxval}, true)");
        }
        db_modify("DROP TABLE serienr");
        db_modify("CREATE TABLE serienr (id serial NOT NULL, vare_id integer, kobslinje_id integer, salgslinje_id integer, batch_kob_id integer, batch_salg_id integer, serienr varchar, PRIMARY KEY (id))");
        db_modify("UPDATE grupper set box1 = '0.39' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.41) {
        transaktion("begin");
        print "Opdaterer til ver. 0.41<br>";
        db_modify("ALTER TABLE adresser ADD bank_navn varchar");
        db_modify("ALTER TABLE adresser ADD bank_reg varchar");
        db_modify("ALTER TABLE adresser ADD bank_konto varchar");
        db_modify("ALTER TABLE ordrer ADD kundeordnr varchar");
        db_modify("ALTER TABLE ordrer ADD\tlev_navn varchar");
        db_modify("ALTER TABLE ordrer ADD\tlev_addr1 varchar");
        db_modify("ALTER TABLE ordrer ADD\tlev_addr2 varchar");
        db_modify("ALTER TABLE ordrer ADD\tlev_postnr varchar");
        db_modify("ALTER TABLE ordrer ADD\tlev_bynavn varchar");
        db_modify("ALTER TABLE ordrer ADD lev_kontakt varchar");
        db_modify("ALTER TABLE batch_salg ADD lev_nr integer");
        $x = 0;
        $maxval = 0;
        $query = db_select("SELECT * FROM grupper");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beskrivelse[$x] = $row['beskrivelse'];
            $kode[$x] = $row['kode'];
            $kodenr[$x] = $row['kodenr'];
            $art[$x] = $row['art'];
            $box1[$x] = $row['box1'];
            $box2[$x] = $row['box2'];
            $box3[$x] = $row['box3'];
            $box4[$x] = $row['box4'];
            $box5[$x] = $row['box5'];
            $box6[$x] = $row['box6'];
            $box7[$x] = $row['box7'];
            $box8[$x] = $row['box8'];
            if ($maxval < $id[$x]) {
                $maxval = $id[$x];
            }
        }
        $linjeantal = $x;
        db_modify("DROP TABLE grupper");
        db_modify("CREATE TABLE grupper (id serial NOT NULL, beskrivelse varchar, kode varchar,\tkodenr varchar, art varchar, box1 varchar, box2 varchar, box3 varchar, box4 varchar, box5 varchar, box6 varchar, box7 varchar, box8 varchar, PRIMARY KEY (id))");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("INSERT INTO grupper (id, beskrivelse, kode, kodenr , art, box1, box2, box3, box4, box5, box6, box7, box8) values ({$id[$x]}, '{$beskrivelse[$x]}', '{$kode[$x]}', '{$kodenr[$x]}' ,'{$art[$x]}', '{$box1[$x]}', '{$box2[$x]}', '{$box3[$x]}', '{$box4[$x]}','{$box5[$x]}', '{$box6[$x]}', '{$box7[$x]}', '{$box8[$x]}')");
        }
        if ($maxval >= 1) {
            db_modify("select pg_catalog.setval ('grupper_id_seq', {$maxval}, true)");
        }
        db_modify("INSERT INTO grupper (beskrivelse, kodenr , art, box1,\tbox3) values ('Tilbud','1' ,'PV', 'lpr', 'on')");
        db_modify("INSERT INTO grupper (beskrivelse, kodenr , art, box1,\tbox3) values ('Ordrebekr�telse','2' ,'PV', 'lpr', 'on')");
        db_modify("INSERT INTO grupper (beskrivelse, kodenr , art, box1,\tbox3) values ('Flgeseddel','3' ,'PV', 'lpr', 'on')");
        db_modify("INSERT INTO grupper (beskrivelse, kodenr , art, box1,\tbox3) values ('Faktura', '4' ,'PV', 'lpr', 'on')");
        db_modify("UPDATE grupper set box1 = '0.41' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.42) {
        transaktion("begin");
        print "Opdaterer til ver. 0.42<br>";
        $x = 0;
        $query = db_select("SELECT id, kontonr FROM adresser");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $kontonr[$x] = $row[kontonr];
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE adresser DROP kontonr");
        db_modify("ALTER TABLE adresser ADD kontonr varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE adresser set kontonr = '{$kontonr[$x]}' where id = {$id[$x]}");
        }
        db_modify("ALTER TABLE ansatte RENAME COLUMN adr_id TO konto_id");
        db_modify("UPDATE grupper set box1 = '0.42' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.421) {
        transaktion("begin");
        db_modify("ALTER TABLE adresser ADD ean varchar");
        db_modify("ALTER TABLE adresser ADD institution varchar");
        db_modify("UPDATE grupper set box1 = '0.421' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.422) {
        transaktion("begin");
        db_modify("ALTER TABLE ordrer ADD ean varchar");
        db_modify("ALTER TABLE ordrer ADD institution varchar");
        db_modify("UPDATE grupper set box1 = '0.422' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.431) {
        transaktion("begin");
        db_modify("ALTER TABLE adresser ADD land varchar");
        db_modify("ALTER TABLE ordrer ADD land varchar");
        db_modify("UPDATE grupper set box1 = '0.431' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.432) {
        transaktion("begin");
        db_modify("ALTER TABLE adresser ADD web varchar");
        db_modify("UPDATE grupper set box1 = '0.432' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.433) {
        transaktion("begin");
        db_modify("ALTER TABLE varer ADD min_lager numeric");
        db_modify("UPDATE grupper set box1 = '0.433' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.434) {
        transaktion("begin");
        db_modify("ALTER TABLE varer ADD max_lager numeric");
        $x = 0;
        $query = db_select("SELECT * FROM brugere");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $kode[$x] = md5(trim($row['kode']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE brugere DROP kode");
        db_modify("ALTER TABLE brugere ADD kode varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE brugere set kode = '{$kode[$x]}' where id = {$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.434' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.435) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT id, text FROM ordrelinjer");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $text[$x] = $row[text];
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE ordrelinjer DROP text");
        db_modify("ALTER TABLE ordrelinjer ADD text text");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE ordrelinjer set text = '{$text[$x]}' where id = {$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.435' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.436) {
        transaktion("begin");
        db_modify("ALTER TABLE kontoplan DROP jan");
        db_modify("ALTER TABLE kontoplan DROP feb");
        db_modify("ALTER TABLE kontoplan DROP mar");
        db_modify("ALTER TABLE kontoplan DROP apr");
        db_modify("ALTER TABLE kontoplan DROP jun");
        db_modify("ALTER TABLE kontoplan DROP jul");
        db_modify("ALTER TABLE kontoplan DROP aug");
        db_modify("ALTER TABLE kontoplan DROP sep");
        db_modify("ALTER TABLE kontoplan DROP okt");
        db_modify("ALTER TABLE kontoplan DROP nov");
        db_modify("ALTER TABLE kontoplan DROP dec");
        db_modify("ALTER TABLE kontoplan ADD md01 numeric");
        db_modify("ALTER TABLE kontoplan ADD md02 numeric");
        db_modify("ALTER TABLE kontoplan ADD md03 numeric");
        db_modify("ALTER TABLE kontoplan ADD md04 numeric");
        db_modify("ALTER TABLE kontoplan ADD md05 numeric");
        db_modify("ALTER TABLE kontoplan ADD md06 numeric");
        db_modify("ALTER TABLE kontoplan ADD md07 numeric");
        db_modify("ALTER TABLE kontoplan ADD md08 numeric");
        db_modify("ALTER TABLE kontoplan ADD md09 numeric");
        db_modify("ALTER TABLE kontoplan ADD md10 numeric");
        db_modify("ALTER TABLE kontoplan ADD md11 numeric");
        db_modify("ALTER TABLE kontoplan ADD md12 numeric");
        transaktion("commit");
        db_modify("UPDATE grupper set box1 = '0.436' where art = 'VE'");
    }
    if ($dbver < 0.501) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT id, debet, kredit FROM kassekladde");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $debet[$x] = $row[debet];
            $kredit[$x] = $row[kredit];
            if (!$debet[$x]) {
                $debet[$x] = '0';
            }
            if (!$kredit[$x]) {
                $kredit[$x] = '0';
            }
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE kassekladde DROP debet");
        db_modify("ALTER TABLE kassekladde DROP kredit");
        db_modify("ALTER TABLE kassekladde ADD debet numeric");
        db_modify("ALTER TABLE kassekladde ADD kredit numeric");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE kassekladde set debet = '{$debet[$x]}', kredit = '{$kredit[$x]}' where id = {$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.501' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.502) {
        transaktion("begin");
        db_modify("ALTER TABLE ordrer ADD modtagelse integer");
        #	include("../includes/genberegn.php");
        $query = db_select("SELECT * FROM grupper where art='RA' order by kodenr");
        #	 while($row = db_fetch_array($query)) {genberegn($row[kodenr]);}
        db_modify("UPDATE grupper set box1 = '0.502' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.601) {
        transaktion("begin");
        db_modify("ALTER TABLE kladdeliste ADD oprettet_af varchar");
        db_modify("ALTER TABLE kladdeliste ADD bogfort_af varchar");
        db_modify("ALTER TABLE kladdeliste ADD hvem varchar");
        db_modify("ALTER TABLE kladdeliste ADD tidspkt varchar");
        db_modify("UPDATE grupper set box1 = '0.601' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.602) {
        transaktion("begin");
        db_modify("ALTER TABLE ordrer ADD oprettet_af varchar");
        db_modify("ALTER TABLE ordrer ADD bogfort_af varchar");
        db_modify("ALTER TABLE ordrer ADD hvem varchar");
        db_modify("ALTER TABLE ordrer ADD tidspkt varchar");
        db_modify("UPDATE grupper set box1 = '0.602' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.603) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM adresser");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $firmanavn[$x] = addslashes(trim($row['firmanavn']));
            $addr1[$x] = addslashes(trim($row['addr1']));
            $addr2[$x] = addslashes(trim($row['addr2']));
            $postnr[$x] = addslashes(trim($row['postnr']));
            $bynavn[$x] = addslashes(trim($row['bynavn']));
            $kontakt[$x] = addslashes(trim($row['kontakt']));
            $tlf[$x] = addslashes(trim($row['tlf']));
            $fax[$x] = addslashes(trim($row['fax']));
            $email[$x] = addslashes(trim($row['email']));
            $notes[$x] = addslashes(trim($row['notes']));
            $cvrnr[$x] = addslashes(trim($row['cvrnr']));
            $art[$x] = addslashes(trim($row['art']));
            $bank_navn[$x] = addslashes(trim($row['bank_navn']));
            $bank_reg[$x] = addslashes(trim($row['bank_reg']));
            $bank_konto[$x] = addslashes(trim($row['bank_konto']));
            $kontonr[$x] = addslashes(trim($row['kontonr']));
            $ean[$x] = addslashes(trim($row['ean']));
            $institution[$x] = addslashes(trim($row['institution']));
            $land[$x] = addslashes(trim($row['land']));
            $web[$x] = addslashes(trim($row['web']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE adresser DROP firmanavn");
        db_modify("ALTER TABLE adresser DROP addr1");
        db_modify("ALTER TABLE adresser DROP addr2");
        db_modify("ALTER TABLE adresser DROP postnr");
        db_modify("ALTER TABLE adresser DROP bynavn");
        db_modify("ALTER TABLE adresser DROP kontakt");
        db_modify("ALTER TABLE adresser DROP tlf");
        db_modify("ALTER TABLE adresser DROP fax");
        db_modify("ALTER TABLE adresser DROP email");
        db_modify("ALTER TABLE adresser DROP notes");
        db_modify("ALTER TABLE adresser DROP cvrnr");
        db_modify("ALTER TABLE adresser DROP art");
        db_modify("ALTER TABLE adresser DROP bank_navn");
        db_modify("ALTER TABLE adresser DROP bank_reg");
        db_modify("ALTER TABLE adresser DROP bank_konto");
        db_modify("ALTER TABLE adresser DROP kontonr");
        db_modify("ALTER TABLE adresser DROP ean");
        db_modify("ALTER TABLE adresser DROP institution");
        db_modify("ALTER TABLE adresser DROP land");
        db_modify("ALTER TABLE adresser DROP web");
        db_modify("ALTER TABLE adresser ADD firmanavn varchar");
        db_modify("ALTER TABLE adresser ADD addr1 varchar");
        db_modify("ALTER TABLE adresser ADD addr2 varchar");
        db_modify("ALTER TABLE adresser ADD postnr varchar");
        db_modify("ALTER TABLE adresser ADD bynavn varchar");
        db_modify("ALTER TABLE adresser ADD kontakt varchar");
        db_modify("ALTER TABLE adresser ADD tlf varchar");
        db_modify("ALTER TABLE adresser ADD fax varchar");
        db_modify("ALTER TABLE adresser ADD email varchar");
        db_modify("ALTER TABLE adresser ADD notes varchar");
        db_modify("ALTER TABLE adresser ADD cvrnr varchar");
        db_modify("ALTER TABLE adresser ADD art varchar");
        db_modify("ALTER TABLE adresser ADD bank_navn varchar");
        db_modify("ALTER TABLE adresser ADD bank_reg varchar");
        db_modify("ALTER TABLE adresser ADD bank_konto varchar");
        db_modify("ALTER TABLE adresser ADD kontonr varchar");
        db_modify("ALTER TABLE adresser ADD ean varchar");
        db_modify("ALTER TABLE adresser ADD institution varchar");
        db_modify("ALTER TABLE adresser ADD land varchar");
        db_modify("ALTER TABLE adresser ADD web varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE adresser set firmanavn = '{$firmanavn[$x]}',\taddr1 = '{$addr1[$x]}',\taddr2 = '{$addr2[$x]}', postnr = '{$postnr[$x]}', bynavn = '{$bynavn[$x]}', kontakt = '{$kontakt[$x]}', tlf = '{$tlf[$x]}', fax = '{$fax[$x]}', email = '{$email[$x]}', notes = '{$notes[$x]}', cvrnr = '{$cvrnr[$x]}', art = '{$art[$x]}', bank_navn = '{$bank_navn[$x]}', bank_reg = '{$bank_reg[$x]}', bank_konto = '{$bank_konto[$x]}', kontonr = '{$kontonr[$x]}', ean = '{$ean[$x]}', institution = '{$institution[$x]}', land = '{$land[$x]}', web = '{$web[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.603' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.604) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM ansatte");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $navn[$x] = addslashes(trim($row['navn']));
            $addr1[$x] = addslashes(trim($row['addr1']));
            $addr2[$x] = addslashes(trim($row['addr2']));
            $postnr[$x] = addslashes(trim($row['postnr']));
            $bynavn[$x] = addslashes(trim($row['bynavn']));
            $tlf[$x] = addslashes(trim($row['tlf']));
            $fax[$x] = addslashes(trim($row['fax']));
            $mobil[$x] = addslashes(trim($row['mobil']));
            $email[$x] = addslashes(trim($row['email']));
            $notes[$x] = addslashes(trim($row['notes']));
            $cprnr[$x] = addslashes(trim($row['cprnr']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE ansatte DROP navn");
        db_modify("ALTER TABLE ansatte DROP addr1");
        db_modify("ALTER TABLE ansatte DROP addr2");
        db_modify("ALTER TABLE ansatte DROP postnr");
        db_modify("ALTER TABLE ansatte DROP bynavn");
        db_modify("ALTER TABLE ansatte DROP tlf");
        db_modify("ALTER TABLE ansatte DROP fax");
        db_modify("ALTER TABLE ansatte DROP mobil");
        db_modify("ALTER TABLE ansatte DROP email");
        db_modify("ALTER TABLE ansatte DROP notes");
        db_modify("ALTER TABLE ansatte DROP cprnr");
        db_modify("ALTER TABLE ansatte ADD navn varchar");
        db_modify("ALTER TABLE ansatte ADD addr1 varchar");
        db_modify("ALTER TABLE ansatte ADD addr2 varchar");
        db_modify("ALTER TABLE ansatte ADD postnr varchar");
        db_modify("ALTER TABLE ansatte ADD bynavn varchar");
        db_modify("ALTER TABLE ansatte ADD tlf varchar");
        db_modify("ALTER TABLE ansatte ADD fax varchar");
        db_modify("ALTER TABLE ansatte ADD mobil varchar");
        db_modify("ALTER TABLE ansatte ADD email varchar");
        db_modify("ALTER TABLE ansatte ADD notes varchar");
        db_modify("ALTER TABLE ansatte ADD cprnr varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE ansatte set navn = '{$navn[$x]}', addr1 = '{$addr1[$x]}',\taddr2 = '{$addr2[$x]}', postnr = '{$postnr[$x]}', bynavn = '{$bynavn[$x]}', tlf = '{$tlf[$x]}', fax = '{$fax[$x]}', mobil = '{$mobil[$x]}', email = '{$email[$x]}', notes = '{$notes[$x]}', cprnr = '{$cprnr[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.604' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.605) {
        $id = array();
        $brugernavn = array();
        $status = array();
        $rettigheder = array();
        $kode = array();
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM brugere");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $brugernavn[$x] = addslashes(trim($row['brugernavn']));
            $status[$x] = addslashes(trim($row['status']));
            $rettigheder[$x] = addslashes(trim($row['rettigheder']));
            $kode[$x] = addslashes(trim($row['kode']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE brugere DROP brugernavn");
        db_modify("ALTER TABLE brugere DROP status");
        db_modify("ALTER TABLE brugere DROP rettigheder");
        db_modify("ALTER TABLE brugere DROP kode");
        db_modify("ALTER TABLE brugere ADD brugernavn varchar");
        db_modify("ALTER TABLE brugere ADD status varchar");
        db_modify("ALTER TABLE brugere ADD rettigheder varchar");
        db_modify("ALTER TABLE brugere ADD kode varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE brugere set brugernavn = '{$brugernavn[$x]}', status = '{$status[$x]}',\trettigheder = '{$rettigheder[$x]}', kode = '{$kode[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.605' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.606) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM enheder");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $betegnelse[$x] = addslashes(trim($row['betegnelse']));
            $beskrivelse[$x] = addslashes(trim($row['beskrivelse']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE enheder DROP betegnelse");
        db_modify("ALTER TABLE enheder DROP beskrivelse");
        db_modify("ALTER TABLE enheder ADD betegnelse varchar");
        db_modify("ALTER TABLE enheder ADD beskrivelse varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE enheder set betegnelse = '{$betegnelse[$x]}', beskrivelse = '{$beskrivelse[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.606' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.607) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM grupper");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beskrivelse[$x] = addslashes(trim($row['beskrivelse']));
            $kode[$x] = addslashes(trim($row['kode']));
            $kodenr[$x] = addslashes(trim($row['kodenr']));
            $art[$x] = addslashes(trim($row['art']));
            $box1[$x] = addslashes(trim($row['box1']));
            $box2[$x] = addslashes(trim($row['box2']));
            $box3[$x] = addslashes(trim($row['box3']));
            $box4[$x] = addslashes(trim($row['box4']));
            $box5[$x] = addslashes(trim($row['box5']));
            $box6[$x] = addslashes(trim($row['box6']));
            $box7[$x] = addslashes(trim($row['box7']));
            $box8[$x] = addslashes(trim($row['box8']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE grupper DROP beskrivelse");
        db_modify("ALTER TABLE grupper DROP kode");
        db_modify("ALTER TABLE grupper DROP kodenr");
        db_modify("ALTER TABLE grupper DROP art");
        db_modify("ALTER TABLE grupper DROP box1");
        db_modify("ALTER TABLE grupper DROP box2");
        db_modify("ALTER TABLE grupper DROP box3");
        db_modify("ALTER TABLE grupper DROP box4");
        db_modify("ALTER TABLE grupper DROP box5");
        db_modify("ALTER TABLE grupper DROP box6");
        db_modify("ALTER TABLE grupper DROP box7");
        db_modify("ALTER TABLE grupper DROP box8");
        db_modify("ALTER TABLE grupper ADD beskrivelse varchar");
        db_modify("ALTER TABLE grupper ADD kode varchar");
        db_modify("ALTER TABLE grupper ADD kodenr varchar");
        db_modify("ALTER TABLE grupper ADD art varchar");
        db_modify("ALTER TABLE grupper ADD box1 varchar");
        db_modify("ALTER TABLE grupper ADD box2 varchar");
        db_modify("ALTER TABLE grupper ADD box3 varchar");
        db_modify("ALTER TABLE grupper ADD box4 varchar");
        db_modify("ALTER TABLE grupper ADD box5 varchar");
        db_modify("ALTER TABLE grupper ADD box6 varchar");
        db_modify("ALTER TABLE grupper ADD box7 varchar");
        db_modify("ALTER TABLE grupper ADD box8 varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE grupper set beskrivelse = '{$beskrivelse[$x]}', kode = '{$kode[$x]}', kodenr = '{$kodenr[$x]}', art = '{$art[$x]}', box1 = '{$box1[$x]}', box2 = '{$box2[$x]}', box3 = '{$box3[$x]}', box4 = '{$box4[$x]}', box5 = '{$box5[$x]}', box6 = '{$box6[$x]}', box7 = '{$box7[$x]}', box8 = '{$box8[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.607' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.608) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM kassekladde");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beskrivelse[$x] = addslashes(trim($row['text']));
            $d_type[$x] = addslashes(trim($row['d_type']));
            $k_type[$x] = addslashes(trim($row['k_type']));
            $momsfri[$x] = addslashes(trim($row['momsfri']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE kassekladde DROP text");
        db_modify("ALTER TABLE kassekladde DROP d_type");
        db_modify("ALTER TABLE kassekladde DROP k_type");
        db_modify("ALTER TABLE kassekladde DROP momsfri");
        db_modify("ALTER TABLE kassekladde ADD beskrivelse varchar");
        db_modify("ALTER TABLE kassekladde ADD d_type varchar");
        db_modify("ALTER TABLE kassekladde ADD k_type varchar");
        db_modify("ALTER TABLE kassekladde ADD momsfri varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE kassekladde set beskrivelse = '{$beskrivelse[$x]}', d_type = '{$d_type[$x]}', k_type = '{$k_type[$x]}', momsfri = '{$momsfri[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.608' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.609) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM kontoplan");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beskrivelse[$x] = addslashes(trim($row['beskrivelse']));
            $kontotype[$x] = addslashes(trim($row['kontotype']));
            $kontonr[$x] = addslashes(trim($row['kontonr']));
            $moms[$x] = addslashes(trim($row['moms']));
            $fra_kto[$x] = addslashes(trim($row['fra_kto']));
            $til_kto[$x] = addslashes(trim($row['til_kto']));
            $lukket[$x] = addslashes(trim($row['lukket']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE kontoplan DROP beskrivelse");
        db_modify("ALTER TABLE kontoplan DROP kontotype");
        db_modify("ALTER TABLE kontoplan DROP kontonr");
        db_modify("ALTER TABLE kontoplan DROP moms");
        db_modify("ALTER TABLE kontoplan DROP fra_kto");
        db_modify("ALTER TABLE kontoplan DROP til_kto");
        db_modify("ALTER TABLE kontoplan DROP lukket");
        db_modify("ALTER TABLE kontoplan ADD beskrivelse varchar");
        db_modify("ALTER TABLE kontoplan ADD kontotype varchar");
        db_modify("ALTER TABLE kontoplan ADD kontonr varchar");
        db_modify("ALTER TABLE kontoplan ADD moms varchar");
        db_modify("ALTER TABLE kontoplan ADD fra_kto varchar");
        db_modify("ALTER TABLE kontoplan ADD til_kto varchar");
        db_modify("ALTER TABLE kontoplan ADD lukket varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE kontoplan set beskrivelse = '{$beskrivelse[$x]}', kontotype = '{$kontotype[$x]}',\tkontonr = '{$kontonr[$x]}', moms = '{$moms[$x]}', fra_kto = '{$fra_kto[$x]}', til_kto = '{$til_kto[$x]}', lukket = '{$lukket[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.609' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.61) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM materialer");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beskrivelse[$x] = addslashes(trim($row['beskrivelse']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE materialer DROP beskrivelse");
        db_modify("ALTER TABLE materialer ADD beskrivelse varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE materialer set beskrivelse = '{$beskrivelse[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.610' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.611) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM openpost");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beskrivelse[$x] = addslashes(trim($row['text']));
            $konto_nr[$x] = addslashes(trim($row['konto_nr']));
            $faktnr[$x] = addslashes(trim($row['faktnr']));
            $udlignet[$x] = addslashes(trim($row['udlignet']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE openpost DROP text");
        db_modify("ALTER TABLE openpost DROP konto_nr");
        db_modify("ALTER TABLE openpost DROP faktnr");
        db_modify("ALTER TABLE openpost DROP udlignet");
        db_modify("ALTER TABLE openpost ADD beskrivelse varchar");
        db_modify("ALTER TABLE openpost ADD konto_nr varchar");
        db_modify("ALTER TABLE openpost ADD faktnr varchar");
        db_modify("ALTER TABLE openpost ADD udlignet varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE openpost set beskrivelse = '{$beskrivelse[$x]}', konto_nr = '{$konto_nr[$x]}', faktnr = '{$faktnr[$x]}', udlignet = '{$udlignet[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.611' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.612) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM ordrelinjer");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beskrivelse[$x] = addslashes(trim($row['text']));
            $varenr[$x] = addslashes(trim($row['varenr']));
            $enhed[$x] = addslashes(trim($row['enhed']));
            $lev_varenr[$x] = addslashes(trim($row['lev_varenr']));
            $serienr[$x] = addslashes(trim($row['serienr']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE ordrelinjer DROP text");
        db_modify("ALTER TABLE ordrelinjer DROP varenr");
        db_modify("ALTER TABLE ordrelinjer DROP enhed");
        db_modify("ALTER TABLE ordrelinjer DROP lev_varenr");
        db_modify("ALTER TABLE ordrelinjer DROP serienr");
        db_modify("ALTER TABLE ordrelinjer ADD beskrivelse varchar");
        db_modify("ALTER TABLE ordrelinjer ADD varenr varchar");
        db_modify("ALTER TABLE ordrelinjer ADD enhed varchar");
        db_modify("ALTER TABLE ordrelinjer ADD lev_varenr varchar");
        db_modify("ALTER TABLE ordrelinjer ADD serienr varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE ordrelinjer set beskrivelse = '{$beskrivelse[$x]}', varenr = '{$varenr[$x]}', enhed = '{$enhed[$x]}', lev_varenr = '{$lev_varenr[$x]}', serienr = '{$serienr[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.612' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.613) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM ordrer");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $firmanavn[$x] = addslashes(trim($row['firmanavn']));
            $addr1[$x] = addslashes(trim($row['addr1']));
            $addr2[$x] = addslashes(trim($row['addr2']));
            $postnr[$x] = addslashes(trim($row['postnr']));
            $bynavn[$x] = addslashes(trim($row['bynavn']));
            $kontakt[$x] = addslashes(trim($row['kontakt']));
            $cvrnr[$x] = addslashes(trim($row['cvrnr']));
            $art[$x] = addslashes(trim($row['art']));
            $kontonr[$x] = addslashes(trim($row['kontonr']));
            $ean[$x] = addslashes(trim($row['ean']));
            $institution[$x] = addslashes(trim($row['institution']));
            $land[$x] = addslashes(trim($row['land']));
            $ref[$x] = addslashes(trim($row['ref']));
            $fakturanr[$x] = addslashes(trim($row['fakturanr']));
            $kundeordnr[$x] = addslashes(trim($row['kundeordnr']));
            $lev_navn[$x] = addslashes(trim($row['lev_navn']));
            $lev_addr1[$x] = addslashes(trim($row['lev_addr1']));
            $lev_addr2[$x] = addslashes(trim($row['lev_addr2']));
            $lev_postnr[$x] = addslashes(trim($row['lev_postnr']));
            $lev_bynavn[$x] = addslashes(trim($row['lev_bynavn']));
            $lev_kontakt[$x] = addslashes(trim($row['lev_kontakt']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE ordrer DROP firmanavn");
        db_modify("ALTER TABLE ordrer DROP addr1");
        db_modify("ALTER TABLE ordrer DROP addr2");
        db_modify("ALTER TABLE ordrer DROP postnr");
        db_modify("ALTER TABLE ordrer DROP bynavn");
        db_modify("ALTER TABLE ordrer DROP kontakt");
        db_modify("ALTER TABLE ordrer DROP cvrnr");
        db_modify("ALTER TABLE ordrer DROP art");
        db_modify("ALTER TABLE ordrer DROP kontonr");
        db_modify("ALTER TABLE ordrer DROP ean");
        db_modify("ALTER TABLE ordrer DROP institution");
        db_modify("ALTER TABLE ordrer DROP land");
        db_modify("ALTER TABLE ordrer DROP ref");
        db_modify("ALTER TABLE ordrer DROP fakturanr");
        db_modify("ALTER TABLE ordrer DROP kundeordnr");
        db_modify("ALTER TABLE ordrer DROP lev_navn");
        db_modify("ALTER TABLE ordrer DROP lev_addr1");
        db_modify("ALTER TABLE ordrer DROP lev_addr2");
        db_modify("ALTER TABLE ordrer DROP lev_postnr");
        db_modify("ALTER TABLE ordrer DROP lev_bynavn");
        db_modify("ALTER TABLE ordrer DROP lev_kontakt");
        db_modify("ALTER TABLE ordrer ADD firmanavn varchar");
        db_modify("ALTER TABLE ordrer ADD addr1 varchar");
        db_modify("ALTER TABLE ordrer ADD addr2 varchar");
        db_modify("ALTER TABLE ordrer ADD postnr varchar");
        db_modify("ALTER TABLE ordrer ADD bynavn varchar");
        db_modify("ALTER TABLE ordrer ADD kontakt varchar");
        db_modify("ALTER TABLE ordrer ADD cvrnr varchar");
        db_modify("ALTER TABLE ordrer ADD art varchar");
        db_modify("ALTER TABLE ordrer ADD kontonr varchar");
        db_modify("ALTER TABLE ordrer ADD ean varchar");
        db_modify("ALTER TABLE ordrer ADD institution varchar");
        db_modify("ALTER TABLE ordrer ADD land varchar");
        db_modify("ALTER TABLE ordrer ADD ref varchar");
        db_modify("ALTER TABLE ordrer ADD fakturanr varchar");
        db_modify("ALTER TABLE ordrer ADD kundeordnr varchar");
        db_modify("ALTER TABLE ordrer ADD lev_navn varchar");
        db_modify("ALTER TABLE ordrer ADD lev_addr1 varchar");
        db_modify("ALTER TABLE ordrer ADD lev_addr2 varchar");
        db_modify("ALTER TABLE ordrer ADD lev_postnr varchar");
        db_modify("ALTER TABLE ordrer ADD lev_bynavn varchar");
        db_modify("ALTER TABLE ordrer ADD lev_kontakt varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE ordrer set firmanavn = '{$firmanavn[$x]}', addr1 = '{$addr1[$x]}',\taddr2 = '{$addr2[$x]}', postnr = '{$postnr[$x]}', bynavn = '{$bynavn[$x]}', kontakt = '{$kontakt[$x]}', cvrnr = '{$cvrnr[$x]}', art = '{$art[$x]}', kontonr = '{$kontonr[$x]}', ean = '{$ean[$x]}', institution = '{$institution[$x]}', land = '{$land[$x]}', ref = '{$ref[$x]}', fakturanr = '{$fakturanr[$x]}', kundeordnr = '{$kundeordnr[$x]}', lev_navn = '{$lev_navn[$x]}',\tlev_addr1 = '{$lev_addr1[$x]}',\tlev_addr2 = '{$lev_addr2[$x]}', lev_postnr = '{$lev_postnr[$x]}', lev_bynavn = '{$lev_bynavn[$x]}', lev_kontakt = '{$lev_kontakt[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.613' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.614) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM serienr");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $serienr[$x] = addslashes(trim($row['serienr']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE serienr DROP serienr");
        db_modify("ALTER TABLE serienr ADD serienr varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE serienr set serienr = '{$serienr[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.614' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.615) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM transaktioner");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beskrivelse[$x] = addslashes(trim($row['text']));
            $faktura[$x] = addslashes(trim($row['faktura']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE transaktioner DROP text");
        db_modify("ALTER TABLE transaktioner DROP faktura");
        db_modify("ALTER TABLE transaktioner ADD beskrivelse varchar");
        db_modify("ALTER TABLE transaktioner ADD faktura varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE transaktioner set beskrivelse = '{$beskrivelse[$x]}', faktura = '{$faktura[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.615' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.616) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM vare_lev");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $lev_varenr[$x] = addslashes(trim($row['lev_varenr']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE vare_lev DROP lev_varenr");
        db_modify("ALTER TABLE vare_lev ADD lev_varenr varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE vare_lev set lev_varenr = '{$lev_varenr[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.616' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.617) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT * FROM varer");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $beskrivelse[$x] = addslashes(trim($row['text']));
            $varenr[$x] = addslashes(trim($row['varenr']));
            $enhed[$x] = addslashes(trim($row['enhed']));
            $enhed2[$x] = addslashes(trim($row['enhed2']));
            $gruppe[$x] = addslashes(trim($row['gruppe']));
            $lukket[$x] = addslashes(trim($row['lukket']));
            $serienr[$x] = addslashes(trim($row['serienr']));
            $samlevare[$x] = addslashes(trim($row['samlevare']));
            $delvare[$x] = addslashes(trim($row['delvare']));
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE varer DROP text");
        db_modify("ALTER TABLE varer DROP varenr");
        db_modify("ALTER TABLE varer DROP enhed");
        db_modify("ALTER TABLE varer DROP enhed2");
        db_modify("ALTER TABLE varer DROP gruppe");
        db_modify("ALTER TABLE varer DROP lukket");
        db_modify("ALTER TABLE varer DROP serienr");
        db_modify("ALTER TABLE varer DROP samlevare");
        db_modify("ALTER TABLE varer DROP delvare");
        db_modify("ALTER TABLE varer ADD beskrivelse varchar");
        db_modify("ALTER TABLE varer ADD varenr varchar");
        db_modify("ALTER TABLE varer ADD enhed varchar");
        db_modify("ALTER TABLE varer ADD enhed2 varchar");
        db_modify("ALTER TABLE varer ADD gruppe varchar");
        db_modify("ALTER TABLE varer ADD lukket varchar");
        db_modify("ALTER TABLE varer ADD serienr varchar");
        db_modify("ALTER TABLE varer ADD samlevare varchar");
        db_modify("ALTER TABLE varer ADD delvare varchar");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE varer set beskrivelse = '{$beskrivelse[$x]}',\tvarenr = '{$varenr[$x]}',\tenhed = '{$enhed[$x]}', enhed2 = '{$enhed2[$x]}', gruppe = '{$gruppe[$x]}', lukket = '{$lukket[$x]}', serienr = '{$serienr[$x]}', samlevare = '{$samlevare[$x]}', delvare = '{$delvare[$x]}' where id ={$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.617' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.618) {
        transaktion("begin");
        db_modify("delete FROM grupper where kodenr!='1' and art='PV' and box1='lpr' and box3='on'");
        db_modify("update grupper set beskrivelse='Output', box1='/usr/bin/lpr', box2='/usr/bin/ps2pdf' where kodenr='1' and art='PV' and box1='lpr' and box3='on'");
        transaktion("commit");
        db_modify("UPDATE grupper set box1 = '0.618' where art = 'VE'");
    }
    if ($dbver < 0.73) {
        transaktion("begin");
        db_modify("update kontoplan set primo = 0 where regnskabsaar > 1 and kontotype != 'S'");
        transaktion("commit");
        db_modify("UPDATE grupper set box1 = '0.73' where art = 'VE'");
    }
    if ($dbver < 0.82) {
        transaktion("begin");
        db_modify("ALTER TABLE ordrer ADD kostpris numeric");
        transaktion("commit");
        db_modify("UPDATE grupper set box1 = '0.82' where art = 'VE'");
    }
    if ($dbver < 0.83) {
        transaktion("begin");
        db_modify("CREATE TABLE reservation (linje_id integer, batch_kob_id integer, batch_salg_id integer, vare_id integer, antal numeric)");
        #		db_modify("ALTER TABLE batch_kob ADD reserveret numeric");
        db_modify("UPDATE grupper set box1 = '0.83' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.91) {
        transaktion("begin");
        db_modify("CREATE TABLE formularer (id serial NOT NULL, formular integer, art integer, beskrivelse varchar, justering varchar, xa numeric, ya numeric, xb numeric, yb numeric, str numeric, color integer, font varchar, fed varchar, kursiv varchar, side varchar, PRIMARY KEY (id))");
        $fp = fopen("../importfiler/formular.txt", "r");
        if ($fp) {
            while (!feof($fp)) {
                list($formular, $art, $beskrivelse, $xa, $ya, $xb, $yb, $justering, $str, $color, $font, $fed, $kursiv, $side) = split(chr(9), fgets($fp));
                if ($xa > 0) {
                    $justering = trim($justering);
                    $form = trim($font);
                    $fed = trim($fed);
                    $kursiv = trim($kursiv);
                    $side = trim($side);
                    $xa = $xa * 1;
                    $ya = $ya * 1;
                    $xb = $xb * 1;
                    $yb = $yb * 1;
                    $str = $str * 1;
                    $color = $color * 1;
                    db_modify("insert into formularer (formular, art, beskrivelse, xa, ya, xb, yb, justering, str, color, font, fed, kursiv, side) values\t('{$formular}', '{$art}', '{$beskrivelse}', '{$xa}', '{$ya}', '{$xb}', '{$yb}', '{$justering}', '{$str}', '{$color}', '{$font}', '{$fed}', '{$kursiv}', '{$side}')");
                }
            }
            fclose($fp);
        }
        db_modify("ALTER TABLE brugere ADD ansat_id integer");
        db_modify("UPDATE grupper set box1 = '0.91' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.92) {
        transaktion("begin");
        db_modify("ALTER TABLE batch_kob ADD fakturadate date");
        $x = 0;
        $query = db_select("SELECT id, ordre_id FROM batch_kob order by id");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $ordre_id[$x] = $row[ordre_id];
        }
        $linjeantal = $x;
        for ($x = 1; $x <= $linjeantal; $x++) {
            if ($ordre_id[$x]) {
                $query = db_select("SELECT id, fakturadate FROM ordrer where id = {$ordre_id[$x]}");
                $row = db_fetch_array($query);
                if ($row[fakturadate]) {
                    db_modify("UPDATE batch_kob set fakturadate = '{$row['fakturadate']}' where id = {$id[$x]}");
                }
            }
        }
        db_modify("ALTER TABLE batch_salg ADD fakturadate date");
        $x = 0;
        $query = db_select("SELECT id, ordre_id FROM batch_salg order by id");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $ordre_id[$x] = $row[ordre_id];
        }
        $linjeantal = $x;
        for ($x = 1; $x <= $linjeantal; $x++) {
            if ($ordre_id[$x]) {
                $query = db_select("SELECT id, fakturadate FROM ordrer where id = {$ordre_id[$x]}");
                $row = db_fetch_array($query);
                if ($row[fakturadate]) {
                    db_modify("UPDATE batch_salg set fakturadate = '{$row['fakturadate']}' where id = {$id[$x]}");
                }
            } else {
                db_modify("delete FROM batch_salg where id={$id[$x]}");
            }
        }
        db_modify("UPDATE grupper set box1 = '0.920' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.921) {
        transaktion("begin");
        db_modify("ALTER TABLE ordrelinjer ADD kred_linje_id integer");
        $x = 0;
        $query = db_select("SELECT id FROM ordrer where art='DK' or art='KK'");
        while ($row = db_fetch_array($query)) {
            $x++;
            $ordre_id[$x] = $row[id];
        }
        $ordreantal = $x;
        for ($x = 1; $x <= $ordreantal; $x++) {
            $query = db_select("SELECT id, antal FROM ordrelinjer where ordre_id={$ordre_id[$x]}");
            while ($row = db_fetch_array($query)) {
                if ($row[antal]) {
                    db_modify("UPDATE ordrelinjer set antal={$row['antal']}*-1 where id = {$row['id']}");
                }
            }
        }
        db_modify("UPDATE grupper set box1 = '0.921' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.9340000000000001) {
        transaktion("begin");
        #		db_modify("CREATE TABLE lagerlog (id serial NOT NULL, lagernr integer, date date, antal numeric, pris numeric, PRIMARY KEY (id))");
        db_modify("CREATE TABLE lagerstatus (id serial NOT NULL, lager integer, vare_id integer, beholdning numeric, PRIMARY KEY (id))");
        db_modify("ALTER TABLE ansatte ADD afd integer");
        db_modify("ALTER TABLE ansatte ADD privattlf varchar");
        db_modify("ALTER TABLE ansatte ADD initialer varchar");
        db_modify("ALTER TABLE kassekladde ADD afd integer");
        db_modify("ALTER TABLE transaktioner ADD afd integer");
        db_modify("ALTER TABLE reservation ADD lager integer");
        db_modify("ALTER TABLE batch_kob ADD lager integer");
        db_modify("UPDATE grupper set box1 = '0.934' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.9350000000000001) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT id, kontonr FROM kontoplan order by id");
        while ($row = db_fetch_array($query)) {
            $x++;
            $id[$x] = $row[id];
            $kontonr[$x] = $row[kontonr] * 1;
        }
        $linjeantal = $x;
        db_modify("ALTER TABLE kontoplan DROP kontonr");
        db_modify("ALTER TABLE kontoplan ADD kontonr integer");
        for ($x = 1; $x <= $linjeantal; $x++) {
            db_modify("UPDATE kontoplan set kontonr = {$kontonr[$x]} where id = {$id[$x]}");
        }
        db_modify("UPDATE grupper set box1 = '0.935' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.9360000000000001) {
        transaktion("begin");
        $x = 0;
        $query = db_select("SELECT vare_id, rest, lager FROM batch_kob where rest != 0 order by vare_id");
        while ($row = db_fetch_array($query)) {
            $x++;
            $vare_id[$x] = $row[vare_id];
            $lager[$x] = $row[lager] * 1;
            $antal[$x] = $row[rest] * 1;
        }
        $linjeantal = $x;
        db_modify("UPDATE lagerstatus set beholdning = 0 where beholdning != 0");
        for ($x = 1; $x <= $linjeantal; $x++) {
            if ($row = db_fetch_array(db_select("SELECT gruppe FROM varer where id = {$vare_id[$x]}"))) {
                if ($row = db_fetch_array(db_select("SELECT id FROM grupper where art = 'VG' and kodenr = '{$row['gruppe']}' and box8 = 'on'"))) {
                    if ($row = db_fetch_array(db_select("SELECT id, beholdning FROM lagerstatus where vare_id = {$vare_id[$x]} and lager = {$lager[$x]}"))) {
                        db_modify("UPDATE lagerstatus set beholdning = {$antal[$x]}+{$row['beholdning']} where id = {$row['id']}");
                    } else {
                        db_modify("insert into lagerstatus (lager, vare_id, beholdning) values\t('{$lager[$x]}', '{$vare_id[$x]}', '{$antal[$x]}')");
                    }
                }
            } else {
                db_modify("delete FROM lagerstatus where vare_id={$vare_id[$x]}");
            }
        }
        db_modify("UPDATE batch_kob set lager = 0 where lager\t!= 0");
        db_modify("UPDATE grupper set box1 = '0.936' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.9370000000000001) {
        transaktion("begin");
        db_modify("ALTER TABLE ordrelinjer ADD momsfri varchar");
        db_modify("ALTER TABLE ordrer ADD moms numeric");
        db_modify("UPDATE grupper set box7 = 'on' where art = 'VG' and box5 = ''");
        db_modify("UPDATE grupper set box5 = '', box6 = '' where art = 'VG' and box7 != 'on'");
        db_modify("UPDATE grupper set box1 = '0.937' where art = 'VE'");
        transaktion("commit");
    }
    if ($dbver < 0.956) {
        transaktion("begin");
        db_modify("ALTER TABLE varer ADD provisionsfri VARCHAR");
        db_modify("UPDATE grupper set box1 = '0.956' where art = 'VE'");
        transaktion("commit");
    }
    db_modify("UPDATE grupper set box1 = '1.0.0' where art = 'VE'");
}
Ejemplo n.º 4
0
function invoice($string)
{
    $webservice = '1';
    $fp = fopen("../temp/invoice.log", "w");
    list($s_id, $tmp) = explode(chr(9), $string);
    if (!$s_id) {
        return '1' . chr(9) . "Missing session ID";
    }
    #	include("../includes/select.php");
    include "../includes/connect.php";
    include "../includes/online.php";
    include "../includes/std_func.php";
    include "../includes/ordrefunc.php";
    include "../includes/formfunk.php";
    $linje = NULL;
    $ordre_id = str_replace($s_id, "", $string);
    $ordre_id = str_replace(chr(9), "", $ordre_id);
    $ordre_id = str_replace(chr(10), "", $ordre_id);
    $ordre_id = str_replace(chr(13), "", $ordre_id);
    #	$ordre_id=str_replace(" ","",$ordre_id);
    $ordre_id = strtolower($ordre_id);
    list($table, $tmp) = explode("set", $ordre_id, 2);
    $table = trim($table);
    $r = db_fetch_array(db_select("select momssats from ordrer where id = '{$ordre_id}'", __FILE__ . " linje " . __LINE__));
    $momssats = $r['momssats'] * 1;
    $x = 0;
    $ordresum = 0;
    $momssum = 0;
    $kostsum = 0;
    $momsdiff = 0;
    $q = db_select("select * from ordrelinjer where ordre_id = '{$ordre_id}'", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        if ($r['vare_id']) {
            $linjesum = $r['pris'] * $r['antal'] - $r['pris'] * $r['antal'] * $r['rabat'] / 100;
            $ordresum += $linjesum;
            $linjemoms = $linjesum * $r['momssats'] / 100;
            $momssum += $linjemoms;
            if ($r['momssats'] != $momssats || $r['momsfri']) {
                $momsdiff = 1;
            }
            $kostsum += $r['kostpris'] * $r['antal'];
        }
        $ordresum = afrund($ordresum, 2);
        if (!$momsdiff) {
            $momssum = $ordresum * $momssats / 100;
        }
        $momssum = afrund($momssum, 2);
    }
    transaktion('begin');
    $linje = "update ordrer set status = '2',levdate = ordredate,fakturadate = ordredate,sum='{$ordresum}',moms='{$momssum}',udskriv_til='email',mail_fakt='on',momssats='{$momssats}',kostpris='{$kostsum}',projekt='' where id = '{$ordre_id}'";
    fwrite($fp, $linje . "\n");
    $svar = db_modify($linje, __FILE__ . " linje " . __LINE__);
    list($fejl, $svar) = explode(chr(9), $svar);
    if ($fejl) {
        return $fejl . chr(9) . $svar;
    }
    $linje = "update ordrelinjer set projekt = '' where ordre_id = '{$ordre_id}'";
    fwrite($fp, $linje . "\n");
    $svar = db_modify($linje, __FILE__ . " linje " . __LINE__);
    list($fejl, $svar) = explode(chr(9), $svar);
    if ($fejl) {
        return $fejl . chr(9) . $svar;
    }
    $linje = "update ordrelinjer set leveres = antal where ordre_id = '{$ordre_id}' and vare_id>'0'";
    fwrite($fp, $linje . "\n");
    $svar = db_modify($linje, __FILE__ . " linje " . __LINE__);
    list($fejl, $svar) = explode(chr(9), $svar);
    if ($fejl) {
        return $fejl . chr(9) . $svar;
    }
    $linje = "levering({$ordre_id},'on','','on')";
    fwrite($fp, $linje . "\n");
    $svar = levering($ordre_id, 'on', '', 'on');
    if ($svar != 'OK') {
        return '1' . chr(9) . $svar;
    }
    $linje = "update ordrelinjer set leveret = antal,leveres='0' where ordre_id = '{$ordre_id}' and vare_id>'0'";
    fwrite($fp, $linje . "\n");
    $svar = db_modify($linje, __FILE__ . " linje " . __LINE__);
    $linje = "bogfor({$ordre_id},'on')";
    fwrite($fp, $linje . "\n");
    $svar = bogfor($ordre_id, 'on');
    list($fejl, $svar) = explode(chr(9), $svar);
    fwrite($fp, $fejl . " " . $svar . "\n");
    if ($fejl != 'OK') {
        $linje = "{$fejl}";
        #		fwrite($fp,$linje."\n");
        return '1' . chr(9) . $fejl;
    } else {
        transaktion('commit');
    }
    $linje = "formularprint({$ordre_id},'4','1',{$charset},'email')";
    fwrite($fp, $linje . "\n");
    $svar = formularprint($ordre_id, '4', '1', $charset, 'email');
    fwrite($fp, $linje . "Svar " . $svar . "\n");
    if ($svar && $svar != 'OK') {
        return '1' . chr(9) . $svar;
    } else {
        fclose($fp);
        return '0' . chr(9) . $ordre_id;
    }
}
Ejemplo n.º 5
0
         for ($x = 0; $x < count($kontonr); $x++) {
             db_modify("insert into transaktioner (kontonr,bilag,transdate,logdate,logtime,beskrivelse,debet,kredit,faktura,kladde_id,afd,ansat,projekt,valuta,valutakurs,ordre_id)\n\t\t\t\t\tvalues\n\t\t\t\t\t({$kontonr[$x]},'{$bilag}','{$transdate}','{$transdate}','{$logtime}','Produktionsordre: {$varenr['0']} ({$brugernavn})','0','{$amount[$x]}','','0','0','0','0','1','100','0')", __FILE__ . " linje " . __LINE__);
             $tjeksum += $amount[$x];
         }
         if (abs($tjeksum - $afgangsum) > 0.01) {
             print "<BODY onLoad=\"javascript:alert('Ubalance i posteringssum -kontakt Saldi teamet på tlf. 4690 2208')\">";
             print "<meta http-equiv=\"refresh\" content=\"0;URL=varekort.php?id={$id['0']}\">";
             exit;
         }
         db_modify("insert into transaktioner (kontonr,bilag,transdate,logdate,logtime,beskrivelse,debet,kredit,faktura,kladde_id,afd,ansat,projekt,valuta,valutakurs,ordre_id)\n\t\t\t\tvalues\n\t\t\t('{$tilgang}','{$bilag}','{$transdate}','{$transdate}','{$logtime}','Produktionsordre: {$varenr['0']} ({$brugernavn})','{$afgangsum}','0','','0','0','0','0','1','100','0')", __FILE__ . " linje " . __LINE__);
     }
     $diff = transtjek();
     if ($diff > 1) {
         print "<BODY onLoad=\"javascript:alert('Ubalance i transaktioner -kontakt Saldi teamet på tlf. 4690 2208')\">";
     } else {
         transaktion('commit');
     }
     print "<meta http-equiv=\"refresh\" content=\"0;URL=varekort.php?id={$id['0']}\">";
 } else {
     print "<table><tbody>";
     print "<form name=\"vareproduktion\" action=\"vareproduktion.php?antal={$antal}&samlevare={$samlevare}\" method=\"post\">";
     for ($x = 0; $x < $antal; $x++) {
         print "<tr><td><input type = \"hidden\" name=\"id[{$x}]\" value = {$id[$x]}>";
         print "<tr><td><input type = \"hidden\" name=\"ny_beholdning[{$x}]\" value = {$ny_beholdning[$x]}>";
     }
     print "<tr><td>Skriv bilagsnummer for regulering</td></tr>";
     print "<tr><td><input type = \"tekst\" name=\"bilag\" value=\"0\"></td></tr>";
     print "<tr><td><input type = \"submit\" name=\"OK\" value=\"OK\">&nbsp;";
     print "<input type = \"submit\" name=\"cancel\" value=\"Afbryd\"></td></tr>";
     print "</form>";
 }
Ejemplo n.º 6
0
function overfoer_data($filnavn, $splitter, $feltnavn, $feltantal)
{
    global $charset;
    global $regnaar;
    $r1 = db_fetch_array(db_select("select max(kodenr) as kodenr from grupper where art='RA'", __FILE__ . " linje " . __LINE__));
    $regnskabsaar = $r1[kodenr];
    $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++) {
        if ($feltnavn[$y] == 'Kontonr' && $kontonr == 1) {
            print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med Dato')\">";
            $feltnavn[$y] = '';
        } elseif ($feltnavn[$y] == 'Kontonr') {
            $kontonr = 1;
        }
        if ($feltnavn[$y] == 'Beskrivelse' && $beskrivelse == 1) {
            print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med Beskrivelse')\">";
            $feltnavn[$y] = '';
        } elseif ($feltnavn[$y] == 'Beskrivelse') {
            $beskrivelse = 1;
        }
        if (strstr($feltnavn[$y], 'Kontotype') && $kontotype == 1) {
            print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med Kontotype')\">";
            $feltnavn[$y] = '';
        } elseif ($feltnavn[$y] == 'Kontotype') {
            $kontotype = 1;
        }
        if (strstr($feltnavn[$y], 'Moms') && $moms == 1) {
            print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med Moms')\">";
            $feltnavn[$y] = '';
        } elseif ($feltnavn[$y] == 'Moms') {
            $moms = 1;
        }
        if (strstr($feltnavn[$y], 'Fra_kto') && $fra_kto == 1) {
            print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med fra_kto')\">";
            $feltnavn[$y] = '';
        } elseif ($feltnavn[$y] == 'Fra_kto') {
            $fra_kto = 1;
        }
        if (strstr($feltnavn[$y], 'primo') && $primo == 1) {
            print "<BODY onLoad=\"javascript:alert('Der kan kun v&aelig;re 1 kolonne med primo')\">";
            $feltnavn[$y] = '';
        } elseif ($feltnavn[$y] == 'primo') {
            $primo = 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 kontoplan where regnskabsaar='{$regnskabsaar}'", __FILE__ . " linje " . __LINE__);
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        $kontonumre = array();
        $x = 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();
                $kontotyper = array("H", "D", "S", "Z", "R");
                $momstyper = array("S", "K", "E", "Y");
                $felt = explode($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' && ($felt[$y] != $felt[$y] * 1 || in_array($felt[$y], $kontonumre))) {
                        $skriv_linje = 2;
                    } elseif ($feltnavn[$y] == 'Kontonr') {
                        $kontonumre[$x] = $felt[$y];
                    }
                    if ($feltnavn[$y] == 'kontonr' && $felt[$y] != $felt[$y] * 1) {
                        $skriv_linje = 2;
                    }
                    if ($feltnavn[$y] == 'beskrivelse') {
                        $felt[$y] = addslashes($felt[$y]);
                    }
                    if ($feltnavn[$y] == 'kontotype') {
                        if (strlen($felt[$y]) > 1 || !in_array($felt[$y], $kontotyper)) {
                            $skriv_linje = 2;
                        } else {
                            if ($felt[$y] == 'Z') {
                                $sumkonto = 1;
                            } else {
                                $sumkonto = 0;
                            }
                        }
                    }
                    if ($feltnavn[$y] == 'moms') {
                        $a = substr($felt[$y], 0, 1);
                        $b = substr($felt[$y], 1);
                        if ($felt[$y] && (!in_array($a, $momstyper) || $b != $b * 1)) {
                            $skriv_linje = 2;
                        }
                    }
                    if ($feltnavn[$y] == 'fra_kto' && $sumkonto) {
                        if (!$felt[$y]) {
                            $felt[$y] = '0';
                        }
                        if ($felt[$y] != $felt[$y] * 1) {
                            $skriv_linje = 2;
                        }
                    } elseif ($feltnavn[$y] == 'fra_kto') {
                        $felt[$y] = '0';
                    }
                    if ($feltnavn[$y] == 'primo') {
                        if (!is_numeric($felt[$y])) {
                            $felt[$y] = usdecimal($felt[$y]);
                        }
                        $balance = $balance + $felt[$y];
                    }
                }
            }
            if ($skriv_linje == 1) {
                $a = '';
                $b = '';
                for ($y = 0; $y <= $feltantal; $y++) {
                    if ($y > 0 && $feltnavn[$y]) {
                        if ($a) {
                            $a = $a . ",";
                            $b = $b . ",";
                        }
                    }
                    if ($feltnavn[$y]) {
                        $a = $a . $feltnavn[$y];
                        $b = $b . "'" . $felt[$y] . "'";
                    }
                }
                db_modify("insert into kontoplan({$a}, regnskabsaar) values ({$b}, '{$regnskabsaar}')", __FILE__ . " linje " . __LINE__);
            }
        }
    }
    fclose($fp);
    $q = db_modify("update kontoplan set til_kto=kontonr where kontotype='Z' and regnskabsaar='{$regnskabsaar}'", __FILE__ . " linje " . __LINE__);
    transaktion('commit');
    print "</tbody></table>";
    print "</td></tr>";
    if ($regnaar == 1 && $balance) {
        print "<BODY onLoad=\"javascript:alert('&Aring;bningsbalance stemmer ikke - kontroller sum')\">";
    } else {
        print "<BODY onLoad=\"javascript:alert('Kontoplan importeret - husk at overf&oslash;re &aring;bningstal')\">";
    }
    print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/luk.php\">";
}
Ejemplo n.º 7
0
function flyt_data($kladde_id, $filnavn, $bilag, $modkonto)
{
    global $charset;
    transaktion('begin');
    $fp = fopen("{$filnavn}", "r");
    if ($fp) {
        $y = 0;
        $feltantal = 0;
        #	for ($y=1; $y<20; $y++) {
        while ($linje = fgets($fp)) {
            $linje = trim(utf8_encode($linje));
            if ($linje) {
                $y++;
                $skriv_linje[$y] = 1;
                list($debitor[$y], $beskrivelse[$y], , , $belob[$y], , $date[$y]) = explode(";", $linje);
                if (!is_numeric($debitor[$y])) {
                    $skriv_linje[$y] = 0;
                }
                $amount[$y] = usdecimal($belob[$y]) * 1;
                if (!$amount[$y]) {
                    $skriv_linje[$y] = 0;
                }
                list($aar, $maaned, $dag) = explode("-", $date[$y]);
                # echo "$maaned,$dag,$aar<br>";
                if (checkdate($maaned, $dag, $aar)) {
                    $dato[$y] = dkdato($date[$y]);
                } else {
                    $skriv_linje[$y] = 0;
                }
            }
        }
    }
    $linjeantal = $y;
    fclose($fp);
    for ($x = 1; $x <= $linjeantal; $x++) {
        if ($skriv_linje[$x] == 1) {
            $bilag++;
            db_modify("insert into kassekladde (bilag,transdate,beskrivelse,d_type,debet,k_type,kredit,amount,kladde_id) values ('{$bilag}','{$date[$x]}','{$beskrivelse[$x]}','F','{$modkonto}','D','{$debitor[$x]}','{$amount[$x]}', '{$kladde_id}')", __FILE__ . " linje " . __LINE__);
        }
    }
    fclose($fp);
    unlink($filnavn);
    # sletter filen.
    transaktion('commit');
    print "<meta http-equiv=\"refresh\" content=\"0;URL=kassekladde.php?kladde_id={$kladde_id}\">";
}
Ejemplo n.º 8
0
function flyt_data($filnavn, $leverandor, $varegrp, $rabat)
{
    global $font;
    list($kontonr, $tmp) = split(" : ", $leverandor);
    $kontonr = trim($kontonr);
    list($lev_kontonr, $tmp) = split(":", $leverandor);
    list($gruppe, $tmp) = split(":", $varegrp);
    $gruppe = trim($gruppe);
    $r = db_fetch_array(db_select("select id from adresser where kontonr = {$lev_kontonr}"));
    $lev_id = $r[id];
    $x = 0;
    $q = db_select("select varenr from varer");
    while ($r = db_fetch_array($q)) {
        $x++;
        $exist_vnr[$x] = $r['varenr'];
    }
    $fp = fopen("../temp/" . $filnavn, "r");
    if ($fp) {
        transaktion('begin');
        $x = 0;
        while (!feof($fp)) {
            $x++;
            $linje = fgets($fp);
            $felt = array();
            $felt[0] = substr($linje, 1, 10);
            $felt[1] = substr($linje, 12, 35);
            $felt[2] = substr($linje, 47, 10);
            $felt[3] = substr($linje, 58, 3);
            $felt[4] = substr($linje, 61, 3);
            $felt[5] = substr($linje, 64, 1);
            $felt[6] = substr($linje, 65, 3);
            $felt[7] = substr($linje, 6, 3);
            $felt[1] = str_replace(chr(145), "æ", $felt[1]);
            $felt[1] = str_replace(chr(155), "ø", $felt[1]);
            $felt[1] = str_replace(chr(134), "å", $felt[1]);
            $felt[1] = str_replace(chr(146), "Æ", $felt[1]);
            $felt[1] = str_replace(chr(157), "Ø", $felt[1]);
            $felt[1] = str_replace(chr(143), "Å", $felt[1]);
            for ($y = 0; $y < 6; $y++) {
                if (substr($felt[$y], 0, 1) == '"' && substr($felt[$y], -1) == '"') {
                    $felt[$y] = substr($felt[$y], 1, strlen($felt[$y]) - 2);
                }
                if ($y == 0) {
                    $varenr = trim($felt[$y]);
                    $lev_varenr = trim($felt[$y]);
                } elseif ($y == 1) {
                    $beskrivelse = addslashes(trim($felt[$y]));
                } elseif ($y == 2) {
                    $salgspris = $felt[$y] / 100;
                    if ($rabat) {
                        $kostpris = $felt[$y] / 100 - $felt[$y] / 10000 * $rabat;
                    }
                } elseif ($y == 3) {
                    $enhed = trim($felt[$y]);
                } elseif ($y == 5) {
                    if ($felt[$y] == "S") {
                        $lukket = '1';
                    } else {
                        $lukket = '0';
                    }
                }
            }
            if (in_array($varenr, $exist_vnr)) {
                db_modify("update varer set beskrivelse='{$beskrivelse}', salgspris='{$salgspris}', kostpris='{$kostpris}', enhed='{$enhed}', gruppe='{$gruppe}', lukket='{$lukket}' where varenr='{$varenr}'");
                $r = db_fetch_array(db_select("select id from varer where varenr='{$varenr}'"));
                $r2 = db_fetch_array(db_select("select id from vare_lev where vare_id='{$r['id']}' and lev_id='{$lev_id}'"));
                if ($r2[id]) {
                    db_modify("update vare_lev set kostpris={$kostpris[$y]}, lev_varenr={$lev_varenr[$y]} where id='{$r2['id']}'");
                } else {
                    db_modify("insert into vare_lev(vare_id, lev_id, lev_varenr, kostpris) values ('{$r['id']}', '{$lev_id}', '{$lev_varenr}', '{$kostpris}')");
                }
            } else {
                db_modify("insert into varer (varenr, beskrivelse, salgspris, kostpris, enhed, gruppe, lukket) values ('{$varenr}', '{$beskrivelse}', '{$salgspris}', '{$kostpris}', '{$enhed}', '{$gruppe}', '{$lukket}')");
                $r = db_fetch_array(db_select("select id from varer where varenr='{$varenr}'"));
                db_modify("insert into vare_lev(vare_id, lev_id, lev_varenr, kostpris) values ('{$r['id']}', '{$lev_id}', '{$lev_varenr}', '{$kostpris}')");
            }
        }
        transaktion('commit');
    }
    fclose($fp);
    print "</tbody></table>";
    print "</td></tr>";
}
Ejemplo n.º 9
0
function kopier_til_ny($kladde_id, $bilagsnr, $ny_dato)
{
    global $regnaar;
    global $connection;
    global $brugernavn;
    list($regnstart, $regnslut) = explode(":", regnskabsaar($regnaar));
    $fejl = 0;
    if ($bilagsnr && !is_numeric($bilagsnr) && $bilagsnr != '=') {
        #20150105-2
        $fejl = "Bilagsnr skal være numerisk eller \"-\"";
        print tekstboks($fejl);
    }
    if ($bilagsnr && !$fejl) {
        $gl_bilag = 0;
        $bilag = 0;
        $query = db_select("select kladdenote from kladdeliste where id = '{$kladde_id}' and bogfort='V'", __FILE__ . " linje " . __LINE__);
        if ($row = db_fetch_array($query)) {
            transaktion('begin');
            $kladdenote = db_escape_string($row['kladdenote']);
            #20150105
            $tidspkt = microtime();
            $kladdedate = date("Y-m-d");
            $ny_kladde_id = 1;
            $query = db_select("select id from kladdeliste where id>={$kladde_id}", __FILE__ . " linje " . __LINE__);
            while ($row = db_fetch_array($query)) {
                if ($ny_kladde_id <= $row['id']) {
                    $ny_kladde_id = $row['id'] + 1;
                }
            }
            db_modify("insert into kladdeliste (id, kladdenote, kladdedate, bogfort, oprettet_af) values ('{$ny_kladde_id}', '{$kladdenote}', '{$kladdedate}', '-', '{$brugernavn}')", __FILE__ . " linje " . __LINE__);
            $query = db_select("select * from kassekladde where kladde_id={$kladde_id} order by bilag", __FILE__ . " linje " . __LINE__);
            while ($row = db_fetch_array($query)) {
                $beskrivelse = db_escape_string($row['beskrivelse']);
                $faktura = db_escape_string($row['faktura']);
                if ($bilagsnr != "=" && $row['bilag'] && $row['bilag'] != $gl_bilag) {
                    if (!$bilag) {
                        $bilag = $bilagsnr;
                    } else {
                        $bilag++;
                    }
                    $gl_bilag = $row['bilag'];
                    $next_bilag = $bilag;
                } elseif ($bilagsnr == '=') {
                    $bilag = $row['bilag'] * 1;
                }
                $debet = $row['debet'] * 1;
                $kredit = $row['kredit'] * 1;
                $afd = $row['afd'] * 1;
                $ansat = $row['ansat'] * 1;
                $projekt = $row['projekt'];
                $valuta = $row['valuta'] * 1;
                if ($ny_dato && $ny_dato != "=") {
                    $date = usdate($ny_dato);
                } else {
                    $date = $row['transdate'];
                }
                db_modify("insert into kassekladde (bilag, transdate, beskrivelse, d_type, debet, k_type, kredit, faktura, amount, momsfri, afd, ansat, projekt, valuta, kladde_id) values ('{$bilag}', '{$date}', '{$beskrivelse}', '{$row['d_type']}', '{$debet}', '{$row['k_type']}', '{$kredit}', '{$faktura}', '{$row['amount']}', '{$row['momsfri']}', '{$afd}', '{$ansat}', '{$projekt}', '{$valuta}', '{$ny_kladde_id}')", __FILE__ . " linje " . __LINE__);
            }
            transaktion('commit');
        }
        print "<meta http-equiv=\"refresh\" content=\"0;URL=kassekladde.php?kladde_id={$ny_kladde_id}\">";
        exit;
    } else {
        $query = db_select("select MAX(bilag) as bilag from kassekladde where transdate>='{$regnstart}' and transdate<='{$regnslut}'", __FILE__ . " linje " . __LINE__);
        $row = db_fetch_array($query);
        $bilagsnr = $row['bilag'] + 1;
        $dato = date("d-m-y");
        if ($sort != 'transdate,bilag') {
            $sort = 'bilag,transdate';
        }
        print "<form name=\"Form1\" action=kassekladde.php?sort={$sort}; method=post>";
        print "<span style=center title=\"Bilagsnummer for 1. bilag. De &oslash;vrige beregnes automatisk. S&aelig;ttes et lighedstegn anvendes orginalt bilagsnummer\">Skriv 1. bilagsnr <input type=\"text\" style=\"text-align:left;width:40px;\" name=bilagsnr value={$bilagsnr}><br><br><br></span>";
        print "<span style=center title=\"S&aelig;ttes et lighedstegn, anvendes orginal bilagsdato\">Skriv dato for alle bilag <input type=\"text\" size=8 name=ny_dato value={$dato}><br><br><br></span>";
        print "<input type=hidden name=kladde_id value={$kladde_id}>";
        print "<input type=submit accesskey=\"k\" value=\"Kopi&eacute;r til ny\" name=\"submit\" onclick=\"javascript:docChange = false;\">&nbsp;<input type=button value=fortryd onClick=\"location.href='../includes/luk.php'\"><br></span>\n";
        print "</form>";
        exit;
    }
    exit;
}
Ejemplo n.º 10
0
function genfakt($id, $org_nr, $fakt_dato, $opdat_pris, $slet_gfdato)
{
    transaktion('begin');
    if ($r = db_fetch_array(db_select("select * from ordrer where id = {$id}", __FILE__ . " linje " . __LINE__))) {
        $pbs = $r['pbs'];
        $firmanavn = db_escape_string($r['firmanavn']);
        $addr1 = db_escape_string($r['addr1']);
        $addr2 = db_escape_string($r['addr2']);
        $bynavn = db_escape_string($r['bynavn']);
        $land = db_escape_string($r['land']);
        $cvrnr = db_escape_string($r['cvrnr']);
        $ean = db_escape_string($r['ean']);
        $sprog = db_escape_string($r['sprog']);
        $valuta = db_escape_string($r['valuta']);
        $projekt = db_escape_string($r['projekt']);
        $institution = db_escape_string($r['institution']);
        $notes = db_escape_string($r['notes']);
        $ref = db_escape_string($r['ref']);
        $kontakt = db_escape_string($r['kontakt']);
        $kundeordnr = db_escape_string($r['kundeordnr']);
        $lev_navn = db_escape_string($r['lev_navn']);
        $lev_addr1 = db_escape_string($r['lev_addr1']);
        $lev_addr2 = db_escape_string($r['lev_addr2']);
        $lev_bynavn = db_escape_string($r['lev_bynavn']);
        $email = db_escape_string($r['email']);
        $udskriv_til = db_escape_string($r['udskriv_til']);
        $procenttillag = db_escape_string($r['procenttillag']);
        if ($r['nextfakt']) {
            $tmp = $r['nextfakt'];
        } else {
            $tmp = date("Y-m-d");
        }
        $nextfakt = find_nextfakt($r['fakturadate'], $tmp);
        if ($fakt_dato) {
            $fakturadate = $r['nextfakt'];
        } else {
            $fakturadate = date("Y-m-d");
        }
        if ($org_nr) {
            $ordrenr = $r['ordrenr'];
        } else {
            $r2 = db_fetch_array(db_select("select MAX(ordrenr) as ordrenr from ordrer where art='DO' or art='DK'", __FILE__ . " linje " . __LINE__));
            $ordrenr = $r2['ordrenr'] + 1;
        }
        db_modify("insert into ordrer (ordrenr, konto_id, kontonr,firmanavn,addr1,addr2,postnr,bynavn,land,betalingsdage,betalingsbet,cvrnr,ean,institution,notes,art,ordredate,momssats,moms,ref,valuta,sprog,kontakt,kundeordnr,lev_navn,lev_addr1,lev_addr2,lev_postnr,lev_bynavn,levdate,fakturadate,nextfakt,sum,status,projekt,email,mail_fakt,pbs,udskriv_til,procenttillag) values \n\t\t\t\t('{$ordrenr}','{$r['konto_id']}','{$r['kontonr']}','{$firmanavn}','{$addr1}','{$addr2}','{$r['postnr']}','{$bynavn}','{$land}','{$r['betalingsdage']}','{$r['betalingsbet']}','{$cvrnr}','{$ean}','{$institution}','{$notes}','{$r['art']}','{$r['ordredate']}','{$r['momssats']}','{$r['moms']}','{$ref}','{$valuta}','{$sprog}','{$kontakt}','{$kundeordnr}','{$lev_navn}','{$lev_addr1}','{$lev_addr2}','{$r['lev_postnr']}','{$lev_bynavn}','{$fakturadate}','{$fakturadate}','{$nextfakt}','{$r['sum']}','2','{$projekt}','{$email}','{$r['mail_fakt']}','{$pbs}','{$udskriv_til}','{$procenttillag}')", __FILE__ . " linje " . __LINE__);
        $r2 = db_fetch_array(db_select("select id from ordrer where ordrenr='{$ordrenr}' and nextfakt='{$nextfakt}' and (art='DO' or art='DK') order by id desc", __FILE__ . " linje " . __LINE__));
        $ny_id = $r2['id'];
        $sum = 0;
        $x = 0;
        $q = db_select("select * from ordrelinjer where ordre_id = {$id} and (kdo!='on' or kdo is NULL) order by posnr", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            $r['projekt'] ? $projekt = $r['projekt'] : ($projekt = '');
            if ($r['vare_id']) {
                $r2 = db_fetch_array(db_select("select gruppe from varer where id='{$r['vare_id']}'", __FILE__ . " linje " . __LINE__));
                $gruppe = $r2['gruppe'];
                $r2 = db_fetch_array(db_select("select box7 from grupper where art='VG' and kodenr='{$gruppe}'", __FILE__ . " linje " . __LINE__));
                $momsfri = $r2['box7'];
                if (!$opdat_pris) {
                    $pris = $r['pris'] * 1;
                    $kostpris = $r['kostpris'] * 1;
                } else {
                    $r2 = db_fetch_array(db_select("select salgspris,kostpris from varer where id='{$r['vare_id']}'", __FILE__ . " linje " . __LINE__));
                    $pris = $r2['salgspris'] * 1;
                    $kostpris = $r2['kostpris'] * 1;
                    $sum = $sum + $r['antal'] * $pris - $r['antal'] * $pris * $r['rabat'] / 100;
                }
                db_modify("insert into ordrelinjer (ordre_id,posnr,varenr,vare_id,beskrivelse,enhed,antal,pris,rabat,procent,lev_varenr,momsfri,samlevare,kostpris,leveres,projekt) values ('{$ny_id}','{$r['posnr']}','" . db_escape_string($r['varenr']) . "','{$r['vare_id']}','" . db_escape_string($r['beskrivelse']) . "','{$r['enhed']}','{$r['antal']}','{$pris}','{$r['rabat']}','{$r['procent']}','" . db_escape_string($r['lev_varenr]']) . "','{$momsfri}','{$r['samlevare']}','{$kostpris}','{$r['antal']}','" . db_escape_string($projekt) . "')", __FILE__ . " linje " . __LINE__);
            } else {
                db_modify("insert into ordrelinjer (ordre_id, posnr, beskrivelse) values ('{$ny_id}','{$r['posnr']}','" . db_escape_string($r['beskrivelse']) . "')", __FILE__ . " linje " . __LINE__);
            }
        }
        if ($opdat_pris) {
            db_modify("update ordrer set sum={$sum} where id='{$ny_id}'", __FILE__ . " linje " . __LINE__);
        }
        #echo "SLET : $slet_gfdato<br>";
        if ($slet_gfdato) {
            db_modify("update ordrer set nextfakt=NULL where id='{$id}'", __FILE__ . " linje " . __LINE__);
        }
    }
    transaktion('commit');
    $tmp = $ny_id . "," . $pbs;
    return $tmp;
}
Ejemplo n.º 11
0
        include "../includes/online.php";
    }
    if ($bogfor) {
        transaktion(begin);
        bogfor($kladde_id, $kladdenote, '');
        db_modify("delete from tmpkassekl where kladde_id = {$kladde_id}", __FILE__ . " linje " . __LINE__);
        transaktion(commit);
        genberegn($regnaar);
        if ($popup) {
            print "<BODY onLoad=\"javascript=opener.location.reload();\">";
        }
    } elseif ($simuler) {
        transaktion(begin);
        bogfor($kladde_id, $kladdenote, 'on');
        #		db_modify("delete from tmpkassekl where kladde_id = $kladde_id",__FILE__ . " linje " . __LINE__);
        transaktion(commit);
        if ($popup) {
            print "<BODY onLoad=\"javascript=opener.location.reload();\">";
            print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/luk.php\">";
        }
    }
    if ($funktion == 'bogfor' || $funktion == 'simuler') {
        if ($bogfor || $simuler) {
            print "<meta http-equiv=\"refresh\" content=\"0;URL=kladdeliste.php\">";
        } else {
            print "<meta http-equiv=\"refresh\" content=\"0;URL=kassekladde.php?kladde_id={$kladde_id}\">";
        }
    }
} elseif ($_POST['luk']) {
    #	if ($popup) print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/luk.php\">";
    #	else print "<meta http-equiv=\"refresh\" content=\"0;URL=kassekladde.php?kladde_id=$kladde_id\">";
Ejemplo n.º 12
0
function flytordre($kladde_id, $ordre_id)
{
    global $regnaar;
    global $connection;
    global $aarstart;
    global $aarslut;
    include "../includes/forfaldsdag.php";
    transaktion("begin");
    if (!$aarstart) {
        $query = db_select("select box1, box2, box3, box4 from grupper where art='RA' and kodenr='{$regnaar}'", __FILE__ . " linje " . __LINE__);
        if ($row = db_fetch_array($query)) {
            $year = trim($row['box2']);
            $aarstart = trim($year . $row['box1']);
            $year = trim($row['box4']);
            $aarslut = trim($year . $row['box3']);
        }
    }
    $query = db_select("select box1, box2, box3, box4, box5 from grupper where art='RB'", __FILE__ . " linje " . __LINE__);
    if ($row = db_fetch_array($query)) {
        if (trim($row['box3']) == "on") {
            $faktbill = 1;
        } else {
            $faktbill = 0;
        }
        if (trim($row['box4']) == "on") {
            $modtbill = 1;
        } else {
            $modtbill = 0;
        }
        if (trim($row['box5']) == "on") {
            $no_faktbill = 1;
            $faktbill = 0;
        } else {
            $no_faktbill = 0;
        }
    }
    $x = 0;
    $query = db_select("select * from ordrer where status=3 and id='{$ordre_id}' order by fakturadate", __FILE__ . " linje " . __LINE__);
    if ($row = db_fetch_array($query)) {
        list($year, $month, $day) = split('-', $row['fakturadate']);
        $ym = $year . $month;
        if ($ym >= $aarstart && $ym <= $aarslut) {
            $id = $row['id'];
            $art = $row['art'];
            $konto_id = $row['konto_id'];
            $kontonr = str_replace(" ", "", $row['kontonr']);
            $firmanavn = trim($row['firmanavn']);
            $modtagelse = $row['modtagelse'];
            $transdate = $row['fakturadate'];
            $forfaldsdate = usdate(forfaldsdag($transdate, $row['betalingsbet'], $row['betalingsdage']));
            $fakturanr = addslashes($row['fakturanr']);
            $ordrenr = $row['ordrenr'];
            $valuta = $row['valuta'];
            if ($valuta && $valuta != 'DKK') {
                $r = db_fetch_array(db_select("select kodenr from grupper where box1='{$valuta}' and art='VK'", __FILE__ . " linje " . __LINE__));
                $valuta = $r['kodenr'] * 1;
            } else {
                $valuta = 0;
            }
            $projekt[0] = $row['projekt'];
            $moms = $row['moms'] * 1;
            $sum = $row['sum'] + $moms;
            $ordreantal = $x;
            $q = db_select("select id, afd from ansatte where navn = '{$row['ref']}'", __FILE__ . " linje " . __LINE__);
            $r = db_fetch_array($q);
            $afd = $r['afd'] * 1;
            $ansat = $r['id'] * 1;
            if (!$konto_id) {
                $firmanavn = "Kontantsalg";
                $betalt = $row['betalt'];
                $retur = $betalt - $sum;
                $betaling1 = $row['felt_1'];
                $betalt1 = $row['felt_2'] * 1;
                $betaling2 = $row['felt_3'];
                $betalt2 = $row['felt_4'] * 1;
                $kasse = $row['felt_5'] * 1;
                $kortnavn = array();
                $kortkto = array();
                $r = db_fetch_array(db_select("select * from grupper where art = 'POS' and kodenr='{$kasse}'", __FILE__ . " linje " . __LINE__));
                $tmparray = explode(chr(9), $r['box2']);
                $kontonr = $tmparray[$kasse - 1];
                $kortnavn = explode(chr(9), $r['box5']);
                $kortkto = explode(chr(9), $r['box6']);
                $tmparray = explode(chr(9), $r['box7']);
                $momsgruppe = $tmparray[$kasse - 1];
                $z = 0;
                if ($betaling1 == 'Kontant') {
                    $kortkto1 = $kontonr;
                    $betalt1 = $betalt1 - $retur;
                    $retur = 0;
                }
                if ($betaling2 == 'Kontant') {
                    $kortkto2 = $kontonr;
                    $betalt2 = $betalt2 - $retur;
                    $retur = 0;
                }
                while ($kortkto[$z]) {
                    if ($betaling1 == $kortnavn[$z]) {
                        $kortkto1 = $kortkto[$z];
                    }
                    if ($betaling2 == $kortnavn[$z]) {
                        $kortkto2 = $kortkto[$z];
                    }
                    $z++;
                }
                $r = db_fetch_array(db_select("select box1 from grupper where art='SM' and kodenr='{$momskode}'", __FILE__ . " linje " . __LINE__));
                $box1 = trim($r['box1']);
            }
            if (substr($art, 0, 1) == 'K' && $modtagelse > 0 && $modtbill == 1) {
                $bilag = $modtagelse;
            } elseif ((substr($art, 0, 1) == 'D' || $art == 'PO') && $no_faktbill == 1) {
                $bilag = '0';
            } elseif ((substr($art, 0, 1) == 'D' || $art == 'PO') && $faktbill == 1) {
                $bilag = trim($fakturanr);
            } else {
                $tmp1 = substr($aarstart, 0, 4) . "-" . substr($aarstart, 4, 2) . "-01";
                $tmp2 = 31;
                while (!checkdate(substr($aarslut, 4, 2), $tmp2, substr($aarslut, 0, 4))) {
                    $tmp2--;
                    if ($tmp2 < 28) {
                        break 1;
                    }
                    #20130210
                }
                $tmp2 = substr($aarslut, 0, 4) . "-" . substr($aarslut, 4, 2) . "-" . $tmp2;
                $row = db_fetch_array(db_select("select MAX(bilag) as bilag from kassekladde where transdate>='{$tmp1}' and transdate<='{$tmp2}'", __FILE__ . " linje " . __LINE__));
                $bilag = $row['bilag'] + 1;
            }
            $p = 0;
            $q = db_select("select distinct(projekt) from ordrelinjer where ordre_id={$id} and vare_id >\t'0'", __FILE__ . " linje " . __LINE__);
            while ($r = db_fetch_array($q)) {
                $p++;
                $projekt[$p] = $r['projekt'];
            }
            $projektantal = $p;
            if (substr($art, 0, 1) == 'K') {
                if (substr($art, 1, 1) == 'K') {
                    $beskrivelse = "Lev. Kreditnota - " . $fakturanr;
                } else {
                    $beskrivelse = "Lev.Faktura - " . $fakturanr;
                }
                $beskrivelse = addslashes($beskrivelse);
                db_modify("insert into kassekladde (bilag, transdate, beskrivelse, k_type, kredit, faktura, amount, momsfri, kladde_id, afd, valuta, projekt, ansat, ordre_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}', 'K', '{$kontonr}', '{$fakturanr}', '{$sum}', 'on', '{$kladde_id}', '{$afd}', '{$valuta}', '{$projekt['0']}', '{$ansat}', '{$ordre_id}')", __FILE__ . " linje " . __LINE__);
                for ($p = 1; $p <= $projektantal; $p++) {
                    $query = db_select("select * from ordrelinjer where ordre_id='{$id}' and projekt = '{$projekt[$p]}'", __FILE__ . " linje " . __LINE__);
                    $y = 0;
                    $bogf_konto = array();
                    while ($row = db_fetch_array($query)) {
                        $bogf_kto = $row['bogf_konto'];
                        if ($valuta != 'DKK' && $row['posnr'] < 0) {
                            $bogf_kto = $bogf_kto * -1;
                        }
                        if (!in_array($bogf_kto, $bogf_konto)) {
                            $y++;
                            $posnr[$y] = $row['posnr'];
                            $bogf_konto[$y] = trim($bogf_kto);
                            $pris[$y] = afrund($row['pris'] * $row['antal'] - $row['pris'] * $row['antal'] * $row['rabat'] / 100, 3);
                        } else {
                            for ($a = 1; $a <= $y; $a++) {
                                if ($bogf_konto[$a] == $bogf_kto) {
                                    $pris[$a] = $pris[$a] + afrund($row['pris'] * $row['antal'] - $row['pris'] * $row['antal'] * $row['rabat'] / 100, 3);
                                }
                            }
                        }
                    }
                    if ($valuta) {
                        for ($a = 1; $a <= $y; $a++) {
                            $bogf_konto[$a] = abs($bogf_konto[$a]);
                        }
                    }
                    $ordrelinjer = $y;
                    for ($y = 1; $y <= $ordrelinjer; $y++) {
                        if ($bogf_konto[$y]) {
                            if ($posnr[$y] < 0) {
                                $tmpvaluta = 0;
                            } else {
                                $tmpvaluta = $valuta;
                            }
                            $kontoart[$y] = $art;
                            if ($pris[$y] < 0) {
                                $pris[$y] = $pris[$y] * -1;
                                db_modify("insert into kassekladde (bilag, transdate, beskrivelse, k_type, kredit, faktura, amount, momsfri, kladde_id, afd, valuta, projekt, ansat, ordre_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}', 'F', '{$bogf_konto[$y]}', '{$fakturanr}', '{$pris[$y]}', 'on', '{$kladde_id}', '{$afd}', '{$tmpvaluta}', '{$projekt[$p]}', '{$ansat}', '{$ordre_id}')", __FILE__ . " linje " . __LINE__);
                            } elseif ($pris[$y] > 0) {
                                db_modify("insert into kassekladde (bilag, transdate, beskrivelse, d_type, debet, faktura, amount, momsfri, kladde_id, afd, valuta, projekt, ansat, ordre_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}', 'F', '{$bogf_konto[$y]}', '{$fakturanr}', '{$pris[$y]}', 'on', '{$kladde_id}', '{$afd}', '{$tmpvaluta}', '{$projekt[$p]}', '{$ansat}', '{$ordre_id}')", __FILE__ . " linje " . __LINE__);
                            }
                        }
                    }
                }
                $query = db_select("select gruppe from adresser where id='{$konto_id}';", __FILE__ . " linje " . __LINE__);
                $row = db_fetch_array($query);
                $query = db_select("select box1 from grupper where art='KG' and kodenr='{$row['gruppe']}';", __FILE__ . " linje " . __LINE__);
                $row = db_fetch_array($query);
                $box1 = substr(trim($row['box1']), 1, 1);
                if (substr(trim($row['box1']), 0, 1) == 'E') {
                    $query = db_select("select box1, box2, box3 from grupper where art='EM' and kodenr='{$box1}'", __FILE__ . " linje " . __LINE__);
                    $row = db_fetch_array($query);
                    $box1 = trim($row['box3']);
                    # Ser lidt forvirrende ud, men den er go nok - fordi koebsmomsen ligger i box 3 v. udenlandsmoms.
                    $moms = $sum / 100 * $row['box2'];
                    #moms af varekoeb i udland beregnes
                    db_modify("insert into kassekladde (bilag, transdate, beskrivelse, k_type, kredit, faktura, amount, momsfri, kladde_id, afd, valuta, projekt, ansat, ordre_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}', 'F', '{$row['box1']}', '{$fakturanr}', '{$moms}', 'on', '{$kladde_id}', '{$afd}', '{$valuta}', '{$projekt['0']}', '{$ansat}', '{$ordre_id}')", __FILE__ . " linje " . __LINE__);
                } else {
                    $query = db_select("select box1 from grupper where art='KM' and kodenr='{$box1}'", __FILE__ . " linje " . __LINE__);
                    $row = db_fetch_array($query);
                    $box1 = trim($row['box1']);
                }
                db_modify("insert into kassekladde (bilag, transdate, beskrivelse, d_type, debet, faktura, amount, momsfri, kladde_id, afd, valuta, projekt, ansat, ordre_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}', 'F', '{$box1}', '{$fakturanr}', '{$moms}', 'on', '{$kladde_id}', '{$afd}', '{$valuta}', '{$projekt['0']}', '{$ansat}', '{$ordre_id}')", __FILE__ . " linje " . __LINE__);
            } else {
                #################### Debitor / POS ordrer ####################
                if ($art == 'RB') {
                    $beskrivelse = "Rykker  - " . $ordrenr;
                } elseif (substr($art, 1, 1) == 'K') {
                    $beskrivelse = "Kreditnota - " . $fakturanr;
                } elseif ($art == 'PO') {
                    $beskrivelse = "Kassebon - " . $fakturanr;
                } else {
                    $beskrivelse = "Faktura - " . $fakturanr;
                }
                if ($sum < 0) {
                    if ($art == 'PO') {
                        $dk = 'F';
                    } else {
                        $dk = 'D';
                    }
                    $tmp = $sum * -1;
                    #indsat 50.02.11 grunder vejl v. hentning af kreditnota
                    db_modify("insert into kassekladde (bilag, transdate, beskrivelse, k_type, kredit, faktura, amount, momsfri, kladde_id, afd, valuta, projekt, ansat, ordre_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}', '{$dk}', '{$kontonr}', '{$fakturanr}', '{$tmp}', 'on', '{$kladde_id}', '{$afd}', '{$valuta}', '{$projekt['0']}', '{$ansat}', '{$ordre_id}')", __FILE__ . " linje " . __LINE__);
                } else {
                    if ($art == 'PO') {
                        if ($betaling1 && $betalt1) {
                            db_modify("insert into kassekladde (bilag,transdate,beskrivelse,d_type,debet,faktura,amount,momsfri,kladde_id,afd,valuta,projekt,ansat,ordre_id,forfaldsdate) values ('{$bilag}','{$transdate}','{$beskrivelse}','F','{$kortkto1}','{$fakturanr}','{$betalt1}','on','{$kladde_id}','{$afd}','{$valuta}','{$projekt['0']}','{$ansat}','{$ordre_id}','{$forfaldsdate}')", __FILE__ . " linje " . __LINE__);
                        }
                        if ($betaling2 && $betalt2) {
                            db_modify("insert into kassekladde (bilag,transdate,beskrivelse,d_type,debet,faktura,amount,momsfri,kladde_id,afd,valuta,projekt,ansat,ordre_id,forfaldsdate) values ('{$bilag}','{$transdate}','{$beskrivelse}','F','{$kortkto2}','{$fakturanr}','{$betalt2}','on','{$kladde_id}','{$afd}','{$valuta}','{$projekt['0']}','{$ansat}','{$ordre_id}','{$forfaldsdate}')", __FILE__ . " linje " . __LINE__);
                        }
                        if ($retur) {
                            db_modify("insert into kassekladde (bilag,transdate,beskrivelse,k_type,kredit,faktura,amount,momsfri,kladde_id,afd,valuta,projekt,ansat,ordre_id,forfaldsdate) values ('{$bilag}','{$transdate}','{$beskrivelse}','F','{$kontonr}','{$fakturanr}','{$retur}','on','{$kladde_id}','{$afd}','{$valuta}','{$projekt['0']}','{$ansat}','{$ordre_id}','{$forfaldsdate}')", __FILE__ . " linje " . __LINE__);
                        }
                    } else {
                        db_modify("insert into kassekladde (bilag,transdate,beskrivelse,d_type,debet,faktura,amount,momsfri,kladde_id,afd,valuta,projekt,ansat,ordre_id,forfaldsdate) values ('{$bilag}','{$transdate}','{$beskrivelse}','D','{$kontonr}','{$fakturanr}','{$sum}','on','{$kladde_id}','{$afd}','{$valuta}','{$projekt['0']}','{$ansat}','{$ordre_id}','{$forfaldsdate}')", __FILE__ . " linje " . __LINE__);
                    }
                }
                for ($p = 1; $p <= $projektantal; $p++) {
                    $query = db_select("select * from ordrelinjer where ordre_id={$id} and projekt = '{$projekt[$p]}'", __FILE__ . " linje " . __LINE__);
                    $y = 0;
                    $bogf_konto = array();
                    while ($row = db_fetch_array($query)) {
                        $bogf_kto = $row['bogf_konto'];
                        if ($valuta != 'DKK' && $row['posnr'] < 0) {
                            $bogf_kto = $bogf_kto * -1;
                        }
                        if (!in_array($bogf_kto, $bogf_konto)) {
                            $y++;
                            $posnr[$y] = $row['posnr'];
                            $bogf_konto[$y] = $bogf_kto;
                            $pris[$y] = afrund($row['pris'] * $row['antal'] - $row['pris'] * $row['antal'] * $row['rabat'] / 100, 3);
                        } else {
                            for ($a = 1; $a <= $y; $a++) {
                                if ($bogf_konto[$a] == $bogf_kto) {
                                    $pris[$a] = $pris[$a] + afrund($row['pris'] * $row['antal'] - $row['pris'] * $row['antal'] * $row['rabat'] / 100, 3);
                                }
                            }
                        }
                    }
                    if ($valuta) {
                        for ($a = 1; $a <= $y; $a++) {
                            $bogf_konto[$a] = abs($bogf_konto[$a]);
                        }
                    }
                    $ordrelinjer = $y;
                    for ($y = 1; $y <= $ordrelinjer; $y++) {
                        if ($bogf_konto[$y]) {
                            if ($posnr[$y] < 0) {
                                $tmpvaluta = 0;
                            } else {
                                $tmpvaluta = $valuta;
                            }
                            if ($pris[$y] < 0) {
                                $pris[$y] = $pris[$y] * -1;
                                db_modify("insert into kassekladde (bilag, transdate, beskrivelse, d_type, debet, faktura, amount, momsfri, kladde_id, afd, valuta, projekt, ansat, ordre_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}', 'F', '{$bogf_konto[$y]}', '{$fakturanr}', '{$pris[$y]}', 'on', '{$kladde_id}', '{$afd}', '{$tmpvaluta}', '{$projekt[$p]}', '{$ansat}', '{$ordre_id}')", __FILE__ . " linje " . __LINE__);
                            } elseif ($pris[$y] > 0) {
                                db_modify("insert into kassekladde (bilag, transdate, beskrivelse, k_type, kredit, faktura, amount, momsfri, kladde_id, afd, valuta, projekt, ansat, ordre_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}', 'F', '{$bogf_konto[$y]}', '{$fakturanr}', '{$pris[$y]}', 'on', '{$kladde_id}', '{$afd}', '{$tmpvaluta}', '{$projekt[$p]}', '{$ansat}', '{$ordre_id}')", __FILE__ . " linje " . __LINE__);
                            }
                        }
                    }
                }
                if ($art != 'RB') {
                    if ($art != 'PO') {
                        $r = db_fetch_array(db_select("select gruppe from adresser where id='{$konto_id}'", __FILE__ . " linje " . __LINE__));
                        $r = db_fetch_array(db_select("select box1 from grupper where art='DG' and kodenr='{$r['gruppe']}'", __FILE__ . " linje " . __LINE__));
                        $momsgruppe = substr(trim($r['box1']), 1, 1);
                    }
                    $r = db_fetch_array(db_select("select box1 from grupper where art='SM' and kodenr='{$momsgruppe}'", __FILE__ . " linje " . __LINE__));
                    $box1 = trim($r['box1']);
                    if ($moms && $box1) {
                        db_modify("insert into kassekladde (bilag, transdate, beskrivelse, k_type, kredit, faktura, amount, momsfri, kladde_id, afd, valuta, projekt, ansat, ordre_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}', 'F', '{$box1}', '{$fakturanr}', '{$moms}', 'on', '{$kladde_id}', '{$afd}', '{$valuta}', '{$projekt['0']}', '{$ansat}', '{$ordre_id}')", __FILE__ . " linje " . __LINE__);
                    }
                }
            }
            db_modify("update ordrer set status=4 where id={$id}", __FILE__ . " linje " . __LINE__);
            db_modify("delete from ordrelinjer where ordre_id={$id} and posnr < 0", __FILE__ . " linje " . __LINE__);
        } else {
            print "<BODY onLoad=\"javascript:alert('Ordredato uden for regnskabs&aring;r!')\">";
        }
    }
    transaktion("commit");
    #exit;
}
Ejemplo n.º 13
0
function opdat_3_2($under_nr, $lap_nr)
{
    global $version;
    global $db;
    global $db_id;
    global $regnskab;
    global $regnaar;
    global $db_type;
    $s_id = session_id();
    $nextver = '3.2.1';
    if ($lap_nr < "1") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        transaktion('begin');
        $q = db_select("select m_rabat from ordrelinjer", __FILE__ . " linje " . __LINE__);
        $fieldType = db_field_type($q, 0);
        if ($fieldType != 'numeric') {
            if ($db_type == "mysql") {
                db_modify("ALTER TABLE ordrelinjer CHANGE m_rabat m_rabat numeric(15,3)", __FILE__ . " linje " . __LINE__);
            } else {
                db_modify("ALTER TABLE ordrelinjer ALTER column m_rabat TYPE numeric(15,3)", __FILE__ . " linje " . __LINE__);
            }
        }
        if ($db_type == "mysql") {
            db_modify("ALTER TABLE ordrelinjer CHANGE rabatart rabatart varchar(10)", __FILE__ . " linje " . __LINE__);
        } else {
            db_modify("ALTER TABLE ordrelinjer ALTER column rabatart TYPE varchar(10)", __FILE__ . " linje " . __LINE__);
        }
        echo "opdaterer til ver {$nextver}<br />";
        db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion('commit');
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.2.2';
    if ($lap_nr < "2") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        transaktion('begin');
        if ($db_type == "mysql") {
            db_modify("CREATE TABLE IF NOT EXISTS ordretekster (id serial NOT NULL,tekst text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE IF NOT EXISTS navigator (bruger_id integer,session_id text,side text,returside text,konto_id integer,ordre_id integer,vare_id integer)", __FILE__ . " linje " . __LINE__);
        } else {
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='ordretekster'"))) {
                db_modify("CREATE TABLE ordretekster (id serial NOT NULL,tekst text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='navigator'"))) {
                db_modify("CREATE TABLE navigator (bruger_id integer,session_id text,side text,returside text,konto_id integer,ordre_id integer,vare_id integer)", __FILE__ . " linje " . __LINE__);
            }
        }
        $i = 0;
        $feltnavne = array();
        $q = db_select("select * from jobkort", __FILE__ . " linje " . __LINE__);
        while ($i < db_num_fields($q)) {
            $feltnavne[$i] = db_field_name($q, $i);
            $i++;
        }
        if (!in_array('ordre_id', $feltnavne)) {
            db_modify("ALTER TABLE jobkort ADD ordre_id integer", __FILE__ . " linje " . __LINE__);
        }
        $i = 0;
        $feltnavne = array();
        $q = db_select("select * from adresser", __FILE__ . " linje " . __LINE__);
        while ($i < db_num_fields($q)) {
            $feltnavne[$i] = db_field_name($q, $i);
            $i++;
        }
        if (!in_array('status', $feltnavne)) {
            db_modify("ALTER TABLE adresser ADD status text", __FILE__ . " linje " . __LINE__);
        }
        $id1 = 0;
        $cat_id = NULL;
        $cat_beskrivelse = NULL;
        $q = db_select("select id,box1 from grupper where art='DGCAT' order by id", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            if (!$id0) {
                $id0 = $r['id'];
            }
            $cat_id ? $cat_id .= chr(9) . $r['id'] : ($cat_id = $r['id']);
            $cat_beskrivelse ? $cat_beskrivelse .= chr(9) . db_escape_string($r['box1']) : ($cat_beskrivelse = db_escape_string($r['box1']));
        }
        if ($id0) {
            db_modify("update grupper set beskrivelse='Div DebitorInfo',art='DebInfo',box1='{$cat_id}',box2='{$cat_beskrivelse}' where id = '{$id0}'", __FILE__ . " linje " . __LINE__);
        }
        if ($db_type == "mysql") {
            db_modify("CREATE TABLE IF NOT EXISTS ordretekster (id serial NOT NULL,tekst text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE IF NOT EXISTS navigator (bruger_id integer,session_id text,side text,returside text,konto_id integer,ordre_id integer,vare_id integer)", __FILE__ . " linje " . __LINE__);
        } else {
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='ordretekster'"))) {
                db_modify("CREATE TABLE ordretekster (id serial NOT NULL,tekst text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='navigator'"))) {
                db_modify("CREATE TABLE navigator (bruger_id integer,session_id text,side text,returside text,konto_id integer,ordre_id integer,vare_id integer)", __FILE__ . " linje " . __LINE__);
            }
        }
        echo "opdaterer til ver {$nextver}<br />";
        db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion('commit');
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.2.3';
    if ($lap_nr < "3") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        transaktion('begin');
        if ($db_type == "mysql") {
            db_modify("CREATE TABLE IF NOT EXISTS shop_adresser (id serial NOT NULL,saldi_id integer,shop_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE IF NOT EXISTS shop_varer (id serial NOT NULL,saldi_id integer,shop_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE IF NOT EXISTS shop_ordrer (id serial NOT NULL,saldi_id integer,shop_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE IF NOT EXISTS varianter (id serial NOT NULL,beskrivelse text,shop_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE IF NOT EXISTS variant_typer (id serial NOT NULL,variant_id integer,shop_id integer,beskrivelse text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE IF NOT EXISTS variant_varer (id serial NOT NULL,vare_id integer,variant_type text,variant_beholdning numeric(15,3),variant_stregkode text,lager integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        } else {
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='shop_adresser'"))) {
                db_modify("CREATE TABLE shop_adresser (id serial NOT NULL,saldi_id integer,shop_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='shop_varer'"))) {
                db_modify("CREATE TABLE shop_varer (id serial NOT NULL,saldi_id integer,shop_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='shop_ordrer'"))) {
                db_modify("CREATE TABLE shop_ordrer (id serial NOT NULL,saldi_id integer,shop_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='varianter'"))) {
                db_modify("CREATE TABLE varianter (id serial NOT NULL,beskrivelse text,shop_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='variant_typer'"))) {
                db_modify("CREATE TABLE variant_typer (id serial NOT NULL,variant_id integer,shop_id integer,beskrivelse text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='variant_varer'"))) {
                db_modify("CREATE TABLE variant_varer (id serial NOT NULL,vare_id integer,variant_type text,variant_beholdning numeric(15,3),variant_stregkode text,lager integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
        }
        db_modify("delete from grupper where art = 'DGCAT'", __FILE__ . " linje " . __LINE__);
        $i = 0;
        $feltnavne = array();
        $q = db_select("select * from varer", __FILE__ . " linje " . __LINE__);
        while ($i < db_num_fields($q)) {
            $feltnavne[$i] = db_field_name($q, $i);
            $i++;
        }
        if (!in_array('kategori', $feltnavne)) {
            db_modify("ALTER TABLE varer ADD kategori text", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE varer set kategori = ''", __FILE__ . " linje " . __LINE__);
        }
        if (!in_array('varianter', $feltnavne)) {
            db_modify("ALTER TABLE varer ADD varianter text", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE varer set varianter = ''", __FILE__ . " linje " . __LINE__);
        }
        if (!in_array('publiceret', $feltnavne)) {
            db_modify("ALTER TABLE varer ADD publiceret varchar(2)", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE varer set publiceret = '0'", __FILE__ . " linje " . __LINE__);
        }
        $i = 0;
        $feltnavne = array();
        $q = db_select("select * from ordrelinjer", __FILE__ . " linje " . __LINE__);
        while ($i < db_num_fields($q)) {
            $feltnavne[$i] = db_field_name($q, $i);
            $i++;
        }
        if (!in_array('variant_id', $feltnavne)) {
            db_modify("ALTER TABLE ordrelinjer ADD variant_id text", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE ordrelinjer set variant_id = ''", __FILE__ . " linje " . __LINE__);
        }
        echo "opdaterer til ver {$nextver}<br />";
        db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion('commit');
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.2.4';
    if ($lap_nr < "4") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        transaktion('begin');
        $i = 0;
        $feltnavne = array();
        $q = db_select("select * from ordrelinjer", __FILE__ . " linje " . __LINE__);
        while ($i < db_num_fields($q)) {
            $feltnavne[$i] = db_field_name($q, $i);
            $i++;
        }
        if (!in_array('variant_id', $feltnavne)) {
            db_modify("ALTER TABLE ordrelinjer ADD variant_id text", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE ordrelinjer set variant_id = ''", __FILE__ . " linje " . __LINE__);
        }
        if (in_array('varianter', $feltnavne)) {
            db_modify("ALTER TABLE ordrelinjer drop column varianter", __FILE__ . " linje " . __LINE__);
        }
        #		echo "opdaterer til ver $nextver<br />";
        db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion('commit');
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.2.5';
    if ($lap_nr < "5") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.2.6';
    if ($lap_nr < "6") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.2.7';
    if ($lap_nr < "7") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        print "<body onload=\"javascript:window.open('../utils/momskontrol.php?email=1', '', '');\">";
        db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.2.8';
    if ($lap_nr < "8") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        $feltnavne = array();
        $q = db_select("select * from transaktioner", __FILE__ . " linje " . __LINE__);
        while ($i < db_num_fields($q)) {
            $feltnavne[$i] = db_field_name($q, $i);
            $i++;
        }
        if (!in_array('moms', $feltnavne)) {
            db_modify("ALTER TABLE transaktioner ADD moms numeric(15,3)", __FILE__ . " linje " . __LINE__);
        }
        db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.2.9';
    if ($lap_nr < "9") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("ALTER TABLE online ADD column sag_rettigheder text", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        db_modify("CREATE TABLE sager (id serial NOT NULL,konto_id integer,firmanavn text,addr1 text,addr2 text,postnr text,bynavn text,land text,kontakt text,email text,beskrivelse text,omfang text,ref text,udf_firmanavn text,udf_addr1 text,udf_addr2 text,udf_postnr text,udf_bynavn text,udf_kontakt text,status text,tidspkt text,hvem text,oprettet_af text,kunde_ref text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE bilag (id serial NOT NULL,navn text,beskrivelse text,datotid text,hvem text,assign_to text,assign_id int,fase numeric(15,3),kategori text,filtype text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE noter (id serial NOT NULL,notat text,beskrivelse text,datotid text,hvem text,besked_til text,assign_to text,assign_id integer,status integer,fase numeric(15,3), PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE tjekliste (id serial NOT NULL,tjekpunkt text,fase numeric(15,3),assign_to text,assign_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE tjekpunkter (id serial NOT NULL,tjekliste_id integer,assign_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE sagstekster (id serial NOT NULL,tekstnr numeric(15,0),beskrivelse text,tekst text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE loen (id serial NOT NULL,nummer numeric(15,0),kategori integer,loendate date,sag_id integer, sag_nr numeric(15,0),tekst text,ansatte text,fordeling text,timer text,t50pct text,t100pct text,hvem text,oprettet text,afsluttet text,godkendt text,sum numeric(15,3),oprettet_af text,afsluttet_af text,godkendt_af text,master_id integer,loen text,afvist text,afvist_af text,udbetalt text,art text,skur text,datoer text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE loen_enheder (id serial NOT NULL,loen_id integer,vare_id integer,op numeric(15,3),ned numeric(15,3),tekst text,pris_op numeric(15,3),pris_ned numeric(15,3),procent numeric(15,3),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("alter table ansatte add column nummer numeric(15,0)", __FILE__ . " linje " . __LINE__);
        db_modify("alter table ansatte add column loen numeric", __FILE__ . " linje " . __LINE__);
        db_modify("alter table ansatte add column extraloen numeric(15,3)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ansatte ADD COLUMN bank text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ansatte ADD COLUMN startdate date", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ansatte ADD COLUMN slutdate date", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ansatte ADD COLUMN trainee text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD COLUMN betalings_id text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE openpost ADD COLUMN betalings_id text", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.3.0';
    include "../includes/connect.php";
    $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
    $tmp = $r['version'];
    if ($tmp < $nextver) {
        db_modify("UPDATE regnskab set version = '{$nextver}' where id = 1", __FILE__ . " linje " . __LINE__);
    }
    include "../includes/online.php";
    db_modify("CREATE TABLE opgaver (id serial NOT NULL,assign_id integer,assign_to text,nr numeric(15,0),beskrivelse text,omfang text,ref text,status text,tidspkt text,hvem text,oprettet_af text,kunde_ref text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
    db_modify("CREATE TABLE simulering (id serial NOT NULL,kontonr int4,bilag numeric(15,0),transdate date,beskrivelse text,debet numeric(15,3),kredit numeric(15,3),faktura text,kladde_id int4,projekt text,ansat numeric(15,0),logdate date,logtime time,afd int4,ordre_id int4,valuta text,valutakurs numeric(15,3),moms numeric(15,3),adresser_id int4,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
    db_modify("CREATE TABLE tjekskema (id serial NOT NULL,tjekliste_id integer,datotid text,opg_art text,sjak text,sag_id integer,hvem text,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen add column afregnet text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen add column afregnet_af text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen add column korsel text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen add column korsel text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen add column opg_id integer", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen add column opg_nr integer", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen add column afvist_pga text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen_enheder add column op_25 numeric(15,3)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen_enheder add column ned_25 numeric(15,3)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen_enheder add column op_40 numeric(15,3)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen_enheder add column ned_40 numeric(15,3)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen_enheder add column op_60 numeric(15,3)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen_enheder add column ned_60 numeric(15,3)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen_enheder add column op_30m numeric(15,3)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table loen_enheder add column ned_30m numeric(15,3)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table bilag add column bilag_fase text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table noter add column notat_fase text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table noter add column kategori text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table noter add column nr numeric(15,0)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table ordrer add column sag_id integer", __FILE__ . " linje " . __LINE__);
    db_modify("alter table ordrer add column tilbudnr numeric(15,0)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table ordrer add column datotid text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table ordrer add column nr numeric(15,0)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table ordrer add column returside text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table ordrer add column sagsnr numeric(15,0)", __FILE__ . " linje " . __LINE__);
    db_modify("alter table transaktioner add column adresser_id integer", __FILE__ . " linje " . __LINE__);
    db_modify("alter table tjekpunkter add column status integer", __FILE__ . " linje " . __LINE__);
    db_modify("alter table tjekpunkter add column status_tekst text", __FILE__ . " linje " . __LINE__);
    db_modify("alter table tjekpunkter add column tjekskema_id integer", __FILE__ . " linje " . __LINE__);
    db_modify("update transaktioner set moms=moms*-1 where kredit > 0 and moms > 0", __FILE__ . " linje " . __LINE__);
    db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
    include "../includes/connect.php";
    db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
}
Ejemplo n.º 14
0
function delfakturer($ordre_id, $valg)
{
    global $dellevdate;
    # Tjekker om der er noget der kan leveres. Hvis der er nedskrives antal til der der kan leveres og der oprettes en ny ordre med resten med samme ordrenr.
    $drop = 0;
    $fakturer = 0;
    $delfakturer = 0;
    if ($valg == 'tilbud') {
        $qtxt = "select id, ordredate from ordrer where status='0' and art='DO' and id > '{$ordre_id}' order by id";
    } elseif ($valg == 'ordrer') {
        $qtxt = "select id, ordredate from ordrer where (status='1' or status='2') and art='DO' and id > '{$ordre_id}' order by id";
    } else {
        return;
    }
    if ($r = db_fetch_array($q = db_select($qtxt, __FILE__ . " linje " . __LINE__))) {
        $ordre_id = $r['id'];
        $ordredate = $r['ordredate'];
        $x = 0;
        $q = db_select("select * from ordrelinjer where ordre_id = '{$ordre_id}' order by id", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            $x++;
            if (!$drop && $r['vare_id']) {
                $vare_id[$x] = $r['vare_id'];
                $antal[$x] = $r['antal'];
                $linje_id[$x] = $r['id'];
                if ($vare_id[$x]) {
                    if (db_fetch_array(db_select("select id from batch_salg where linje_id={$linje_id[$x]}", __FILE__ . " linje " . __LINE__))) {
                        $drop = 1;
                    } else {
                        $r2 = db_fetch_array(db_select("select varer.beholdning as beholdning, grupper.box8 as lagervare from varer, grupper where varer.id={$vare_id[$x]} and grupper.art='VG' and grupper.kodenr = varer.gruppe", __FILE__ . " linje " . __LINE__));
                        $lagervare[$x] = $r2['lagervare'];
                        $beholdning[$x] = $r2['beholdning'];
                        if ($lagervare[$x] && $beholdning[$x] > 0) {
                            $fakturer = 1;
                        }
                        #saa kan der faktureres.
                        if ($lagervare[$x] && $beholdning[$x] < $antal[$x]) {
                            #saa skal der delfaktureres
                            $delfakturer = 1;
                            $ny_antal[$x] = $antal[$x] - $beholdning[$x];
                        } elseif ($lagervare[$x]) {
                            $ny_antal[$x] = 0;
                        } else {
                            $ny_antal[$x] = 0;
                        }
                    }
                } else {
                    $ny_antal[$x] = 0;
                }
            }
        }
        if ($ordredate > $dellevdate) {
            $delfakturer = 0;
        }
    } else {
        $drop = 1;
    }
    if (!$drop && $fakturer && $delfakturer) {
        transaktion("begin");
        $r = db_fetch_array($q = db_select("select * from ordrer where id = '{$ordre_id}'", __FILE__ . " linje " . __LINE__));
        $ordrenr = db_escape_string($r['ordrenr']);
        $konto_id = db_escape_string($r['konto_id']);
        $kontonr = db_escape_string($r['kontonr']);
        $firmanavn = db_escape_string($r['firmanavn']);
        $addr1 = db_escape_string($r['addr1']);
        $addr2 = db_escape_string($r['addr2']);
        $postnr = db_escape_string($r['postnr']);
        $bynavn = db_escape_string($r['bynavn']);
        $land = db_escape_string($r['land']);
        $kontakt = db_escape_string($r['kontakt']);
        $kundeordnr = db_escape_string($r['kundeordnr']);
        $betalingsdage = db_escape_string($r['betalingsdage']);
        $betalingsbet = db_escape_string($r['betalingsbet']);
        $cvrnr = db_escape_string($r['cvrnr']);
        $ean = db_escape_string($r['ean']);
        $institution = db_escape_string($r['institution']);
        $notes = db_escape_string($r['notes']);
        $art = db_escape_string($r['art']);
        $ordredate = db_escape_string($r['ordredate']);
        $momssats = db_escape_string($r['momssats']);
        $ref = db_escape_string($r['ref']);
        $status = db_escape_string($r['status']);
        $lev_navn = db_escape_string($r['lev_navn']);
        $lev_addr1 = db_escape_string($r['lev_addr1']);
        $lev_addr2 = db_escape_string($r['lev_addr2']);
        $lev_postnr = db_escape_string($r['lev_postnr']);
        $lev_bynavn = db_escape_string($r['lev_bynavn']);
        $lev_kontakt = db_escape_string($r['lev_kontakt']);
        $valuta = db_escape_string($r['valuta']);
        $projekt = db_escape_string($r['projekt']);
        $sprog = db_escape_string($r['sprog']);
        $tidspkt = date("U");
        db_modify("insert into ordrer (ordrenr, konto_id, kontonr, firmanavn, addr1, addr2, postnr, bynavn, land, kontakt, kundeordnr, betalingsdage, betalingsbet, cvrnr, ean, institution, notes, art, ordredate, momssats, tidspkt, ref, status, lev_navn, lev_addr1, lev_addr2, lev_postnr, lev_bynavn, lev_kontakt, valuta, projekt, sprog) values ('{$ordrenr}','{$konto_id}','{$kontonr}','{$firmanavn}','{$addr1}','{$addr2}','{$postnr}','{$bynavn}','{$land}','{$kontakt}','{$kundeordnr}','{$betalingsdage}','{$betalingsbet}','{$cvrnr}','{$ean}','{$institution}','{$notes}','{$art}','{$ordredate}','{$momssats}','{$tidspkt}','{$ref}','{$status}','{$lev_navn}','{$lev_addr1}','{$lev_addr2}','{$lev_postnr}','{$lev_bynavn}','{$lev_kontakt}','{$valuta}','{$projekt}','{$sprog}')", __FILE__ . " linje " . __LINE__);
        $q = db_select("select max(id) as id from ordrer where ordrenr={$ordrenr} and art='{$art}' and tidspkt='{$tidspkt}'", __FILE__ . " linje " . __LINE__);
        $r = db_fetch_array($q);
        $ny_id = $r['id'];
        $x = 0;
        $sum = 0;
        $ny_sum = 0;
        $moms = 0;
        $ny_moms = 0;
        $q = db_select("select * from ordrelinjer where ordre_id = '{$ordre_id}' order by id", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            $x++;
            $posnr[$x] = $r['posnr'] * 1;
            $varenr[$x] = db_escape_string($r['varenr']);
            $vare_id[$x] = $r['vare_id'] * 1;
            $beskrivelse[$x] = db_escape_string($r['beskrivelse']);
            $enhed[$x] = $r['enhed'];
            $antal[$x] = $r['antal'] * 1;
            $pris[$x] = $r['pris'] * 1;
            $rabat[$x] = $r['rabat'] * 1;
            $serienr[$x] = $r['serienr'];
            $momsfri[$x] = $r['momsfri'];
            $samlevare[$x] = $r['samlevare'];
            $kostpris[$x] = $r['kostpris'] * 1;
            $antal[$x] = $antal[$x] - $ny_antal[$x];
            $linjesum = round($antal[$x] * $pris[$x] - $antal[$x] * $pris[$x] * $rabat[$x] / 100 + 0.0001, 3);
            $sum = $sum + $linjesum;
            if (!$momsfri[$x]) {
                $moms = $moms + round($linjesum / 100 * $momssats + 0.0001, 3);
            }
            if ($vare_id[$x]) {
                db_modify("update ordrelinjer set antal={$antal[$x]} where id = '{$linje_id[$x]}'", __FILE__ . " linje " . __LINE__);
                # id fra 1. s�gning.
                if ($ny_antal[$x]) {
                    $ny_linjesum = round($ny_antal[$x] * $pris[$x] - $antal[$x] * $pris[$x] * $rabat[$x] / 100 + 0.0001, 3);
                    $ny_sum = $ny_sum + $ny_linjesum;
                    if (!$momsfri[$x]) {
                        $ny_moms = $ny_moms + round($ny_linjesum / 100 * $momssats + 0.0001, 3);
                    }
                    db_modify("insert into ordrelinjer (ordre_id, posnr, varenr, vare_id, beskrivelse, enhed, antal, pris, rabat, serienr, momsfri, kostpris) values ('{$ny_id}','{$posnr[$x]}','{$varenr[$x]}','{$vare_id[$x]}','{$beskrivelse[$x]}','{$enhed[$x]}', {$ny_antal[$x]}, '{$pris[$x]}','{$rabat[$x]}','{$serienr[$x]}','{$momsfri[$x]}','{$kostpris[$x]}')", __FILE__ . " linje " . __LINE__);
                }
            } else {
                db_modify("insert into ordrelinjer (ordre_id, posnr, beskrivelse) values ('{$ny_id}','{$posnr[$x]}','{$beskrivelse[$x]}')", __FILE__ . " linje " . __LINE__);
            }
        }
        db_modify("update ordrer set tidspkt = '',hvem = '', moms='{$moms}', sum='{$sum}' where id ='{$ordre_id}'");
        db_modify("update ordrer set tidspkt = '',hvem = '', moms='{$ny_moms}', sum='{$ny_sum}' where id ='{$ny_id}'");
        # exit;
        transaktion("commit");
    }
    if (!$drop) {
        $ordre_id--;
    }
    #eller bliver den ikke fundet i find_ordre
    return $ordre_id;
}
Ejemplo n.º 15
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;
}
Ejemplo n.º 16
0
function slet_ordre($ordre_id)
{
    $x = 0;
    $q = db_select("select kodenr from grupper where art = 'VG' and box8='on' order by kodenr", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        $gruppe[$x] = $r['kodenr'];
        $x++;
    }
    transaktion('begin');
    db_modify("delete from ordrelinjer where ordre_id={$ordre_id}", __FILE__ . " linje " . __LINE__);
    db_modify("delete from ordrer where id={$ordre_id}", __FILE__ . " linje " . __LINE__);
    db_modify("delete from shop_ordrer where saldi_id='{$ordre_id}'", __FILE__ . " linje " . __LINE__);
    $q = db_select("select id,batch_kob_id,antal,vare_id,lager from batch_salg where ordre_id = {$ordre_id}", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        $batch_salg_id = $r['id'];
        $batch_kob_id = $r['batch_kob_id'];
        $antal = $r['antal'];
        $vare_id = $r['vare_id'];
        $lager = $r['lager'] * 1;
        $r = db_fetch_array(db_select("select gruppe from varer where id = {$vare_id}", __FILE__ . " linje " . __LINE__));
        if (in_array($r['gruppe'], $gruppe)) {
            if ($batch_kob_id) {
                $qtxt = "update batch_kob set rest=rest+{$antal} where id ='{$batch_kob_id}'";
                #				echo $qtxt."<br>";
                db_modify($qtxt, __FILE__ . " linje " . __LINE__);
            }
            $qtxt = "update varer set beholdning=beholdning+{$antal} where id ='{$vare_id}'";
            #			echo $qtxt."<br>";
            db_modify($qtxt, __FILE__ . " linje " . __LINE__);
            $qtxt = "update lagerstatus set beholdning=beholdning+{$antal} where vare_id ='{$vare_id}' and lager='{$lager}'";
            #			echo $qtxt."<br>";
            db_modify($qtxt, __FILE__ . " linje " . __LINE__);
        }
        $qtxt = "delete from batch_salg where id ='{$batch_salg_id}'";
        #		echo $qtxt."<br>";
        db_modify($qtxt, __FILE__ . " linje " . __LINE__);
    }
    transaktion('commit');
}
Ejemplo n.º 17
0
function opdat_2_0($under_nr, $lap_nr)
{
    global $version;
    global $db;
    global $db_id;
    global $regnskab;
    global $regnaar;
    $s_id = session_id();
    #	print "<body onLoad=\"javascript:alert('Systemet opdateres, det kan tage lidt tid')\">";
    if ($lap_nr < 2) {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        transaktion("begin");
        db_modify("UPDATE regnskab set version = '2.0.2' where id = 1", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
        include "../includes/online.php";
        $filnavn = "../temp/{$db}.sql";
        $fp = fopen($filnavn, "w");
        if ($fp) {
            fwrite($fp, "ALTER TABLE brugere ADD sprog_id integer;\n");
            fwrite($fp, "CREATE TABLE tekster (id serial NOT NULL, sprog_id integer, tekst_id integer, tekst varchar, PRIMARY KEY (id));\n");
            fwrite($fp, "CREATE TABLE jobkort (id serial NOT NULL, konto_id integer, kontonr varchar, firmanavn varchar, addr1 varchar, addr2 varchar, postnr varchar, bynavn varchar, kontakt varchar, tlf varchar, initdate date, oprettet_af varchar, startdate date, slutdate date, hvem varchar, tidspkt varchar, felt_1 varchar, felt_2 varchar, felt_3 varchar, felt_4 varchar, felt_5 varchar, felt_6 varchar, felt_7 varchar, felt_8 varchar, felt_9 varchar, felt_10 varchar, felt_11 varchar, PRIMARY KEY (id));\n");
            fwrite($fp, "CREATE TABLE jobkort_felter (id serial NOT NULL, job_id integer, art varchar, feltnr integer, subnr integer, feltnavn varchar, indhold varchar, PRIMARY KEY (id));\n");
            fclose($fp);
            system("export PGPASSWORD={$sqpass}\npsql {$db} -h {$sqhost} -U {$squser} < {$filnavn}");
        }
        transaktion("begin");
        db_modify("insert into grupper (beskrivelse, kode, kodenr, art) values ('Dansk', 'DA', '1', 'SPROG')", __FILE__ . " linje " . __LINE__);
        db_modify("update brugere set sprog_id = '1'", __FILE__ . " linje " . __LINE__);
        /*		
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Dansk','1','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Vælg aktivt sprog','2','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Gem','3','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Nyt sprog','4','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Annuller','5','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Job nr.:','6','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 1','7','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 2','8','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 3','9','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 4','10','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 5','11','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 6','12','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 7','13','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 8','14','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 9','15','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Felt 10','16','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Bemærkning 1','17','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Tabel felt 1','18','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Tabel felt 2','19','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Tabel felt 3','20','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Tabel felt 4','21','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Tabel felt 5','22','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Tabel felt 6','23','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Bemærkning 2','24','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Bemærkning 3','25','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Bemærkning 4','26','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Planlagt til uge:','27','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Firmanavn','28','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Jobkort','29','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Luk','30','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Nuværende tekst','31','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Ny tekst','32','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Skriv nyt tekstforslag','33','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Debitorliste','34','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Kunde','35','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Postnr','36','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Telefon','37','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Jobliste','38','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Ny','39','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Skriv 1 nummer for as søge på et enkelt nr. eller 2 numre adskilt af : (f.eks 23:44) for at søge i et interval','40','1')",__FILE__ . " linje " . __LINE__);
        		db_modify("insert into tekster (tekst,tekst_id,sprog_id) values ('Skriv en tekst eller en deltekst. Der kan anvendes * før og efter teksten','41','1')",__FILE__ . " linje " . __LINE__);
        */
        db_modify("UPDATE grupper set box1 = '2.0.2' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
        include "../includes/connect.php";
        transaktion("begin");
        db_modify("UPDATE regnskab set version = '2.0.2' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
        include "../includes/online.php";
    }
    if ($lap_nr < 3) {
        include "../includes/connect.php";
        $filnavn = "../temp/{$sqdb}.sql";
        $fp = fopen($filnavn, "w");
        fwrite($fp, "CREATE TABLE tekster (id serial NOT NULL, sprog_id integer, tekst_id integer, tekst varchar, PRIMARY KEY (id));\n");
        fwrite($fp, "CREATE TABLE kundedata (id serial NOT NULL, firmanavn varchar, addr1 varchar, addr2 varchar, postnr varchar, bynavn varchar, kontakt varchar, email varchar, cvrnr varchar, regnskab varchar, brugernavn varchar, kodeord varchar, kontrol_id varchar, aktiv int, logtime varchar, PRIMARY KEY (id));\n");
        fwrite($fp, "ALTER TABLE kundedata ADD regnskab_id integer;\n");
        fclose($fp);
        system("export PGPASSWORD={$sqpass}\npsql {$sqdb} -h {$sqhost} -U {$squser} < {$filnavn} > ../temp/NULL\n#rm {$filnavn}");
        db_modify("UPDATE regnskab set version = '2.0.3' where id = 1", __FILE__ . " linje " . __LINE__);
        $tmp = addslashes($regnskab);
        db_modify("UPDATE kundedata set regnskab_id = '{$db_id}' where regnskab = '{$tmp}'", __FILE__ . " linje " . __LINE__);
        include "../includes/online.php";
        $filnavn = "../temp/{$db}.sql";
        $fp = fopen($filnavn, "w");
        if ($fp) {
            fwrite($fp, "ALTER TABLE kassekladde ADD forfaldsdate date;\n");
            fwrite($fp, "ALTER TABLE kassekladde ADD betal_id varchar;\n");
            fwrite($fp, "ALTER TABLE kassekladde ADD dokument varchar;\n");
            fwrite($fp, "ALTER TABLE tmpkassekl ADD forfaldsdate varchar;\n");
            fwrite($fp, "ALTER TABLE tmpkassekl ADD betal_id varchar;\n");
            fwrite($fp, "ALTER TABLE tmpkassekl ADD dokument varchar;\n");
            fwrite($fp, "ALTER TABLE openpost ADD forfaldsdate date;\n");
            fwrite($fp, "ALTER TABLE openpost ADD betal_id varchar;\n");
            fwrite($fp, "ALTER TABLE kontoplan ADD anvendelse varchar;\n");
            #Om kontoen er en indtægts elle en udgiftskonto.
            fwrite($fp, "ALTER TABLE ordrer ADD email varchar;\n");
            fwrite($fp, "ALTER TABLE ordrer ADD mail_fakt varchar;\n");
            fwrite($fp, "ALTER TABLE historik ADD kontaktet date;\n");
            fwrite($fp, "ALTER TABLE historik ADD kontaktes date;\n");
            fclose($fp);
            system("export PGPASSWORD={$sqpass}\npsql {$db} -h {$sqhost} -U {$squser} < {$filnavn} > ../temp/NULL\nrm {$filnavn}");
            db_modify("delete from grupper where art = 'USET'", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE grupper set beskrivelse = 'debitorgruppevisning', art = 'DGV' where art = 'HV'", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE grupper set box1 = '2.0.3' where art = 'VE'", __FILE__ . " linje " . __LINE__);
            include "../includes/connect.php";
            db_modify("UPDATE regnskab set version = '2.0.3' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
            include "../includes/online.php";
        }
    }
    if ($lap_nr < 4) {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < '2.0.4') {
            db_modify("UPDATE regnskab set version = '2.0.4' where id = 1", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        $filnavn = "../temp/{$db}.sql";
        $fp = fopen($filnavn, "w");
        echo "opdaterer ver 2.0.{$lap_nr} til ver 2.0.4<br>";
        db_modify("CREATE TABLE modtageliste (id serial NOT NULL, initdate date, modtagdate date, modtagnote varchar, modtaget varchar, init_af varchar, modtaget_af varchar, hvem varchar, tidspkt varchar, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE modtagelser (id serial NOT NULL, varenr varchar, beskrivelse varchar, leveres numeric, liste_id integer, lager numeric, ordre_id integer, vare_id integer, antal numeric, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box9 = 'on' where art = 'DIV'and kodenr = '2'", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '2.0.4' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '2.0.4' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
        include "../includes/online.php";
    }
    if ($lap_nr < '5') {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < '2.0.5') {
            echo "opdaterer hovedregnskab til ver 2.0.5<br>";
            db_modify("ALTER TABLE regnskab ADD brugerantal integer", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE regnskab set version = '2.0.5' where id = 1", __FILE__ . " linje " . __LINE__);
        }
        db_modify("UPDATE regnskab set version = '2.0.5' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
        include "../includes/online.php";
        echo "opdaterer ver 2.0.{$lap_nr} til ver 2.0.5<br>";
        db_modify("UPDATE grupper set box1 = '2.0.5' where art = 'VE'", __FILE__ . " linje " . __LINE__);
    }
    if ($lap_nr < '6') {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < '2.0.6') {
            echo "opdaterer hovedregnskab fra {$tmp} til ver 2.0.6<br>";
            db_modify("ALTER TABLE regnskab ADD posteret integer", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE regnskab ADD lukket varchar", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE regnskab ADD administrator varchar", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE regnskab set version = '2.0.6' where id = 1", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        echo "opdaterer ver 2.0.{$lap_nr} til ver 2.0.6<br>";
        db_modify("CREATE TABLE ordretekster(id serial NOT NULL, tekst varchar, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '2.0.6' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '2.0.6' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    if ($lap_nr < '7') {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < '2.0.7') {
            echo "opdaterer hovedregnskab fra {$tmp} til ver 2.0.7<br>";
            db_modify("ALTER TABLE online ADD revisor boolean", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE regnskab set version = '2.0.7' where id = 1", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        echo "opdaterer ver 2.0.{$lap_nr} til ver 2.0.7<br>";
        db_modify("CREATE TABLE pbs_kunder(id serial NOT NULL,konto_id integer,kontonr varchar(20), pbs_nr varchar(10),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE pbs_liste(id serial NOT NULL,liste_date date,afsendt varchar(8),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE pbs_ordrer(id serial NOT NULL,liste_id integer,ordre_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE pbs_linjer(id serial NOT NULL,liste_id integer,linje varchar(140),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD pbs varchar(2)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD mail varchar(2)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD mailfakt varchar(2)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER \tTABLE adresser ADD pbs varchar(2)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD pbs_nr varchar(10)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD pbs_date date", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE formularer ADD sprog varchar(250)", __FILE__ . " linje " . __LINE__);
        if (!($r = db_fetch_array(db_select("select * from grupper where art='DIV' and kodenr = '3'", __FILE__ . " linje " . __LINE__)))) {
            db_modify("insert into grupper (beskrivelse,kodenr,art,box1,box2,box3,box4,box5,box6,box7,box8,box9,box10) values ('Div_valg','3','DIV','','','','','','','','','','')", __FILE__ . " linje " . __LINE__);
        }
        $r = db_fetch_array(db_select("select * from grupper where art='DIV' and kodenr = '2'", __FILE__ . " linje " . __LINE__));
        db_modify("update grupper set box3='{$r['box3']}',box4='{$r['box4']}',box5='{$r['box5']}',box8='{$r['box8']}',box9='{$r['box9']}' where art = 'DIV' and kodenr = '3'");
        #		db_modify("update grupper set box3='',box4='',box5='',box8='',box9='' where art = 'DIV' and kodenr = '2'");
        db_modify("UPDATE grupper set box1 = '2.0.7' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box2 = 'on' where art = 'USET'", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Tilbud', 1, 5, 1, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Hermed fremsendes tilbud', 1, 5, 2, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        $tmp = 'Ordrebekræftelse';
        if ($db_encode == "UTF8") {
            $tmp = utf8_encode($tmp);
        }
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('{$tmp}', 2, 5, 1, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        $tmp = 'Hermed fremsendes ordrebekræftelse';
        if ($db_encode == "UTF8") {
            $tmp = utf8_encode($tmp);
        }
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('{$tmp}', 2, 5, 2, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Faktura', 4, 5, 1, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Hermed fremsendes faktura', 4, 5, 2, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Kreditnota', 5, 5, 1, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Hermed fremsendes kreditnota', 5, 5, 2, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Rykker', 6, 5, 1, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Hermed fremsendes tilbud', 6, 5, 2, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Rykker', 7, 5, 1, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Hermed fremsendes tilbud', 7, 5, 2, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Rykker', 8, 5, 1, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into formularer (beskrivelse, formular, art, xa, ya, xb, yb, str, color, font, fed, kursiv, side, justering, sprog) values ('Hermed fremsendes tilbud', 8, 5, 2, 0, 0, 0, 10, 0, '', '', '', '', '', 'Dansk')", __FILE__ . " linje " . __LINE__);
        /*		
        		$x=0;
        		$q=db_select("SELECT id,forfaldsdate from openpost where udlignet = '0' order by id",__FILE__ . " linje " . __LINE__);
        		while($r=db_fetch_array(q)) {
        			if (!$r['forfaldadate']) {
        				db_modify("UPDATE openpost set forfaldsdate = NULL where id = '$r[id]'",__FILE__ . " linje " . __LINE__);
        			}
        		}
        */
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '2.0.7' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
        print "<BODY onLoad=\"JavaScript:window.open('../doc/nyt_i_2.0.7.html','','statusbar=no,menubar=no,titlebar=no,toolbar=no,scrollbars=yes,location=1');\">";
    }
    if ($lap_nr < "9") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < '2.0.9') {
            echo "opdaterer hovedregnskab fra {$tmp} til ver 2.0.9<br>";
            db_modify("CREATE TABLE revisor(id serial NOT NULL,regnskabsaar integer,bruger_id integer,brugernavn varchar(500),db_id integer,PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE regnskab set version = '2.0.9' where id = 1", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        echo "opdaterer ver 2.0.{$lap_nr} til ver 2.0.8<br>";
        db_modify("ALTER TABLE historik ADD dokument varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD mail_cc varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD mail_bcc varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD mail_subj varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD mail_text varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD felt_1 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD felt_2 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD felt_3 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD felt_4 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD felt_5 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD vis_lev_addr varchar(2)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD udskriv_til varchar(10)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrelinjer ADD projekt integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD felt_1 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD felt_2 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD felt_3 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD felt_4 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD felt_5 varchar(5000)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kontoplan ADD modkonto numeric", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '2.0.9' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '2.0.9' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
        print "<BODY onLoad=\"JavaScript:window.open('../doc/nyt_i_2.0.9.html','','statusbar=no,menubar=no,titlebar=no,toolbar=no,scrollbars=yes,location=1');\">";
    }
    if ($under_nr < 1) {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        db_modify("UPDATE regnskab set version = '2.1.0' where id = 1", __FILE__ . " linje " . __LINE__);
        include "../includes/online.php";
        echo "opdaterer ver 2.0.{$lap_nr} til ver 2.1.0<br>";
        db_modify("ALTER TABLE varer ADD trademark text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD location text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD retail_price numeric(15,3)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD special_price numeric(15,3)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD campaign_cost numeric(15,3)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD tier_price numeric(15,3)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD open_colli_price numeric(15,3)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD colli numeric(15,3)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD outer_colli numeric(15,3)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD outer_colli_price numeric(15,3)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD special_from_date date", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE varer ADD special_to_date date", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD vis_lev_addr varchar(2)", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD kontotype text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD fornavn text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD efternavn text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_firmanavn text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_fornavn text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_efternavn text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_addr1 text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_addr2 text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_postnr text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_bynavn text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_land text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_kontakt text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_tlf text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD lev_email text", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD betalt varchar(2)", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE varetekster (id serial NOT NULL, sprog_id integer, vare_id integer, tekst text, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("update adresser set kontotype='erhverv'", __FILE__ . " linje " . __LINE__);
        db_modify("update ordrer set betalt = '' where art LIKE 'R%'", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '2.1.0' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '2.1.0' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
        print "<BODY onLoad=\"JavaScript:window.open('../doc/nyt_i_2.1.0.html','','statusbar=no,menubar=no,titlebar=no,toolbar=no,scrollbars=yes,location=1');\">";
    }
    #	db_modify("UPDATE regnskab set version = '$version' where db = '$db'",__FILE__ . " linje " . __LINE__);
}
Ejemplo n.º 18
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;
}
Ejemplo n.º 19
0
function opdat_3_4($under_nr, $lap_nr)
{
    $title = "opdat";
    global $version;
    global $db;
    global $db_id;
    global $regnskab;
    global $regnaar;
    global $db_type;
    $s_id = session_id();
    $nextver = '3.4.1';
    if ($lap_nr < "1") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        if ($db != $sqdb) {
            transaktion('begin');
            db_modify("ALTER TABLE ansatte ADD password text", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE ansatte ADD overtid numeric(1,0)", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
            transaktion('commit');
        }
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.4.2';
    if ($lap_nr < "2") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version = '{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        if ($db != $sqdb) {
            transaktion('begin');
            $q = db_select("select * from ansatte", __FILE__ . " linje " . __LINE__);
            while ($i < db_num_fields($q)) {
                $feltnavne[$i] = db_field_name($q, $i);
                $i++;
            }
            if (!in_array('gruppe', $feltnavne)) {
                db_modify("ALTER TABLE ansatte ADD gruppe numeric(15,0)", __FILE__ . " linje " . __LINE__);
                db_modify("update ansatte set gruppe = '0'", __FILE__ . " linje " . __LINE__);
            }
            $q = db_select("select * from varer", __FILE__ . " linje " . __LINE__);
            while ($i < db_num_fields($q)) {
                $feltnavne[$i] = db_field_name($q, $i);
                $i++;
            }
            if (!in_array('indhold', $feltnavne)) {
                db_modify("ALTER TABLE varer ADD indhold numeric(15,3)", __FILE__ . " linje " . __LINE__);
            }
            db_modify("UPDATE grupper set box1 = '{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
            transaktion('commit');
        }
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version = '{$nextver}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.4.3';
    if ($lap_nr < "3") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            $q = db_select("select * from regnskab", __FILE__ . " linje " . __LINE__);
            while ($i < db_num_fields($q)) {
                $feltnavne[$i] = db_field_name($q, $i);
                $i++;
            }
            if (!in_array('gruppe', $feltnavne)) {
                db_modify("ALTER TABLE regnskab ADD bilag numeric(1,0)", __FILE__ . " linje " . __LINE__);
                db_modify("UPDATE regnskab set bilag='0'", __FILE__ . " linje " . __LINE__);
            }
            echo "opdaterer hovedregnskab til ver {$nextver}<br />";
            db_modify("UPDATE regnskab set version='{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        if ($db != $sqdb) {
            db_modify("UPDATE grupper set beskrivelse='Bilag og dokumenter',art='bilag' where art = 'FTP'", __FILE__ . " linje " . __LINE__);
            $r = db_fetch_array(db_select("select box6 from grupper where art='bilag'", __FILE__ . " linje " . __LINE__));
            if ($r['box6']) {
                $bilag = 1;
            } else {
                $bilag = 0;
            }
            db_modify("UPDATE grupper set box1='{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        } else {
            $bilag = 0;
        }
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version='{$nextver}',bilag='{$bilag}' where db='{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.4.4';
    if ($lap_nr < "4") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            db_modify("UPDATE regnskab set version='{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        if ($db != $sqdb) {
            $q = db_select("select * from ordrelinjer", __FILE__ . " linje " . __LINE__);
            while ($i < db_num_fields($q)) {
                $feltnavne[$i] = db_field_name($q, $i);
                $i++;
            }
            if (!in_array('omvbet', $feltnavne)) {
                db_modify("ALTER TABLE ordrer ADD omvbet varchar(2)", __FILE__ . " linje " . __LINE__);
                db_modify("UPDATE ordrer set omvbet=''", __FILE__ . " linje " . __LINE__);
                db_modify("ALTER TABLE ordrelinjer ADD omvbet varchar(2)", __FILE__ . " linje " . __LINE__);
                db_modify("UPDATE ordrelinjer set omvbet=''", __FILE__ . " linje " . __LINE__);
                db_modify("UPDATE grupper set box1='{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
            }
        }
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version='{$nextver}' where db='{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.4.5';
    if ($lap_nr < "5") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            db_modify("UPDATE regnskab set version='{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        if ($db != $sqdb) {
            $r = db_fetch_array(db_select("select email from adresser where art = 'S'", __FILE__ . " linje " . __LINE__));
            $email = $r['email'];
            include "../includes/ordrefunc.php";
            include "../includes/std_func.php";
            $q = db_select("select ordrelinjer.id ,ordrelinjer.vare_id, ordrelinjer.kostpris, ordrer.valutakurs from ordrelinjer,ordrer where ordrelinjer.ordre_id=ordrer.id and ordrer.status>='3' and ordrer.art = 'DO' and ordrer.fakturadate >= '2014-01-01' and ordrelinjer.vare_id != '0'", __FILE__ . " linje " . __LINE__);
            while ($r = db_fetch_array($q)) {
                list($koordpr, $koordnr, $koordant, $koordid, $koordart) = explode(chr(9), find_kostpris($r['vare_id'], $r['id']));
                $kobs_ordre_pris = explode(",", $koordpr);
                $ko_ant = count($kobs_ordre_pris);
                $kostpris = 0;
                for ($y = 0; $y < $ko_ant; $y++) {
                    if ($r['valutakurs'] && $r['valutakurs'] != 100) {
                        $kobs_ordre_pris[$y] *= 100 / $r['valutakurs'];
                    }
                    $kostpris += $kobs_ordre_pris[$y];
                }
                $kostpris /= $ko_ant;
                $kostpris = afrund($kostpris, 3);
                if ($kostpris != $r['kostpris']) {
                    db_modify("update ordrelinjer set kostpris='{$kostpris}' where id = '{$r['id']}'", __FILE__ . " linje " . __LINE__);
                }
            }
            db_modify("UPDATE grupper set box1='{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version='{$nextver}',email='{$email}' where db='{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.4.6';
    if ($lap_nr < "6") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            db_modify("UPDATE regnskab set version='{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        if ($db != $sqdb) {
            transaktion('begin');
            if ($db_type == "mysql") {
                db_modify("CREATE TABLE IF NOT EXISTS pos_betalinger (id serial NOT NULL,ordre_id integer,betalingstype text,amount numeric(15,3),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            } else {
                if (!db_fetch_array(db_select("select * from pg_tables where tablename='pos_betalinger'", __FILE__ . " linje " . __LINE__))) {
                    db_modify("CREATE TABLE pos_betalinger (id serial NOT NULL,ordre_id integer,betalingstype text,amount numeric(15,3),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
                }
            }
            $q = db_select("select id,felt_1,felt_2,felt_3,felt_4 from ordrer where art='PO' and status>='3'", __FILE__ . " linje " . __LINE__);
            while ($r = db_fetch_array($q)) {
                if (is_numeric($r['felt_2']) && $r['felt_2']) {
                    db_modify("insert into pos_betalinger(ordre_id,betalingstype,amount) values ('{$r['id']}','{$r['felt_1']}','{$r['felt_2']}')", __FILE__ . " linje " . __LINE__);
                }
                if (is_numeric($r['felt_4']) && $r['felt_4']) {
                    db_modify("insert into pos_betalinger(ordre_id,betalingstype,amount) values ('{$r['id']}','{$r['felt_3']}','{$r['felt_4']}')", __FILE__ . " linje " . __LINE__);
                }
            }
            db_modify("UPDATE grupper set box1='{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
            transaktion('commit');
        }
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version='{$nextver}' where db='{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.4.7';
    if ($lap_nr < "7") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            db_modify("UPDATE regnskab set version='{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        if ($db != $sqdb) {
            db_modify("CREATE INDEX batch_kob_kobsdate_idx ON batch_kob (kobsdate)", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE INDEX batch_kob_antal_idx ON batch_kob (antal)", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE INDEX batch_kob_vare_id_idx ON batch_kob (vare_id)", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE INDEX batch_salg_salgsdate_idx ON batch_salg (salgsdate)", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE INDEX batch_salg_antal_idx ON batch_salg (antal)", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE INDEX batch_salg_vare_id_idx ON batch_salg (vare_id)", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE INDEX transaktioner_transdate_idx ON transaktioner (transdate)", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE INDEX transaktioner_kontonr_idx ON transaktioner (kontonr)", __FILE__ . " linje " . __LINE__);
            transaktion('begin');
            if ($db_type == "mysql") {
                db_modify("CREATE TABLE IF NOT EXISTS mappe (id serial NOT NULL,beskrivelse text,sort numeric(15,0),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
                db_modify("CREATE TABLE IF NOT EXISTS mappebilag (id serial NOT NULL,navn text,beskrivelse text,datotid text,hvem text,assign_to text,assign_id int4,filtype text,sort numeric(15,0),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            } else {
                if (!db_fetch_array(db_select("select * from pg_tables where tablename='mappe'", __FILE__ . " linje " . __LINE__))) {
                    db_modify("CREATE TABLE mappe (id serial NOT NULL,beskrivelse text,sort numeric(15,0),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
                }
                if (!db_fetch_array(db_select("select * from pg_tables where tablename='mappebilag'", __FILE__ . " linje " . __LINE__))) {
                    db_modify("CREATE TABLE mappebilag (id serial NOT NULL,navn text,beskrivelse text,datotid text,hvem text,assign_to text,assign_id int4,filtype text,sort numeric(15,0),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
                }
            }
            db_modify("UPDATE grupper set box1='{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
            transaktion('commit');
        }
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version='{$nextver}' where db='{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.4.8';
    if ($lap_nr < "8") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            db_modify("UPDATE regnskab set version='{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        if ($db != $sqdb) {
            transaktion('begin');
            db_modify("ALTER TABLE batch_salg ADD lager integer", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE lagerstatus ADD lok1 text", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE lagerstatus ADD lok2 text", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE lagerstatus ADD lok3 text", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE lagerstatus ADD lok4 text", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE lagerstatus ADD lok5 text", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE grupper set box1='{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
            transaktion('commit');
        }
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version='{$nextver}' where db='{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.4.9';
    if ($lap_nr < "9") {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
        $tmp = $r['version'];
        if ($tmp < $nextver) {
            db_modify("UPDATE regnskab set version='{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
        }
        include "../includes/online.php";
        if ($db != $sqdb) {
            transaktion('begin');
            db_modify("ALTER TABLE ordrelinjer ADD saet integer", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE grupper set box1='{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
            transaktion('commit');
        }
        include "../includes/connect.php";
        db_modify("UPDATE regnskab set version='{$nextver}' where db='{$db}'", __FILE__ . " linje " . __LINE__);
    }
    $nextver = '3.5.0';
    include "../includes/connect.php";
    $r = db_fetch_array(db_select("select * from regnskab where id='1'", __FILE__ . " linje " . __LINE__));
    $tmp = $r['version'];
    if ($tmp < $nextver) {
        db_modify("UPDATE regnskab set version='{$nextver}' where id = '1'", __FILE__ . " linje " . __LINE__);
    }
    include "../includes/online.php";
    if ($db != $sqdb) {
        transaktion('begin');
        if ($db_type == "mysql") {
            db_modify("CREATE TABLE IF NOT EXISTS ansatmappe (id serial NOT NULL,beskrivelse text,ans_id int4,sort numeric(15,0),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE IF NOT EXISTS ansatmappebilag (id serial NOT NULL,navn text,beskrivelse text,datotid text,hvem text,assign_to text,assign_id int4,filtype text,sort numeric(15,0),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE  IF NOT EXISTS kostpriser (id serial NOT NULL,vare_id integer,transdate date,kostpris numeric(15,3),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        } else {
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='ansatmappe'", __FILE__ . " linje " . __LINE__))) {
                db_modify("CREATE TABLE ansatmappe (id serial NOT NULL,beskrivelse text,ans_id int4,sort numeric(15,0),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='ansatmappebilag'", __FILE__ . " linje " . __LINE__))) {
                db_modify("CREATE TABLE ansatmappebilag (id serial NOT NULL,navn text,beskrivelse text,datotid text,hvem text,assign_to text,assign_id int4,filtype text,sort numeric(15,0),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
            if (!db_fetch_array(db_select("select * from pg_tables where tablename='kostpriser'", __FILE__ . " linje " . __LINE__))) {
                db_modify("CREATE TABLE kostpriser (id serial NOT NULL,vare_id integer,transdate date,kostpris numeric(15,3),PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            }
        }
        db_modify("update batch_kob set kobsdate = fakturadate where kobsdate is NULL and fakturadate > '2014-01-01'", __FILE__ . " linje " . __LINE__);
        $q = db_select("select linje_id from batch_salg,ordrelinjer where ordrelinjer.antal < 0 and batch_salg.antal > 0 and batch_salg.linje_id = ordrelinjer.id", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            db_modify("update batch_salg set antal=antal*-1 where linje_id='{$r['linje_id']}'", __FILE__ . " linje " . __LINE__);
        }
        $lgrp = array();
        $x = 0;
        $q = db_select("select kodenr from grupper where art='VG' and box8='on'", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            $lgrp[$x] = $r['kodenr'] * 1;
            $x++;
        }
        $x = 0;
        $kostpris = array();
        db_modify("delete from kostpriser", __FILE__ . " linje " . __LINE__);
        $q = db_select("select id,kostpris,gruppe from varer where lukket != 'on' order by id", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            if (in_array($r['gruppe'], $lgrp)) {
                $kostpris = $r['kostpris'] * 1;
                db_modify("insert into kostpriser(vare_id,kostpris,transdate)values('{$r['id']}','{$kostpris}','2015-01-01')", __FILE__ . " linje " . __LINE__);
            }
        }
        db_modify("UPDATE grupper set box1='{$nextver}' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion('commit');
    }
    include "../includes/connect.php";
    db_modify("UPDATE regnskab set version='{$nextver}' where db='{$db}'", __FILE__ . " linje " . __LINE__);
}
Ejemplo n.º 20
0
function importer($filnavn, $fejllog)
{
    global $charset;
    global $bgcolor;
    global $bgcolor5;
    $accountingsupplierparty = NULL;
    $cvrnr = NULL;
    $fejl = NULL;
    $firmanavn = NULL;
    $linjenr = 0;
    $orderreference = NULL;
    $party = null;
    $partyname = NULL;
    $indhold = null;
    $ean = NULL;
    $sekliste = array('ID');
    $fp = fopen($filnavn, 'r');
    if ($fp) {
        #		$x=0;
        $indhold = NULL;
        while ($linje[$x] = fgets($fp)) {
            $indhold .= $linje[$x];
        }
        #		$linjeantal=$x;
        fclose($fp);
    }
    $ordrenr = find_var($indhold, '', 'id');
    $ordredate = find_var($indhold, '', 'issuedate');
    $k_cvrnr = find_var($indhold, 'accountingsupplierparty,party', 'endpoinid schemeid="dk:cvr"');
    $k_firmanavn = find_var($indhold, 'accountingsupplierparty,partyname', 'name');
    $k_vejnavn = find_var($indhold, 'accountingsupplierparty,postaladdress', 'streetname');
    $k_husnr = find_var($indhold, 'accountingsupplierparty,postaladdress', 'buildingnumber');
    $k_bynavn = find_var($indhold, 'accountingsupplierparty,postaladdress', 'cityname');
    $k_postnr = find_var($indhold, 'accountingsupplierparty,postaladdress', 'postalzone');
    $k_land = find_var($indhold, 'accountingsupplierparty,country', 'identificationcode');
    $k_telefon = find_var($indhold, 'accountingsupplierparty,contact', 'telephone');
    $k_email = find_var($indhold, 'accountingsupplierparty,contact', 'electronicmail');
    $d_cvrnr = find_var($indhold, 'accountingcustomerparty,party', 'endpoinid schemeid="dk:cvr"');
    $d_firmanavn = find_var($indhold, 'accountingcustomerparty,partyname', 'name');
    $d_vejnavn = find_var($indhold, 'accountingcustomerparty,postaladdress', 'streetname');
    $d_husnr = find_var($indhold, 'accountingcustomerparty,postaladdress', 'buildingnumber');
    $d_bynavn = find_var($indhold, 'accountingcustomerparty,postaladdress', 'cityname');
    $d_postnr = find_var($indhold, 'accountingcustomerparty,postaladdress', 'postalzone');
    $d_land = find_var($indhold, 'accountingcustomerparty,country', 'identificationcode');
    $d_telefon = find_var($indhold, 'accountingcustomerparty,contact', 'telephone');
    $d_email = find_var($indhold, 'accountingcustomerparty,contact', 'electronicmail');
    $o_sum = find_var($indhold, 'legalmonetarytotal', 'lineextensionamount');
    $o_totalsum = find_var($indhold, 'paymentterms', 'amount');
    $o_moms = find_var($indhold, 'taxtotal', 'taxamount');
    $pos = explode(",", find_antal_vars($indhold, '<cac:InvoiceLine>'));
    $antal_ordrelinjer = count($pos);
    $sum = 0;
    $momssum = 0;
    $d_momssats = 0;
    for ($x = 0; $x < $antal_ordrelinjer; $x++) {
        $string = substr($indhold, $pos[$x]);
        $l_varenr[$x] = find_var($string, 'invoiceline,sellersitemidentification', 'id');
        $l_antal[$x] = find_var($string, 'invoiceline', 'invoicedquantity');
        $l_tekst[$x] = find_var($string, 'invoiceline,item', 'name');
        $l_pris[$x] = find_var($string, 'invoiceline,price', 'priceamount');
        $l_momssats[$x] = find_var($string, 'invoiceline', 'percent');
        $sum += $l_pris[$x];
        $momssum += $l_pris[$x] / 100 * $l_momssats[$x];
        if ($l_momssats[$x] > $d_momssats) {
            $d_momssats = $l_momssats[$x];
        }
    }
    if ($r = db_fetch_array(db_select("select * from adresser where art = 'D' and kontonr = '{$d_telefon}'", __FILE__ . " linje " . __LINE__))) {
        $d_konto_id = $r['id'];
    } else {
        $fejl = "Debitor {$d_firmanavn}, med kontonummer: {$d_telefon} eksisterer ikke";
        fejllog("{$fejl}", "{$fejllog}");
        return $fejl;
    }
    for ($x = 0; $x < $antal_ordrelinjer; $x++) {
        if ($l_varenr[$x] != 'TEXT') {
            if ($r = db_fetch_array(db_select("select * from varer where varenr = '{$l_varenr[$x]}'", __FILE__ . " linje " . __LINE__))) {
                $l_vare_id[$x] = $r['id'];
            } else {
                $fejl = "Vare {$l_varenr[$x]} eksisterer ikke";
                fejllog("{$fejl}", "{$fejllog}");
                return $fejl;
            }
        }
    }
    $tidspkt = date('U');
    $d_addr1 = $d_vejnavn . " " . $d_husnr;
    $d_addr2 = '';
    $betalingsbet = 'Netto';
    $betalingsdage = 8;
    $valuta = 'DKK';
    $valutakurs = '100';
    $sprog = 'Dansk';
    transaktion('begin');
    if (!$fejl) {
        $r = db_fetch_array(db_select("select max(ordrenr) as ordrenr from ordrer where art = 'DO' or art = 'DK'", __FILE__ . " linje " . __LINE__));
        $d_ordrenr = $r['ordrenr'] + 1;
        db_modify("insert into ordrer(ordrenr,konto_id,kontonr,firmanavn,addr1,postnr,bynavn,land,email,ordredate,levdate,fakturadate,art,betalingsbet,betalingsdage,status,tidspkt,valuta,valutakurs,momssats,sum,moms)values('{$d_ordrenr}','{$d_konto_id}','{$d_telefon}','{$d_firmanavn}','{$d_addr1}','{$d_postnr}','{$d_bynavn}','{$d_land}','{$d_email}','{$ordredate}','{$ordredate}','{$ordredate}','DO','{$betalingsbet}','{$betalingsdage}','1','{$tidspkt}','{$valuta}','{$valutakurs}','{$d_momssats}','{$o_sum}','{$o_moms}')", __FILE__ . " linje " . __LINE__);
        if ($r = db_fetch_array(db_select("select id from ordrer where art = 'DO' and kontonr = '{$d_telefon}' and tidspkt = '{$tidspkt}'", __FILE__ . " linje " . __LINE__))) {
            $d_ordre_id = $r['id'];
        } else {
            $fejl = "Ordre ikke oprettet (Debitor {$d_firmanavn}, med kontonummer: {$d_telefon})";
            fejllog("{$fejl}", "{$fejllog}");
            return $fejl;
        }
    }
    if (!$fejl) {
        for ($x = 0; $x < $antal_ordrelinjer; $x++) {
            $pos = $x + 1;
            if (strtolower($l_varenr[$x]) == 'text') {
                db_modify("insert into ordrelinjer(posnr,ordre_id,beskrivelse)values('{$pos}','{$d_ordre_id}','{$l_tekst[$x]}')", __FILE__ . " linje " . __LINE__);
            } else {
                $l_antal[$x] *= 1;
                #20121220
                $l_pris[$x] *= 1;
                #20121220
                $l_momssats[$x] *= 1;
                $l_momssats[$x] ? $momsfri = '' : ($momsfri = 'on');
                db_modify("insert into ordrelinjer(posnr,ordre_id,vare_id,varenr,antal,beskrivelse,pris,momssats,momsfri,kostpris)values('{$pos}','{$d_ordre_id}','{$l_vare_id[$x]}','{$l_varenr[$x]}','{$l_antal[$x]}','{$l_tekst[$x]}','{$l_pris[$x]}','{$l_momssats[$x]}','{$momsfri}','0')", __FILE__ . " linje " . __LINE__);
            }
        }
    }
    if (!$fejl) {
        db_modify("update ordrer set tidspkt= '' where id='{$d_ordre_id}'", __FILE__ . " linje " . __LINE__);
        transaktion('commit');
    }
    #echo "Fejl >$fejl<<br>";
    if ($fejl) {
        return "{$fejl}";
    } else {
        return "OK";
    }
    /*
    	$linjebg=$bgcolor5;
    	print "<tr><td valign=\"top\" align=\"center\"><table valign=\"top\"><tbody>";
    	print "<tr bgcolor=\"$bgcolor5\"><td width=\"100px\"><b>Firmanavn:</b></td><td width=\"200px\">$k_firmanavn<br></td><td width=\"100px\"><b>Ordrenr:</b></td><td width=\"200px\">$ordrenr<br></td></tr>\n";
    	print "<tr><td><b>Adresse:</b></td><td>$k_vejnavn $k_husnr<br></td><td><b>Ordredate:</td><td>$ordredate<br></td></tr>\n";
    	print "<tr bgcolor=\"$bgcolor5\"><td><b>Adresse:</b></td><td>$k_postnr $k_bynavn<br></td><td><b>Fakturanr:</b></td><td>$k_fakturanr<br></td></tr>\n";
    	print "<tr><td><b>Land:</b></td><td>$k_land<br></td><td><b>Cvr:</b></td><td>$k_cvrnr<br></td></tr>\n";
    	print "<tr bgcolor=\"$bgcolor5\"><td bgcolor=\"$bgcolor5\"><b>Telefon:</b></td><td>$k_telefon<br></td><td><b></b></td><br><td><br></td></tr>\n";
    	print "</tbody></table></td></tr>";
    	print "<tr><td valign=\"top\" align=\"center\"><table valign=\"top\"><tbody>";
    	print "<tr bgcolor=\"$bgcolor5\"><td width=\"100px\"><b>(Firma)navn:</b></td><td width=\"200px\">$d_firmanavn<br></td><td width=\"100px\"><b>Ordrenr:</b></td><td width=\"200px\">$ordrenr<br></td></tr>\n";
    	print "<tr><td><b>Adresse:</b></td><td>$d_vejnavn $d_husnr<br></td><td><b>Ordredate:</td><td>$ordredate<br></td></tr>\n";
    	print "<tr bgcolor=\"$bgcolor5\"><td><b>Adresse:</b></td><td>$d_postnr $d_bynavn<br></td><td><b>Fakturanr:</b></td><td>$fakturanr<br></td></tr>\n";
    	print "<tr><td><b>Land:</b></td><td>$land<br></td><td><b>Cvr:</b></td><td>$d_cvrnr<br></td></tr>\n";
    	print "<tr bgcolor=\"$bgcolor5\"><td bgcolor=\"$bgcolor5\"><b>Telefon:</b></td><td>$d_telefon<br></td><td><b></b></td><br><td><br></td></tr>\n";
    	print "</tbody></table></td></tr>";
    	print "<tr><td valign=\"top\" align=\"center\"><table valign=\"top\"><tbody>";
    	print "<tr bgcolor=\"$linjebg\"><td width=\"100px\"><b>Varenr</b></td><td width=\"50px\" align=\"right\"><b>Antal</b></td><td width=\"500px\"><b>Beskrivelse</b></td><td width=\"50px\"><b>Købspris</b></td><td width=\"70px\" align=\"right\"><b>Moms %</b></td>\n";
    	for ($x=0;$x<$antal_ordrelinjer;$x++) {
    	if ($linjebg!=$bgcolor) {
    		$linjebg=$bgcolor;
    	} else {
    		$linjebg=$bgcolor5;
    	}
    		$l_posnr[$x]=$x+1;
    		print "<tr bgcolor=\"$linjebg\"><td>$l_varenr[$x]</td><td align=\"right\">".dkdecimal($l_antal[$x])."</td><td>$l_tekst[$x]</td><td align=\"right\">".dkdecimal($l_pris[$x])."</td><td align=\"right\">".dkdecimal($l_momssats[$x])."</td>\n";
    #		echo "Pos $l_posnr[$x], vnr $l_varenr[$x], antal $l_antal[$x], tekst $l_tekst[$x], pris $l_pris[$x], momssats $l_momssats[$x]<br>";
    	}
    	print "<tr><td colspan=\"5\"><hr></td></tr>";
    	print "</tbody></table>";
    	print "</td></tr>";	
    */
}
Ejemplo n.º 21
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;
}
Ejemplo n.º 22
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\">";
}
Ejemplo n.º 23
0
function flyt_data($filnavn, $splitter, $feltnavn, $feltantal, $leverandor, $varegrp, $rabat)
{
    global $font;
    list($kontonr, $tmp) = split(" : ", $leverandor);
    if (!$feltnavn) {
        $feltnavn = array();
    }
    list($lev_id, $tmp) = split(":", $leverandor);
    list($gruppe, $tmp) = split(":", $varegrp);
    $x = 0;
    $q = db_select("select varenr from varer");
    while ($r = db_fetch_array($q)) {
        $x++;
        $exist_vnr[$x] = $r['varenr'];
    }
    if (!$splitter || $splitter == 'Semikolon') {
        $splitter = ';';
    } elseif ($splitter == 'Komma') {
        $splitter = ',';
    } elseif ($splitter == 'Tabulator') {
        $splitter = chr(9);
    } elseif ($splitter == 'Brdr. Dahl') {
        $feltantal = 7;
    }
    #for ($y=0; $y<$feltantal; $y++) {
    $fp = fopen("../temp/" . $filnavn, "r");
    if ($fp) {
        transaktion('begin');
        $x = 0;
        while (!feof($fp)) {
            $x++;
            $linje = fgets($fp);
            $felt = array();
            if ($splitter == 'Brdr. Dahl') {
                $felt[0] = substr($linje, 1, 10);
                $felt[1] = substr($linje, 12, 35);
                $felt[2] = substr($linje, 47, 10);
                $felt[3] = substr($linje, 58, 3);
                $felt[4] = substr($linje, 61, 3);
                $felt[5] = substr($linje, 64, 1);
                $felt[6] = substr($linje, 65, 3);
                $felt[1] = str_replace(chr(145), "æ", $felt[1]);
                $felt[1] = str_replace(chr(155), "ø", $felt[1]);
                $felt[1] = str_replace(chr(134), "å", $felt[1]);
                $felt[1] = str_replace(chr(146), "Æ", $felt[1]);
                $felt[1] = str_replace(chr(157), "Ø", $felt[1]);
                $felt[1] = str_replace(chr(143), "Å", $felt[1]);
            } else {
                $felt = split($splitter, $linje);
            }
            for ($y = 0; $y < $feltantal; $y++) {
                if ($feltnavn[$y] == 'Varegrp.' && !in_array($felt[$y], $feltnavn)) {
                    $linjefarve[$x] = 'red';
                }
            }
            for ($y = 0; $y < $feltantal; $y++) {
                if (substr($felt[$y], 0, 1) == '"' && substr($felt[$y], -1) == '"') {
                    $felt[$y] = substr($felt[$y], 1, strlen($felt[$y]) - 2);
                }
                if ($linjefarve[$x] != 'red' && $feltnavn[$y]) {
                    if ($feltnavn[$y] == 'Eget varenr.') {
                        $varenr = trim($felt[$y]);
                    } elseif ($feltnavn[$y] == 'Lev. varenr.') {
                        $lev_varenr = trim($felt[$y]);
                    } elseif ($feltnavn[$y] == 'Begge varenr.') {
                        $varenr = trim($felt[$y]);
                        $lev_varenr = trim($felt[$y]);
                    } elseif ($feltnavn[$y] == 'Beskrivelse') {
                        $beskrivelse = addslashes($felt[$y]);
                    } elseif ($feltnavn[$y] == 'Enhed') {
                        $enhed = $felt[$y];
                    } elseif ($feltnavn[$y] == 'Salgspris') {
                        $salgspris = $felt[$y] / 100;
                        if ($rabat) {
                            $kostpris = $felt[$y] / 100 - $felt[$y] / 10000 * $rabat;
                        }
                    } elseif ($feltnavn[$y] == 'Kostpris') {
                        $kostpris = $felt[$y];
                    }
                }
            }
            if (in_array($varenr[$y], $exist_vnr)) {
                db_modify("update varer set beskrivelse='{$beskrivelse}', salgspris='{$salgspris}', kostpris={$kostpris}, enhed={$enhed}, gruppe={$gruppe} where varenr='{$varenr}'");
                $r = db_fetch_array(db_select("select id from varer where varenr='{$varenr}'"));
                $r2 = db_fetch_array(db_select("select id from vare_lev where vare_id='{$r['id']}' and lev_id='{$lev_id}'"));
                if ($r2[id]) {
                    db_modify("update vare_lev set kostpris={$kostpris[$y]}, lev_varenr={$lev_varenr[$y]} where id='{$r2['id']}'");
                } else {
                    db_modify("insert into vare_lev(vare_id, lev_id, lev_varenr, kostpris) values ('{$r['id']}', '{$lev_id}', '{$lev_varenr}', '{$kostpris}')");
                }
            } else {
                db_modify("insert into varer (varenr, beskrivelse, salgspris, kostpris, enhed, gruppe) values ('{$varenr}', '{$beskrivelse}', '{$salgspris}', '{$kostpris}', '{$enhed}', '{$gruppe}')");
                $r = db_fetch_array(db_select("select id from varer where varenr='{$varenr}'"));
                db_modify("insert into vare_lev(vare_id, lev_id, lev_varenr, kostpris) values ('{$r['id']}', '{$lev_id}', '{$lev_varenr}', '{$kostpris}')");
            }
        }
        transaktion('commit');
    }
    fclose($fp);
    print "</tbody></table>";
    print "</td></tr>";
}
Ejemplo n.º 24
0
function bogfor_rykker($id)
{
    // Bemaerk at der ikke traekkes moms ved bogfoering af rykkergebyr - heller ikke selvom gebyret tilhorer en momsbelagt varegruppe.
    global $fakturadate;
    $fejl = 0;
    $sum = 0;
    $q = db_select("select antal, pris, rabat from ordrelinjer where ordre_id = '{$id}' and vare_id > '0'", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        $sum = $sum + $r['antal'] * $r['pris'] - $r['antal'] * $r['pris'] / 100 * $r['rabat'];
    }
    if ($sum) {
        db_modify("update ordrer set sum={$sum} where id = '{$id}'", __FILE__ . " linje " . __LINE__);
    }
    $x = 0;
    $q = db_select("select id, vare_id from ordrelinjer where ordre_id = '{$id}' and vare_id > '0'", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        $x++;
        $ordre_linje_id[$x] = $r['id'];
        $pris[$x] = $r['pris'];
        if ($vare_id[$x] = $r['vare_id']) {
            $q2 = db_select("select gruppe from varer where id = {$vare_id[$x]}", __FILE__ . " linje " . __LINE__);
            $r2 = db_fetch_array($q2);
            $gruppe[$x] = $r2['gruppe'];
            $q2 = db_select("select * from grupper where art='VG' and kodenr='{$gruppe[$x]}'", __FILE__ . " linje " . __LINE__);
            $r2 = db_fetch_array($q2);
            $box1[$x] = trim($r2['box1']);
            $box2[$x] = trim($r2['box2']);
            $box3[$x] = trim($r2['box3']);
            $box4[$x] = trim($r2['box4']);
            $box8[$x] = trim($r2['box8']);
            $box9[$x] = trim($r2['box9']);
            if ($rbox8[$x] != 'on') {
                db_modify("update ordrelinjer set bogf_konto={$box4[$x]} where id={$ordre_linje_id[$x]}", __FILE__ . " linje " . __LINE__);
                db_modify("update ordrer set status=3 where id={$id}", __FILE__ . " linje " . __LINE__);
                #					transaktion('begin');
                #					bogfor_nu($id);
                #					transaktion('commit');
            } else {
                $fejl = 1;
                print "<BODY onLoad=\"javascript:alert('Der er anvendt en lagerf&oslash;rt vare som gebyr - rykker kan ikke bogf&oslash;res')\">";
            }
        }
    }
    if (!$fejl) {
        transaktion('begin');
        bogfor_nu($id);
        transaktion('commit');
    }
}
Ejemplo n.º 25
0
function posbogfor($kasse, $regnstart)
{
    global $afd;
    global $brugernavn;
    #cho $_POST['udtages']."<br>";
    $udtages = if_isset($_POST['udtages']);
    if ($udtages) {
        $udtages = usdecimal($udtages) * 1;
    }
    #cho "select ansat_id from brugere where brugernavn = '$brugernavn'<br>";
    $r = db_fetch_array(db_select("select ansat_id from brugere where brugernavn = '{$brugernavn}'", __FILE__ . " linje " . __LINE__));
    $ansat_id = $r['ansat_id'];
    $r = db_fetch_array(db_select("select box2,box3 from grupper where art = 'POS' and kodenr = '1'", __FILE__ . " linje " . __LINE__));
    $kassekonti = explode(chr(9), $r['box2']);
    $kassekonto = $kassekonti[$kasse - 1];
    $afdelinger = explode(chr(9), $r['box3']);
    $afd = $afdelinger[$kasse - 1] * 1;
    $r = db_fetch_array(db_select("select box8 from grupper where art = 'POS' and kodenr = '2'", __FILE__ . " linje " . __LINE__));
    $mellemkonti = explode(chr(9), $r['box8']);
    $mellemkonto = $mellemkonti[$kasse - 1];
    $x = 0;
    #cho "select distinct(fakturadate) as fakturadate from ordrer where felt_5='$kasse' and konto_id= '0' and art = 'PO' and status='3' and fakturadate >= '$regnstart' order by fakturadate<br>\n";
    $q = db_select("select distinct(fakturadate) as fakturadate from ordrer where felt_5='{$kasse}' and (konto_id='0' or betalingsbet='Kontant') and art = 'PO' and status='3' and fakturadate >= '{$regnstart}' order by fakturadate", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        if ($r['fakturadate']) {
            $x++;
            $fakturadate[$x] = $r['fakturadate'];
            #cho "$fakturadate[$x]<br>\n";
        }
    }
    $x = 0;
    #cho "select distinct(felt_1) as betaling from ordrer where felt_5='$kasse' and konto_id= '0' and art = 'PO' and status='3' and fakturadate >= '$regnstart' order by felt_1<br>\n";
    $q = db_select("select distinct(felt_1) as betaling from ordrer where felt_5='{$kasse}' and (konto_id='0' or betalingsbet='Kontant') and art = 'PO' and status='3' and fakturadate >= '{$regnstart}' order by felt_1", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        if ($r['betaling']) {
            $x++;
            $betaling[$x] = $r['betaling'];
            #cho "$betaling[$x]<br>\n";
        }
    }
    $x = 0;
    #cho "select distinct(felt_3) as betaling2 from ordrer where felt_5='$kasse' and konto_id= '0' and art = 'PO' and status='3' and fakturadate >= '$regnstart' order by felt_3<br>\n";
    $q = db_select("select distinct(felt_3) as betaling2 from ordrer where felt_5='{$kasse}' and (konto_id='0' or betalingsbet='Kontant') and art = 'PO' and status='3' and fakturadate >= '{$regnstart}' order by felt_3", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        if ($r['betaling2']) {
            $x++;
            $betaling2[$x] = $r['betaling2'];
        }
    }
    for ($x = 1; $x <= count($fakturadate); $x++) {
        for ($y = 0; $y <= count($betaling); $y++) {
            for ($z = 0; $z <= count($betaling2); $z++) {
                $id = NULL;
                $q = db_select("select id from ordrer where felt_5='{$kasse}' and fakturadate='{$fakturadate[$x]}' and felt_1='{$betaling[$y]}' and felt_3='{$betaling2[$z]}' and (konto_id='0' or betalingsbet='Kontant') and art = 'PO' and status='3'", __FILE__ . " linje " . __LINE__);
                while ($r = db_fetch_array($q)) {
                    if ($id) {
                        $id .= "," . $r['id'];
                    } else {
                        $id = $r['id'];
                    }
                }
                $r = db_fetch_array(db_select("select box9 from grupper where art='POS' and kodenr='1'", __FILE__ . " linje " . __LINE__));
                if ($id) {
                    transaktion('begin');
                    $svar = bogfor_nu("{$id}", "Dagsafslutning");
                    if ($svar && $svar != 'OK') {
                        #cho "$svar<br>";
                        print "<BODY onLoad=\"javascript:alert('Der er konstateret en uoverenstemmelse i posteringssummen. \\nKontakt Danosoft på telefon 4690 2208 eller 2066 9820')\">\n";
                        print "<meta http-equiv=\"refresh\" content=\"0;URL=pos_ordre.php?id={$id}\">\n";
                    } else {
                        transaktion('commit');
                    }
                }
            }
        }
    }
    if ($kassekonto && $mellemkonto && $udtages) {
        $dd = date("Y-m-d");
        $logtime = date("H:i");
        if ($udtages > 0) {
            $debet = 0;
            $kredit = $udtages;
        } else {
            $debet = $udtages;
            $kredit = 0;
        }
        db_modify("insert into transaktioner (bilag,transdate,beskrivelse,kontonr,faktura,debet,kredit,kladde_id,afd,logdate,logtime,projekt,ansat,ordre_id) values ('0','{$dd}','Overført til mellemkonto fra kasse {$kasse}','{$kassekonto}','0','{$debet}','{$kredit}',0,'{$afd}','{$dd}','{$logtime}','','{$ansat_id}','0')", __FILE__ . " linje " . __LINE__);
        db_modify("insert into transaktioner (bilag,transdate,beskrivelse,kontonr,faktura,debet,kredit,kladde_id,afd,logdate,logtime,projekt,ansat,ordre_id) values ('0','{$dd}','Overført til mellemkonto fra kasse {$kasse}','{$mellemkonto}','0','{$kredit}','{$debet}',0,'{$afd}','{$dd}','{$logtime}','','{$ansat_id}','0')", __FILE__ . " linje " . __LINE__);
    }
}
Ejemplo n.º 26
0
function opdat_1_1($under_nr, $lap_nr)
{
    global $version;
    global $regnaar;
    $s_id = session_id();
    if ($lap_nr < 1) {
        include "../includes/connect.php";
        include "../includes/online.php";
        transaktion("begin");
        $x = 0;
        $q1 = db_select("select id, fra_kto from kontoplan where kontotype = 'D' and fra_kto!='' order by id", __FILE__ . " linje " . __LINE__);
        while ($r1 = db_fetch_array($q1)) {
            $x++;
            $id[$x] = $r1['id'];
            $moms[$x] = str_replace('"', '', $r1['fra_kto']);
        }
        $kontoantal = $x;
        for ($x = 1; $x <= $kontoantal; $x++) {
            if ($moms[$x]) {
                db_modify("update kontoplan set moms='{$moms[$x]}', fra_kto = '' where id='{$id[$x]}'", __FILE__ . " linje " . __LINE__);
            } else {
                db_modify("update kontoplan set fra_kto = '' where id='{$id[$x]}'", __FILE__ . " linje " . __LINE__);
            }
        }
        $x = 0;
        $q1 = db_select("select id, til_kto, kontonr from kontoplan where kontotype = 'Z' and fra_kto ='' and til_kto!='kontonr' order by id", __FILE__ . " linje " . __LINE__);
        while ($r1 = db_fetch_array($q1)) {
            $x++;
            $id[$x] = $r1['id'];
            $kontonr[$x] = $r1['kontonr'];
            $fra_kto[$x] = $r1['til_kto'];
        }
        $kontoantal = $x;
        for ($x = 1; $x <= $kontoantal; $x++) {
            db_modify("update kontoplan set fra_kto='{$fra_kto[$x]}', til_kto='{$kontonr[$x]}'  where id='{$id[$x]}'", __FILE__ . " linje " . __LINE__);
        }
        db_modify("UPDATE grupper set box1 = '1.1.1' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
    }
    #########################################################################################
    if ($lap_nr < 2) {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        if ($r[version] < '1.1.2') {
            transaktion("begin");
            db_modify("ALTER TABLE online ADD logdate date", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE online ADD logtime time", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE regnskab DROP dbpass", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE regnskab ADD version varchar", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE brugerdata (id serial NOT NULL, firmanavn varchar, addr1 varchar, addr2 varchar, postnr varchar, bynavn varchar, kontakt varchar, email varchar, cvrnr varchar, regnskab varchar, brugernavn varchar, kodeord varchar, kontrol_id varchar, aktiv int, logtime varchar, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("CREATE TABLE tabelinfo (id serial NOT NULL, tabelnavn varchar, feltnavn varchar, beskrivelse varchar, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugere' ,'brugernavn')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugere' ,'kode')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugere' ,'status')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugere' ,'regnskabsaar')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugere' ,'rettigheder')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('regnskab' ,'regnskab')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('regnskab' ,'dbhost')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('regnskab' ,'dbuser')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('regnskab' ,'dbpass')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('regnskab' ,'db')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('regnskab' ,'version')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('online' ,'session_id')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('online' ,'brugernavn')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('online' ,'db')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('online' ,'dbuser')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('online' ,'rettigheder')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('online' ,'regnskabsaar')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('online' ,'logdate')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('online' ,'logtime')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'id')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'firmanavn')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'addr1')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'addr2')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'postnr')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'bynavn')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'kontakt')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'email')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'cvrnr')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'regnskab')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'brugernavn')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'kodeord')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'kontrol_id')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'aktiv')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'logdate')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('brugerdata' ,'logtime')", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE regnskab set version = '1.1.2' where id = 1", __FILE__ . " linje " . __LINE__);
            transaktion("commit");
        }
        include "../includes/online.php";
        transaktion("begin");
        $x = 0;
        $q1 = db_select("select id, lukket from kontoplan order by id", __FILE__ . " linje " . __LINE__);
        while ($r1 = db_fetch_array($q1)) {
            if ($row[lukket] != 'on') {
                $x++;
                $id[$x] = $r1['id'];
            }
        }
        $kontoantal = $x;
        for ($x = 1; $x <= $kontoantal; $x++) {
            db_modify("update kontoplan set lukket= '' where id='{$id[$x]}'", __FILE__ . " linje " . __LINE__);
        }
        db_modify("ALTER TABLE ordrelinjer ADD leveret numeric", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE historik (id serial NOT NULL, konto_id int, kontakt_id int, ansat_id int, notat varchar, notedate date, kontaktet date, kontaktes date, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD oprettet date", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD kontaktet date", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE adresser ADD kontaktes date", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE tabelinfo (id serial NOT NULL, tabelnavn varchar, feltnavn varchar, beskrivelse varchar, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('historik' ,'konto_id')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('historik' ,'kontakt_id')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('historik' ,'ansat_id')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('historik' ,'notat_id')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('historik' ,'notedate_id')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'firmanavn')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'addr1')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'addr2')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'postnr')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'bynavn')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'land')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'kontakt')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'tlf')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'fax')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'email')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'web')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'bank_navn')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'bank_reg')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'bank_konto')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'notes')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'rabat')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'momskonto')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'kreditmax')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'betalingsbet')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'betalingsdage')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'kontonr')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'cvrnr')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'ean')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'institution')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'art')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'gruppe')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'kontoansvarlig')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'oprettet')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'kontaktet')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn) values ('adresser' ,'kontaktes')", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '1.1.2' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
    }
    #########################################################################################
    if ($lap_nr < 3) {
        transaktion("begin");
        $x = 0;
        $q = db_select("select id, debet, kredit from kassekladde order by id", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            $x++;
            $id[$x] = $r['id'];
            $debet[$x] = $r['debet'];
            $kredit[$x] = $r['kredit'];
        }
        $antal = $x;
        db_modify("ALTER TABLE kassekladde DROP debet", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kassekladde DROP kredit", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kassekladde ADD debet numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kassekladde ADD kredit numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kassekladde ADD projekt numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kassekladde ADD valuta integer", __FILE__ . " linje " . __LINE__);
        for ($x = 1; $x <= $antal; $x++) {
            if ($debet[$x] && $kredit[$x]) {
                db_modify("update kassekladde set debet='{$debet[$x]}', kredit = '{$kredit[$x]}' where id={$id[$x]}", __FILE__ . " linje " . __LINE__);
            } elseif ($debet[$x]) {
                db_modify("update kassekladde set debet='{$debet[$x]}' where id={$id[$x]}", __FILE__ . " linje " . __LINE__);
            } elseif ($kredit[$x]) {
                db_modify("update kassekladde set kredit='{$kredit[$x]}' where id={$id[$x]}", __FILE__ . " linje " . __LINE__);
            }
        }
        db_modify("ALTER TABLE tabelinfo ADD type varchar", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type)values ('kassekladde', 'id serial NOT NULL', '', 'PRIMARY KEY')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'bilag', '', 'integer')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'transdate', '', 'date')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'beskrivelse', '', 'varchar')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'd_art', 'Debet art: kan vaere F=finans, D=debitor, K=kreditor', 'varchar')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'debet', '', 'numeric')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'k_type', 'Kredit type: kan vaere F=finans, D=debitor, K=kreditor', 'varchar')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'kredit', '', 'numeric')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'faktura', 'Evt fakturanummer knyttet til posteringen', 'varchar')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'amount', 'Beloeb i US formatering', 'numeric')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'kladde_id', 'Henviser til kladdeliste', 'integer')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'momsfri', '', 'varchar')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'afd', 'Afd ID henviser til grupper', 'integer')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'projekt', 'Projekt regnskab, henviser til kodenr i grupper hvor ART = proj', 'numeric')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, type) values ('kassekladde', 'valuta', 'Valuta', 'integer')", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '1.1.3' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
    }
    #########################################################################################
    if ($lap_nr < 4) {
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        if ($r['version'] < '1.1.4') {
            transaktion("begin");
            db_modify("ALTER TABLE online DROP logdate", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE online DROP logtime", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE online ADD logtime varchar", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE regnskab ADD sidst varchar", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE regnskab ADD brugerantal numeric", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE regnskab ADD posteringer numeric", __FILE__ . " linje " . __LINE__);
            db_modify("ALTER TABLE tabelinfo ADD art varchar", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, art) values ('regnskab','sidst','varchar')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, art) values ('regnskab','brugerantal','numeric')", __FILE__ . " linje " . __LINE__);
            db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, art) values ('regnskab','posteringer','numeric')", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE online set logtime = '-'", __FILE__ . " linje " . __LINE__);
            db_modify("UPDATE regnskab set brugerantal = '0', posteringer = '0', version='1.1.4' where id > 1", __FILE__ . " linje " . __LINE__);
            transaktion("commit");
        }
        include "../includes/online.php";
        transaktion("begin");
        db_modify("ALTER TABLE tabelinfo RENAME type TO art", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kassekladde ADD ansat integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kassekladde ADD valutakurs numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE kassekladde ADD ordre_id integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE tmpkassekl ADD ansat varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE tmpkassekl ADD projekt varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE tmpkassekl ADD valuta varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE tmpkassekl ADD valutakurs varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD nextfakt date", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD betalt varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD projekt varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD valuta varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD valutakurs numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE ordrer ADD sprog varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE transaktioner drop projekt_id", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE transaktioner add ordre_id integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE transaktioner add ansat integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE transaktioner add projekt integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE transaktioner add valuta integer", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE transaktioner add valutakurs numeric", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE formularer add sprog varchar", __FILE__ . " linje " . __LINE__);
        db_modify("update formularer set sprog = 'Dansk'", __FILE__ . " linje " . __LINE__);
        $q = db_select("select * from formularer where formular = '6'", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            $xa = $r['xa'] * 1;
            $ya = $r['ya'] * 1;
            $xb = $r['xb'] * 1;
            $yb = $r['yb'] * 1;
            $str = $r['str'] * 1;
            $color = $r['color'] * 1;
            db_modify("insert into formularer (formular, art, beskrivelse, justering, xa, ya, xb, yb, str, color, font, fed, kursiv, side, sprog) values ('7', '{$r['art']}', '{$r['beskrivelse']}', '{$r['justering']}', '{$xa}', '{$ya}', '{$xb}', '{$yb}', '{$str}', '{$color}', '{$r['font']}', '{$r['fed']}', \t'{$r['kursiv']}', '{$r['side']}', '{$r['sprog']}')", __FILE__ . " linje " . __LINE__);
            db_modify("insert into formularer (formular, art, beskrivelse, justering, xa, ya, xb, yb, str, color, font, fed, kursiv, side, sprog) values ('8', '{$r['art']}', '{$r['beskrivelse']}', '{$r['justering']}', '{$xa}', '{$ya}', '{$xb}', '{$yb}', '{$str}', '{$color}', '{$r['font']}', '{$r['fed']}', \t'{$r['kursiv']}', '{$r['side']}', '{$r['sprog']}')", __FILE__ . " linje " . __LINE__);
        }
        $q = db_select("select * from grupper where art = 'DG'", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            db_modify("update grupper set box3='DKK',box4='Dansk',box5='{$r['box4']}',box6='{$r['box5']}',box7='{$r['box6']}' where id = '{$r['id']}'", __FILE__ . " linje " . __LINE__);
        }
        $q = db_select("select * from grupper where art = 'KG'", __FILE__ . " linje " . __LINE__);
        while ($r = db_fetch_array($q)) {
            db_modify("update grupper set box3='DKK',box4='Dansk',box5='{$r['box4']}',box6='{$r['box5']}',box7='{$r['box6']}' where id = '{$r['id']}'", __FILE__ . " linje " . __LINE__);
        }
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, art) values ('kassekladde', 'ansat', 'ansat ID henviser til tabel ansatte', 'integer')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, art) values ('ordrer', 'projekt', 'projekt', 'varchar')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, art) values ('ordrer', 'valuta', 'valuta', 'varchar')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, art) values ('ordrer', 'valutakurs', 'valutakurs', 'numeric')", __FILE__ . " linje " . __LINE__);
        db_modify("CREATE TABLE valuta (id serial NOT NULL, gruppe integer, valdate date, kurs numeric, PRIMARY KEY (id))", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, art) values ('valuta', 'id', 'id serial NOT NULL', 'PRIMARY KEY')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, art) values ('valuta', 'gruppe', 'Modsvarer kodenr i GRUPPER hvor arg =VK', 'integer')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, art) values ('valuta', 'valdate', 'Dato for kursændring', 'date')", __FILE__ . " linje " . __LINE__);
        db_modify("INSERT INTO tabelinfo (tabelnavn, feltnavn, beskrivelse, art) values ('valuta', 'kurs', 'Aktuel valutakurs', 'numeric')", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '1.1.4' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
        db_close($connection);
        $connection = db_connect("{$sqhost}", "{$squser}", "{$sqpass}", "{$sqdb}");
        include "../includes/connect.php";
        transaktion("begin");
        $r = db_fetch_array(db_select("select * from online where session_id = '{$s_id}'", __FILE__ . " linje " . __LINE__));
        $db = trim($r['db']);
        $tmp = time("U");
        transaktion("begin");
        db_modify("UPDATE regnskab set version='1.1.4', sidst='{$tmp}' where db = '{$db}'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
        include "../includes/online.php";
    }
    #########################################################################################
    if ($lap_nr < 6) {
        transaktion("begin");
        db_modify("ALTER TABLE openpost ADD valuta varchar", __FILE__ . " linje " . __LINE__);
        db_modify("ALTER TABLE openpost ADD valutakurs numeric", __FILE__ . " linje " . __LINE__);
        db_modify("UPDATE grupper set box1 = '1.1.6' where art = 'VE'", __FILE__ . " linje " . __LINE__);
        transaktion("commit");
        include "../includes/connect.php";
        $r = db_fetch_array(db_select("select * from regnskab where id=1", __FILE__ . " linje " . __LINE__));
        if ($r['version'] < '1.1.6') {
            transaktion("begin");
            db_modify("UPDATE regnskab set version='1.1.6' where id = 1", __FILE__ . " linje " . __LINE__);
            transaktion("commit");
            include "../includes/online.php";
        }
    }
}
Ejemplo n.º 27
0
function flet($id, $varenr, $flet_id, $flet_vnr)
{
    if ($r = db_fetch_array(db_select("select id,shop_id from shop_varer where saldi_id = '{$id}'", __FILE__ . " linje " . __LINE__))) {
        $shop_id = $r['shop_id'];
        $r = db_fetch_array(db_select("select samlevare from varer where id = '{$flet_id}'", __FILE__ . " linje " . __LINE__));
        $fletsamlevare = $r['samlevare'];
        if ($r = db_fetch_array(db_select("select id,shop_id from shop_varer where saldi_id = '{$flet_id}'", __FILE__ . " linje " . __LINE__))) {
            if ($shop_id != $r['shop_id']) {
                print tekstboks("Varenummer: {$varenr} har en shop_relation til shop vare med id: {$shop_id} og {$fletvnr} relaterer til shop vare {$r['shop_id']}<br> Sammenlægning kan ikke gennemføres");
                print "<meta http-equiv=\"refresh\" content=\"2;URL=varekort.php?id={$id}\">";
                exit;
            }
        }
    }
    transaktion('begin');
    print tekstboks("Varenummer: {$varenr} sammenlægges med {$fletvnr}");
    $r = db_fetch_array(db_select("select beholdning from varer where id = '{$id}'", __FILE__ . " linje " . __LINE__));
    if ($r['beholdning']) {
        $fletbeholdning = $r['beholdning'];
        if ($fletsamlevare) {
            $x = 0;
            $q = db_select("select * from styklister where indgaar_i='{$flet_id}'");
            while ($r = db_fetch_array($q)) {
                $vare_id[$x] = $r['vare_id'];
                $antal[$x] = $r['antal'];
                $x++;
            }
            for ($x = 0; $x < count($vare_id); $x++) {
                $r = db_fetch_array(db_select("select gruppe,beholdning from varer where id='{$vare_id[$x]}'", __FILE__ . " linje " . __LINE__));
                $r2 = db_fetch_array(db_select("select box8 from grupper where art='VG' and kodenr='{$r['gruppe']}'", __FILE__ . " linje " . __LINE__));
                if ($r2['box8'] == 'on') {
                    $ny_beholdning = $r['beholdning'] + $antal[$x] * $fletbeholdning;
                    db_modify("update varer set beholdning = '{$ny_beholdning}' where id ='{$vare_id[$x]}'", __FILE__ . " linje " . __LINE__);
                }
            }
        } else {
            db_modify("update varer set beholdning=beholdning+{$r['beholdning']} where id = '{$flet_id}'", __FILE__ . " linje " . __LINE__);
        }
    }
    db_modify("update batch_salg set vare_id = '{$flet_id}' where vare_id = '{$id}'", __FILE__ . " linje " . __LINE__);
    db_modify("update batch_kob set vare_id = '{$flet_id}' where vare_id = '{$id}'", __FILE__ . " linje " . __LINE__);
    db_modify("update ordrelinjer set vare_id = '{$flet_id}', varenr = '{$flet_vnr}' where vare_id = '{$id}'", __FILE__ . " linje " . __LINE__);
    db_modify("update vare_lev set vare_id = '{$flet_id}' where vare_id = '{$id}'", __FILE__ . " linje " . __LINE__);
    $r = db_fetch_array(db_select("select id from shop_varer where saldi_id = '{$flet_id}'", __FILE__ . " linje " . __LINE__));
    if (!$r['saldi_id']) {
        db_modify("update shop_varer set saldi_id = '{$flet_id}' where saldi_id = '{$id}'", __FILE__ . " linje " . __LINE__);
    }
    db_modify("delete from varer where id = '{$id}'", __FILE__ . " linje " . __LINE__);
    transaktion('commit');
    print "<meta http-equiv=\"refresh\" content=\"0;URL=varekort.php?id={$flet_id}\">";
}
Ejemplo n.º 28
0
function singleinsert($string)
{
    $webservice = '1';
    global $webservice;
    list($s_id, $tmp) = explode(chr(9), $string);
    if (!$s_id) {
        return '1' . chr(9) . "Missing session ID";
    }
    #	include("../includes/select.php");
    include "../includes/connect.php";
    include "../includes/online.php";
    $linje = NULL;
    $fp = fopen("../temp/soap.log", "a");
    $tabels = array('ordrer', 'shop_ordrer', 'ordrelinjer', 'varer', 'shop_varer', 'vare_lev', 'adresser', 'ansatte', 'shop_adresser', 'kladdeliste', 'kassekladde', 'grupper');
    $singleinsert = str_replace($s_id, "", $string);
    $singleinsert = str_replace(chr(9), "", $singleinsert);
    $singleinsert = str_replace(chr(10), "", $singleinsert);
    $singleinsert = str_replace(chr(13), "", $singleinsert);
    #	$singleinsert=str_replace(" ","",$singleinsert);
    list($table, $tmp) = explode("(", $singleinsert, 2);
    $table = trim($table);
    #if ($table!='adresser')	return('1'.chr(9).$table);
    if (!in_array($table, $tabels)) {
        return '1' . chr(9) . 'Inserting into ' . $table . ' is not accepted';
    }
    $singleinsert = str_replace("values", "VALUES", $singleinsert);
    list($part1, $part2) = explode("VALUES", $singleinsert);
    list($part1, $tmp) = explode(")", $part1);
    list($tmp, $part1) = explode("(", $part1);
    #	$part1=str_replace(" ","",$part1);
    fwrite($fp, "Part 1:" . $part1 . "\n");
    $fields = explode(",", $part1);
    #	list($tmp,$part2)=explode("(",$part2); #20140106 + næste 3 linjer
    #	list($part2,$tmp)=explode(")",$part2);
    $part2 = trim($part2);
    $part2 = substr($part2, 1, strlen($part2) - 2);
    fwrite($fp, $part2 . "\n");
    $part2 = str_replace("<TAB>", chr(9), $part2);
    fwrite($fp, $part2 . "\n");
    $part2 = str_replace("','", "'',''", $part2);
    $values = explode("','", $part2);
    fwrite($fp, $part2 . "\n");
    if (!$fields || !$values) {
        return '1' . chr(9) . "Missing fields or values";
    }
    /*
    	if ($table=='adresser') {
    		for ($x=0;$x<count($fields);$x++) {
    			if ($fields[$x]=='kontonr') {
    				$values[$x]=str_replace(" ","",$values[$x]);
    				$values[$x]*=1;
    				if (!$values[$x]) {
    					$y=0;
    					$q=db_select("select kontonr from adresser",__FILE__ . " linje " . __LINE__);
    					while ($r=db_fetch_array($q)) {
    						$kontonr[$y]=$r['kontonr'];
    						$y++;
    					}
    					$tmp=1000;
    					while (in_array($tmp,$kontonr)) $tmp++;
    					$values[$x]=$tmp;
    				}
    			}
    		}
    	}
    */
    $singleinsert = str_replace("<TAB>", chr(9), $singleinsert);
    $singleinsert = "insert into " . $singleinsert;
    fwrite($fp, $singleinsert . "\n");
    transaktion('begin');
    $svar = db_modify("{$singleinsert}", __FILE__ . " linje " . __LINE__);
    list($fejl, $svar) = explode(chr(9), $svar);
    fwrite($fp, "Fejl" . $fejl . ":" . $svar . "\n");
    if ($fejl) {
        return $fejl . chr(9) . $svar;
    } else {
        $select = "select max(id) as id from {$table} where ";
        for ($i = 0; $i < count($fields); $i++) {
            if ($i > 0) {
                $select .= " and ";
            }
            $select .= $fields[$i] . "=" . $values[$i];
        }
        fwrite($fp, $select . "\n");
        fclose($fp);
        $r = db_fetch_array(db_select($select, __FILE__ . " linje " . __LINE__));
        $id = $r['id'];
        if (!$id) {
            return '1' . chr(9) . "Insert failed\n" . $select . "\n" . $singleinsert;
        }
        transaktion('commit');
        if ($id) {
            return '0' . chr(9) . $id;
        }
    }
}
Ejemplo n.º 29
0
                $modtagelse = $row['modtagelse'] + 1;
            }
        }
        $row = db_fetch_array($query = db_select("select box2 from grupper where art = 'RB'", __FILE__ . " linje " . __LINE__));
        if ($modtagelse == 1) {
            $modtagelse = $row['box2'] * 1;
        }
        if ($modtagelse < 1) {
            $modtagelse = 1;
        }
        db_modify("update ordrer set status=3, fakturadate='{$levdate}', modtagelse = '{$modtagelse}', valuta = '{$valuta}', valutakurs = '{$valutakurs}' where id={$id}", __FILE__ . " linje " . __LINE__);
        $r = db_fetch_array($q = db_select("select box5 from grupper where art='DIV' and kodenr='3'", __FILE__ . " linje " . __LINE__));
        if ($r['box5'] == 'on') {
            bogfor($id);
        }
        transaktion("commit");
    }
}
print "<meta http-equiv=\"refresh\" content=\"0;URL=ordre.php?id={$id}\">";
function bogfor($id)
{
    global $regnaar;
    global $valuta;
    global $valutakurs;
    global $difkto;
    global $sprog_id;
    $d_kontrol = 0;
    $k_kontrol = 0;
    $linjesum = 0;
    $fakturasum = 0;
    $momssum = 0;
Ejemplo n.º 30
0
function importer($filnavn, $opret_lev, $opret_vare)
{
    $descfil = if_isset($_POST['descfil']);
    #	list($firmanavn,$kontonr,$vejnavn,$husnr,$postnr,$bynavn,$land,$cvrnr,$ordredate,$l_varenr,$l_pris,$l_tekst,$l_antal,$l_sum,$l_moms,$l_momssats,$l_posnr)=explode(chr(9),vis_oioubl($filnavn));
    global $firmanavn;
    global $kontonr;
    global $vejnavn;
    global $husnr;
    global $postnr;
    global $bynavn;
    global $land;
    global $cvrnr;
    global $ordredate;
    global $fakturadate;
    global $l_varenr;
    global $l_pris;
    global $l_tekst;
    global $l_antal;
    global $l_sum;
    global $l_moms;
    global $l_momssats;
    global $l_posnr;
    vis_oioubl($filnavn);
    if ($opret_lev) {
        if (!$kontonr) {
            $x = 0;
            $q = db_select("select kontonr from adresser where art = 'K' order by kontonr", __FILE__ . " linje " . __LINE__);
            while ($r = db_fetch_array($q)) {
                $x++;
                $ktoliste[$x] = $r['kontonr'];
            }
            $kontonr = 1000;
            while (in_array($kontonr, $ktoliste)) {
                $kontonr++;
            }
        }
        db_modify("insert into adresser (firmanavn,kontonr,addr1,postnr,bynavn,land,cvrnr,gruppe,art) values ('" . db_escape_string($firmanavn) . "','{$kontonr}','" . db_escape_string($vejnavn . " " . $husnr) . "','" . db_escape_string($postnr) . "','" . db_escape_string($bynavn) . "','" . db_escape_string($land) . "','" . db_escape_string($cvrnr) . "','{$opret_lev}','K')", __FILE__ . " linje " . __LINE__);
    }
    if (!$konto_id) {
        $r = db_fetch_array(db_select("select * from adresser where art = 'K' and cvrnr='{$cvrnr}'", __FILE__ . " linje " . __LINE__));
        if ($r['id']) {
            $konto_id = $r['id'];
            $kontonr = $r['kontonr'];
            $gruppe = $r['gruppe'];
            $betalingsdage = $r['betalingsdage'];
            if (!$betalingsdage) {
                $betalingsdage = 8;
            }
            $betalingsbet = $r['betalingsbet'];
            if (!$betalingsbet) {
                $betalingsbet = 'Netto';
            }
            if ($gruppe) {
                $r = db_fetch_array(db_select("select box1, box3 from grupper where art='KG' and kodenr='{$gruppe}'", __FILE__ . " linje " . __LINE__));
                $valuta = trim($r['box3']);
                if (substr($r['box1'], 0, 1) == 'K') {
                    $tmp = substr($r['box1'], 1, 1) * 1;
                    $r = db_fetch_array(db_select("select box2 from grupper where art='KM' and kodenr = '{$tmp}'", __FILE__ . " linje " . __LINE__));
                    $momssats = trim($r['box2']) * 1;
                } elseif (substr($r['box1'], 0, 1) == 'E') {
                    $momssats = '0.00';
                } elseif (substr($r['box1'], 0, 1) == 'Y') {
                    $momssats = '0.00';
                }
            } else {
                print "<BODY onLoad=\"javascript:alert('Kreditor ikke tilknyttet en kreditorgruppe')\">";
            }
        } else {
            $grp_antal = 0;
            $q = db_select("select * from grupper where art='KG' order by kodenr", __FILE__ . " linje " . __LINE__);
            while ($r = db_fetch_array($q)) {
                $grp_antal++;
                $grp_id[$grp_antal] = $r['kodenr'];
                $grp_navn[$grp_antal] = $r['beskrivelse'];
            }
            print "<form name=\"opret_kreditor\" action=\"{$_SERVER['PHP_SELF']}\" method=\"post\">";
            print "<input type=\"hidden\" name=\"filnavn\" value={$filnavn}>";
            print "<input type=\"hidden\" name=\"descfil\" value={$descfil}>";
            print "<tr><td align=\"center\"><table><tbody>";
            print "<tr><td>Der eksisterer ingen leverandører med cvrnr.: {$cvrnr}</td></tr>";
            if ($grp_antal > 1) {
                print "<tr><td>Vælg kreditorgruppe: <select name=\"opret_lev\">";
                for ($y = 1; $y <= $grp_antal; $y++) {
                    print "<option value=\"{$grp_id[$y]}\">{$grp_id[$y]} : {$grp_navn[$y]}</option>";
                }
                print "</select></td></tr>\n";
            }
            print "<tr><td align=\"center\"><input type=\"submit\" name=\"opret\" value=\"Opret\"></td></tr>\n";
            print "</tbody></table></td></tr>";
            print "</form>";
            exit;
        }
    }
    if ($opret_vare) {
        global $gl_varenr;
        global $opret_varenr;
        global $salgspris;
        if ($opret_varenr && $salgspris) {
            $salgspris = usdecimal($salgspris);
            $low = strtolower($opret_varenr);
            $up = strtoupper($opret_varenr);
            for ($x = 0; $x < count($l_varenr); $x++) {
                if ($gl_varenr == $l_varenr[$x]) {
                    transaktion('begin');
                    if ($r = db_fetch_array(db_select("select id,beskrivelse from varer where varenr='{$opret_varenr}' or lower(varenr)= '{$low}' or upper(varenr)='{$up}' or lower(stregkode)= '{$low}' or upper(stregkode)='{$up}'", __FILE__ . " linje " . __LINE__))) {
                        $vare_id[$x] = $r['id'];
                    } else {
                        db_modify("insert into varer (varenr,kostpris,salgspris,beskrivelse,gruppe,lukket) values ('{$opret_varenr}','{$l_pris[$x]}','{$salgspris}','{$l_tekst[$x]}','{$opret_vare}','0')", __FILE__ . " linje " . __LINE__);
                        $r = db_fetch_array(db_select("select id,beskrivelse from varer where varenr='{$opret_varenr}'", __FILE__ . " linje " . __LINE__));
                        $vare_id[$x] = $r['id'];
                    }
                    db_modify("insert into vare_lev(posnr,lev_id,vare_id,lev_varenr,kostpris) values ('0','{$konto_id}','{$vare_id[$x]}','{$l_varenr[$x]}','{$l_pris[$x]}')", __FILE__ . " linje " . __LINE__);
                    #					$x=$linjenr;
                    transaktion('commit');
                }
            }
        } elseif ($opret_varenr) {
            print "<BODY onLoad=\"javascript:alert('Angiv en salgspris på varen')\">";
        }
        if (isset($_POST['tilknyt']) || $tilknyt) {
            $low = strtolower($opret_varenr);
            $up = strtoupper($opret_varenr);
            for ($x = 0; $x < count($l_varenr); $x++) {
                if ($gl_varenr == $l_varenr[$x]) {
                    if ($r = db_fetch_array(db_select("select id,beskrivelse from varer where varenr='{$opret_varenr}' or lower(varenr)= '{$low}' or upper(varenr)='{$up}' or lower(stregkode)= '{$low}' or upper(stregkode)='{$up}'", __FILE__ . " linje " . __LINE__))) {
                        $vare_id[$x] = $r['id'];
                        db_modify("insert into vare_lev(posnr,lev_id,vare_id,lev_varenr,kostpris) values ('0','{$konto_id}','{$vare_id[$x]}','{$l_varenr[$x]}','{$l_pris[$x]}')", __FILE__ . " linje " . __LINE__);
                        #						$x=$linjenr;
                    }
                }
            }
        }
    }
    for ($x = 0; $x < count($l_varenr); $x++) {
        if (!$vare_id[$x]) {
            $low = strtolower($l_varenr[$x]);
            $up = strtoupper($l_varenr[$x]);
            $r = db_fetch_array(db_select("select * from vare_lev where lev_id='{$konto_id}' and (lev_varenr='{$l_varenr[$x]}' or lower(lev_varenr)= '{$low}' or upper(lev_varenr)='{$up}')", __FILE__ . " linje " . __LINE__));
            $vare_lev_id[$x] = $r['id'];
            $vare_id[$x] = $r['vare_id'];
        }
        if (!$vare_id[$x]) {
            print "<tr><td align=\"center\"><table><tbody>";
            print "<form name=\"opret_vare\" action=\"{$_SERVER['PHP_SELF']}\" method=\"post\">";
            $r = db_fetch_array(db_select("select id,beskrivelse from varer where varenr='{$l_varenr[$x]}' or lower(varenr)= '{$low}' or upper(varenr)='{$up}' or lower(stregkode)= '{$low}' or upper(stregkode)='{$up}'", __FILE__ . " linje " . __LINE__));
            if ($vare_id[$x] = $r['id']) {
                print "<tr><td colspan=\"2\">Varenummer {$l_varenr[$x]} ({$l_tekst[$x]}) eksisterer i systemet med beskrivelsen " . $r['beskrivelse'] . " og er ikke tilknyttet denne leverandør<br></td></tr>";
                print "<tr><td colspan=\"2\">Klik OK for et tilknytte den eksisterende vare til denne leverandør eller skriv et alternativt varenummer for et oprette varen med andet varenr.<br></td></tr>";
            }
            $grp_antal = 0;
            $q = db_select("select * from grupper where art='VG' order by kodenr", __FILE__ . " linje " . __LINE__);
            while ($r = db_fetch_array($q)) {
                $grp_antal++;
                $grp_id[$grp_antal] = $r['kodenr'];
                $grp_navn[$grp_antal] = $r['beskrivelse'];
            }
            print "<input type=\"hidden\" name=\"filnavn\" value={$filnavn}>";
            print "<input type=\"hidden\" name=\"descfil\" value={$descfil}>";
            print "<input type=\"hidden\" name=\"gl_varenr\" value=\"{$l_varenr[$x]}\">";
            print "<tr><td colspan=\"2\">Der eksisterer ingen varer med varenr / stregkode.: {$l_varenr[$x]}<br></td></tr>";
            print "<tr><td colspan=\"2\">Hvis varen eksisterer med et andet varenummer kan du skrive det herunder og klikke på \"Tilknyt\"<br></td></tr>";
            print "<tr><td colspan=\"2\">Eller du kan klikke på \"Opret\" og oprette varen med det varenummer som er angivet.<br></td></tr>";
            if ($grp_antal > 1) {
                print "<tr><td>Varegruppe:</td><td><select name=\"opret_vare\">";
                for ($y = 1; $y <= $grp_antal; $y++) {
                    print "<option value=\"{$grp_id[$y]}\">{$grp_id[$y]} : {$grp_navn[$y]}</option>";
                }
                print "</select></td></tr>";
            }
            print "<tr><td>Varenr:</td><td><input type=\"tekst\" name=\"opret_varenr\" value=\"{$l_varenr[$x]}\"><br></td></tr>";
            print "<tr><td>Købspris:</td><td>" . dkdecimal($l_pris[$x]) . "<br></td></tr>";
            print "<tr><td>Salgspris:</td><td><input type=\"text\" name=\"salgspris\"><br></td></tr>";
            print "<tr><td align=\"center\" colspan=\"2\"><input type=\"submit\" name=\"opret\" value=\"Opret\"><input type=\"submit\" name=\"tilknyt\" value=\"Tilknyt\"></td></tr>";
            print "</form></tbody></table></td></tr>";
            exit;
        }
    }
    if (isset($_POST['importer']) && $_POST['importer'] == 'Importer') {
        transaktion('begin');
        #cho "Importer til ordre";
        $r = db_fetch_array(db_select("select max(ordrenr) as ordrenr from ordrer where art='KO' or art='KK'", __FILE__ . " linje " . __LINE__));
        $ordrenr = $r['ordrenr'] + 1;
        db_modify("insert into ordrer (ordrenr,konto_id,kontonr,firmanavn,addr1,postnr,bynavn,land,betalingsdage,betalingsbet,cvrnr,art,ordredate,levdate,momssats,status,hvem,tidspkt,valuta,fakturanr) values ('{$ordrenr}','{$konto_id}','{$kontonr}','" . db_escape_string($firmanavn) . "','" . db_escape_string($vejnavn) . " {$husnr}','{$postnr}','{$bynavn}','{$land}','{$betalingsdage}','{$betalingsbet}','{$cvrnr}','KO','{$ordredate}','{$ordredate}','{$momssats}','1','{$brugernavn}','{$tidspkt}','{$valuta}','{$fakturanr}')", __FILE__ . " linje " . __LINE__);
        $r = db_fetch_array(db_select("select id from ordrer where art='KO' and ordrenr = '{$ordrenr}'", __FILE__ . " linje " . __LINE__));
        $ordre_id = $r['id'];
        $pos = 0;
        for ($x = 0; $x < count($l_varenr); $x++) {
            if ($vare_id[$x]) {
                $pos++;
                $r = db_fetch_array(db_select("select * from varer  where id='{$vare_id[$x]}'", __FILE__ . " linje " . __LINE__));
                db_modify("insert into ordrelinjer (ordre_id,lev_varenr,varenr,vare_id,beskrivelse,antal,leveres,pris,posnr) values ('{$ordre_id}','{$l_varenr[$x]}','{$r['varenr']}','{$vare_id[$x]}', '{$l_tekst[$x]}','{$l_antal[$x]}','{$l_antal[$x]}','{$l_pris[$x]}','{$pos}')", __FILE__ . " linje " . __LINE__);
            }
        }
        transaktion('commit');
        if ($descfil) {
            print "<input type=\"hidden\" name=\"slet_bilailnavn\" value={$filnavn}>";
            print "<input type=\"hidden\" name=\"descfil\" value={$descfil}>";
            print "<meta http-equiv=\"refresh\" content=\"0;URL=ublimport.php?slet=1&descfil={$descfil}&funktion=gennemse\">";
        } else {
            print "<meta http-equiv=\"refresh\" content=\"0;URL=ordre.php?id={$ordre_id}\">";
        }
    } else {
        print "<form name=\"importer\" action=\"{$_SERVER['PHP_SELF']}\" method=\"post\">";
        print "<input type=\"hidden\" name=\"filnavn\" value={$filnavn}>";
        print "<input type=\"hidden\" name=\"descfil\" value={$descfil}>";
        print "<tr><td width=\"100%\" align=\"center\"><input type=\"submit\" name=\"importer\" value=\"Importer\"></td></tr>";
        print "</form>";
    }
}