} elseif ((strpos($vis_felt[$x], "date") || $vis_felt[$x] == "nextfakt") && ($find[$x] || $find[$x] == "0")) {
if ($vis_felt[$x] == "nextfakt") {
$genfakturer = "1";
}
$tmp2 = "ordrer." . $tmp . "";
$udvaelg = $udvaelg . udvaelg($find[$x], $tmp2, 'DATO');
} elseif ($vis_felt[$x] == "sum" && ($find[$x] || $find[$x] == "0")) {
$tmp2 = "ordrer." . $tmp . "";
$udvaelg = $udvaelg . udvaelg($find[$x], $tmp2, 'BELOB');
} elseif ($vis_felt[$x] == "email" && $find[$x]) {
#20121004
$tmp2 = "ordrer." . $tmp . "";
$udvaelg = $udvaelg . udvaelg($find[$x], $tmp2, '');
} elseif ($find[$x] || $find[$x] == "0") {
$tmp2 = "ordrer." . $tmp . "";
$udvaelg = $udvaelg . udvaelg($find[$x], $tmp2, 'NR');
}
# }
}
if ($udvaelg) {
$linjeantal = 10000;
}
if (strstr($sortering, 'fakturanr')) {
if ($db_type == 'mysql') {
$sortering = str_replace("fakturanr", "CAST(ordrer.fakturanr AS SIGNED)", $sortering);
} else {
$sortering = str_replace("fakturanr", "to_number(textcat('0',ordrer.fakturanr),text(99999999))", $sortering);
}
} else {
$sortering = "ordrer." . $sortering;
}
$udvaelg = $udvaelg .= udvaelg($felt03, 'postnr', 'NR');
}
if ($felt04) {
$udvaelg = $udvaelg . udvaelg($felt04, 'tlf', 'TEKST');
}
if ($felt05) {
$udvaelg = $udvaelg . udvaelg($felt05, 'felt_2', 'TEKST');
}
if ($felt06) {
$udvaelg = $udvaelg . udvaelg($felt06, 'felt_4', 'TEKST');
}
if ($felt07) {
$udvaelg = $udvaelg . udvaelg($felt07, 'felt_8', 'TEKST');
}
if ($felt08) {
$udvaelg = $udvaelg . udvaelg($felt08, 'felt_1', 'NR');
}
$ialt = 0;
if ($konto_id) {
$udvaelg .= "and konto_id={$konto_id} ";
}
$q = db_select("select * from jobkort where id > 0 {$udvaelg} order by {$sort}", __FILE__ . " linje " . __LINE__);
while ($r = db_fetch_array($q)) {
$ialt++;
$job = "job" . $r['id'];
$firmanavn = stripslashes($r['firmanavn']);
$tlf = stripslashes($r['tlf']);
$postnr = stripslashes($r['postnr']);
$felt_1 = stripslashes($r['felt_1']);
$felt_2 = stripslashes($r['felt_2']);
$felt_3 = stripslashes($r['felt_3']);
}
if ($beskrivelse[0]) {
$x = udvaelg($x, $beskrivelse[0], $beskrivelse[$x]);
#|| $ean[0] || $prisgruppe[0] || $beskrivelse[0] || $enhed[0] || $salgspris[0] || $kostpris[0]) {
}
if ($enhed[0]) {
$x = udvaelg($x, $enhed[0], $enhed[$x]);
#|| $ean[0] || $prisgruppe[0] || $beskrivelse[0] || $enhed[0] || $salgspris[0] || $kostpris[0]) {
}
if ($salgspris[0]) {
$a = usdecimal($salgspris[0]);
$x = udvaelg($x, $a, $salgspris[$x]);
#|| $ean[0] || $prisgruppe[0] || $beskrivelse[0] || $enhed[0] || $salgspris[0] || $kostpris[0]) {
}
if ($kostpris[0]) {
$x = udvaelg($x, $kostpris[0], $kostpris[$x]);
#|| $ean[0] || $prisgruppe[0] || $beskrivelse[0] || $enhed[0] || $salgspris[0] || $kostpris[0]) {
}
if ($x > $s**t) {
break 1;
}
# S**t solar (fast format)
} elseif (stristr($prisfil, "maxmc")) {
$x++;
$splitter = ",";
if ($charset == 'UTF-8' && $tegnset != 'UTF-8') {
$linje = utf8_encode($linje);
} elseif ($charset != 'UTF-8' && $tegnset == 'UTF-8') {
$linje = utf8_decode($linje);
}
$felt = array();
function udskriv($idnumre, $bilagsnumre, $kladdenumre, $fakturanumre, $kontonumre, $transdatoer, $logdatoer, $debetbelob, $kreditbelob, $logtid, $beskrivelse, $sort, $start, $skriv, $projektnumre)
{
global $bgcolor;
global $bgcolor5;
global $linjeantal;
global $regnaar;
global $vis_projekt;
global $rettigheder;
global $csv;
if ($sort == 'id') {
$sort = 'transaktioner.id';
}
$ret_projekt = substr($rettigheder, 1, 1);
if ($csv) {
$fp = fopen("../temp/{$db}/kontrolspor.csv", "w");
fwrite($fp, "Id" . chr(9) . "Dato" . chr(9) . "Logdato" . chr(9) . "Logtid" . chr(9) . "Kladde id" . chr(9) . "Bilag" . chr(9) . "Kontonr" . chr(9) . "Kontonavn" . chr(9) . "Faktura" . chr(9) . "Debet" . chr(9) . "Kredit" . chr(9) . "Projekt" . chr(9) . "Beskrivelse\n");
}
$udvaelg = '';
if ($idnumre) {
$udvaelg = $udvaelg . udvaelg($idnumre, 'transaktioner.id', 'NR');
}
if ($bilagsnumre) {
$udvaelg = $udvaelg . udvaelg($bilagsnumre, 'transaktioner.bilag', 'NR');
}
if ($kladdenumre) {
$udvaelg = $udvaelg . udvaelg($kladdenumre, 'transaktioner.kladde_id', 'NR');
}
if ($fakturanumre) {
$udvaelg = $udvaelg . udvaelg($fakturanumre, 'transaktioner.faktura', 'TEXT');
}
if ($kontonumre) {
$udvaelg = $udvaelg . udvaelg($kontonumre, 'transaktioner.kontonr', 'NR');
}
if ($transdatoer) {
$udvaelg = $udvaelg . udvaelg($transdatoer, 'transaktioner.transdate', 'DATO');
}
if ($logdatoer) {
$udvaelg = $udvaelg . udvaelg($logdatoer, 'transaktioner.logdate', 'DATO');
}
if ($debetbelob) {
$udvaelg = $udvaelg . udvaelg($debetbelob, 'transaktioner.debet', 'BELOB');
}
if ($kreditbelob) {
$udvaelg = $udvaelg . udvaelg($kreditbelob, 'transaktioner.kredit', 'BELOB');
}
if ($projektnumre) {
$udvaelg = $udvaelg . udvaelg($projektnumre, 'transaktioner.projekt', '');
}
if ($logtid) {
$udvaelg = $udvaelg . udvaelg($logtid, 'transaktioner.logtime', 'TID');
}
$udvaelg = trim($udvaelg);
if (substr($udvaelg, 0, 3) == 'and') {
$udvaelg = "where" . substr($udvaelg, 3);
}
if ($sort == "logdate") {
$sort = $sort . ", logtime";
}
$beskrivelse = trim(strtolower($beskrivelse));
if (substr($beskrivelse, 0, 1) == '*') {
$beskrivelse = substr($beskrivelse, 1);
$startstjerne = 1;
}
if (substr($beskrivelse, -1, 1) == '*') {
$beskrivelse = substr($beskrivelse, 0, strlen($beskrivelse) - 1);
$slutstjerne = 1;
}
$b_strlen = strlen($beskrivelse);
if (!$udvaelg) {
$udvaelg = "where";
} else {
$udvaelg = $udvaelg . " and";
}
$x = 0;
# echo "select transaktioner.*, kontoplan.beskrivelse as kontonavn from transaktioner, kontoplan $udvaelg kontoplan.regnskabsaar='$regnaar' and kontoplan.kontonr = transaktioner.kontonr order by $sort<br>";
$query = db_select("select transaktioner.*, kontoplan.beskrivelse as kontonavn from transaktioner, kontoplan {$udvaelg} kontoplan.regnskabsaar='{$regnaar}' and kontoplan.kontonr = transaktioner.kontonr order by {$sort}", __FILE__ . " linje " . __LINE__);
while ($row = db_fetch_array($query)) {
if ($beskrivelse && $row['beskrivelse']) {
$udskriv = 0;
if ($startstjerne) {
if ($slutstjerne) {
if (strpos(strtolower($row['beskrivelse']), $beskrivelse)) {
$udskriv = 1;
}
} elseif (substr(strtolower($row['beskrivelse']), -$b_strlen, $b_strlen) == $beskrivelse) {
$udskriv = 1;
}
} elseif ($slutstjerne) {
if (substr(strtolower($row['beskrivelse']), 0, $b_strlen) == $beskrivelse) {
$udskriv = 1;
}
} elseif (strtolower($row['beskrivelse']) == $beskrivelse) {
$udskriv = 1;
}
} else {
$udskriv = 1;
}
if ($udskriv) {
$x++;
}
# echo "(($x>=$start)&&($x<$start+$linjeantal) && ($udskriv))<br>";
if ($x >= $start && $x < $start + $linjeantal && $udskriv || $csv) {
$y++;
if ($csv || $skriv) {
# echo "Y1 $y<br>";
$transdato = dkdato($row['transdate']);
$logdato = dkdato($row['logdate']);
$debetsum = afrund($debetsum + $row['debet'], 2);
$kreditsum = afrund($kreditsum + $row['kredit'], 2);
if ($skriv && !$csv) {
if ($linjebg != $bgcolor) {
$linjebg = $bgcolor;
$color = '#000000';
} else {
$linjebg = $bgcolor5;
$color = '#000000';
}
print "<tr bgcolor=\"{$linjebg}\">";
print "<td align=right> {$row['id']}</span><br></td>";
print "<td align=right> {$transdato}<br></td>";
print "<td align=right> {$logdato}<br></td>";
print "<td align=right>" . substr($row['logtime'], 0, 5) . "<br></td>";
print "<td align=right> {$row['kladde_id']}<br></td>";
print "<td align=right> {$row['bilag']}<br></td>";
print "<td align=right><span title='{$row['kontonavn']}'>{$row['kontonr']}<br></span></td>";
print "<td align=right> {$row['faktura']}<br></td>";
if ($row[debet]) {
print "<td align=right> " . dkdecimal($row['debet']) . "<br></td>";
} else {
print "<td> </td>";
}
if ($row[kredit]) {
print "<td align=right> " . dkdecimal($row['kredit']) . "<br></td>";
} else {
print "<td> </td>";
}
if ($vis_projekt) {
$row['projekt'] && $ret_projekt ? $title = "Projektnummeret kan rettes ved at klikke her" : ($title = NULL);
$ret_projekt ? $tmp = "<a href=\"../includes/ret_transaktion.php?id={$row['id']}&felt=projekt\">{$row['projekt']}</a>" : ($tmp = $row['projekt']);
print "<td align=right title=\"{$title}\">{$tmp}<br></td>";
}
print "<td> {$row['beskrivelse']}<br></td>";
print "</tr>\n";
}
if ($csv) {
fwrite($fp, $row['id'] . chr(9) . $transdato . chr(9) . $logdato . chr(9) . substr($row['logtime'], 0, 5) . chr(9) . $row['kladde_id'] . chr(9) . $row['bilag'] . chr(9) . $row['kontonr'] . chr(9) . utf8_decode(stripslashes($row['kontonavn'])) . chr(9) . $row['faktura'] . chr(9) . dkdecimal($row['debet']) . chr(9) . dkdecimal($row['kredit']) . chr(9) . $row['projekt'] . chr(9) . utf8_decode(stripslashes($row['beskrivelse'])) . "\n");
}
}
}
}
if ($csv) {
fclose($fp);
print "<BODY onLoad=\"JavaScript:window.open('../temp/{$db}/kontrolspor.csv' ,'' ,'{$jsvars}');\">\n";
}
if (!$csv && ($debetsum || $kreditsum)) {
$vis_projekt ? $colspan = 12 : ($colspan = 11);
print "<tr><td colspan=\"{$colspan}\"><hr></td></tr>";
print "<td colspan=8>Kontrolsum<br></td><td align=right>" . dkdecimal($debetsum) . "<br></td><td align=right>" . dkdecimal($kreditsum) . "<br></td><td><br></td></tr>";
}
# print "<tr><td colspan=11><hr></td></tr>";
# echo "Y2 $y<br>";
return $y;
}
$udvaelg = $udvaelg . udvaelg($fakturadatoer, 'fakturadate', 'DATO');
}
if ($genfaktdatoer) {
$udvaelg = $udvaelg . udvaelg($genfaktdatoer, 'nextfakt', 'DATO');
}
if ($ref[0]) {
$udvaelg = $udvaelg . " and ref='{$ref['0']}'";
}
if ($projekt[0]) {
$udvaelg = $udvaelg . " and projekt='{$projekt['0']}'";
}
if ($summer) {
$udvaelg = $udvaelg . udvaelg($summer, 'sum', 'BELOB');
}
if ($kontoid) {
$udvaelg = $udvaelg . udvaelg($kontoid, 'konto_id', 'NR');
}
if ($valg == "forslag") {
$ialt = 0;
$query = db_select("select * from ordrer where (art = 'KO' or art = 'KK') and status < 1 {$udvaelg} order by {$sort}", __FILE__ . " linje " . __LINE__);
while ($row = db_fetch_array($query)) {
$ordre = "ordre" . $row['id'];
$sum = $row['sum'];
$kostpris = $row['kostpris'];
$valutakurs = $row['valutakurs'];
if ($tidspkt - $row[tidspkt] > 3600 || $row[hvem] == $brugernavn) {
if ($popup) {
$javascript = "onClick=\"javascript:{$ordre}=window.open('ordre.php?tjek={$row['id']}&id={$row['id']}&returside=ordreliste.php','{$ordre}','scrollbars=1,resizable=1');{$ordre}.focus();\" onMouseOver=\"this.style.cursor = 'pointer'\" ";
$understreg = '<span style="text-decoration: underline;">';
$hrefslut = "";
} else {
function udskriv($fakturadatoer, $logtime, $afdelinger, $sort, $nysort, $idnumre, $fakturanumre, $summer, $betalinger, $betalinger2, $modtagelser, $modtagelser2, $kasser, $refs, $linjeantal, $sort, $start, $skriv, $borde, $status)
{
global $bgcolor;
global $bgcolor5;
global $linjeantal;
global $regnaar;
global $bet_sum;
global $bet_type;
global $bordnavn;
global $omsaet;
global $modtaget;
global $retursum;
if ($borde && count($bordnavn)) {
for ($x = 0; $x < count($bordnavn); $x++) {
if ($bordnavn[$x] == $borde) {
$bordnr = $x;
}
}
}
$r = db_fetch_array(db_select("select box5 from grupper where art='DIV' and kodenr='3'", __FILE__ . " linje " . __LINE__));
$straksbogfor = $r['box5'];
$udvaelg = '';
if ($status) {
$udvaelg = $udvaelg . udvaelg($status, 'ordrer.status', 'NR');
}
if ($idnumre) {
$udvaelg = $udvaelg . udvaelg($idnumre, 'ordrer.id', 'NR');
}
if ($fakturanumre) {
$udvaelg = $udvaelg . udvaelg($fakturanumre, 'ordrer.fakturanr', 'NR');
}
if ($betalinger) {
$udvaelg = $udvaelg . udvaelg($betalinger, 'ordrer.felt_1', '');
}
# if ($betalinger2) $udvaelg=$udvaelg.udvaelg($betalinger2, 'ordrer.felt_3', '');
if ($fakturadatoer) {
$udvaelg = $udvaelg . udvaelg($fakturadatoer, 'ordrer.fakturadate', 'DATO');
}
if ($modtagelser) {
$udvaelg = $udvaelg . udvaelg($modtagelser, 'ordrer.felt_2', 'TEXT');
}
# if ($modtagelser2) $udvaelg=$udvaelg.udvaelg($modtagelser2, 'ordrer.felt_4', 'TEXT');
if ($summer) {
$udvaelg = $udvaelg . udvaelg($summer, 'ordrer.sum+ordrer.moms', 'BELOB');
}
# if ($modtagelser) $udvaelg=$udvaelg.udvaelg($modtagelser, 'ordrer.felt_5', 'TEXT');
if ($kasser) {
$udvaelg = $udvaelg . udvaelg($kasser, 'ordrer.felt_5', 'NR');
}
if ($borde && ($bordnr || $bordnr == '0')) {
$udvaelg = $udvaelg . udvaelg($bordnr, 'ordrer.nr', 'NR');
}
if ($refs) {
$udvaelg = $udvaelg . udvaelg($refs, 'ordrer.ref', '');
}
$udvaelg = trim($udvaelg);
if (substr($udvaelg, 0, 3) == 'and') {
$udvaelg = "where" . substr($udvaelg, 3);
}
if ($sort == "logdate") {
$sort = $sort . ", logtime";
}
if (!$udvaelg) {
$udvaelg = "where";
} else {
$udvaelg = $udvaelg . " and";
}
$x = 0;
if ($straksbogfor) {
$qtxt = "select * from ordrer {$udvaelg} art = 'PO' order by {$sort}";
} else {
$qtxt = "select * from ordrer {$udvaelg} (art = 'PO' or art like 'D%') order by {$sort}";
}
$q = db_select("{$qtxt}", __FILE__ . " linje " . __LINE__);
while ($r = db_fetch_array($q)) {
$ordrestatus[$x] = $r['status'];
$id[$x] = $r['id'];
$fakturadato[$x] = dkdato($r['fakturadate']);
$tidspkt[$x] = substr($r['tidspkt'], -5);
$fakturanr[$x] = $r['fakturanr'];
$kasse[$x] = $r['felt_5'];
$bord[$x] = $r['nr'];
$ref[$x] = $r['ref'];
$sum[$x] = $r['sum'];
$moms[$x] = $r['moms'];
$dkksum[$x] = dkdecimal($sum[$x] + $moms[$x]);
$x++;
}
for ($x = 0; $x < count($id); $x++) {
$udskriv = 1;
if ($x >= $start && $x < $start + $linjeantal && $udskriv) {
$y++;
if ($skriv) {
$omsaet += $sum[$x] + $moms[$x];
if ($linjebg != $bgcolor) {
$linjebg = $bgcolor;
$color = '#000000';
} else {
$linjebg = $bgcolor5;
$color = '#000000';
}
$y = 0;
$ordre_id = array();
$q2 = db_select("select * from pos_betalinger where ordre_id = '{$id[$x]}' order by betalingstype");
while ($r2 = db_fetch_array($q2)) {
if (!$y) {
$betalt = 0;
}
if (!is_numeric($r2['betalingstype'])) {
$ordre_id[$y] = $r2['ordre_id'];
$amount[$y] = $r2['amount'];
$modtaget += $amount[$y];
$betalt += $amount[$y];
$betalingstype[$y] = $r2['betalingstype'];
for ($z = 0; $z < count($bet_type); $z++) {
if (strtolower($bet_type[$z]) == strtolower($betalingstype[$y])) {
$bet_sum[$z] += $amount[$y];
}
}
$y++;
}
}
for ($y = 0; $y < count($ordre_id); $y++) {
print "<tr bgcolor=\"{$linjebg}\">";
print "<td>{$ordrestatus[$x]}</td>";
print "<td align=right>{$id[$x]}</span><br></td>\n";
print "<td align=right>{$fakturadato[$x]}<br></td>\n";
print "<td align=right>{$tidspkt[$x]}<br></td>\n";
print "<td align=right>{$fakturanr[$x]}<br></td>\n";
print "<td align=right>{$kasse[$x]}<br></td>\n";
print "<td align=right>" . $bordnavn[$bord[$x]] . "<br></td>\n";
print "<td align=right>{$ref[$x]}<br></td>\n";
print "<td align=right>{$dkksum[$x]}<br></td>\n";
print "<td align=right>{$betalingstype[$y]}<br></td>\n";
print "<td align=right>" . dkdecimal($amount[$y], 2) . "<br></td>\n";
$retur = $betalt - ($sum[$x] + $moms[$x]);
if ($ordre_id[$y] != $ordre_id[$y + 1]) {
print "<td align=right>" . dkdecimal($retur) . "<br></td>\n";
$retursum += $retur;
} else {
print "<td align=right><br></td>\n";
}
}
}
}
}
# if ($debetsum || $kreditsum) {
# print "<tr><td colspan=11><hr></td></tr>";
# print "<td colspan=8>Kontrolsum<br></td><td align=right>".dkdecimal($debetsum)."<br></td><td align=right>".dkdecimal($kreditsum)."<br></td><td><br></td></tr>";
# }
# print "<tr><td colspan=11><hr></td></tr>";
return $y;
}
