function varegruppe($date_from, $date_to, $varenr, $varenavn, $varegruppe, $detaljer, $vk_kost, $afd)
{
# global $connection;
global $top_bund;
global $md;
global $returside;
global $jsvars;
if ($detaljer) {
$cols = 9;
} else {
$cols = 11;
}
list($gruppenr, $tmp) = explode(":", $varegruppe);
# if ($returside) $luk= "<a accesskey=L href=\"$returside\">";
# else
$luk = "<a accesskey=L href=\"rapport.php?varegruppe={$varegruppe}&afd={$afd}&date_from={$date_from}&date_to={$date_to}&varenr={$varenr}&varenavn={$varenavn}&detaljer={$detaljer}\">";
print "<table width = 100% cellpadding=\"1\" cellspacing=\"1\" border=\"0\"><tbody>";
print "<tr><td colspan=\"{$cols}\" height=\"9\">";
print "<table width=\"100%\" align=\"center\" border=\"0\" cellspacing=\"3\" cellpadding=\"0\"><tbody>";
#B
print "<td width=\"10%\" {$top_bund}>{$luk} Luk</a></td>";
print "<td width=\"80%\" {$top_bund}>Rapport - varesalg";
if ($afd) {
$r = db_fetch_array(db_select("select beskrivelse from grupper where art = 'AFD' and kodenr = '{$afd}'", __FILE__ . " linje " . __LINE__));
print " - afd {$afd} {$r['beskrivelse']}";
}
print "</td>";
print "<td width=\"10%\" {$top_bund}><br></td>";
print "</tbody></table>";
#B s**t
print "</td></tr>";
$lagergruppe = array();
if ($gruppenr) {
$qtxt = "select box8,box9 from grupper where kodenr ='{$gruppenr}' and art='VG'";
$r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__));
$batch_kontrol = $r['box9'];
if ($r['box8'] == 'on') {
$lagergruppe[0] = $gruppenr;
}
} else {
$x = 0;
$qtxt = "select kodenr,box8,box9 from grupper where art='VG' order by kodenr";
$q = db_select($qtxt, __FILE__ . " linje " . __LINE__);
while ($r = db_fetch_array($q)) {
if ($r['box8'] == 'on') {
$lagergruppe[$x] = $r['kodenr'];
$x++;
}
}
}
$antal = 0;
$k_antal = 0;
$s_antal = 0;
$kontonr = array();
$x = 0;
$tmp = "";
if ($gruppenr) {
$tmp = "where " . nr_cast(gruppe) . "={$gruppenr}";
}
if ($varenr && $varenr != '*') {
if (strstr($varenr, "*")) {
if (substr($varenr, 0, 1) == '*') {
$varenr = "%" . substr($varenr, 1);
}
if (substr($varenr, -1, 1) == '*') {
$varenr = substr($varenr, 0, strlen($varenr) - 1) . "%";
}
}
$low = strtolower($varenr);
$upp = strtoupper($varenr);
if ($tmp) {
$tmp .= " and (varenr LIKE '" . db_escape_string($varenr) . "' or lower(varenr) LIKE '" . db_escape_string($low) . "' or upper(varenr) LIKE '" . db_escape_string($upp) . "')";
} else {
$tmp = "where (varenr LIKE '" . db_escape_string($varenr) . "' or lower(varenr) LIKE '" . db_escape_string($low) . "' or upper(varenr) LIKE '" . db_escape_string($upp) . "')";
}
}
if ($varenavn && $varenavn != '*') {
if (strstr($varenavn, "*")) {
if (substr($varenavn, 0, 1) == '*') {
$varenavn = "%" . substr($varenavn, 1);
}
if (substr($varenavn, -1, 1) == '*') {
$varenavn = substr($varenavn, 0, strlen($varenavn) - 1) . "%";
}
}
$low = strtolower($varenavn);
$upp = strtoupper($varenavn);
if ($tmp) {
$tmp .= " and (beskrivelse LIKE '" . db_escape_string($varenavn) . "' or lower(beskrivelse) LIKE '" . db_escape_string($low) . "' or upper(beskrivelse) LIKE '" . db_escape_string($upp) . "')";
} else {
$tmp = "where (beskrivelse LIKE '" . db_escape_string($varenavn) . "' or lower(beskrivelse) LIKE '" . db_escape_string($low) . "' or upper(beskrivelse) LIKE '" . db_escape_string($upp) . "')";
}
}
$qtxt = "select id,gruppe,samlevare from varer {$tmp} order by beskrivelse";
$x = 0;
$query = db_select("{$qtxt}", __FILE__ . " linje " . __LINE__);
while ($row = db_fetch_array($query)) {
if (!$row['samlevare'] || in_array($row['gruppe'], $lagergruppe)) {
#20151105
$x++;
$vare_id[$x] = $row['id'];
}
#cho "A $vare_id[$x]<br>";
}
$v_id = array();
$x = 0;
# finder alle konti med bevaegelser i den anfoerte periode eller aabne poster fra foer perioden
$qtxt = "select batch_salg.vare_id,batch_salg.pris from batch_salg,varer";
if ($afd) {
$qtxt .= ",ordrer";
}
$qtxt .= " where batch_salg.fakturadate>='{$date_from}' and batch_salg.fakturadate<='{$date_to}' and batch_salg.vare_id = varer.id";
if ($afd) {
$qtxt .= " and batch_salg.ordre_id = ordrer.id and ordrer.afd='{$afd}'";
}
$qtxt .= " order by varer.beskrivelse";
$query = db_select($qtxt, __FILE__ . " linje " . __LINE__);
while ($row = db_fetch_array($query)) {
if (in_array(trim($row['vare_id']), $vare_id) && !in_array(trim($row['vare_id']), $v_id)) {
$x++;
$v_id[$x] = trim($row['vare_id']);
#cho "B $v_id[$x]<br>";
}
}
#cho "select vare_id, pris from batch_kob where fakturadate>='$date_from' and fakturadate<='$date_to' order by vare_id<br>";
$query = db_select("select batch_kob.vare_id,batch_kob.pris from batch_kob,varer where batch_kob.fakturadate>='{$date_from}' and batch_kob.fakturadate<='{$date_to}' and batch_kob.vare_id = varer.id order by varer.beskrivelse", __FILE__ . " linje " . __LINE__);
while ($row = db_fetch_array($query)) {
if (in_array(trim($row['vare_id']), $vare_id) && !in_array(trim($row['vare_id']), $v_id)) {
$x++;
$v_id[$x] = trim($row['vare_id']);
}
}
$vareantal = $x;
# print "<tr><td colspan=8><hr></td></tr>";
# print "<tr><td width=10%> Dato</td><td width=10%> Bilag</td><td width=50%> Tekst</td><td width=10% align=right> Debet</td><td width=10% align=right> Kredit</td><td width=10% align=right> Saldo</td></tr>";
if (!$detaljer) {
print "<tr><td><b>Varenr.</b></td>\n\t\t\t\t<td><b>Enhed</b></td>\n\t\t\t\t<td><b>Beskrivelse</b></td>\n\t\t\t\t<td align=\"right\"><b>Købt</b></td>\n\t\t\t\t<td align=\"right\"><b>Købspris</b></td>\n\t\t\t\t<td align=\"right\"><b>Solgt</b></td>\n\t\t\t\t<td align=\"right\"><b>Salgspris</b></td>\n\t\t\t\t<td align=\"right\"><b>Reguleret</b></td>\n\t\t\t\t<td align=\"right\"><b>DB</b></td>\n\t\t\t\t<td align=\"right\"><b>DG</b></td>\n\t\t\t\t<td align=\"right\"><b>Til- / afgang</b></td></tr>";
}
$tt_kobt = 0;
$tt_solgt = 0;
$tt_regul = 0;
$tt_k_pris = 0;
$tt_s_pris = 0;
$tt_kost = 0;
$tt_db = 0;
$varenr = array();
$enhed = array();
$beskrivelse = array();
for ($x = 1; $x <= $vareantal; $x++) {
$r = db_fetch_array(db_select("select * from varer where id={$v_id[$x]}", __FILE__ . " linje " . __LINE__));
$varenr[$x] = $r['varenr'];
$enhed[$x] = $r['enhed'];
$beskrivelse[$x] = $r['beskrivelse'];
$v_kostpris[$x] = $r['kostpris'];
$samlevare[$x] = $r['samlevare'];
}
for ($x = 1; $x <= $vareantal; $x++) {
$y = 0;
$fakturadate = array();
$bk_id = array();
$linje_id = array();
$k_ordre_id = array();
$k_antal = array();
$pris = array();
$t_kobt = 0;
$t_regul = 0;
$t_k_pris = 0;
$t_moms = 0;
$qtxt = "select * from batch_kob where vare_id='{$v_id[$x]}' order by fakturadate,ordre_id";
$q = db_select($qtxt, __FILE__ . " linje " . __LINE__);
while ($r = db_fetch_array($q)) {
$ok = 1;
if ($r['fakturadate'] && $r['fakturadate'] <= $date_to && $r['fakturadate'] >= $date_from) {
$bk_id[$y] = $r['id'];
$linje_id[$y] = $r['linje_id'];
$fakturadate[$y] = $r['fakturadate'];
$k_ordre_id[$y] = $r['ordre_id'];
if ($vk_kost) {
$k_antal[$y] = $r['antal'];
$pris[$y] = $v_kostpris;
} else {
$k_antal[$y] = $r['antal'];
$pris[$y] = $r['pris'];
}
if ($linje_id[$y]) {
$qtxt = "select momssats,momsfri,omvbet from ordrelinjer where id='{$linje_id[$y]}'";
if ($r1 = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__))) {
$momssats[$y] = $r1['momssats'];
$momsfri[$y] = $r1['momsfri'];
$omvbet[$y] = $r1['omvbet'];
if ($momsfri[$y] || $omvbet[$y]) {
$moms[$y] = 0;
} elseif ($momssats[$y] == '') {
$momssats[$y] = find_varemomssats($linje_id[$y]);
} else {
$moms[$y] = $pris[$y] / 100 * $momssats[$y];
}
} else {
$ok = 0;
}
} else {
if (!$k_ordre_id[$y]) {
$t_regul += $k_antal[$y];
$tt_regul += $k_antal[$y];
}
$ok = 0;
}
if ($ok) {
$t_kobt += $k_antal[$y];
$t_k_pris += $pris[$y] * $k_antal[$y];
$tt_kobt += $k_antal[$y];
$tt_k_pris += $pris[$y] * $k_antal[$y];
$t_moms += $moms[$y];
}
$y++;
} else {
# if ($r['ordre_id']) $tt_kobt=$r['antal'];
# else $tt_regul+=$r['antal'];
}
}
if ($detaljer) {
print "<tr><td colspan=\"{$cols}\"><hr></td></tr>";
print "<tr><td><br></td></tr>";
print "<tr><td><br></td></tr>";
print "<tr><td colspan=\"3\">{$varenr[$x]}</td></tr>";
print "<tr><td colspan=\"3\">{$enhed[$x]}</td></tr>";
print "<tr><td colspan=\"3\">{$beskrivelse[$x]}</td></tr>";
print "<tr><td><br></td></tr>";
print "<tr><td>Købsdato</td><td align=\"right\">Antal</td><td align=\"right\">Pris</td><td align=\"right\">Moms</td><td align=\"right\">Incl. moms</td><td align=\"right\">Ordre</td></tr>";
print "<tr><td colspan=\"{$cols}\"><hr></td></tr>";
for ($y = 0; $y < count($k_antal); $y++) {
if ($k_ordre_id[$y]) {
if ($detaljer) {
print "<tr><td>" . dkdato($fakturadate[$y]) . "</td><td align=\"right\">" . dkdecimal($k_antal[$y], 2) . "</td>";
}
$linjepris = $pris[$y] * $k_antal[$y];
$kobssum += $t_kobt;
print "<td align=\"right\">" . dkdecimal($pris[$y], 2) . "</td><td align=\"right\">" . dkdecimal($moms[$y], 2) . "</td><td align=\"right\">" . dkdecimal($pris[$y] + $moms[$y], 2) . "</td>";
print "<td align=right onClick=\"javascript:k_ordre=window.open('../kreditor/ordre.php?id={$k_ordre_id[$y]}&returside=../includes/luk.php','k_ordre','width=800,height=400,{$jsvars}')\"> <u>Se</u></td></tr>";
}
}
print "<tr><td colspan=\"{$cols}\"><hr></td></tr>";
print "<tr><td></td><td align=\"right\"><b>" . dkdecimal($t_kobt, 2) . "</b></td><td align=\"right\"><b>" . dkdecimal($t_k_pris, 2) . "</b></td><td align=\"right\"><b>" . dkdecimal($t_moms, 2) . "</b></td><td align=\"right\"><b>" . dkdecimal($t_k_pris + $t_moms, 2) . "</b></td></tr>";
print "<tr><td colspan=\"{$cols}\"><hr></td></tr>";
}
$fakturadate = array();
$bs_id = array();
$linje_id = array();
$s_ordre_id = array();
$s_antal = array();
$pris = array();
$t_solgt = 0;
# $t_regul=0;
$t_s_pris = 0;
$t_kost = 0;
$t_moms = 0;
$t_db = 0;
$y = 0;
$qtxt = "select * from batch_salg";
if ($afd) {
$qtxt .= ",ordrer";
}
$qtxt .= " where batch_salg.vare_id='{$v_id[$x]}'";
if ($afd) {
$qtxt .= " and batch_salg.ordre_id=ordrer.id and ordrer.afd={$afd}";
}
$qtxt .= " order by batch_salg.fakturadate";
$q = db_select($qtxt, __FILE__ . " linje " . __LINE__);
while ($r = db_fetch_array($q)) {
$ok = 1;
if ($r['fakturadate'] && $r['fakturadate'] <= $date_to && $r['fakturadate'] >= $date_from) {
$bs_id[$y] = $r['id'];
$fakturadate[$y] = $r['fakturadate'];
$s_antal[$y] = $r['antal'];
$pris[$y] = $r['pris'];
$s_ordre_id[$y] = $r['ordre_id'];
$linje_id[$y] = $r['linje_id'];
if ($linje_id[$y]) {
if ($r1 = db_fetch_array(db_select("select ordrelinjer.id,ordrelinjer.kostpris,ordrelinjer.momssats,ordrelinjer.momsfri,ordrelinjer.omvbet from ordrelinjer where ordrelinjer.id='{$linje_id[$y]}'", __FILE__ . " linje " . __LINE__))) {
if ($vk_kost) {
$kostpris[$y] = $v_kostpris;
} else {
$kostpris[$y] = $r1['kostpris'];
}
$momssats[$y] = $r1['momssats'];
$momsfri[$y] = $r1['momsfri'];
$omvbet[$y] = $r1['omvbet'];
if ($momsfri[$y] || $omvbet[$y]) {
$moms[$y] = 0;
} elseif ($momssats[$y] == '') {
$momssats[$y] = find_varemomssats($linje_id[$y]);
} else {
$moms[$y] = $pris[$y] / 100 * $momssats[$y];
}
} else {
$ok = 0;
}
list($koordpr, $koordnr, $koordant, $koordid, $koordart) = explode(chr(9), find_kostpris($v_id[$x], $linje_id[$y]));
$kobs_ordre_pris = explode(",", $koordpr);
$ko_ant[$y] = count($kobs_ordre_pris);
$kobs_ordre_id = explode(",", $koordid);
$kobs_ordre_antal = explode(",", $koordant);
$kobs_ordre_art = explode(",", $koordart);
#20151210 ->
if ($ko_ant[$y]) {
$kostpris[$y] = 0;
for ($z = 0; $z < $ko_ant[$y]; $z++) {
$kostpris[$y] += $kobs_ordre_pris[$z];
}
$kostpris[$y] /= $ko_ant[$y];
} elseif ($vk_kost) {
$kostpris[$y] = $v_kostpris;
}
} else {
$ok = 0;
}
if ($ok) {
#<- 20151210
if ($s_ordre_id[$y]) {
$t_solgt += $s_antal[$y];
$t_s_pris += $pris[$y] * $s_antal[$y];
$tt_solgt += $s_antal[$y];
$tt_s_pris += $pris[$y] * $s_antal[$y];
$t_moms += $moms[$y] * $s_antal[$y];
$t_kost += $kostpris[$y] * $s_antal[$y];
$tt_kost += $kostpris[$y] * $s_antal[$y];
$db[$y] = $pris[$y] - $kostpris[$y];
$t_db += $db[$y] * $s_antal[$y];
$tt_db += $db[$y] * $s_antal[$y];
if ($s_antal[$y] < 0) {
$db[$y] *= -1;
}
# 20160201 # Flyttet under sammentælling
if ($pris[$y] != 0) {
$dg[$y] = $db[$y] * 100 / $pris[$y];
} else {
$dg[$y] = 0;
}
} else {
$t_regul += $s_antal[$y];
$tt_regul += $s_antal[$y];
}
}
$y++;
} else {
# if ($r['ordre_id']) $tt_solgt+=$r['antal'];
# else $tt_regul+=$r['antal'];
}
}
if ($t_s_pris && $t_db) {
$t_dg = $t_db * 100 / $t_s_pris;
} else {
$t_dg = 100;
}
if ($detaljer) {
print "<tr><td>Salgsdato</td><td align=\"right\">Antal</td><td align=\"right\">Pris</td><td align=\"right\">Moms</td><td align=\"right\">Incl.moms</td><td align=\"right\">Kostpris</td><td align=\"right\">DB</td><td align=\"right\">DG</td><td align=\"right\">Ordre</td></tr>";
for ($y = 0; $y < count($linje_id); $y++) {
if ($s_ordre_id[$y]) {
print "<tr><td>" . dkdato($fakturadate[$y]) . "</td><td align=right>" . dkdecimal($s_antal[$y], 2) . "</td>";
print "<td align=right>" . dkdecimal($pris[$y], 2) . "</td>";
print "<td align=right>" . dkdecimal($moms[$y], 2) . "</td>";
print "<td align=right>" . dkdecimal($pris[$y] + $moms[$y], 2) . "</td>";
print "<td align=right>" . dkdecimal($kostpris[$y], 2) . "</td>";
print "<td align=right>" . dkdecimal($db[$y], 2) . "</td>";
print "<td align=right> " . dkdecimal($dg[$y], 2) . "%</td>";
print "<td align=right onClick=\"javascript:s_ordre=window.open('../debitor/ordre.php?id={$s_ordre_id[$y]}&returside=../includes/luk.php','s_ordre','width=800,height=400,{$jsvars}')\"> <u>Se</u></td></tr>";
}
}
print "<tr><td colspan=\"{$cols}\"><hr></td></tr>";
print "<tr><td></td>";
print "<td align=right> <b>" . dkdecimal($t_solgt, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($t_s_pris, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($t_moms, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($t_s_pris + $t_moms, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($t_kost, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($t_db, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($t_dg, 2) . "%</b></td></tr>";
print "<tr><td colspan=\"{$cols}\"><hr></td></tr>";
print "<tr><td>Lagerreguleret</td><td align=\"right\">Antal</td></tr>";
for ($y = 0; $y < count($bk_id); $y++) {
if (!$k_ordre_id[$y]) {
print "<tr><td>" . dkdato($fakturadate[$y]) . "</td><td align=right>" . dkdecimal($k_antal[$y], 2) . "</td></tr>";
}
}
for ($y = 0; $y < count($bs_id); $y++) {
if (!$s_ordre_id[$y]) {
print "<tr><td>" . dkdato($fakturadate[$y]) . "</td><td align=right>-" . dkdecimal($s_antal[$y], 2) . "</td></tr>";
#20160418
}
}
print "<tr><td colspan=\"{$cols}\"><hr></td></tr>";
print "<tr><td>Samlet til-/afgang i perioden</td><td align=right> <b>" . dkdecimal($t_kobt + $t_regul - $t_solgt, 2) . "</b></td><tr>";
#20151105
} else {
print "<tr><td>{$varenr[$x]}</td>";
print "<td>{$enhed[$x]}</td>";
print "<td>{$beskrivelse[$x]}</td>";
print "<td align=right>" . dkdecimal($t_kobt, 2) . "</td>";
print "<td align=right>" . dkdecimal($t_k_pris, 2) . "</td>";
print "<td align=right>" . dkdecimal($t_solgt, 2) . "</td>";
print "<td align=right>" . dkdecimal($t_s_pris, 2) . "</td>";
print "<td align=right>" . dkdecimal($t_regul, 2) . "</td>";
print "<td align=right>" . dkdecimal($t_db, 2) . "</td>";
print "<td align=right>" . dkdecimal($t_dg, 2) . "%</td>";
print "<td align=right>" . dkdecimal($t_kobt + $t_regul - $t_solgt, 2) . "</td><tr>";
#20151105
}
if ($detaljer) {
print "<tr><td colspan=\"{$cols}\"><hr></td></tr>";
}
}
if (!$detaljer) {
if ($tt_s_pris && $tt_db) {
$tt_dg = $tt_db * 100 / $tt_s_pris;
} else {
$tt_dg = 100;
}
print "<tr><td colspan=\"{$cols}\"><hr></td></tr>";
print "<tr><td Colspan=\"3\"><b>Summeret</b></td>\n\t\t\t\t<td align=\"right\">Købt</td>\n\t\t\t\t<td align=\"right\">Købspris</td>\n\t\t\t\t<td align=\"right\">Solgt</td>\n\t\t\t\t<td align=\"right\">Salgspris</td>\n\t\t\t\t<td align=\"right\">Reguleret</td>\n\t\t\t\t<td align=\"right\">DB</td>\n\t\t\t\t<td align=\"right\">DG</td>\n\t\t\t\t<td align=\"right\">Samlet til-/afgang i perioden</td></tr>";
print "<tr><td>{$varenr[$x]}</td>";
print "<td>{$enhed[$x]}</td>";
print "<td>{$beskrivelse[$x]}</td>";
print "<td align=right> <b>" . dkdecimal($tt_kobt, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($tt_k_pris, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($tt_solgt, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($tt_s_pris, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($tt_regul, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($tt_db, 2) . "</b></td>";
print "<td align=right> <b>" . dkdecimal($tt_dg, 2) . "%</b></td>";
print "<td align=right><b>" . dkdecimal($tt_kobt + $tt_regul - $tt_solgt, 2) . "</b></td><tr>";
}
/*
print "<tr><td colspan=9><hr></td></tr>";
print "<tr><td></td><td></td><td></td><td align=\"right\"><b>";
print dkdecimal($t_solgt);
# print "</b></td><td align=right> <b>".dkdecimal($talkob)."</b></td>";
print "<td align=right> <b>".dkdecimal($t_s_pris)."</b></td>";
print "<td align=right> <b>".dkdecimal($t_moms)."</b></td>";
print "<td align=right> <b>".dkdecimal($t_s_pris+$t_moms)."</b></td>";
$db[$y]=$t_s_pris-$t_kost;
print "<td align=right> <b>".dkdecimal($t_db)."</b></td>";
if ($tsalg!=0) {$dg[$y]=$db[$y]*100/$talsalg;}
else {$dg[$y]=100;}
print "<td align=right> <b>".dkdecimal($dg[$y])."</b></td></tr>";
print "<tr><td colspan=8><hr></td></tr>";
*/
print "</tbody></table>";
}
}
}
if (strstr($submit, 'Kred') && $vare_id[$x] && !$hurtigfakt) {
$antal[$x] = 0;
$query = db_select("select rest from batch_kob where vare_id = '{$vare_id[$x]}' and ordre_id = {$kred_ord_id}", __FILE__ . " linje " . __LINE__);
while ($row = db_fetch_array($query)) {
$antal[$x] = $antal[$x] - $row['rest'];
}
} elseif ($hurtigfakt && strstr($submit, 'Kred')) {
$antal[$x] = $antal[$x] * -1;
}
if ($serienr[$x]) {
$serienr[$x] = "on";
}
if ($varemomssats[$x] == '') {
$varemomssats[$x] = find_varemomssats($linje_id[$x]);
}
#20141106
if ($vare_id[$x]) {
db_modify("insert into ordrelinjer (ordre_id,posnr,varenr,vare_id,beskrivelse,enhed,antal,pris,rabat,serienr,lev_varenr,momsfri,kred_linje_id,momssats) values ('{$id}','{$x}','{$varenr[$x]}','{$vare_id[$x]}','{$beskrivelse[$x]}','{$enhed[$x]}',{$antal[$x]},'{$pris[$x]}','{$rabat[$x]}','{$serienr[$x]}','{$lev_varenr[$x]}','{$momsfri[$x]}','{$linje_id[$x]}','{$varemomssats[$x]}')", __FILE__ . " linje " . __LINE__);
} else {
db_modify("insert into ordrelinjer (ordre_id,posnr,beskrivelse,enhed) values ('{$id}','{$x}','{$beskrivelse[$x]}','{$enhed[$x]}')", __FILE__ . " linje " . __LINE__);
}
}
}
$vis = 1;
transaktion("commit");
}
if (isset($_POST['udskriv']) && $_POST['udskriv'] == 'Udskriv') {
$id = if_isset($_POST['id']);
$status = if_isset($_POST['status']);
