PHP usdate函数代码示例

 function udvaelg($tmp, $key, $art)
 {
     include "../includes/std_func.php";
     $tmp = strtolower($tmp);
     if ($art) {
         #20150105-1
         if ($art != 'BELOB') {
             $tmp = str_replace(",", ":", $tmp);
         }
         #20150601
         $tmp = str_replace(";", ":", $tmp);
         if ($art == 'BELOB' && !strpos($tmp, ':')) {
             #20151019
             $tmp = usdecimal($tmp);
             $tmp1 = $tmp - 0.005;
             $tmp2 = $tmp + 0.004;
             $tmp = number_format($tmp1, 3, ',', '') . ":" . number_format($tmp2, 3, ',', '');
         }
     }
     list($tmp1, $tmp2) = explode(":", $tmp);
     if (strstr($tmp, ':') && $art != 'TID') {
         if ($art == "DATO") {
             $tmp1 = usdate($tmp1);
             $tmp2 = usdate($tmp2);
         } elseif ($art == "BELOB") {
             $tmp1 = usdecimal($tmp1);
             $tmp2 = usdecimal($tmp2);
         } elseif ($art == "NR") {
             $tmp1 = afrund($tmp1 * 1, 2);
             #21050105-2
             $tmp2 = afrund($tmp2 * 1, 2);
         }
         $udvaelg = "and {$key} >= '{$tmp1}' and {$key} <= '{$tmp2}'";
     } else {
         if ($art == "TID") {
             if (!strstr($tmp, ':')) {
                 $tmp = $tmp * 1;
                 $tmp = str_replace(".", ":", $tmp);
                 if (!strstr($tmp, ':')) {
                     $tmp = $tmp . ":";
                 }
             }
         } elseif ($art == "DATO") {
             $tmp = usdate($tmp);
         }
         if (!$art) {
             $tmp = str_replace("*", "%", $tmp);
             $tmp = db_escape_string($tmp);
             $udvaelg = " and lower({$key}) like '{$tmp}'";
         } else {
             $udvaelg = " and {$key} = '{$tmp}'";
         }
     }
     return $udvaelg;
 }

 $bynavn = db_escape_string(trim($_POST['bynavn']));
 $tlf = db_escape_string(trim($_POST['tlf']));
 $fax = db_escape_string(trim($_POST['fax']));
 $mobil = db_escape_string(trim($_POST['mobil']));
 $privattlf = db_escape_string(trim($_POST['privattlf']));
 $email = db_escape_string(trim($_POST['email']));
 $cprnr = db_escape_string(trim($_POST['cprnr']));
 $notes = db_escape_string(trim($_POST['notes']));
 $bank = db_escape_string(trim($_POST['bank']));
 $loen = usdecimal($_POST['loen']);
 $extraloen = usdecimal($_POST['extraloen']);
 $lukket = trim($_POST['lukket']);
 $startdato = db_escape_string(trim($_POST['startdato']));
 $slutdato = db_escape_string(trim($_POST['slutdato']));
 $startdato ? $startdate = usdate($startdato) : ($startdate = NULL);
 $slutdato ? $slutdate = usdate($slutdato) : ($sluttdate = NULL);
 $trainee = trim($_POST['trainee']);
 list($afd, $x) = explode(":", $_POST['afd']);
 $afd = $afd * 1;
 $returside = $_POST['returside'];
 $fokus = $_POST['fokus'];
 $provision = $_POST['provision'];
 $provision_id = $_POST['provision_id'];
 $gruppe_id = $_POST['gruppe_id'];
 $pro_antal = $_POST['pro_antal'];
 if (!is_numeric($nummer) && $id) {
     #20140923
     $messages = "Skal være et tal";
 } elseif ($id && ($r = db_fetch_array(db_select("SELECT id FROM ansatte WHERE nummer='{$nummer}' AND id != '{$id}'", __FILE__ . " linje " . __LINE__)))) {
     $messages = "Medarbejdernummer eksisterer i forvejen ";
 } else {

    $gl_logintekst = if_isset($_POST['gl_logintekst']);
    $logintekst = if_isset($_POST['logintekst']);
    for ($x = 1; $x <= $db_antal; $x++) {
        #		if (!isset($gl_lukket[$x])) echo "HMM";
        if (!isset($lukket[$x])) {
            $lukket[$x] = NULL;
        }
        if (!$lukkes[$x]) {
            $lukkes[$x] = "2099-12-31";
        } else {
            $lukkes[$x] = usdate($lukkes[$x]);
        }
        if (!$betalt_til[$x]) {
            $betalt_til[$x] = "2099-12-31";
        } else {
            $betalt_til[$x] = usdate($betalt_til[$x]);
        }
        if ($gl_brugerantal[$x] != $brugerantal[$x] || $gl_posteringer[$x] != $posteringer[$x] || $gl_lukket[$x] != $lukket[$x] || $gl_lukkes[$x] != $lukkes[$x] || $gl_betalt_til[$x] != $betalt_til[$x] || $gl_logintekst[$x] != $logintekst[$x]) {
            if ($saldiregnskab) {
                $modify = "update regnskab set brugerantal='{$brugerantal[$x]}',posteringer='{$posteringer[$x]}',lukket='{$lukket[$x]}',lukkes='{$lukkes[$x]}',betalt_til='{$betalt_til[$x]}',logintekst='{$logintekst[$x]}' where id = '{$id[$x]}'";
            } else {
                $modify = "update regnskab set\tbrugerantal='{$brugerantal[$x]}',posteringer='{$posteringer[$x]}',lukket='{$lukket[$x]}'where id = '{$id[$x]}'";
            }
            if ($id[$x]) {
                db_modify($modify, __FILE__ . " linje " . __LINE__);
            }
        }
    }
}
print "<table width=\"100%\" height=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tbody>";
print "<tr><td align=\"center\" valign=\"top\" height=\"25\">";

$ny_beholdning[0] = if_isset($_GET['ny_beholdning']);
if (isset($_POST['cancel'])) {
    $id = if_isset($_POST['id']);
    print "<meta http-equiv=\"refresh\" content=\"0;URL=varekort.php?id={$id['0']}\">";
    exit;
}
if ($_POST['bilag'] || $_POST['bilag'] == '0') {
    $id = if_isset($_POST['id']);
    $ny_beholdning = if_isset($_POST['ny_beholdning']);
    $dato = if_isset($_POST['dato']);
    $bilag = if_isset($_POST['bilag']);
    if (!is_numeric($bilag) || strlen($bilag) > 9) {
        print "<BODY onLoad=\"javascript:alert('Bilagsnummer skal v&aelig;re et positivt tal og m&aring; maks indeholder 9 cifre')\">";
        $fejl = 1;
    }
    $transdate = usdate($dato);
    list($y, $m, $d) = explode("-", $transdate);
    $ym = $y . $m;
    if (checkdate($m, $d, $y)) {
        if ($ym < $aarstart || $ym > $aarslut) {
            print "<BODY onLoad=\"javascript:alert('Dato udenfor regnskabs&aring;r')\">";
            $fejl = 1;
        }
    } else {
        print "<BODY onLoad=\"javascript:alert('Dato skal v&aelig;re i formatet 'dd-mm-yyyy')\">";
        $fejl = 1;
    }
}
if ($antal >= 1) {
    $r = db_fetch_array(db_select("select * from grupper where kodenr='{$regnaar}' and art='RA'", __FILE__ . " linje " . __LINE__));
    $startaar = $r['box2'] * 1;

function vis_aabne_poster($dato_fra, $dato_til, $konto_fra, $konto_til, $art)
{
    global $bgcolor;
    global $bgcolor5;
    print "<tr><td><table width=100% cellpadding=\"0\" cellspacing=\"0\" border=\"0\"><tbody>\n";
    print "<tr><td>Kontonr</td><td>Firmanavn</td><td align=right>>90</td><td align=right>60-90</td><td align=right>30-60</td><td align=right>8-30</td><td align=right>0-8</td><td align=right>I alt</td><tr>";
    $currentdate = date("Y-m-d");
    $fromdate = usdate($dato_fra);
    $todate = usdate($dato_til);
    # echo "SS $fromdate $todate KF $konto_fra<br>";
    /*
    	# Finder start og slut paa regnskabsaar
    	for ($x=1; $x<=12; $x++) {
    		if ($maaned_fra==$md[$x]){$maaned_fra=$x;}
    		if ($maaned_til==$md[$x]){$maaned_til=$x;}
    	}
    
    	$query = db_select("select * from grupper where kodenr='$regnaar' and art='RA'",__FILE__ . " linje " . __LINE__);
    	$row = db_fetch_array($query);
    #	$regnaar=$row[kodenr];
    	$startmaaned=$row['box1']*1;
    	$startaar=$row['box2']*1;
    	$slutmaaned=$row['box3']*1;
    	$slutaar=$row['box4']*1;
    	$slutdato=31;
    
    	##
    
    	if ($maaned_fra) $startmaaned=$maaned_fra;
    	if ($maaned_til) $slutmaaned=$maaned_til;
    
    if (!is_numeric($startmaaned)) {
    	if (strstr($startmaaned," ")) list($tmp,$startmaaned)=explode(" ",$startmaaned);
    	if (!is_numeric($startmaaned)) list ($tmp,$startmaaned)=explode(" ",find_maaned_nr($startmaaned));
    }
    if (!is_numeric($slutmaaned)) {
    	if (strstr($slutmaaned," ")) list($tmp,$slutmaaned)=explode(" ",$slutmaaned);
    	if (!is_numeric($slutmaaned)) list ($tmp,$slutmaaned)=explode(" ",find_maaned_nr($slutmaaned));
    }
    
    	
    	while (!checkdate($slutmaaned,$slutdato,$slutaar))	{
    		$slutdato=$slutdato-1;
    		if ($slutdato<28) break;
    	}
    
    #	if ($slutmaaned<10){$slutmaaned="0".$slutmaaned;}
    
    
    $regnstart = $startaar. "-" . $startmaaned . "-" . '01';
    	$regnslut = $slutaar . "-" . $slutmaaned . "-" . $slutdato;
    */
    #$regnslut = "2005-05-04";
    print "<form name=aabenpost action=rapport.php method=post>";
    print "<tr><td colspan=10><hr></td></tr>\n";
    $x = 0;
    # echo "KF $konto_fra<br>";
    if (is_numeric($konto_fra) && is_numeric($konto_til)) {
        $tekst = "select * from adresser where " . nr_cast('kontonr') . ">='{$konto_fra}' and " . nr_cast('kontonr') . "<='{$konto_til}' and art = 'D' order by " . nr_cast('kontonr') . "";
    } elseif ($konto_fra && $konto_fra != '*') {
        $konto_fra = str_replace("*", "%", $konto_fra);
        $tmp1 = strtolower($konto_fra);
        $tmp2 = strtoupper($konto_fra);
        $tekst = "select * from adresser where (firmanavn like '{$konto_fra}' or lower(firmanavn) like '{$tmp1}' or upper(firmanavn) like '{$tmp2}') and art = 'D' order by firmanavn";
    } else {
        $tekst = "select * from adresser where art = '{$art}' order by firmanavn";
    }
    # echo "tekst $tekst<br>";
    $kontonr = array();
    $x = 0;
    $q = db_select("{$tekst}", __FILE__ . " linje " . __LINE__);
    #	if ($konto_fra && $konto_til) $tmp=nr_cast('kontonr').">='$konto_fra' and ".nr_cast('kontonr')."<='$konto_til' and ";
    #	elseif ($konto_fra) $tmp=nr_cast('kontonr').">='$konto_fra' and ";
    #	elseif ($konto_til) $tmp=nr_cast('kontonr')."<='$konto_til'and ";
    #	else $tmp="";
    #	$q = db_select("select * from adresser where $tmp art = '$art' order by firmanavn",__FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        $x++;
        $konto_id[$x] = $r['id'];
        print "<input type=hidden name=konto_id[{$x}] value={$konto_id[$x]}>";
        $kontonr[$x] = trim($r['kontonr']);
        $firmanavn[$x] = stripslashes($r['firmanavn']);
        $addr1[$x] = stripslashes($r['addr1']);
        $addr2[$x] = stripslashes($r['addr2']);
        $postnr[$x] = trim($r['postnr']);
        $bynavn[$x] = stripslashes($r['bynavn']);
        $email[$x] = trim($r['email']);
        $betalingsbet[$x] = trim($r['betalingsbet']);
        $betalingsdage[$x] = trim($r['betalingsdage']);
    }
    $kontoantal = $x;
    $sum = 0;
    for ($x = 1; $x <= $kontoantal; $x++) {
        $amount = 0;
        $udlignet = 1;
        $rykkerbelob = 0;
        $forfalden = 0;
        $forfalden_plus8 = 0;
        $forfalden_plus30 = 0;
        $forfalden_plus60 = 0;
//.........这里部分代码省略.........

function oioubldoc_faktura($l_ordreid = "", $l_doktype = "faktura", $l_testdoc = "")
{
    global $db_encode;
    include "../includes/forfaldsdag.php";
    if ($l_testdoc) {
        $l_testdoc = "TEST";
    }
    if (!$l_ordreid) {
        return "";
    }
    if (strtolower($l_doktype) == "faktura") {
        # Faktura
        $l_doctype = "Invoice";
        $l2_doctype = "Invoiced";
        $l_ptype = "PIE";
    } else {
        # Kreditnota
        $l_doctype = "CreditNote";
        $l2_doctype = "Credited";
        $l_ptype = "PCM";
    }
    #	$l_doctype = "Invoice"; # Ogsaa selvom det er en kreditnota
    #	$l_retur=oioubl_top($l_doctype, $l_ptype, $l_testdoc, $l_ordreid);
    $query = db_select("select * from ordrer where id = {$l_ordreid}", __FILE__ . " linje " . __LINE__);
    $r_faktura = db_fetch_array($query);
    if ($db_encode != "UTF8") {
        $firmanavn = utf8_encode($r_faktura['firmanavn']);
        $addr_1 = utf8_encode($r_faktura['addr1']);
        $addr_2 = utf8_encode($r_faktura['addr2']);
        $postnr = utf8_encode($r_faktura['postnr']);
        $bynavn = utf8_encode($r_faktura['bynavn']);
        $land = utf8_encode($r_faktura['land']);
        $kontakt = utf8_encode($r_faktura['kontakt']);
        $bank_navn = utf8_encode($r_faktura['bank_navn']);
        $kundeordnr = utf8_encode($r_faktura['kundeordnr']);
        $cvrnr = utf8_encode($r_faktura['cvrnr']);
        $tlf = utf8_encode($r_faktura['tlf']);
        $email = utf8_encode($r_faktura['email']);
        $kontonr = utf8_encode($r_faktura['kontonr']);
    } else {
        $firmanavn = $r_faktura['firmanavn'];
        $addr_1 = $r_faktura['addr1'];
        $addr_2 = $r_faktura['addr2'];
        $postnr = $r_faktura['postnr'];
        $bynavn = $r_faktura['bynavn'];
        $land = $r_faktura['land'];
        $kontakt = $r_faktura['kontakt'];
        $bank_navn = $r_faktura['bank_navn'];
        $kundeordnr = $r_faktura['kundeordnr'];
        $cvrnr = $r_faktura['cvrnr'];
        $tlf = $r_faktura['tlf'];
        $email = $r_faktura['email'];
        $kontonr = $r_faktura['kontonr'];
    }
    $firmanavn = htmlspecialchars($firmanavn, ENT_QUOTES);
    $addr_1 = htmlspecialchars($addr_1, ENT_QUOTES);
    $addr_2 = htmlspecialchars($addr_2, ENT_QUOTES);
    $postnr = htmlspecialchars($postnr, ENT_QUOTES);
    $bynavn = htmlspecialchars($bynavn, ENT_QUOTES);
    $land = htmlspecialchars($land, ENT_QUOTES);
    $kontakt = htmlspecialchars($kontakt, ENT_QUOTES);
    $bank_navn = htmlspecialchars($bank_navn, ENT_QUOTES);
    $kundeordnr = htmlspecialchars($kundeordnr, ENT_QUOTES);
    $cvrnr = htmlspecialchars(str_replace(" ", "", $cvrnr), ENT_QUOTES);
    $tlf = htmlspecialchars($tlf, ENT_QUOTES);
    $email = htmlspecialchars($email, ENT_QUOTES);
    if (!$kundeordnr) {
        $kundeordnr = '0';
    }
    # phr 20090803
    while (strlen($cvrnr) < 8) {
        $cvrnr = "0" . $cvrnr;
    }
    $l_momsbeloeb = afrund(abs($r_faktura['moms']), 2);
    $l_momssats = $r_faktura['momssats'] * 1;
    $l_sumbeloeb = afrund(abs($r_faktura['sum']), 2);
    $l_momspligtigt = 100 * $l_momsbeloeb / $l_momssats;
    $l_momsfrit = $l_sumbeloeb - $l_momspligtigt;
    if ($l_momsfrit < 0.02) {
        #20150618
        $l_momsfrit = 0;
        $l_momspligtigt = $l_sumbeloeb;
    }
    $l_forfaldsdate = usdate(forfaldsdag($r_faktura['fakturadate'], $r_faktura['betalingsbet'], $r_faktura['betalingsdage']));
    #	$l_retur.="\t<com:ID>".$r_faktura['fakturanr']."</com:ID>\n";
    #	$l_retur.="\t<com:IssueDate>".$r_faktura['fakturadate']."</com:IssueDate>\n";
    #	$l_retur.="\t<com:TypeCode>".$l_ptype."</com:TypeCode>\n";
    if ($r_faktura['valuta']) {
        $l_valutakode = $r_faktura['valuta'];
        $l_valutakurs = $r_faktura['valutakurs'];
    } else {
        $l_valutakode = "DKK";
    }
    if ($r_faktura['valutakurs']) {
        $l_valutakurs = $r_faktura['valutakurs'];
    } else {
        $l_valutakurs = 100;
    }
    $query = db_select("select * from adresser where art='S'", __FILE__ . " linje " . __LINE__);
    $r_egen = db_fetch_array($query);
//.........这里部分代码省略.........

//.........这里部分代码省略.........
            $qtxt = "select * from pos_betalinger where ordre_id='{$ordre_id}' order by betalingstype";
            $q2 = db_select($qtxt, __FILE__ . " linje " . __LINE__);
            while ($r2 = db_fetch_array($q2)) {
                #				for ($c=0;$c<count($betaling);$c++) echo "$bnr | $c | $bnretaling[$c]==$r2[betalingstype] | $r2[amount]<br>";
                if (in_array($r2['betalingstype'], $betaling)) {
                    #cho __line__."<br>";
                    for ($c = 0; $c < count($betaling); $c++) {
                        if ($betaling[$c] == $r2['betalingstype']) {
                            $modtaget[$c] += $r2['amount'];
                            #cho "B $betaling[$c]==$r2[betalingstype] --> $modtaget[$c] -- $r2[amount]<br>";
                        }
                    }
                } else {
                    $bnr++;
                    $betaling[$bnr] = $r2['betalingstype'];
                    $modtaget[$bnr] = $r2['amount'];
                }
            }
            $kasse = $r['felt_5'] * 1;
            if ($betalingsbet == 'Kontant') {
                $konto_id = 0;
                $kontonr = NULL;
            }
        } else {
            $kasse = 0;
        }
        #		$refnr;
        if ($momssats) {
            $moms += $r['moms'] * 1;
        }
        #		else {$moms=afrund($r['sum']*$r['momssats']/100,2);}
        $sum += $r['sum'] + $r['moms'];
        $ordreantal = $x;
        $forfaldsdate = usdate(forfaldsdag($r['fakturadate'], $betalingsbet, $betalingsdage));
        if ($art == 'PO') {
            $r2 = db_fetch_array(db_select("select id, afd from ansatte where initialer = '{$r['ref']}'", __FILE__ . " linje " . __LINE__));
        } else {
            $r2 = db_fetch_array(db_select("select id, afd from ansatte where navn = '{$r['ref']}'", __FILE__ . " linje " . __LINE__));
        }
        $afd = $r2['afd'] * 1;
        #sikkerhed for at 'afd' har en vaerdi
        $ansat = $r2['id'] * 1;
        if ($no_faktbill == 1) {
            $bilag = '0';
        } else {
            $bilag = trim($fakturanr);
        }
        $udlign = 0;
    }
    #	if ($sum) {
    /*
    		if ($art=='PO' && $betalt >= $sum) {
    			$kontonr=0;
    			$konto_id=0;
    		}
    */
    if ($art != 'PO') {
        $r = db_fetch_array(db_select("select gruppe from adresser where id='{$konto_id}'", __FILE__ . " linje " . __LINE__));
        $debitorgruppe = $r['gruppe'];
        $r = db_fetch_array(db_select("select box1 from grupper where art='DG' and kodenr='{$debitorgruppe}'", __FILE__ . " linje " . __LINE__));
        $momskode = substr(trim($r['box1']), 1, 1);
        if ($moms && !$momskode) {
            return "Debitorgruppe {$debitorgruppe} ikke tilnkyttet en momsgruppe";
        }
    } else {
        #saa er det en kontantordre

$dato = date("d-m-Y");
$kurs = NULL;
$valuta = NULL;
$beskrivelse = NULL;
$kodenr = if_isset($_GET['kodenr']);
$id = if_isset($_GET['id']);
if (isset($_GET['ret'])) {
    print "<BODY onLoad=\"javascript:alert('Ved kursændring skal du ikke rette kursen, men tilføje en ny kurs med angivelse af dato for kursændringen.\\nEllers risikerer du at lave rod i dit regnskab ')\">";
}
if (isset($_POST['submit'])) {
    $dato = addslashes(if_isset($_POST['dato']));
    $kurs = addslashes(if_isset($_POST['kurs']));
    $valuta = addslashes(if_isset($_POST['valuta']));
    $beskrivelse = addslashes(if_isset($_POST['beskrivelse']));
    $difkto = if_isset($_POST['difkto']) * 1;
    $ny_valdate = usdate($dato);
    $ny_kurs = usdecimal($kurs);
    $r = db_fetch_array(db_select("select max(transdate) as transdate from transaktioner where valuta = '{$kodenr}'", __FILE__ . " linje " . __LINE__));
    $transdate = $r['transdate'];
    if ($ny_valdate <= $transdate) {
        print "<BODY onLoad=\"javascript:alert('Det er foretaget posteringer i {$vauta} efter {$dato}! Kursændring afbrudt')\">";
        $dato = NULL;
    }
    if (!($r = db_fetch_array(db_select("select id from kontoplan where kontonr='{$difkto}' and kontotype = 'D' and regnskabsaar= '{$regnaar}'")))) {
        print "<BODY onLoad=\"javascript:alert('Driftkonto {$difkto} eksisterer ikke')\">";
        $difkto = '';
        $kodenr = -1;
    }
    #cho "$difkto && is_numeric($kodenr) && $dato && $kurs && $dato!=\"-\" && $kurs!=\"-\"<br>";
    if ($difkto && is_numeric($kodenr) && $dato && $kurs && $dato != "-" && $kurs != "-") {
        if ($id) {

$mailmodt_id = $r['box1'];
$email = $r['box2'];
$ffdage = $r['box5'];
$chkdate = $r['box8'];
if (!$ffdage || $chkdate == $dd) {
    echo '';
} else {
    $rykkerdate = usdate(forfaldsdag($dd, 'netto', $ffdage));
    $x = 0;
    $konto_id = array();
    $x = 0;
    #	$q=db_select("select openpost.* from openpost,adresser where openpost.udlignet = '0' and openpost.forfaldsdate >= '$rykkerdate' and openpost.amount>'0' and adresser.id=openpost.konto_id and adresser.art = 'D' order by openpost.konto_id",__FILE__ . " linje " . __LINE__);
    $q = db_select("select openpost.* from openpost,adresser where openpost.udlignet = '0' and openpost.amount>'0' and adresser.id=openpost.konto_id and adresser.art = 'D' order by openpost.konto_id", __FILE__ . " linje " . __LINE__);
    while ($r = db_fetch_array($q)) {
        # echo "$r[forfaldsdate] <= $dd<br>";
        $rykkerdate = usdate(forfaldsdag($r['forfaldsdate'], 'netto', $ffdage));
        #	echo "$rykkerdate <= $dd<br>";
        if ($rykkerdate <= $dd) {
            if (!db_fetch_array(db_select("select id from ordrelinjer where enhed = '{$r['id']}'", __FILE__ . " linje " . __LINE__))) {
                #Tjekker om der allerede eksisterer en rykker på ordren.
                if (!in_array($r['konto_id'], $konto_id)) {
                    $konto_id[$x] = $r['konto_id'];
                    #Liste over konto id numre der skal rykkes
                    $x++;
                }
            }
        }
    }
    $ff_antal = $x;
    #echo "$ff_antal $rykkerdate <br>";
    #exit;

function opdater_varer($kodenr, $art, $box1, $box2, $box3, $box4)
{
    if ($art == 'VPG' && $kodenr) {
        if ($box1) {
            $box1 = usdecimal($box1);
        }
        if ($box2) {
            $box2 = usdecimal($box2);
        }
        if ($box3) {
            $box3 = usdecimal($box3);
        }
        if ($box4) {
            $box4 = usdecimal($box4);
        }
        if ($box1) {
            db_modify("update varer set kostpris='{$box1}' where prisgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        if ($box2) {
            db_modify("update varer set salgspris='{$box2}' where prisgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        if ($box3) {
            db_modify("update varer set retail_price='{$box3}' where prisgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        if ($box4) {
            db_modify("update varer set tier_price='{$box4}' where prisgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        return $box1 . ";" . $box2 . ";" . $box3 . ";" . $box4;
    }
    if ($art == 'VTG' && $kodenr) {
        if ($box1) {
            $box1 = usdecimal($box1);
        }
        if ($box2) {
            $box2 = usdecimal($box2);
        }
        if ($box3) {
            $box3 = usdate($box3);
        }
        if ($box4) {
            $box4 = usdate($box4);
        }
        if ($box1) {
            db_modify("update varer set special_price='{$box1}' where tilbudgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        if ($box2) {
            db_modify("update varer set campaign_cost='{$box2}' where tilbudgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        if ($box3) {
            db_modify("update varer set special_from_date='{$box3}' where tilbudgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        if ($box4) {
            db_modify("update varer set special_to_date='{$box4}' where tilbudgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        return $box1 . ";" . $box2 . ";" . $box3 . ";" . $box4;
    }
    if ($art == 'VRG' && $kodenr) {
        if ($box2) {
            $box2 = usdecimal($box2);
        }
        if ($box3) {
            $box3 = usdecimal($box3);
        }
        if ($box1) {
            db_modify("update varer set m_type='{$box1}' where rabatgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        if ($box2) {
            db_modify("update varer set m_rabat='{$box2}' where rabatgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
        if ($box3) {
            db_modify("update varer set m_antal='{$box3}' where rabatgruppe = '{$kodenr}'", __FILE__ . " linje " . __LINE__);
        }
    }
}

function flyt_data($kladde_id, $filnavn, $splitter, $feltnavn, $feltantal, $bilag, $datoformat)
{
    global $charset;
    transaktion('begin');
    $splitter = chr(9);
    $fp = fopen($filnavn . "2", "r");
    if ($fp) {
        $x = 0;
        while (!feof($fp)) {
            $skriv_linje = 0;
            if ($linje = trim(fgets($fp))) {
                $x++;
                $skriv_linje = 1;
                $felt = array();
                $felt = explode($splitter, $linje);
                for ($y = 0; $y <= $feltantal; $y++) {
                    $felt[$y] = trim($felt[$y]);
                    if (substr($felt[$y], 0, 1) == '"' && substr($felt[$y], -1) == '"') {
                        $felt[$y] = substr($felt[$y], 1, strlen($felt[$y]) - 2);
                    }
                    if ($feltnavn[$y] == 'dato') {
                        $felt[$y] = datotjek($datoformat, $felt[$y]);
                    }
                    #					if ($feltnavn[$y]=='dato') $felt[$y]=str_replace(".","-",$felt[$y]);
                    if ($feltnavn[$y] == 'belob') {
                        if (nummertjek($felt[$y]) == 'US') {
                            $felt[$y] = dkdecimal($felt[$y]);
                        } elseif (nummertjek($felt[$y]) != 'DK') {
                            $skriv_linje = 0;
                        }
                    }
                }
            }
            if ($skriv_linje == 1) {
                for ($y = 0; $y <= $feltantal; $y++) {
                    $bilag = $bilag * 1;
                    if ($feltnavn[$y] == 'bilag') {
                        $bilag = $felt[$y] * 1;
                    }
                    if ($feltnavn[$y] == 'belob') {
                        $amount = usdecimal($felt[$y]);
                    } elseif ($feltnavn[$y] == "dato") {
                        $transdate = usdate($felt[$y]);
                    } elseif ($feltnavn[$y] == "beskrivelse") {
                        $beskrivelse = addslashes($felt[$y]);
                    } elseif ($feltnavn[$y] == "debet") {
                        $d_type = "F";
                        $debet = $felt[$y];
                    } elseif ($feltnavn[$y] == "kredit") {
                        $d_type = "F";
                        $kredit = $felt[$y];
                    } elseif ($feltnavn[$y] == "debitor") {
                        $d_type = "D";
                        $debet = $felt[$y];
                    } elseif ($feltnavn[$y] == "kreditor") {
                        $k_type = "K";
                        $kredit = $felt[$y];
                    } elseif ($feltnavn[$y] == "fakturanr") {
                        $fakturanr = addslashes($felt[$y]);
                    }
                }
                if (!$transdate) {
                    $transdate = date('Y-m-d');
                }
                #20150105
                if ($amount * 1 != 0) {
                    #					$debet=$debet*1;$kredit=$kredit*1;
                    $felttext1 = NULL;
                    $felttext2 = NULL;
                    if (is_numeric($debet)) {
                        $felttext1 = "d_type,debet,";
                        $felttext2 = "'{$d_type}','{$debet}',";
                    }
                    if (is_numeric($kredit)) {
                        $felttext1 = $felttext1 . "k_type,kredit,";
                        $felttext2 = $felttext2 . "'{$k_type}','{$kredit}',";
                    }
                    db_modify("insert into kassekladde (bilag, transdate, beskrivelse,{$felttext1} faktura, amount, kladde_id) values ('{$bilag}', '{$transdate}', '{$beskrivelse}',{$felttext2} '{$fakturanr}','{$amount}', '{$kladde_id}')", __FILE__ . " linje " . __LINE__);
                    if (!in_array('bilag', $feltnavn)) {
                        $bilag++;
                    }
                }
            }
        }
    }
    fclose($fp);
    unlink($filnavn);
    # sletter filen.
    unlink($filnavn . "2");
    # sletter filen.
    transaktion('commit');
    print "<meta http-equiv=\"refresh\" content=\"0;URL=kassekladde.php?kladde_id={$kladde_id}\">";
}

if (isset($_POST['kontosaldo'])) {
    $rapportart = 'kontosaldo';
}
if (isset($_POST['kontokort'])) {
    $rapportart = 'kontokort';
}
if (isset($_POST['dato'])) {
    $dato = $_POST['dato'];
    list($dato_fra, $dato_til) = explode(":", $dato);
    #	if (!$dato_til) {
    #		$dato_til=$dato_fra;
    #		$dato_fra='010100';
    #	}
    # echo "dato $dato | $dato_fra | $dato_til<br>";
    $fromdate = usdate($dato_fra);
    $todate = usdate($dato_til);
    # echo "dato $dato | $dato_fra | $dato_til<br>";
}
if (isset($_POST['konto'])) {
    $konto = $_POST['konto'];
    list($konto_fra, $konto_til) = explode(":", $konto);
    if (is_numeric($konto_fra) && !$konto_til) {
        $konto_til = $konto_fra;
    }
    # echo "konto $dato | $konto_fra | $konto_til<br>";
}
#echo "R $rapportart<br>";
$husk = if_isset($_POST['husk']);
if (isset($_POST['salgsstat']) && $_POST['salgsstat']) {
    if ($husk) {
        db_modify("update grupper set box1='{$husk}',box2='{$dato_fra}',box3='{$dato_til}',box4='{$konto_fra}',box5='{$konto_til}',box6='{$rapportart}' where art='DRV' and kodenr='{$bruger_id}'", __FILE__ . " linje " . __LINE__);

function autoudlign($udlign)
{
    $y = 0;
    $v = 0;
    #	global $regnaar;
    global $dato_til;
    #	if ($r = db_fetch_array(db_select("select box1, box2, box3, box4 from grupper where art='RA' and kodenr='$regnaar'",__FILE__ . " linje " . __LINE__))){
    #		if ($maaned_til <= $r['box3']) $slut="31-".trim($maaned_til)."-".$slutaar=trim($r['box4']);
    #		else $slut="31-".trim($maaned_til)."-".$slutaar=trim($r['box2']);
    #
    if (!$dato_til) {
        $periodeslut = '2999-12-31';
    } else {
        $periodeslut = usdate($dato_til);
    }
    transaktion('begin');
    $udlign = $udlign * 1;
    #cho "udlign $udlign<br>";
    if ($udlign > 0) {
        #sker kun når kontoens saldo er 0
        db_modify("update openpost set udlignet='0' where udlignet is NULL and konto_id='{$udlign}'", __FILE__ . " linje " . __LINE__);
        db_modify("update openpost set udlign_id='0' where udlign_id is NULL and konto_id='{$udlign}'", __FILE__ . " linje " . __LINE__);
        $q1 = db_select("SELECT MAX(udlign_id) as udlign_id from openpost", __FILE__ . " linje " . __LINE__);
        if ($r1 = db_fetch_array($q1)) {
            $y = $r1['udlign_id'];
        }
        $tilfoj = "konto_id={$udlign} and udlignet!='1' and";
    } else {
        $tilfoj = "udlignet='1' and";
    }
    #cho "tilføj: $tilfoj<br>";
    $sum = 0;
    for ($i = 1; $i <= 5; $i++) {
        $udligndate = "1970-01-01";
        $kontrol = array();
        $x = 0;
        $qtxt = "SELECT id, faktnr,amount,konto_id,transdate,valutakurs from openpost where {$tilfoj} ";
        if ($i <= 2) {
            $qtxt .= "faktnr != '' and transdate <= '{$periodeslut}' and udlign_id = '0' order by transdate";
        } elseif ($i == 3) {
            $qtxt .= "faktnr != '' and transdate <= '{$periodeslut}' and udlign_id = '0' order by transdate";
        } elseif ($i == 4) {
            $qtxt .= "faktnr = '' and transdate <= '{$periodeslut}' and udlign_id = '0' order by transdate";
        } elseif ($i == 5) {
            $qtxt .= "udlign_id = '0' and transdate <= '{$periodeslut}' order by transdate";
        }
        #cho __line__." X $x $qtxt<br>";
        $q1 = db_select($qtxt, __FILE__ . " linje " . __LINE__);
        while ($r1 = db_fetch_array($q1)) {
            #cho "R1 $r1[id]<br>";
            if (!in_array($r1['id'], $kontrol)) {
                $x++;
                $id[$x] = $r1['id'];
                #cho "ID $id[$x]<br>";
                $faktnr[$x] = $r1['faktnr'];
                $amount[$x] = $r1['amount'] * -1;
                if ($r1['transdate'] > $udligndate) {
                    $udligndate = $r1['transdate'];
                }
                $sum += $r1['amount'] * $r1['valutakurs'] / 100;
                $konto_id[$x] = $r1['konto_id'];
            }
            #cho __line__." $sum Amount $amount[$x]<br>";
        }
        $faktantal = $x;
        if ($sum == 0) {
            $y++;
            for ($x = 1; $x <= $faktantal; $x++) {
                #cho "update openpost set udlignet='1', udlign_id='$y', udlign_date='$udligndate' where id='$id[$x]'<br>";
                db_modify("update openpost set udlignet='1', udlign_id='{$y}', udlign_date='{$udligndate}' where id='{$id[$x]}'", __FILE__ . " linje " . __LINE__);
            }
        } else {
            #cho "faktantal $faktantal<br>";
            for ($x = 1; $x <= $faktantal; $x++) {
                if ($i == 1) {
                    $qtxt = "SELECT id, transdate, faktnr from openpost where {$tilfoj} id != '{$id[$x]}' and amount='{$amount[$x]}' and konto_id='{$konto_id[$x]}' and udlignet='1' and transdate <= '{$periodeslut}' and udlign_id = '0' order by transdate";
                } elseif ($i == 2) {
                    $qtxt = "SELECT id, transdate from openpost where {$tilfoj} id != '{$id[$x]}' and amount='{$amount[$x]}' and konto_id='{$konto_id[$x]}' and  udlign_id = '0' and udlignet='1'  and transdate <= '{$periodeslut}' order by transdate";
                } elseif ($i <= 4) {
                    $qtxt = "SELECT id, transdate from openpost where {$tilfoj} id != '{$id[$x]}' and amount='{$amount[$x]}' and konto_id='{$konto_id[$x]}' and  udlign_id = '0' and udlignet='1'  and transdate <= '{$periodeslut}' order by transdate";
                } elseif ($i == 5) {
                    $qtxt = "SELECT id, transdate from openpost where {$tilfoj} id != '{$id[$x]}' and  udlign_id = '0' and transdate <= '{$periodeslut}'";
                }
                $z = 0;
                #cho __line__." X $x $qtxt<br>";
                $q1 = db_select($qtxt, __FILE__ . " linje " . __LINE__);
                if (($r1 = db_fetch_array($q1)) && !in_array($r1[id], $kontrol)) {
                    $z++;
                    $id2 = $r1['id'];
                    #cho "ID2 $id2<br>	";
                    $transdate = $r1['transdate'];
                }
                if ($z == 1 && !in_array($id[$x], $kontrol) && !in_array($id2, $kontrol)) {
                    $y++;
                    $v++;
                    $kontrol[$v] = $id[$x];
                    $v++;
                    $kontrol[$v] = $id2;
                    #cho __line__." update openpost set udlignet='1', udlign_id='$y', udlign_date='$transdate' where id='$id[$x]'<br>";
                    db_modify("update openpost set udlignet='1', udlign_id='{$y}', udlign_date='{$transdate}' where id='{$id[$x]}'", __FILE__ . " linje " . __LINE__);
//.........这里部分代码省略.........

function kontosaldo($dato_fra, $dato_til, $konto_fra, $konto_til, $rapportart, $kontoart)
{
    #	global $connection;
    global $top_bund;
    global $md;
    global $returside;
    global $popup;
    global $bgcolor;
    global $bgcolor5;
    global $menu;
    $kilde = if_isset($_GET['kilde']);
    $kilde_kto_fra = if_isset($_GET['kilde_kto_fra']);
    $kilde_kto_til = if_isset($_GET['kilde_kto_til']);
    if ($popup) {
        $returside = "../includes/luk.php";
    } elseif ($kilde == 'openpost') {
        $returside = "rapport.php?rapportart=openpost&submit=ok&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$kilde_kto_fra}&konto_til={$kilde_kto_til}";
    } else {
        $returside = "rapport.php?dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$konto_fra}&konto_til={$konto_til}";
    }
    $returside = "rapport.php?dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$konto_fra}&konto_til={$konto_til}";
    $luk = "<a accesskey=L href=\"{$returside}\">";
    $currentdate = date("Y-m-d");
    if ($dato_fra && $dato_til) {
        $fromdate = usdate($dato_fra);
        $todate = usdate($dato_til);
    } elseif ($dato_fra && !$dato_til) {
        #		$fromdate=usdate($dato_fra);
        $todate = usdate($dato_fra);
    }
    print "<table width = 100% cellpadding=\"1\" cellspacing=\"1\" border=\"0\"><tbody>";
    if ($menu == 'T') {
        if ($kontoart == 'K') {
            $returnpath = "../kreditor/";
        } else {
            $returnpath = "../debitor/";
        }
        $leftbutton = "<a title=\"Klik her for at komme til startsiden\" href=\"{$returnpath}/rapport.php\" accesskey=\"L\">LUK</a>";
        $rightbutton = NULL;
        $vejledning = NULL;
        include "../includes/topmenu.php";
        print "<div id=\"topmenu\" style=\"position:absolute;top:6px;right:0px\">";
    } elseif ($menu == 'S') {
        include "../includes/sidemenu.php";
    } else {
        print "<tr><td colspan=\"8\" height=\"8\">";
        print "<table width=\"100%\" align=\"center\" border=\"0\" cellspacing=\"3\" cellpadding=\"0\"><tbody>";
        #B
        print "<td width=\"10%\" {$top_bund}>{$luk} Luk</a></td>";
        if ($kontoart == 'K') {
            $tekst = "Kreditorrapport - kontosaldo";
        } else {
            $tekst = "Debitorapport - kontosaldo";
        }
        print "<td width=\"80%\" {$top_bund}>{$tekst}</td>";
        print "<td width=\"10%\" {$top_bund}><br></td>";
        print "</tbody></table>";
        #B slut
        print "</td></tr>\n";
    }
    if (is_numeric($konto_fra) && is_numeric($konto_fra)) {
        $qtxt = "select id from adresser where " . nr_cast('kontonr') . ">='{$konto_fra}' and " . nr_cast('kontonr') . "<='{$konto_til}' and art = '{$kontoart}' order by " . nr_cast('kontonr') . "";
    } elseif ($konto_fra && $konto_fra != '*') {
        $konto_fra = str_replace("*", "%", $konto_fra);
        $tmp1 = strtolower($konto_fra);
        $tmp2 = strtoupper($konto_fra);
        $qtxt = "select id from adresser where (firmanavn like '{$konto_fra}' or lower(firmanavn) like '{$tmp1}' or upper(firmanavn) like '{$tmp2}') and art = '{$kontoart}' order by firmanavn";
    } else {
        $qtxt = "select id from adresser where art = '{$kontoart}' order by firmanavn";
    }
    # #cho "qtxt $qtxt<br>";
    $kontonr = array();
    $x = 0;
    $query = db_select("{$qtxt}", __FILE__ . " linje " . __LINE__);
    while ($row = db_fetch_array($query)) {
        $x++;
        $konto_id[$x] = $row[id];
    }
    $kto_id = array();
    $kontoantal = $x;
    $x = 0;
    # finder alle konti med bevaegelser i den anfoerte periode eller aabne poster fra foer perioden
    for ($y = 1; $y <= $kontoantal; $y++) {
        #		if ($fromdate && $todate) $qtxt="select amount from openpost where transdate>='$fromdate' and transdate<='$todate' and konto_id='$konto_id[$y]'";
        if ($todate) {
            $qtxt = "select amount from openpost where transdate<='{$todate}' and konto_id='{$konto_id[$y]}'";
        } else {
            $qtxt = "select amount from openpost where konto_id='{$konto_id[$y]}'";
        }
        # #cho "Z $qtxt<br>";
        $query = db_select("{$qtxt}", __FILE__ . " linje " . __LINE__);
        while ($row = db_fetch_array($query)) {
            if (!in_array($konto_id[$y], $kto_id)) {
                $x++;
                $kto_id[$x] = $konto_id[$y];
            }
        }
    }
    $kontoantal = $x;
    for ($x = 1; $x <= $kontoantal; $x++) {
//.........这里部分代码省略.........

$qtxt="select * from adresser where art = $art order by firmanavn";
$q=db_select($qtxt,__FILE__ . " linje " . __LINE__);
while($r=db_fetch_array($q)){
	$konto_id[$x]=$r['konto_id'];
	$kontonr[$x]=$r['kontonr'];
	$firmanavn[$x]=$r['firmanavn'];
	$x;
}
*/
$x = 0;
$y = 0;
$qtxt = "select ordrelinjer.vare_id,ordrelinjer.varenr,ordrelinjer.beskrivelse,ordrelinjer.antal,ordrelinjer.pris,ordrelinjer.rabat,";
$qtxt .= "ordrer.konto_id,ordrer.kontonr,ordrer.firmanavn,ordrer.id,ordrer.fakturadate from ordrer,ordrelinjer,adresser ";
$qtxt .= "where ordrelinjer.ordre_id=ordrer.id and adresser.id=ordrer.konto_id and adresser.art='{$art}' ";
if ($dato_fra && $dato_til) {
    $qtxt .= "and ordrer.fakturadate>='" . usdate($dato_fra) . "' and ordrer.fakturadate<='" . usdate($dato_til) . "' ";
}
if ($konto_fra && $konto_til) {
    $qtxt .= "and ordrer.kontonr>='{$konto_fra}' and ordrer.kontonr<='{$konto_til}' ";
} elseif ($kontonr) {
    $qtxt .= "and ordrer.kontonr like '" . str_replace('*', '%', $kontonr) . "' ";
}
if ($firmanavn) {
    $qtxt .= "and lower(ordrer.firmanavn) like '" . str_replace('*', '%', strtolower($firmanavn)) . "' ";
}
if ($adresse) {
    $qtxt .= "and ordrer.adresse like '" . str_replace('*', '%', strtolower($adresse)) . "' ";
}
if ($postnr) {
    $qtxt .= "and ordrer.postnr like '" . str_replace('*', '%', strtolower($postnr)) . "' ";
}