$fejl = 1; #$kredit[$x]=$kredit[$x]*1; } } if ($kredit[$x] && ($k_type[$x] != "F" || strlen($kredit[$x]) > 1)) { if ($kredit[$x] != $kredit[$x] * 1) { print "<BODY onLoad=\"javascript:alert('Ulovlig værdi i kreditfelt (Bilag nr {$bilag[$x]})')\">"; $fejl = 1; #$kredit[$x]=$kredit[$x]*1; } } if (!$forskellige_datoer && $bilag[$x] && $bilag[$x] != '-' && $bilag[$x] == $bilag[$x - 1] && $dato[$x] != $dato[$x - 1] && $bilagssum[$x - 1]) { print "<BODY onLoad=\"javascript:alert('Forskellige datoer i bilag {$bilag[$x]}')\">"; } if (strpos($bilag[$x], '+') && $kladde_id) { indsaet_linjer($kladde_id, $bilag[$x], $dato[$x], $beskrivelse[$x], $d_type[$x], $debet[$x] * 1, $k_type[$x], $kredit[$x] * 1, $faktura[$x], $belob[$x], $afd[$x] * 1, $ansat[$x], $projekt[$x], $valuta[$x], $forfaldsdato[$x], $betal_id[$x] * 1, $momsfri[$x]); } if ($bilag[$x] && $bilag[$x] != "-" && $bilag[$x] != "->" && $bilag[$x] != "<-" && !strpos($bilag[$x], '+') && !is_numeric($bilag[$x])) { print "<BODY onLoad=\"javascript:alert('Ulovlig værdi i bilagsfelt (Bilag nr {$bilag[$x]})')\">"; $fejl = 1; } elseif ($bilag[$x] && $bilag[$x] != "-" && $bilag[$x] != "->" && $bilag[$x] != "<-") { $bilag[$x] = $bilag[$x] * 1; } if ($bilag[$x] == "-") { $dato[$x] = ''; $beskrivelse[$x] = ''; $d_type[$x] = ''; $debet[$x] = ''; $k_type[$x] = ''; $kredit[$x] = ''; $faktura[$x] = '';
$qtxt = "update ordrelinjer set varenr='{$varenr[$x]}',beskrivelse='{$beskrivelse[$x]}',leveres='{$leveres[$x]}',pris='{$pris[$x]}',rabat='{$rabat[$x]}',procent='{$procent[$x]}',projekt='{$projekt[$x]}',kdo='{$kdo[$x]}',omvbet='{$omvbet[$x]}',saet='0',samlevare='{$samlevare[$x]}' where id='{$linje_id[$x]}'"; } db_modify($qtxt, __FILE__ . " linje " . __LINE__); if ($samlevare[$x]) { if ($antal[$x]) { $q = db_select("SELECT id,antal FROM ordrelinjer WHERE samlevare = '{$linje_id[$x]}'", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { db_modify("update ordrelinjer set leveres=antal*{$leveres[$x]}/{$antal[$x]} where id='{$r['id']}'", __FILE__ . " linje " . __LINE__); } } else { db_modify("update ordrelinjer set leveres='0' where samlevare='{$linje_id[$x]}'", __FILE__ . " linje " . __LINE__); } } } if (strpos($posnr_ny[$x], '+') && $id) { indsaet_linjer($id, $linje_id[$x], $posnr_ny[$x]); } } # if (strlen($fakturadate)>5){db_modify("update ordrer set fakturadate='$fakturadate' where id=$id");} } if ($posnr_ny[0] && !strstr($submit, 'Opslag')) { if ($varenr[0]) { $samlevare[0] = ''; if ($brugsamletpris) { $r = db_fetch_array(db_select("SELECT id,samlevare,salgspris FROM varer WHERE varenr = '{$varenr['0']}'", __FILE__ . " linje " . __LINE__)); $samlevare[0] = $r['samlevare']; } if ($brugsamletpris && $samlevare[0]) { if ($incl_moms) { $salgspris[0] = $r['salgspris'] + $r['salgspris'] * $momssats / 100; }