} elseif ($fokus == "rabat_ny" && $pris_ny != 'f') { $fokus = "antal_ny"; } if ($fokus == "antal_ny" && (substr($antal_ny, -1) == 'p' || substr($antal_ny, -1) == 'r')) { if (substr($antal_ny, -1) == 'p') { $fokus = 'pris_ny'; } else { $fokus = 'rabat_ny'; } if (strlen($antal_ny) > 1) { $antal_ny = substr($antal_ny, 0, strlen($antal_ny) - 1); } else { $antal_ny = 1; } } elseif ($fokus == "varenr_ny" && $varenr_ny == 'v') { vareopslag('PO', "", $fokus, $id, "", "", ""); } elseif ($fokus == "pris_ny" && substr($pris_ny, -1) == 'r') { $pris_ny = substr($pris_ny, 0, strlen($pris_ny) - 1); $fokus = "rabat_ny"; } elseif (isset($_POST['forfra']) && $id) { $r = db_fetch_array(db_select("select status from ordrer where id = '{$id}'", __FILE__ . " linje " . __LINE__)); $status = $r['status']; if ($status < 3) { $bordnr *= 1; $dd = date("Y-m-d"); db_modify("update ordrer set konto_id='0', kontonr='',firmanavn='',addr1='',addr2='',postnr='',bynavn='',land='',betalingsdage='0',betalingsbet='Kontant',\n\t\t\t\tcvrnr='',ean='',institution='',email='',kontakt='',art='PO',valuta='DKK',valutakurs='100',kundeordnr='',nr='0',ordredate='{$dd}' where id = '{$id}'", __FILE__ . " linje " . __LINE__); db_modify("delete from ordrelinjer where ordre_id='{$id}'", __FILE__ . " linje " . __LINE__); $varenr_ny = ''; $antal_ny = ''; $modtaget = ''; $betaling = '';
function opret_ordrelinje($id, $vare_id, $varenr, $antal, $beskrivelse, $pris, $rabat_ny, $procent, $art, $momsfri, $posnr, $linje_id, $incl_moms, $kdo, $rabatart, $kopi, $saet, $fast_db, $lev_varenr) { #20140426 #cho "zz $id,$vare_id,$varenr,$antal,$beskrivelse,P $pris,$rabat_ny,$procent,$art,$momsfri,$posnr,$linje_id,$incl_moms,$kdo,$rabatart,$kopi,$saet,$fast_db<br>"; #xit; if (!$id) { return "missing ordre ID"; } global $regnaar; global $momssats; global $formularsprog; global $sprog_id; global $webservice; global $procentfakt; global $status; global $vis_saet; $saet *= 1; $fast_db *= 1; $dd = date("Y-m-d"); $tt = date("H:i:s"); # if (!is_numeric($pris)) $pris=0; #20130903 - fjernet 20140124 if ($pris && $pris > 99999999) { return "Ulovlig værdi i prisfelt"; } #cho $pris." ".$pris*1 ."<br>"; if (!$regnaar) { $year = date("Y"); $month = date("m"); $del1 = "(box1<='{$month}' and box2<='{$year}' and box3>='{$month}' and box4>='{$year}')"; $del2 = "(box1<='{$month}' and box2<='{$year}' and box3<'{$month}' and box4>'{$year}')"; $del3 = "(box1>'{$month}' and box2<'{$year}' and box3>='{$month}' and box4>='{$year}')"; if ($r = db_fetch_array(db_select("select kodenr from grupper where art='RA' and {$del1} or {$del2} or {$del3}", __FILE__ . " linje " . __LINE__))) { $regnaar = $r['kodenr'] * 1; } elseif ($r = db_fetch_array(db_select("select max(kodenr) as kodenr from grupper where art='RA'", __FILE__ . " linje " . __LINE__))) { $regnaar = $r['kodenr'] * 1; } else { $regnaar = 1; } } $r = db_fetch_array(db_select("select ordrer.art as art,ordrer.status as status,ordrer.valutakurs as valutakurs,adresser.gruppe as debitorgruppe,adresser.rabatgruppe as debitorrabatgruppe from adresser,ordrer where ordrer.id='{$id}'and adresser.id=ordrer.konto_id", __FILE__ . " linje " . __LINE__)); $debitorgruppe = $r['debitorgruppe'] * 1; $debitorrabatgruppe = $r['debitorrabatgruppe'] * 1; $valutakurs = $r['valutakurs'] * 1; $status = $r['status']; if (!$art) { $art = $r['art']; } #20140424b if ($status >= 3) { #20131015 return "Der kan ikke tilføjes linjer i en bogført ordre"; exit; } $r = db_fetch_array(db_select("select box8,box9 from grupper where kodenr='{$debitorgruppe}' and art = 'DG'", __FILE__ . " linje " . __LINE__)); $b2b = $r['box8']; $omkunde = $r['box9']; $varenr = db_escape_string($varenr); $varenr_low = strtolower($varenr); $varenr_up = strtoupper($varenr); if ($r = db_fetch_array(db_select("SELECT id,vare_id,variant_type FROM variant_varer WHERE upper(variant_stregkode) = '{$varenr_up}'", __FILE__ . " linje " . __LINE__))) { $vare_id = $r['vare_id']; $variant_type = $r['variant_type']; $variant_id = $r['id']; } else { $variant_id = 0; $variant_type = ''; } $string = NULL; if (isset($vare_id) && $vare_id) { $string = "select * from varer where id='{$vare_id}'"; } elseif ($varenr) { $string = "select * from varer where lower(varenr) = '{$varenr_low}' or upper(varenr) = '{$varenr_up}' or varenr LIKE '{$varenr}' or lower(stregkode) = '{$varenr_low}' or upper(stregkode) = '{$varenr_up}' or stregkode LIKE '{$varenr}'"; } elseif ($id && $beskrivelse && $posnr) { $qtxt = "insert into ordrelinjer (ordre_id,vare_id,varenr,enhed,beskrivelse,antal,rabat,rabatart,procent,m_rabat,pris,kostpris,momsfri,momssats,posnr,projekt,folgevare,rabatgruppe,bogf_konto,kred_linje_id,kdo,serienr,variant_id,leveres,samlevare,omvbet,saet,fast_db,tilfravalg) values ('{$id}','0','','','{$beskrivelse}','0','0','','100','0','0','0','','0','{$posnr}','0','0','0','0','0','','','0','0','','{$omvbet}','{$saet}','{$fast_db}','')"; #cho "A $qtxt<br>"; db_modify($qtxt, __FILE__ . " linje " . __LINE__); } else { return "Manglende varenr eller beskrivelse"; } if ($string && ($r = db_fetch_array(db_select("{$string}", __FILE__ . " linje " . __LINE__)))) { $vare_id = $r['id']; $varenr = db_escape_string($r['varenr']); $enhed = db_escape_string($r['enhed']); $folgevare = $r['folgevare'] * 1; $tilfravalg = $r['tilfravalg']; $rabatgruppe = $r['rabatgruppe'] * 1; $varegruppe = $r['gruppe'] * 1; $samlevare = $r['samlevare']; $varerabatgruppe = $r['dvrg'] * 1; if (!$pris && $b2b) { $pris = $r['tier_price'] * 1; } $special_price = $r['special_price'] * 1; $serienr = $r['serienr']; $beholdning = $r['beholdning'] * 1; list($m_antal, $temp) = explode(";", $r['m_antal']); $m_antal = $m_antal * 1; if (!$beskrivelse) { $beskrivelse = db_escape_string(trim($r['beskrivelse'])); if ($formularsprog) { $r2 = db_fetch_array(db_select("select kodenr from grupper where art='VSPR' and box1 = '{$formularsprog}'", __FILE__ . " linje " . __LINE__)); $kodenr = $r2['kodenr'] * 1; $r2 = db_fetch_array(db_select("select tekst from varetekster where sprog_id='{$kodenr}' and vare_id='{$vare_id}'", __FILE__ . " linje " . __LINE__)); if ($r2['tekst']) { $beskrivelse = db_escape_string($r2['tekst']); } } } # if (!$posnr && $art!='PO' && $r2=db_fetch_array(db_select("select max(posnr) as posnr from ordrelinjer where ordre_id = '$id'",__FILE__ . " linje " . __LINE__))) { if (!$posnr && ($r2 = db_fetch_array(db_select("select max(posnr) as posnr from ordrelinjer where ordre_id = '{$id}'", __FILE__ . " linje " . __LINE__)))) { $posnr = $r2['posnr'] + 1; } elseif (!$posnr) { $posnr = 1; } if (!($r2 = db_fetch_array(db_select("select box4,box6,box7,box8 from grupper where art = 'VG' and kodenr = '{$varegruppe}'", __FILE__ . " linje " . __LINE__)))) { $alerttekst = findtekst(320, $sprog_id) . " {$varenr} " . findtekst(321, $sprog_id); return "{$alerttekst}"; } #cho __LINE__." $bogfkto = ".$r2['box4']."<br>"; $bogfkto = $r2['box4']; $omvare = $r2['box6']; $momsfri = $r2['box7']; $lagerfort = $r2['box8']; if (!$bogfkto) { $alerttekst = findtekst(319, $sprog_id) . " " . $varegruppe . "!"; print "<BODY onLoad=\"javascript:alert('{$alerttekst}')\">"; return "{$alerttekst}"; } #cho __LINE." P: ".$pris." ".$pris*1 ."<br>"; # if (($r2['box6']!=NULL)&&($rabatsats>$r2['box6'])) $rabatsats=$r2['box6']; if ($bogfkto && !$momsfri) { $r2 = db_fetch_array(db_select("select moms from kontoplan where kontonr = '{$bogfkto}' and regnskabsaar = '{$regnaar}'", __FILE__ . " linje " . __LINE__)); if ($tmp = trim($r2['moms'])) { # f.eks S3 $tmp = substr($tmp, 1); #f.eks 3 $r2 = db_fetch_array(db_select("select box2 from grupper where art = 'SM' and kodenr = '{$tmp}'", __FILE__ . " linje " . __LINE__)); if ($r2['box2']) { $varemomssats = $r2['box2'] * 1; } } else { $varemomssats = $momssats; } } else { $varemomssats = 0; } if (!$pris) { $ugedag = date('N'); $uxtid = date("U"); $tidspkt = date("H:i:s"); $qtxt = "select salgspris,kostpris from varetilbud where vare_id='{$vare_id}' and ugedag='{$ugedag}' and startdag<='{$uxtid}' and slutdag >='{$uxtid}' and starttid <='{$tidspkt}' and sluttid >='{$tidspkt}'"; $r2 = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); if ($r2['salgspris']) { $pris = $r2['salgspris']; $kostpris = $r2['kostpris']; } elseif ($special_price && $r['special_from_date'] <= $dd && $r['special_to_date'] >= $dd && $r['special_from_time'] <= $tt && $r['special_to_time'] >= $tt) { #$pris=$r['special_price']; $pris = $special_price; $kostpris = $r['campaign_cost'] * 1; } else { if ($pris != '0') { $pris = $r['salgspris'] * 1; } #20140124 $kostpris = $r['kostpris'] * 1; if ($pris == 0 && $kostpris < 1) { $fast_db = $kostpris; } } } elseif ($momsfri) { $kostpris = $r['kostpris'] * 1; } else { global $momssats; $ms = $varemomssats; if ($momssats < $ms) { $ms = $momssats; } if ($incl_moms) { $pris = $pris - $pris * $ms / (100 + $ms); } else { $pris *= 1; } #20140124 $kostpris = $r['kostpris'] * 1; } if ($pris && $r['salgspris'] == 0 && $kostpris < 1 && $kostpris > 0) { $fast_db = $kostpris; $kostpris = $pris * $kostpris; } } elseif (!$kopi) { if ($webservice) { #20150218 if ($varenr) { return "Varenr: {$varenr} eksisterer ikke"; } else { return '0'; } exit; } else { vareopslag($art, $sort, 'beskrivelse', $id, $vis_kost, $ref, '%' . $varenr . '%'); #20150215 exit; } return "Varenr: {$varenr} eksisterer ikke"; } #cho __LINE." P: ".$pris." ".$pris*1 ."<br>"; $vare_id *= 1; $m_rabat = 0; $rabat_ny *= 1; $r2 = db_fetch_array(db_select("select box11 from grupper where art = 'DIV' and kodenr = '3'", __FILE__ . " linje " . __LINE__)); $advar_negativ_lager = $r2['box11']; if ($art == 'DO' && $lagerfort && !$webservice && $advar_negativ_lager) { #20140131 $r = db_fetch_array(db_select("select beholdning from varer where id='{$vare_id}'", __FILE__ . " linje " . __LINE__)); $beholdning = $r['beholdning']; $r = db_fetch_array(db_select("select sum(ordrelinjer.antal) as antal, sum(ordrelinjer.leveret) as leveret from ordrelinjer,ordrer where ordrelinjer.vare_id='{$vare_id}' and ordrelinjer.ordre_id=ordrer.id and ordrer.art='DO' and ordrer.status<3", __FILE__ . " linje " . __LINE__)); $i_ordre = $r['antal'] - $r['leveret']; $raadig = $beholdning - $i_ordre; $tmp = $antal * 1; if (!$tmp) { $tmp = 1; } if ($raadig <= $tmp) { $alerttxt = "Beholdning:\\t{$beholdning}\\nI ordre:\\t\\t{$i_ordre}\\nTil rådighed:\\t{$raadig}"; print "<BODY onLoad=\"javascript:alert('{$alerttxt}')\">"; } } if ($linje_id && $art == 'DO') { $tmp = "id='{$linje_id}'"; } elseif ($art == 'PO') { $tmp = "vare_id = '{$vare_id}' and ordre_id='{$id}' and pris='{$pris}' and rabat='{$rabat_ny}' and variant_id='{$variant_id}' and tilfravalg=''"; } if (!$saet && (!$kopi && $linje_id && $art == 'DO' || $art == 'PO') && ($r = db_fetch_array(db_select("select rabat,posnr,id,antal from ordrelinjer where {$tmp}", __FILE__ . " linje " . __LINE__)))) { $antaldiff = $antal; $antal = $r['antal'] + $antal; if (($art != 'PO' || $antal) && $antaldiff && $r['id']) { db_modify("update ordrelinjer set m_rabat='0', antal=antal+{$antaldiff} where id = '{$r['id']}'", __FILE__ . " linje " . __LINE__); if ($samlevare == 'on') { db_modify("update ordrelinjer set antal=antal/{$r['antal']}*{$antal} where samlevare = '{$linje_id}'", __FILE__ . " linje " . __LINE__); } $r2 = db_fetch_array(db_select("select sum(antal) as antal from ordrelinjer where vare_id='{$vare_id}' and pris='{$pris}' and rabat='0' and ordre_id='{$id}'", __FILE__ . " linje " . __LINE__)); $tmpantal = $r2['antal']; if ($m_antal && $tmpantal >= $m_antal) { m_rabat($r['id'], $vare_id, $r['posnr'], $tmpantal, $id); } else { db_modify("update ordrelinjer set m_rabat='0' where ordre_id = '{$id}' and vare_id = '{$vare_id}'", __FILE__ . " linje " . __LINE__); } } elseif ($art == 'PO' && $r['id']) { db_modify("delete from ordrelinjer where id = '{$r['id']}'", __FILE__ . " linje " . __LINE__); } } else { if ($kopi || $rabat_ny) { $rabat = $rabat_ny; } else { if (!$debitorrabatgruppe && !db_fetch_array(db_select("select id from grupper where art='DRG'", __FILE__ . " linje " . __LINE__))) { $debitorrabatgruppe = $debitorgruppe; } if (!$varerabatgruppe && !db_fetch_array(db_select("select id from grupper where art='DVRG'", __FILE__ . " linje " . __LINE__))) { $varerabatgruppe = $varegruppe; } $r2 = db_fetch_array(db_select("select rabat,rabatart from rabat where vare='{$varerabatgruppe}' and debitor='{$debitorrabatgruppe}'", __FILE__ . " linje " . __LINE__)); $rabat = $r2['rabat'] * 1; $rabatart = $r2['rabatart']; } #cho __LINE__." P: ".$pris." ".$pris*1 ."<br>"; $linje_id && $art == 'DK' ? $kred_linje_id = $linje_id : ($kred_linje_id = '0'); #cho "$momssats if (!$varemomssats && $varemomssats!='0')<br>"; if (!$varemomssats && $varemomssats != '0') { $momsfri ? $varemomssats != '0' : ($varemomssats = $momssats); $varemomssats = $varemomssats * 1; } #cho __LINE__." P: ".$pris." ".$pris*1 ." $valutakur s&& $valutakurs!=100<br>"; if ($valutakurs && $valutakurs != 100) { $pris = $pris * 100 / $valutakurs; $kostpris = $kostpris * 100 / $valutakurs; } #cho __LINE__." P: ".$pris." ".$pris*1 ."<br>"; #cho "rabarart $rabatart<br>"; if ($variant_type) { $varianter = explode(chr(9), $variant_type); for ($y = 0; $y < count($varianter); $y++) { $qtxt = "select variant_typer.beskrivelse as vt_besk,varianter.beskrivelse as var_besk from variant_typer,varianter"; $qtxt .= " where variant_typer.id = '{$varianter[$y]}' and variant_typer.variant_id=varianter.id"; $r1 = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); $beskrivelse .= ", " . $r1['var_besk'] . ":" . $r1['vt_besk']; } } #cho __LINE__." P: ".$pris." ".$pris*1 ."<br>"; #cho "insert into ordrelinjer (ordre_id,vare_id,varenr,enhed,beskrivelse,antal,rabat,rabatart,m_rabat,pris,kostpris,momsfri,momssats,posnr,projekt,folgevare,rabatgruppe,bogf_konto,kred_linje_id,kdo,serienr,variant_id) values ('$id','$vare_id','$varenr','$enhed','$beskrivelse','$antal','$rabat','$rabatart','$m_rabat','$pris','$kostpris','$momsfri','$varemomssats','$posnr','0','$folgevare','$rabatgruppe','$bogfkto','$kred_linje_id','$kdo','$serienr','$variant_id')<br>"; # exit; $webservice ? $leveres = $antal : ($leveres = 0); if ($id && is_numeric($posnr)) { if ($samlevare && !$antal || $antal == '') { $antal = 1; } $omkunde && $omvare ? $omvbet = 'on' : ($omvbet = ''); $antal *= 1; $qtxt = "insert into ordrelinjer (ordre_id,vare_id,varenr,enhed,beskrivelse,antal,rabat,rabatart,procent,m_rabat,pris,kostpris,momsfri,momssats,posnr,projekt,folgevare,rabatgruppe,bogf_konto,kred_linje_id,kdo,serienr,variant_id,leveres,samlevare,omvbet,saet,fast_db,lev_varenr,tilfravalg) values ('{$id}','{$vare_id}','{$varenr}','{$enhed}','{$beskrivelse}','{$antal}','{$rabat}','{$rabatart}','{$procent}','{$m_rabat}','{$pris}','{$kostpris}','{$momsfri}','{$varemomssats}','{$posnr}','','{$folgevare}','{$rabatgruppe}','{$bogfkto}','{$kred_linje_id}','{$kdo}','{$serienr}','{$variant_id}','{$leveres}','{$samlevare}','{$omvbet}','{$saet}','{$fast_db}','{$lev_varenr}','')"; #cho "$qtxt<br>"; db_modify($qtxt, __FILE__ . " linje " . __LINE__); if ($samlevare && !$beholdning) { $r = db_fetch_array(db_select("select max(id) as id from ordrelinjer where vare_id='{$vare_id}' and ordre_id='{$id}'", __FILE__ . " linje " . __LINE__)); # samlevare($id,$art,$r['id'],$vare_id,$antal); udkommenteret 20131129 } } # finder antal af varen på ordren. #cho "select sum(antal) as antal from ordrelinjer where vare_id='$vare_id' and pris=$pris and ordre_id='$id<br>"; $r = db_fetch_array(db_select("select sum(antal) as antal from ordrelinjer where vare_id='{$vare_id}' and pris={$pris} and rabat='0' and ordre_id='{$id}'", __FILE__ . " linje " . __LINE__)); $tmpantal = $r['antal']; if ($m_antal && $tmpantal >= $m_antal) { $r2 = db_fetch_array(db_select("select max(id) as id from ordrelinjer where vare_id='{$vare_id}' and pris={$pris} and rabat='0' and ordre_id='{$id}'", __FILE__ . " linje " . __LINE__)); m_rabat($r2['id'], $vare_id, 0, $tmpantal, $id); } else { #cho "update ordrelinjer set m_rabat='0' where ordre_id = '$id' and vare_id = '$vare_id'<br>"; db_modify("update ordrelinjer set m_rabat='0' where ordre_id = '{$id}' and vare_id = '{$vare_id}'", __FILE__ . " linje " . __LINE__); } } if ($vis_saet && $status) { db_modify("update ordrer set felt_2='0' where id = '{$id}'", __FILE__ . " linje " . __LINE__); } $sum = $pris * $antal; #cho "retur Sum $sum<br>"; return $sum; # $varenr=$next_varenr; # $antal=NULL; }
kontoopslag($art, $sort, $fokus, $id, $kontonr, $firmanavn, $addr1, $addr2, $postnr, $bynavn, $kontakt); } if (strstr($fokus, 'addr2') && !$id) { kontoopslag($art, $sort, $fokus, $id, $kontonr, $firmanavn, $addr1, $addr2, $postnr, $bynavn, $kontakt); } if (strstr($fokus, 'postnr') && !$id) { kontoopslag($art, $sort, $fokus, $id, $kontonr, $firmanavn, $addr1, $addr2, $postnr, $bynavn, $kontakt); } if (strstr($fokus, 'bynavn') && !$id) { kontoopslag($art, $sort, $fokus, $id, $kontonr, $firmanavn, $addr1, $addr2, $postnr, $bynavn, $kontakt); } if (strstr($fokus, 'vare') && $art != 'DK') { vareopslag($art, $sort, 'varenr', $id, $vis_kost, $ref, $varenr[0]); } if (strstr($fokus, 'besk') && $beskrivelse[0] && $art != 'DK') { vareopslag($art, $sort, 'beskrivelse', $id, $vis_kost, $ref, $beskrivelse[0]); } if (strstr($fokus, 'besk')) { tekstopslag($sort, $id); } if (strstr($fokus, 'kontakt') && $id) { ansatopslag($sort, $fokus, $id, $vis, $kontakt); } if (strstr($fokus, 'lev_navn') && $id) { kontoopslag("{$art}", "{$sort}", "{$fokus}", "{$id}", "{$lev_navn}", '', '', '', '', ''); } elseif (strstr($fokus, 'kontakt')) { kontoopslag($art, $sort, $fokus, $id, $kontonr, $firmanavn, $addr1, $addr2, $postnr, $bynavn, $kontakt); } } elseif ($submit && !$kontonr && $id) { kontoopslag($art, $sort, $fokus, $id, $kontonr, $firmanavn, $addr1, $addr2, $postnr, $bynavn, $kontakt); exit;
if (strstr($submit, 'Kopi')) { for ($x = 1; $x <= $linjeantal; $x++) { if (!$vare_id[$x]) { $query = db_select("select id from varer where varenr = '{$varenr[$x]}'"); if ($row = db_fetch_array($query)) { $vare_id[$x] = $row[id]; } } db_modify("insert into ordrelinjer (ordre_id, posnr, varenr, vare_id, beskrivelse, enhed, antal, pris, rabat, serienr, lev_varenr) values ('{$id}', '{$posnr_ny[$x]}', '{$varenr[$x]}', '{$vare_id[$x]}', '{$beskrivelse[$x]}', '{$enhed[$x]}', '{$antal[$x]}', '{$pris[$x]}', '{$rabat[$x]}', '{$serienr[$x]}', '{$lev_varenr[$x]}')"); } } $vis = 1; } if (strstr($submit, 'Opslag')) { if (strstr($fokus, 'vare')) { vareopslag($sort, $fokus, $id, $vis); } if (strstr($fokus, 'kontakt')) { ansatopslag($sort, $fokus, $id, $vis); } } if (strstr($submit, 'Bogf') && $bogfor != 0 && $status == 2) { $query = db_select("select * from ordrelinjer where ordre_id = '{$id}'"); if (!($row = db_fetch_array($query))) { print "Du kan ikke lukke uden ordrelinjer"; } db_modify("update ordrer set status=3 where id = {$id}"); } if (strstr($submit, 'Modt') && $bogfor != 0) { $query = db_select("select * from ordrelinjer where ordre_id = '{$id}'"); if (!($row = db_fetch_array($query))) {
kontoopslag($sort, $fokus, $id, $addr1); } if (strstr($fokus, 'addr2') && !$id) { kontoopslag($sort, $fokus, $id, $addr2); } if (strstr($fokus, 'postnr') && !$id) { kontoopslag($sort, $fokus, $id, $postnr); } if (strstr($fokus, 'bynavn') && !$id) { kontoopslag($sort, $fokus, $id, $bynavn); } if (strstr($fokus, 'vare') && $art != 'DK') { vareopslag($sort, 'varenr', $id, $vis, $ref, $varenr[0]); } if (strstr($fokus, 'besk') && $art != 'DK') { vareopslag($sort, 'beskrivelse', $id, $vis, $ref, $beskrivelse[0]); } if (strstr($fokus, 'kontakt')) { ansatopslag($sort, $fokus, $id, $vis); } } ##########################BOGFOR################################ if (strstr($submit, 'Bogf') && $bogfor != 0 && $status == 2) { if ($valuta && $valuta != 'DKK') { if ($r = db_fetch_array(db_select("select valuta.kurs from valuta, grupper where grupper.art='VK' and grupper.box1='{$valuta}' and valuta.gruppe=grupper.kodenr::INT and valuta.valdate <= '{$ordredate}' order by valuta.valdate desc", __FILE__ . " linje " . __LINE__))) { $valutakurs = $r['kurs']; } else { $valutakurs = ''; } } else { $valutakurs = 100;
db_modify("insert into vare_lev (lev_id, vare_id) values ('{$row['id']}', '{$id}')", __FILE__ . " linje " . __LINE__); } } } } if (strstr($submit, "Leverand")) { kontoopslag("navn", $fokus, $id, "", "", "", ""); } if (strstr($submit, "Vare")) { if (!$sort) { $sort = "varenr"; } if (!$fokus) { $fokus = "varenr"; } vareopslag($sort, $fokus, $id, $vis_kost, $ref, $find, "varekort.php"); } } if ($ny_beholdning != $beholdning) { if ($samlevare) { print "<meta http-equiv=\"refresh\" content=\"0;URL=vareproduktion.php?id={$id}&antal=1&ny_beholdning={$ny_beholdning}&samlevare={$samlevare}\">"; } else { print "<meta http-equiv=\"refresh\" content=\"0;URL=lagerregulering.php?id={$id}&antal=1&ny_beholdning={$ny_beholdning}\">"; } # sleep(10); } if ($popup && !$returside) { $returside = "../includes/luk.php"; } elseif (!$returside) { $returside = "varer.php"; }