function stykliste($id, $udskriv, $udvalg) { global $charset; $x = 0; $query = db_select("select * from styklister where indgaar_i='{$id}' order by posnr"); while ($row = db_fetch_array($query)) { $x++; $vare_id[$x] = $row['vare_id']; $antal[$x] = $row['antal']; $posnr[$x] = $row['posnr']; } $vareantal = $x; $query = db_select("select varenr, beskrivelse from varer where id={$id}"); $row = db_fetch_array($query); if ($udskriv) { print "<table cellpadding=\"1\" cellspacing=\"1\" border=\"1\" width=80% align=center><tbody>"; print "<tr><td colspan=6 align=center><big><b>Stykliste for <a href=varekort.php?id={$id}>" . htmlentities($row['varenr'], ENT_COMPAT, $charset) . "</a></b></big></td></tr>"; print "<tr><td align=center> Varenr:</td><td align=center> Beskrivelse</td><td align=center> Kostpris</td><td align=center> Antal</td><td align=center> Sum</td></tr>"; } for ($x = 1; $x <= $vareantal; $x++) { $query = db_select("select * from varer where id={$vare_id[$x]}"); $row = db_fetch_array($query); $query2 = db_select("select kostpris from vare_lev where vare_id={$row['id']} order by posnr"); if ($row2 = db_fetch_array($query2)) { $sum = $row2['kostpris'] * $antal[$x]; $ialt = $ialt + $sum; $pris = dkdecimal($row2['kostpris']); } else { $query2 = db_select("select kostpris from varer where id={$row['id']}"); $row2 = db_fetch_array($query2); $sum = $row2['kostpris'] * $antal[$x]; $ialt = $ialt + $sum; $pris = dkdecimal($row2['kostpris']); } $sum = dkdecimal($sum); if ($udskriv) { print "<tr><td>" . htmlentities($row['varenr'], ENT_COMPAT, $charset) . "</td><td>" . htmlentities($row['beskrivelse'], ENT_COMPAT, $charset) . "</td><td align=right> {$pris}</td><td align=right> {$antal[$x]}</td><td align=right> {$sum}</td></tr>"; } } # $ialt=dkdecimal($ialt); if ($udskriv) { print "<tr><td colspan=5><br></td></tr><tr><td colspan=4> I alt</td></td><td align=right>" . dkdecimal($ialt) . "</td></tr>"; print "<tbody></table>"; } return $ialt; }
print "<table width=\"400\" align=\"center\" border=\"0\" cellspacing=\"2\" cellpadding=\"0\"><tbody>"; #B2 $filnavn = "../temp/" . $db . "/" . $ordre_id . ".csv"; #echo "Filnavn $filnavn<br>"; $fp = fopen($filnavn, "w"); fwrite($fp, "Pos" . chr(9) . "Vores varenummer" . chr(9) . "Deres varenummer" . chr(9) . "Beskrivelse" . chr(9) . "Antal" . chr(9) . "Pris" . chr(9) . "Rabat" . chr(9) . "I alt" . chr(9) . "\n"); $q = db_select("select * from ordrelinjer where ordre_id = {$ordre_id} order by posnr"); while ($r = db_fetch_array($q)) { $beskrivelse = str_replace(chr(9), " ", $r['beskrivelse']); $varenr = str_replace(chr(9), " ", $r['varenr']); $lev_vnr = str_replace(chr(9), " ", $r['lev_vnr']); if ($charset == 'UTF-8') { $beskrivelse = utf8_decode($beskrivelse); $varenr = utf8_decode($varenr); $lev_vnr = utf8_decode($lev_vnr); } $antal = dkdecimal($r['antal']); $pris = dkdecimal($r['pris']); $rabat = dkdecimal($r['rabat']); $ialt = dkdecimal($r['pris'] * $r['antal'] - $r['pris'] * $r['antal'] / 100 * $r['rabat']); fwrite($fp, $r[posnr] . chr(9) . $varenr . chr(9) . $lev_vnr . chr(9) . $beskrivelse . chr(9) . $antal . chr(9) . $pris . chr(9) . $rabat . chr(9) . $ialt . "\n"); } fclose($fp); print "<tr><td align=center> Klik her: </td><td {$top_bund} title=\"Åbner csv filen. Højreklik for at gemme\"> <a href=\"{$filnavn}\">Åben ordrefil</a></td></tr>"; print "</tbody></table></td></tr>"; #B2 s**t print "</tbody></table>"; #A s**t ?> </body></html>
#cho "$qtxt<br>"; $q = db_select($qtxt, __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { if (!in_array($r['id'], $shop_saldi_id)) { $forslag_id[$x] = $r['id']; $forslag_vnr[$x] = $r['varenr']; $forslag_besk[$x] = $r['beskrivelse']; $forslag_grp[$x] = $r['gruppe']; $x++; } } print "<tr><td>Shop vare ID:</td><td>{$shop_id}</td></tr>"; print "<tr><td>Shop vare nr:</td><td>{$shop_vnr}</td></tr>"; print "<tr><td>Beskrivelse:</td><td>{$beskrivelse}</td></tr>"; print "<tr><td>Pris:</td><td>" . dkdecimal($pris) . "</td></tr>"; print "<tr><td>Tilbudspris:</td><td>" . dkdecimal($specialpris) . "</td></tr>"; if (count($forslag_id) >= 1) { print "<form name=\"hent_varer\" action=\"hent_varer.php?shop_id={$shop_id}&shop_vnr={$shop_vnr}&beskrivelse={$beskrivelse}&pris={$pris}&specialpris={$specialpris}\" method=post autocomplete=\"off\">\n"; print "<tr><td>Varen er ikke bundet til nogen vare i Saldi, men vi har følgende forslag:</td>"; print "<td><select name=\"saldi_id\">"; for ($x = 0; $x < count($forslag_id); $x++) { print "<option value=\"{$forslag_id[$x]}\">{$forslag_vnr[$x]},{$forslag_besk[$x]}</option>"; } print "</select></td></tr>"; print "<tr><td colspan=\"2\" align=\"center\"><input type=\"submit\"name=\"tilknyt\" value=\"Tilknyt\"> <a href={$url}&next_id={$shop_id}><input type=\"button\" value=\"Spring over\"></td></tr>"; print "</form>"; if (count($forslag_vnr) == 1 && $forslag_vnr[0] == $shop_id) { $qtxt = "select id from shop_varer where saldi_id='{$forslag_id['0']}'"; $r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); if ($r['id']) { $qtxt = "update shop_varer set shop_id='{$shop_id}' where id ='{$r['id']}'";
if ($valuta == $valuta_kode[$x]) { print "<option value='{$valuta_kode[$x]}'>{$valuta_kode[$x]} : {$valuta_navn[$x]}</option>"; } } for ($x = 0; $x < count($valuta_kode); $x++) { if ($valuta != $valuta_kode[$x]) { print "<option value='{$valuta_kode[$x]}'>{$valuta_kode[$x]} : {$valuta_navn[$x]}</option>"; } } print "</select></td></tr>"; } else { print "<input type=\"hidden\" name=\"{$valuta_kode[$x]}\" value='DKK'>"; } } if ($kontotype == 'Drift' || $kontotype == 'Status') { print "<tr><td colspan=\"2\">Saldo</td><td>{$valuta}: " . dkdecimal($saldo * 100 / $valutakurs) . "</td><tr>"; } if ($lukket == 'on') { $lukket = "checked"; } print "<tr><td colspan=\"2\">Lukket</td>"; print "<td><input type=checkbox name=lukket {$lukket}></td></tr>\n"; print "<tr><td><br></td></tr>\n"; print "<tr><td><br></td></tr>\n"; print "<tr><td colspan=4 align=center>"; print "<table width=\"100%\" cellpadding=\"0\" cellspaci ng=\"0\" border=\"0\"><tbody>"; print "<td align=center><input type=submit accesskey=\"g\" value=\"Gem/opdatér\" name=\"gem\"></td>"; if ($slet == 1) { print "<td align = center><input type=submit accesskey=\"s\" value=\" Slet \" name=\"slet\" onclick=\"return confirm('Vil du slette konto {$kontonr}?')\" ></td>"; } print "</tr>\n</tbody></table>";
function find_kassesalg($kasse, $optalt) { global $regnaar; global $straksbogfor; $dd = date("Y-m-d"); $r = db_fetch_array(db_select("select * from grupper where art = 'RA' and kodenr = '{$regnaar}'", __FILE__ . " linje " . __LINE__)); $startmd = $r['box1']; $startaar = $r['box2']; #cho "startmd $startmd startaar $startaar<br>\n"; $regnstart = $startaar . "-" . $startmd . "-01"; $r = db_fetch_array(db_select("select * from grupper where art = 'POS' and kodenr = '1'", __FILE__ . " linje " . __LINE__)); $kassekonti = explode(chr(9), $r['box2']); $kortantal = $r['box4'] * 1; $kortnavne = $r['box5']; $kortnavn = explode(chr(9), $kortnavne); $kortkonti = $r['box6']; $kortkonto = explode(chr(9), $kortkonti); $straksbogfor = $r['box9']; for ($x = 0; $x < count($kortnavn); $x++) { $kortsum[$x] = 0; } $r = db_fetch_array(db_select("select * from grupper where art = 'POS' and kodenr = '2'", __FILE__ . " linje " . __LINE__)); $byttepenge = $r['box1']; #cho "byt $byttepenge<br>\n"; #$byttepenge=''; $k = $kasse - 1; #cho "select primo from kontoplan where regnskabsaar = '$regnaar' and kontonr = '$kassekonti[$k]'<br>\n"; if (!$byttepenge) { $r = db_fetch_array(db_select("select primo from kontoplan where regnskabsaar = '{$regnaar}' and kontonr = '{$kassekonti[$k]}'", __FILE__ . " linje " . __LINE__)); $byttepenge = $r['primo']; #cho "select sum(debet) as debet,sum(kredit) as kredit from transaktioner where transdate < '$dd' and transdate >= '$regnstart' and kontonr = '$kassekonti[$k]'<br>\n"; $r = db_fetch_array(db_select("select sum(debet) as debet,sum(kredit) as kredit from transaktioner where transdate < '{$dd}' and transdate >= '{$regnstart}' and kontonr = '{$kassekonti[$k]}' and kasse_nr='{$kasse}'", __FILE__ . " linje " . __LINE__)); $byttepenge += $r['debet'] - $r['kredit']; #cho "byt $byttepenge<br>\n"; } $r = db_fetch_array(db_select("select sum(debet) as debet,sum(kredit) as kredit from transaktioner where transdate = '{$dd}' and kontonr = '{$kassekonti[$k]}' and kasse_nr='{$kasse}'", __FILE__ . " linje " . __LINE__)); $tilgang = $r['debet'] - $r['kredit']; if (!$straksbogfor) { #cho "select sum(sum+moms) as sum from ordrer where status = '3' and art = 'PO' and fakturadate <= '$dd' and felt_5='$kasse'<br>"; $q = db_select("select * from ordrer where status = '3' and art = 'PO' and fakturadate <= '{$dd}' and felt_5='{$kasse}'", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $retur = $r['felt_2'] + $r['felt_4'] - ($r['sum'] + $r['moms']); if ($r['felt_1'] == 'Kontant') { $tilgang += $r['felt_2'] - $retur; } if ($r['felt_3'] == 'Kontant') { $tilgang += $r['felt_4'] - $retur; } for ($x = 0; $x < count($kortnavn); $x++) { if ($r['felt_1'] == $kortnavn[$x]) { $kortsum[$x] += $r['felt_2']; } if ($r['felt_3'] == $kortnavn[$x]) { $kortsum[$x] += $r['felt_4']; } } } } if ($kortantal) { # $kortsum[]=0; # fwrite($fp,"\n\nSalg paa kort\n\n"); for ($x = 0; $x < $kortantal; $x++) { if ($kortkonto[$x]) { #cho "select sum(debet) as debet,sum(kredit) as kredit from transaktioner where transdate = '$dd' and kontonr = '$kortkonto[$x]' and kasse_nr = '$kasse'<br>\n"; $r = db_fetch_array(db_select("select sum(debet) as debet,sum(kredit) as kredit from transaktioner where transdate = '{$dd}' and kontonr = '{$kortkonto[$x]}' and kasse_nr = '{$kasse}'", __FILE__ . " linje " . __LINE__)); $kortsum[$x] += dkdecimal($r['debet'] - $r['kredit']); } } } # $kassesum=dkdecimal($byttepenge+$tilgang); # $byttepenge=dkdecimal($byttepenge); # $tilgang=dkdecimal($tilgang); $diff = $optalt - ($byttepenge + $tilgang); $diff < 0 ? $prefix = NULL : ($prefix = "+"); $kortsummer = $kortsum[0]; for ($x = 1; $x < $kortantal; $x++) { $kortsummer .= chr(9) . $kortsum[$x]; } return array($byttepenge, $tilgang, $diff, $kortantal, $kortkonti, $kortnavne, $kortsummer); }
include "../includes/online.php"; include "../includes/std_func.php"; $returside = "../diverse.php"; $filnavn = "../temp/" . trim($db . "_debitorer_" . date("Y-m-d") . ".csv"); $fp = fopen($filnavn, "w"); if (fwrite($fp, "kontonr" . chr(9) . "firmanavn" . chr(9) . "addr1" . chr(9) . "addr2" . chr(9) . "postnr" . chr(9) . "bynavn" . chr(9) . "land" . chr(9) . "kontakt" . chr(9) . "tlf" . chr(9) . "fax" . chr(9) . "email" . chr(9) . "web" . chr(9) . "notes" . chr(9) . "kreditmax" . chr(9) . "betalingsbet" . chr(9) . "betalingsdage" . chr(9) . "cvrnr" . chr(9) . "ean" . chr(9) . "institution" . chr(9) . "gruppe" . chr(9) . "kontoansvarlig" . chr(9) . "oprettet" . chr(9) . "kontakt_navn" . chr(9) . "kontakt_addr1" . chr(9) . "kontakt_addr2" . chr(9) . "kontakt_postnr" . chr(9) . "kontakt_bynavn" . chr(9) . "kontakt_tlf" . chr(9) . "kontakt_fax" . chr(9) . "kontakt_email" . chr(9) . "kontakt_notes]\r\n")) { $q = db_select("select * from adresser where art='D' order by kontonr", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $ansatte = 0; if ($r['kontoansvarlig']) { $r2 = db_fetch_array(db_select("select initialer from ansatte where id='{$r['kontoansvarlig']}'", __FILE__ . " linje " . __LINE__)); $kontoansvarlig = $r2['initialer']; } else { $kontoansvarlig = ''; } $kreditmax = dkdecimal($r['kreditmax']); $oprettet = dkdato($r['oprettet']); $tmp1 = str_replace("\n", "\\n", $r[kontonr] . chr(9) . chr(32) . $r[firmanavn] . chr(32) . chr(9) . chr(32) . $r[addr1] . chr(32) . chr(9) . chr(32) . $r[addr2] . chr(32) . chr(9) . chr(32) . $r[postnr] . chr(32) . chr(9) . chr(32) . $r[bynavn] . chr(32) . chr(9) . chr(32) . $r[land] . chr(32) . chr(9) . chr(32) . $r[kontakt] . chr(32) . chr(9) . chr(32) . $r[tlf] . chr(32) . chr(9) . chr(32) . $r[fax] . chr(32) . chr(9) . chr(32) . $r[email] . chr(32) . chr(9) . chr(32) . $r[web] . chr(32) . chr(9) . chr(32) . $r[notes] . chr(32) . chr(9) . $kreditmax . chr(9) . chr(32) . $r[betalingsbet] . chr(32) . chr(9) . $r[betalingsdage] . chr(9) . chr(32) . $r[cvrnr] . chr(32) . chr(9) . chr(32) . $r[ean] . chr(32) . chr(9) . chr(32) . $r[institution] . chr(32) . chr(9) . $r[gruppe] . chr(9) . chr(32) . $kontoansvarlig . chr(32) . chr(9) . chr(32) . $oprettet); $tmp1 = str_replace("\r", "\\r", $tmp1); if ($charset == 'UTF-8') { $tmp1 = utf8_decode($tmp1); } $q2 = db_select("select * from ansatte where konto_id='{$r['id']}' order by navn", __FILE__ . " linje " . __LINE__); while ($r2 = db_fetch_array($q2)) { $ansatte++; $tmp2 = str_replace("\n", "\\n", $r2[navn] . chr(32) . chr(9) . chr(32) . $r2[addr1] . chr(32) . chr(9) . chr(32) . $r2[addr2] . chr(32) . chr(9) . chr(32) . $r2[postnr] . chr(32) . chr(9) . chr(32) . $r2[bynavn] . chr(32) . chr(9) . chr(32) . $r2[tlf] . chr(32) . chr(9) . chr(32) . $r2[fax] . chr(32) . chr(9) . chr(32) . $r2[email] . chr(32) . chr(9) . chr(32) . $r2[notes]); $tmp2 = str_replace("\r", "\\r", $tmp2); if ($charset == 'UTF-8') { $tmp2 = utf8_decode($tmp2); } $linje = $tmp1 . chr(32) . chr(9) . chr(32) . $tmp2;
function vis_data($filnavn, $splitter, $feltnavn, $feltantal, $leverandor, $varegrp, $rabat) { global $font; list($kontonr, $tmp) = split(" : ", $leverandor); if (!$feltnavn) { $feltnavn = array(); } $fp = fopen("../temp/" . $filnavn, "r"); if ($fp) { $linje = fgets($fp); $tmp = $linje; while ($tmp = substr(strstr($tmp, ";"), 1)) { $semikolon++; } $tmp = $linje; while ($tmp = substr(strstr($tmp, ","), 1)) { $komma++; } $tmp = $linje; while ($tmp = substr(strstr($tmp, chr(9)), 1)) { $tabulator++; } $tmp = ''; if ($komma > $semikolon && $komma > $tabulator) { $tmp = 'Komma'; $feltantal = $komma; } elseif ($semikolon > $tabulator && $semikolon > $komma) { $tmp = 'Semikolon'; $feltantal = $semikolon; } elseif ($tabulator > $semikolon && $tabulator > $komma) { $tmp = 'Tabulator'; $feltantal = $tabulator; } if (!$splitter) { $splitter = $tmp; } elseif ($splitter == "Brdr. Dahl") { $feltantal = 7; } } fclose($fp); print "<tr><td width=100% align=center><table width=\"100%\" border=\"0\" cellspacing=\"1\" cellpadding=\"1\"><tbody>"; print "<form enctype=\"multipart/form-data\" action=\"vareimport.php\" method=\"POST\">"; #print "<tr><td colspan=6 width=100% align=center>$font $filnavn</td></tr>"; print "<tr><td colspan={$feltantal} align=center>{$font} Separatortegn <select name=splitter>\n"; if ($splitter) { print "<option>{$splitter}</option>\n"; } if ($splitter != 'Semikolon') { print "<option>Semikolon</option>\n"; } if ($splitter != 'Komma') { print "<option>Komma</option>\n"; } if ($splitter != 'Tabulator') { print "<option>Tabulator</option>\n"; } if ($splitter != 'Brdr. Dahl') { print "<option>Brdr. Dahl</option>\n"; } print "</select>"; print " Leverandør <select name=leverandor>\n"; if ($leverandor) { print "<option>{$leverandor}</option>\n"; } $q = db_select("select * from adresser where art='K'"); print "<option></option>"; while ($r = db_fetch_array($q)) { if ($r[kontonr] != $kontonr) { print "<option>{$r['kontonr']} : {$r['firmanavn']}</option>"; } } print "</select>"; if (!in_array('Varegrp.', $feltnavn)) { print " Varegrp. <select name=varegrp>\n"; if ($varegrp) { print "<option>{$varegrp}</option>\n"; } $q = db_select("select * from grupper where art='VG'"); print "<option></option>"; while ($r = db_fetch_array($q)) { if ($r[kodenr] != $kodenr) { print "<option>{$r['kodenr']} : {$r['beskrivelse']}</option>"; } } print "</select>"; } if (!in_array('Kostpris', $feltnavn) && in_array('Salgspris', $feltnavn)) { print " Rabat <input type=text name = rabat size=2 value={$rabat}> %\n"; } print "<input type=\"hidden\" name=\"filnavn\" value={$filnavn}>"; print "<input type=\"hidden\" name=\"feltantal\" value={$feltantal}>"; print " <input type=\"submit\" name=submit value=\"Vis\" />"; if (in_array('Beskrivelse', $feltnavn) && in_array('Salgspris', $feltnavn) && (in_array('Kostpris', $feltnavn) || $rabat) && in_array('Enhed', $feltnavn) && (in_array('Varegrp.', $feltnavn) || $varegrp)) { print " <input type=\"submit\" name=submit value=\"Flyt\" />"; } print "</td></tr>"; if (!$splitter || $splitter == 'Semikolon') { $splitter = ';'; } elseif ($splitter == 'Komma') { $splitter = ','; } elseif ($splitter == 'Tabulator') { $splitter = chr(9); } elseif ($splitter == 'Brdr. Dahl') { $feltantal = 7; } for ($y = 0; $y < $feltantal; $y++) { print "<td><select name=feltnavn[{$y}]>\n"; if ($feltnavn[$y] == 'Varegrp.' && $varegrp) { $feltnavn[$y] == ''; } print "<option>{$feltnavn[$y]}</option>\n"; if (!in_array('Eget varenr.', $feltnavn) && !in_array('Begge varenr.', $feltnavn)) { print "<option>Eget varenr.</option>\n"; } if (!in_array('Lev. varenr.', $feltnavn) && !in_array('Begge varenr.', $feltnavn)) { print "<option>Lev. varenr.</option>\n"; } if (!in_array('Eget varenr.', $feltnavn) && !in_array('Lev. varenr.', $feltnavn) && !in_array('Begge varenr.', $feltnavn)) { print "<option>Begge varenr.</option>\n"; } elseif ($feltnavn[$y] == 'Eget varenr.' && !in_array('Lev. varenr.', $feltnavn) && !in_array('Begge varenr.', $feltnavn)) { print "<option>Begge varenr.</option>\n"; } elseif ($feltnavn[$y] == 'Begge varenr.') { print "<option>Eget varenr.</option>\n"; print "<option>Lev. varenr.</option>\n"; } if (!in_array('Beskrivelse', $feltnavn)) { print "<option>Beskrivelse</option>\n"; } if (!in_array('Salgspris', $feltnavn)) { print "<option>Salgspris</option>\n"; } if (!in_array('Kostpris', $feltnavn) && !$rabat) { print "<option>Kostpris</option>\n"; } if (!in_array('Enhed', $feltnavn)) { print "<option>Enhed</option>\n"; } if (!in_array('Varegrp.', $feltnavn) && !$varegrp) { print "<option>Varegrp.</option>\n"; } if ($feltnavn[$y]) { print "<option></option>\n"; } print "</select>"; if ($feltnavn[$y] == 'Salgspris' && $rabat) { print "</td><td>{$font} Kostpris\n"; } print "</td>"; } print "</form>"; $fp = fopen("../temp/" . $filnavn, "r"); if ($fp) { $x = 0; while (!feof($fp)) { $x++; $linje = fgets($fp); $felt = array(); if ($splitter == 'Brdr. Dahl') { print "<tr>"; $felt[0] = substr($linje, 1, 10); $felt[1] = substr($linje, 12, 35); $felt[2] = substr($linje, 47, 10); $felt[3] = substr($linje, 58, 3); $felt[4] = substr($linje, 61, 3); $felt[5] = substr($linje, 64, 1); $felt[6] = substr($linje, 65, 3); $felt[1] = str_replace(chr(145), "æ", $felt[1]); $felt[1] = str_replace(chr(155), "ø", $felt[1]); $felt[1] = str_replace(chr(134), "å", $felt[1]); $felt[1] = str_replace(chr(146), "Æ", $felt[1]); $felt[1] = str_replace(chr(157), "Ø", $felt[1]); $felt[1] = str_replace(chr(143), "Å", $felt[1]); } else { $felt = split($splitter, $linje); } for ($y = 0; $y < $feltantal; $y++) { if ($feltnavn[$y] == 'Varegrp.' && !in_array($felt[$y], $feltnavn)) { $linjefarve[$x] = 'red'; } } for ($y = 0; $y < $feltantal; $y++) { if (substr($felt[$y], 0, 1) == '"' && substr($felt[$y], -1) == '"') { $felt[$y] = substr($felt[$y], 1, strlen($felt[$y]) - 2); } if ($linjefarve[$x] == 'red' && $feltnavn[$y]) { print "<td><FONT COLOR=#FF0000><small>{$felt[$y]} </small></td>"; } elseif ($feltnavn[$y]) { if ($feltnavn[$y] == 'Salgspris') { $tmp = dkdecimal($felt[$y] / 100); print "<td><FONT COLOR=#000000><small>{$tmp} </small></td>"; if ($rabat) { $tmp = dkdecimal($felt[$y] / 100 - $felt[$y] / 10000 * $rabat); print "<td><FONT COLOR=#000000><small>{$tmp} </small></td>"; } } else { print "<td><FONT COLOR=#000000><small>{$felt[$y]} </small></td>"; } } else { print "<td><FONT COLOR=#999999><small>{$felt[$y]} </small></td>"; } } print "</tr>"; } if ($linjefarve) { print "<BODY onLoad=\"javascript:alert('Røde linjer vil ikke blive importeret - varegruppe findes ikke')\">"; } } fclose($fp); print "</tbody></table>"; print "</td></tr>"; }
if ($charset == "UTF-8") { $overskrift = utf8_decode($overskrift); } if (fwrite($fp, "{$overskrift}\r\n")) { $z = 0; $q = db_select("select varer.id,varer.varenr,varer.beskrivelse,variant_varer.variant_stregkode,variant_varer.variant_type,variant_varer.variant_salgspris,variant_varer.variant_kostpris,variant_varer.variant_vejlpris from varer,variant_varer where varer.id=variant_varer.vare_id order by varer.varenr,variant_varer.variant_stregkode", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $z++; if ($z >= $start && $z <= $s**t) { $vare_id = $r['id']; $varenr = $r['varenr']; $beskrivelse = $r['beskrivelse']; $variant_stregkode = $r['variant_stregkode']; $variant_type = explode(chr(9), $r['variant_type']); # $variant_lager=$r['lager']; $linje = '"' . $varenr . '"' . chr(9) . '"' . $beskrivelse . '"' . chr(9) . '"' . $variant_stregkode . '"' . chr(9) . dkdecimal($r['variant_kostpris']) . chr(9) . dkdecimal($r['variant_salgspris']) . chr(9) . dkdecimal($r['variant_vejlpris']); for ($x = 0; $x < count($varianter_id); $x++) { # $linje.=chr(9)."$varianter_beskrivelse[$x]"; $tmp = NULL; for ($y = 0; $y < count($varianttyper_id); $y++) { #20140526 if (isset($varianttyper_id[$y]) && isset($variant_type[$x]) && $varianttyper_id[$y] == $variant_type[$x]) { $tmp = $varianttyper_beskrivelse[$y]; } } $linje .= chr(9) . '"' . "{$tmp}" . '"'; } $linje = str_replace("\n", "", $linje); if ($charset == "UTF-8") { $linje = utf8_decode($linje); }
if (!$start) { $start = 1; } if ($s**t > $vareantal) { $s**t = $vareantal; } for ($x = $start; $x <= $s**t; $x++) { $href = "prislister.php?ordre_id={$ordre_id}&prisliste={$prisliste}&indset={$varenr[$x]}&fokus={$fokus}"; print "<tr>"; print "<td><a href=\"{$href}\">{$varenr[$x]}</a></td>"; print "<td>{$ean[$x]}</td>"; print "<td>{$prisgruppe[$x]}</td>"; print "<td>{$beskrivelse[$x]}</td>"; print "<td>{$enhed[$x]}</td>"; print "<td align=\"right\">" . dkdecimal($salgspris[$x]) . "</td>"; print "<td align=\"right\">" . dkdecimal($kostpris[$x]) . "</td>"; print "<td></td>"; print "</tr>"; } print "</tbody></table>"; print "</td></tr>"; function udvaelg($x, $a, $b) { $a = trim(strtolower($a)); $b = trim(strtolower($b)); # if (substr($b,0,1)=='f') #echo "$b - "; if (substr($a, 0, 1) == '*' && substr($a, -1) == '*') { $a = substr($a, 1, strlen($a) - 2); if (!strstr($b, $a)) { $x--; }
$erh = "ERH351"; } else { $erh = "ERH356"; } if ($erh == "ERH351" || $erh == "ERH357" || $erh == "ERH358" || $erh == "SDCK020") { $modt_konto = $r['modt_fi']; $kort_ref = $r['betal_id']; } elseif ($r['faktnr']) { $kort_ref = "Fakt: " . $r['faktnr']; } if ($r['forfaldsdate']) { $forfaldsdag = str_replace("-", "", dkdato($r['forfaldsdate'])); } else { $forfaldsdag = str_replace("-", "", forfaldsdag($r['transdate'], $r['betalingsbet'], $r['betalingsdage'])); } $belob = dkdecimal($r['amount'] * -1); $valuta = $r['valuta']; if (!$valuta) { $valuta = 'DKK'; } if ($r['betal_id']) { if (substr($r['betal_id'], 0, 1) == "+") { $betal_id = substr($r['betal_id'], 1); list($tmp, $tmp2) = explode("<", $betal_id); if ($tmp == '04' || $tmp == '15') { $erh = 'ERH352'; } elseif ($tmp == '71') { $erh = 'ERH351'; } elseif ($tmp == '73') { $erh = 'ERH357'; } elseif ($tmp == '75') {
function inset_ordrer($antal_ordrer, $leverance_id, $dkdd, $ordre_id, $cvrnr, $bank_reg, $bank_konto, $pbs_nr, $ny_pbs_aftale, $kontonr) { global $id; global $lnr; global $afslut; global $linje; global $linjeoid; global $delsystem; global $charset; global $lev_pbs; global $debitorgruppe; include "../includes/forfaldsdag.php"; $r042sum = 0; $r022lin = 0; $r052lin = 0; $lnr++; $linje[$lnr] = "BS002" . $cvrnr[0] . $delsystem . "0601" . $leverance_id . filler(19, " ") . $dkdd . "\n"; if ($afslut) { db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } $lnr++; $linje[$lnr] = "BS012" . $pbs_nr[0] . "0112" . filler(5, " ") . $debitorgruppe . filler(15, "0") . filler(4, " ") . "00000000" . $bank_reg[0] . $bank_konto[0] . "\n"; if ($afslut) { db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } for ($x = 1; $x <= $antal_ordrer; $x++) { $r = db_fetch_array(db_select("select * from ordrer where id='{$ordre_id[$x]}'", __FILE__ . " linje " . __LINE__)); $fakturanr = $r['fakturanr']; $kontonr = $r['kontonr']; $firmanavn = $r['firmanavn']; $adresse = $r['addr1']; if ($r['addr2']) { $adresse = $adresse . ", " . $r['addr2']; } $postnr = $r['postnr']; $ean = $r['ean']; $institution = $r['institution']; $sum = $r['sum']; $moms = $r['moms']; $belob = round(($r['sum'] + $r['moms']) * 100, 0); $r042sum = $r042sum + $belob; $fakturadate = $r['fakturadate']; $betalingsbet = $r['betalingsbet']; $betalingsdage = $r['betalingsdage']; $udskriv_til = $r['udskriv_til']; # tilfoejet 20.03.2011 while (strlen($kontonr) < 15) { $kontonr = "0" . $kontonr; } # 20140122 Denne + næste 3 linjer flyttet over nedenstående else while (strlen($pbs_nr[$x]) < 9) { $pbs_nr[$x] = "0" . $pbs_nr[$x]; } list($dd, $mm, $yy) = explode("-", forfaldsdag($fakturadate, $betalingsbet, $betalingsdage)); $forfaldsdag = $dd . $mm . $yy; if ($lev_pbs == 'B') { $firmanavn = ''; $adresse = ''; $postnr = ''; $ean = ''; $institution = ''; } else { #else indsat 20140121 if ($charset == "UTF-8") { $firmanavn = utf8_decode($firmanavn); $adresse = utf8_decode($adresse); $institution = utf8_decode($institution); } if ($udskriv_til == 'PBS_FI') { $pbs_nr[$x] = '000000000'; } # tilfoejet 20.03.2011 # rettet til '000000000' 20140207 $r022lin++; $lnr++; $linje[$lnr] = "BS022" . $pbs_nr[0] . "0240" . "00001" . $debitorgruppe . $kontonr . $pbs_nr[$x] . addslashes($firmanavn) . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { if ($charset == "UTF-8") { $linje[$lnr] = utf8_encode($linje[$lnr]); } db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } if ($ean) { $lnr++; $r022lin++; $linje[$lnr] = "BS022" . $pbs_nr[0] . "0240" . "00002" . $debitorgruppe . $kontonr . $pbs_nr[$x] . $ean . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } $linjenr = "00003"; } else { $linjenr = "00002"; } $lnr++; $r022lin++; $linje[$lnr] = "BS022" . $pbs_nr[0] . "0240" . $linjenr . $debitorgruppe . $kontonr . $pbs_nr[$x] . $adresse . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { if ($charset == "UTF-8") { $linje[$lnr] = utf8_encode($linje[$lnr]); } db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } $r022lin++; while (strlen($postnr) < 4) { $postnr = "0" . $postnr; } $lnr++; $linje[$lnr] = "BS022" . $pbs_nr[0] . "0240" . "00009" . $debitorgruppe . $kontonr . $pbs_nr[$x] . filler(15, " ") . $postnr . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } } if ($belob > 0) { $felt10 = "1"; } elseif ($belob < 0) { $felt10 = "2"; $belob = $belob * -1; } else { $felt10 = "0"; } while (strlen($belob) < 13) { $belob = "0" . $belob; } $lnr++; $linje[$lnr] = "BS042" . $pbs_nr[0] . "0280" . "00000" . $debitorgruppe . $kontonr . $pbs_nr[$x] . $forfaldsdag . $felt10 . $belob . filler(30, " ") . "00" . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } $r052lin++; $recordnr = "00001"; $beskrivelse = "Fakturadato " . dkdato($fakturadate) . " Fakturanr: {$fakturanr} "; if ($charset == "UTF-8") { $belob = utf8_decode($belob); $beskrivelse = utf8_decode($beskrivelse); } while (strlen($beskrivelse) < 65) { $beskrivelse = $beskrivelse . " "; } $lnr++; $linje[$lnr] = "BS052" . $pbs_nr[0] . "0241" . $recordnr . $debitorgruppe . $kontonr . $pbs_nr[$x] . " " . addslashes($beskrivelse) . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { if ($charset == "UTF-8") { $linje[$lnr] = utf8_encode($linje[$lnr]); } db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } $r052lin++; $recordnr = "00001"; $beskrivelse = "Beskrivelse"; $antal = "Antal"; $pris = "Pris"; $belob = "Beløb"; if ($charset == "UTF-8") { $belob = utf8_decode($belob); $beskrivelse = utf8_decode($beskrivelse); } while (strlen($recordnr) < 5) { $recordnr = "0" . $recordnr; } while (strlen($beskrivelse) < 35) { $beskrivelse = $beskrivelse . " "; } while (strlen($antal) < 5) { $antal = " " . $antal; } while (strlen($pris) < 10) { $pris = " " . $pris; } while (strlen($belob) < 10) { $belob = " " . $belob; } $lnr++; $linje[$lnr] = "BS052" . $pbs_nr[0] . "0241" . $recordnr . $debitorgruppe . $kontonr . $pbs_nr[$x] . " " . addslashes($beskrivelse) . $antal . $pris . $belob . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { if ($charset == "UTF-8") { $linje[$lnr] = utf8_encode($linje[$lnr]); } db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } $y = 0; $q = db_select("select * from ordrelinjer where ordre_id='{$ordre_id[$x]}' order by posnr", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $y++; $r052lin++; $beskrivelse = var2str($r['beskrivelse'], $ordre_id[$x]); $antal = $r['antal'] * 1; $pris = dkdecimal($r['pris']); $belob = dkdecimal($r['pris'] * $r['antal']); $recordnr++; if ($charset == "UTF-8") { $beskrivelse = utf8_decode($beskrivelse); } while (strlen($recordnr) < 5) { $recordnr = "0" . $recordnr; } if (strlen($beskrivelse) > 35) { $beskrivelse = substr($beskrivelse, 0, 35); } while (strlen($beskrivelse) < 35) { $beskrivelse = $beskrivelse . " "; } while (strlen($antal) < 5) { $antal = " " . $antal; } while (strlen($pris) < 10) { $pris = " " . $pris; } while (strlen($belob) < 10) { $belob = " " . $belob; } $lnr++; $linje[$lnr] = "BS052" . $pbs_nr[0] . "0241" . $recordnr . $debitorgruppe . $kontonr . $pbs_nr[$x] . " " . addslashes(addslashes($beskrivelse)) . $antal . $pris . $belob . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { if ($charset == "UTF-8") { $linje[$lnr] = utf8_encode($linje[$lnr]); } db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } } if ($sum) { $r052lin++; $recordnr++; $beskrivelse = "Netto Beløb"; $dksum = dkdecimal($sum); if ($charset == "UTF-8") { $beskrivelse = utf8_decode($beskrivelse); } while (strlen($recordnr) < 5) { $recordnr = "0" . $recordnr; } while (strlen($beskrivelse) < 50) { $beskrivelse = $beskrivelse . " "; } while (strlen($dksum) < 10) { $dksum = " " . $dksum; } $lnr++; $linje[$lnr] = "BS052" . $pbs_nr[0] . "0241" . $recordnr . $debitorgruppe . $kontonr . $pbs_nr[$x] . " " . addslashes($beskrivelse) . $dksum . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { if ($charset == "UTF-8") { $linje[$lnr] = utf8_encode($linje[$lnr]); } db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } } if ($moms) { $r052lin++; $recordnr++; $beskrivelse = "Moms"; $dkmoms = dkdecimal($moms); if ($charset == "UTF-8") { $beskrivelse = utf8_decode($beskrivelse); } while (strlen($recordnr) < 5) { $recordnr = "0" . $recordnr; } while (strlen($beskrivelse) < 50) { $beskrivelse = $beskrivelse . " "; } while (strlen($dkmoms) < 10) { $dkmoms = " " . $dkmoms; } $lnr++; $linje[$lnr] = "BS052" . $pbs_nr[0] . "0241" . $recordnr . $debitorgruppe . $kontonr . $pbs_nr[$x] . " " . addslashes($beskrivelse) . $dkmoms . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { if ($charset == "UTF-8") { $linje[$lnr] = utf8_encode($linje[$lnr]); } db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } } if ($sum || $moms) { $r052lin++; $recordnr++; $beskrivelse = "Total Beløb"; $ialt = dkdecimal($sum + $moms); if ($charset == "UTF-8") { $beskrivelse = utf8_decode($beskrivelse); } while (strlen($recordnr) < 5) { $recordnr = "0" . $recordnr; } while (strlen($beskrivelse) < 50) { $beskrivelse = $beskrivelse . " "; } while (strlen($ialt) < 10) { $ialt = " " . $ialt; } $lnr++; $linjeoid[$lnr] = "{$ordre_id[$x]}"; $linje[$lnr] = "BS052" . $pbs_nr[0] . "0241" . $recordnr . $debitorgruppe . $kontonr . $pbs_nr[$x] . " " . addslashes($beskrivelse) . $ialt . "\n"; if ($afslut) { if ($charset == "UTF-8") { $linje[$lnr] = utf8_encode($linje[$lnr]); } db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } } } while (strlen($antal_ordrer) < 11) { $antal_ordrer = "0" . $antal_ordrer; } while (strlen($r042sum) < 15) { $r042sum = "0" . $r042sum; } while (strlen($r022lin) < 11) { $r022lin = "0" . $r022lin; } while (strlen($r052lin) < 11) { $r052lin = "0" . $r052lin; } $lnr++; $linje[$lnr] = "BS092" . $pbs_nr[0] . "0112" . filler(5, "0") . $debitorgruppe . filler(4, " ") . $antal_ordrer . $r042sum . $r052lin . filler(15, " ") . $r022lin . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } $lnr++; # $linje[$lnr]="BS992".$cvrnr[0]."BS10601"."00000000001".$antal_ordrer.$r042sum.$r052lin.filler(15,"0").$r022lin.filler(34,"0")."\n"; $linje[$lnr] = "BS992" . $cvrnr[0] . $delsystem . "0601" . "00000000001" . $antal_ordrer . $r042sum . $r052lin . filler(15, "0") . $r022lin . filler(34, "0") . "\n"; $linjeoid[$lnr] = "{$ordre_id[$x]}"; if ($afslut) { db_modify("insert into pbs_linjer (liste_id,linje) values ('{$id}','{$linje[$lnr]}')", __FILE__ . " linje " . __LINE__); } }
if ($row['kontotype'] == 'H') { print "<td><span style=\"color:{$color};\"><br></span></td>\n"; } elseif ($row['kontotype'] == 'D') { print "<td><span style=\"color:{$color};\">Drift<br></span></td>\n"; } elseif ($row['kontotype'] == 'S') { print "<td><span style=\"color:{$color};\">Status<br></span></td>\n"; } elseif ($row['kontotype'] == 'Z') { print "<td><span style=\"color:{$color};\">Sum {$row['fra_kto']} - {$row['til_kto']}<br></span></td>\n"; } elseif ($row['kontotype'] == 'R') { print "<td><span style=\"color:{$color};\">Resultat = {$row['fra_kto']}<br></span></td>\n"; } else { print "<td><span style=\"color:{$color};\">Sideskift<br></span></td>\n"; } print "<td align=\"center\"><span style=\"color:{$color};\">{$row['moms']}<br></span></td>\n"; if ($row['kontotype'] != 'H' && $row['kontotype'] != 'X') { print "<td align=\"right\" title=\"DKK " . dkdecimal($row['saldo'] * 1) . "\"><span style=\"color:{$color};\">" . dkdecimal($row['saldo'] * 100 / $row['valutakurs']) . "<br></span></td>\n"; } else { print "<td><br></td>\n"; } print "<td align=\"center\"><span style=\"color:{$color};\">{$valutanavn[$valuta]}<br></span></td>\n"; print "<td align=\"center\"><span style=\"color:{$color};\">{$row['genvej']}<br></span></td>\n"; print "</tr>\n"; if ($row['kontotype'] == 'H') { $linjebg = $bgcolor4; $color = '#000000'; } } if (!$menu == 'T') { print "</tbody>\n</table>\n\t</td></tr>\n</tbody></table>"; } else { print "</tbody></table></div><!-- end of rightContent --></div><!-- end of maincontentLargeHolder -->";
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>"; }
} print "<tr><td align = center colspan=2><input type=submit accesskey=\"g\" value=\"Gem/opdatér\" name=\"enheder\"></td></tr>"; print "</tbody></table border=1>"; print "<td width=50% valign=top><table cellpadding=\"1\" cellspacing=\"1\" border=\"1\"><tbody>"; print "<form name=materialer action=enheder.php method=post>"; print "<tr><td align=center valign=top> Materiale</td><td align=center valign=top> Densitet</td></tr>"; for ($x = 1; $x <= $max_antal; $x++) { if ($mat_id[$x]) { print "<tr><td> {$mat_beskrivelse[$x]}</td><td><a href=enheder.php?mat_id={$mat_id[$x]}> {$mat_densitet[$x]}</a></td></tr>"; } else { print "<tr><td><br></td></tr>"; } } if ($mat_ret_id) { $query = db_select("select * from materialer where id = {$mat_ret_id}"); $row = db_fetch_array($query); $mat_beskrivelse[$mat_ret_id] = $row['beskrivelse']; $mat_densitet[$mat_ret_id] = dkdecimal($row['densitet']); print "<input type=hidden name=mat_id value={$mat_ret_id}>"; print "<tr><td><input type=text size=25 name=mat_beskrivelse[{$mat_ret_id}] value='{$mat_beskrivelse[$mat_ret_id]}'></td><td><input type=text size=3 name=mat_densitet[{$mat_ret_id}] value={$mat_densitet[$mat_ret_id]}\t></td><tr>"; } else { print "<tr><td><input type=text size=25 name=mat_beskrivelse[0]></td><td><input type=text size=3 name=mat_densitet[0]></td><tr>"; } print "<tr><td align = center colspan=2><input type=submit accesskey=\"g\" value=\"Gem/opdatér\" name=\"materialer\"></td></tr>"; print "</tbody></table>"; print "</tbody></table>"; ?> </td></tr> </tbody></table> </body></html>
function vareopslag($art, $sort, $fokus, $id, $vis_kost, $ref, $find) { global $bgcolor; global $bgcolor5; global $bordnr; global $brugernavn; global $incl_moms; global $momssats; if ($art == 'PO') { $incl_moms = 'on'; } $lagernr = array(); $lagernavn = array(); $momsfri = array(); $x = 0; $q = db_select("select kodenr from grupper where art='VG' and box7 = 'on'", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $momsfri[$x] = $r['kodenr']; $x++; } $lager = NULL; $linjebg = NULL; if ($id && (!$art || !$ref)) { $r = db_fetch_array(db_select("select art,ref from ordrer where id='{$id}'", __FILE__ . " linje " . __LINE__)); if (!$art) { $art = $r['art']; } if (!$ref) { $ref = $r['ref']; } } if (!$ref) { $ref = $brugernavn; } if ($find) { $find = strtolower($find); $find = str_replace("*", "%", $find); # $focus="lower($focus)"; } if ($art == 'PO' && !strpos($_SERVER['PHP_SELF'], 'pos_ordre')) { $art = 'DO'; } if ($art == 'DO' || $art == 'DK') { sidehoved($id, "../debitor/ordre.php", "../lager/varekort.php", $fokus, "Kundeordre {$id} - Vareopslag"); $href = "ordre.php"; } elseif ($art == 'PO') { # print "<tr><td colspan=\"5\"><hr>"; # sidehoved($id, "../debitor/pos_ordre.php", "", $fokus, "POS ordre $id - Vareopslag"); # print "<hr></td></tr>"; $href = "pos_ordre.php"; } print "<script type=\"text/javascript\" src=\"https://code.jquery.com/jquery-latest.min.js\"></script>\n"; print "<script language=\"javascript\" type=\"text/javascript\" src=\"../javascript/arrowkey.js\"></script>\n"; print "<script type=\"text/javascript\">\n\t\t\$(document).ready(function () {\n\t\t\t\t\$('input[type=\"text\"],textarea,a[href]').keyup(function (e) {\n\t\t\t\t\t\tif (e.which === 27) {\n\t\t\t\t\t\t\twindow.location.href = '{$href}?id={$id}';\n\t\t\t\t\t\t}\n\t\t\t\t});\n\t\t});\n </script>"; /* print "<script type=\"text/javascript\"> var TableBackgroundNormalColor = \"$bgcolor\"; var TableBackgroundMouseoverColor = \"$bgcolor5\"; // These two functions need no customization. function ChangeBackgroundColor(row) { row.style.backgroundColor = TableBackgroundMouseoverColor; } function RestoreBackgroundColor(row) { row.style.backgroundColor = TableBackgroundNormalColor; } </script>"; */ print "<table cellpadding=\"1\" cellspacing=\"1\" border=\"0\" width=\"100%\" valign = \"top\"><tbody>"; $linjebg = $bgcolor; $color = '#000000'; # $linjebg=$bgcolor5; $color='#000000'; print "<tr {$linjebg}>"; if ($art != 'PO') { $listeantal = 0; $q = db_select("select id,beskrivelse from grupper where art='PL' and box4='on' order by beskrivelse", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $listeantal++; $prisliste[$listeantal] = $r['id']; $listenavn[$listeantal] = $r['beskrivelse']; } if ($listeantal) { print "<form name=\"prisliste\" action=\"../includes/prislister.php?start=0&ordre_id={$id}&fokus={$fokus}\" method=\"post\">"; print "<td><select name=prisliste>"; for ($x = 1; $x <= $listeantal; $x++) { print "<option value=\"{$prisliste[$x]}\">{$listenavn[$x]}</option>"; } print "</select></td><td><input type=\"submit\" name=\"prislist\" value=\"Vis\"></td>"; } if ($vis_kost) { print "<td colspan=8 align=center><a href={$href}?sort=varenr&funktion=vareOpslag&fokus={$fokus}&id={$id}>Udelad kostpriser</a></td></tr>"; } else { print "<td colspan=5 align=center><a href={$href}?sort=varenr&funktion=vareOpslag&fokus={$fokus}&id={$id}&vis_kost=on>Vis kostpriser</a></td></tr>"; } $rowheight = NULL; } else { $rowheight = "height=\"50\""; } print "<td><b><a href={$href}?sort=varenr&funktion=vareOpslag&fokus={$fokus}&id={$id}&vis_kost={$vis_kost}&bordnr={$bordnr}>Varenr</a></b></td>"; print "<td><b> Enhed</b></td>"; print "<td><b><a href={$href}?sort=beskrivelse&funktion=vareOpslag&fokus={$fokus}&id={$id}&vis_kost={$vis_kost}&bordnr={$bordnr}>Beskrivelse</a></b></td>"; print "<td align=right><b><a href={$href}?sort=salgspris&funktion=vareOpslag&fokus={$fokus}&id={$id}&bordnr={$bordnr}>Salgspris</a></b></td>"; print "<td align=right><b><a href={$href}?sort=beholdning&funktion=vareOpslag&fokus={$fokus}&id={$id}&bordnr={$bordnr}>Beholdning</a></b></td>"; if ($vis_kost) { print "<td align=right><b> Kostpris</b></td>"; } # if ($art!='PO') print"<td align=right><b><a href=$href?sort=beholdning&funktion=vareOpslag&fokus=$fokus&id=$id&vis_kost=$vis_kost>Beh.</a></b></td>"; print "<td><br></td>"; print " </tr>\n"; if ($ref) { $r = db_fetch_array(db_select("select afd from ansatte where navn = '{$ref}' or initialer = '{$ref}'", __FILE__ . " linje " . __LINE__)); $afd = $r['afd']; $x = 0; $q = db_select("select max(kodenr) as lagerantal from grupper where art='LG'", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $lagernavn[$x] = $r['beskrivelse']; $lagernr[$x] = $r['kodenr']; $x++; } $r = db_fetch_array(db_select("select kodenr from grupper where box1='{$afd}' and art='LG'", __FILE__ . " linje " . __LINE__)); $lager = $r['kodenr'] * 1; } if (!$sort) { $sort = 'varenr'; } if ($find) { $qtxt = "select * from varer where lukket != '1' and lower({$fokus}) like '{$find}' order by {$sort}"; } else { $qtxt = "select * from varer where lukket != '1' order by {$sort}"; } if ($art == 'PO') { if ($linjebg != $bgcolor) { $linjebg = $bgcolor; $color = '#000000'; } else { $linjebg = $bgcolor5; $color = '#000000'; } print "<tr bgcolor=\"{$linjebg}\" onclick=\"window.document.location='{$href}?id={$id}&bordnr={$bordnr}';\">"; print "<td colspan=\"5\" {$rowheight} align=\"center\"><big><big>Tilbage</big></big></td></tr>\n"; } $x = 0; #cho "$qtxt<br>"; $q = db_select($qtxt, __FILE__ . " linje " . __LINE__); while ($row = db_fetch_array($q)) { $vare_id = $row['id'] * 1; $beholdning = $row['beholdning'] * 1; # if ($row['samlevare']) $beholdning=find_samlebeholdning($vare_id); $x++; if ($linjebg != $bgcolor) { $linjebg = $bgcolor; $color = '#000000'; } else { $linjebg = $bgcolor5; $color = '#000000'; } print "<tr bgcolor=\"{$linjebg}\">"; #onclick=\"window.document.location='$href?vare_id=$row[id]&fokus=$fokus&id=$id&bordnr=$bordnr';\" # ($art=='PO')?$hreftxt="$href?vare_id=$row[id]&fokus=$fokus&id=$id&bordnr=$bordnr":$hreftxt=""; $hreftxt = "{$href}?vare_id={$row['id']}&fokus={$fokus}&id={$id}&bordnr={$bordnr}"; #"$href?vare_id=$row[id]&fokus=$fokus&id=$id&bordnr=$bordnr"; print "<td {$rowheight} ><a onfocus=\"this.style.fontSize = '20px';\" onblur=\"this.style.fontSize = '12px';\" id=\"opslag_{$x}\" href=\"{$hreftxt}\">{$row['varenr']}</a></td>"; print "<td>{$row['enhed']}<br></td>"; print "<td>{$row['beskrivelse']}<br></td>"; if ($incl_moms && !in_array($row['gruppe'], $momsfri)) { $salgspris = $row['salgspris'] + $row['salgspris'] * $momssats / 100; } else { $salgspris = $row['salgspris']; } print "<td align=right>" . dkdecimal($salgspris) . "<br></td>"; if ($vis_kost == 'on') { $query2 = db_select("select kostpris from vare_lev where vare_id = '{$vare_id}' order by posnr", __FILE__ . " linje " . __LINE__); $row2 = db_fetch_array($query2); $kostpris = dkdecimal($row2['kostpris']); print "<td align=right>{$kostpris}<br></td>"; } $reserveret = 0; if ($lager >= 1) { $q2 = db_select("select * from batch_kob where vare_id='{$vare_id}' and rest>0 and lager={$lager}", __FILE__ . " linje " . __LINE__); while ($r2 = db_fetch_array($q2)) { $q3 = db_select("select * from reservation where batch_kob_id={$r2['id']}", __FILE__ . " linje " . __LINE__); while ($r3 = db_fetch_array($q3)) { $reserveret = $reserveret + $r3['antal']; } } $linjetext = "<span title= 'Reserveret: {$reserveret}'>"; $lager <= 1 ? $l = "and lager<='{$lager}'" : ($l = "and lager='{$lager}'"); $r2 = db_fetch_array(db_select("select beholdning from lagerstatus where vare_id='{$vare_id}' {$l}", __FILE__ . " linje " . __LINE__)); $beholdning = $r2['beholdning'] * 1; print "<td align=right>{$linjetext} " . dkdecimal($beholdning) . "</span></td>"; } else { $q2 = db_select("select * from batch_kob where vare_id='{$vare_id}' and rest > 0", __FILE__ . " linje " . __LINE__); while ($r2 = db_fetch_array($q2)) { $q3 = db_select("select * from reservation where batch_kob_id={$r2['id']}", __FILE__ . " linje " . __LINE__); while ($r3 = db_fetch_array($q3)) { $reserveret = $reserveret + $r3['antal']; } } $linjetext = "<span title= 'Reserveret: {$reserveret}'>"; print "<td align=right>{$linjetext} " . dkdecimal($beholdning) . "</span></td>"; } print "</tr>\n"; } print "</tbody></table>\n"; print "<body onload=\"document.links['opslag_1'].focus();\" >\n"; # print "<script language=\"javascript\"> # document.getElementById[\"opslag_1\"].focus(); # </script>"; exit; }
if (isset($_GET['land'])) { $land = $_GET['land']; } if (isset($_GET['kontakt'])) { $kontakt = $_GET['kontakt']; } if (isset($_GET['tlf'])) { $tlf = $_GET['tlf']; } $kategori_antal = 0; if (!isset($vis_lev_addr)) { $vis_lev_addr = 'checked'; } print "<BODY onLoad=\"javascript:docChange = true;\">\n"; } $kreditmax = dkdecimal($kreditmax); if ($r = db_fetch_array(db_select("select * from grupper where art='DebInfo'", __FILE__ . " linje " . __LINE__))) { $cat_id = explode(chr(9), $r['box1']); $cat_beskrivelse = explode(chr(9), $r['box2']); $cat_antal = count($cat_id); $status_id = explode(chr(9), $r['box3']); $status_beskrivelse = explode(chr(9), $r['box4']); $status_antal = count($status_id); } else { db_modify("insert into grupper(beskrivelse,art) values ('Div DebitorInfo','DebInfo')", __FILE__ . " linje " . __LINE__); } if ($kontotype == "privat") { if (!$fornavn && !$efternavn && $firmanavn) { list($fornavn, $efternavn) = explode(",", split_navn($firmanavn)); list($lev_fornavn, $lev_efternavn) = explode(",", split_navn($lev_firmanavn)); db_modify("update adresser set fornavn='" . db_escape_string($fornavn) . "',efternavn='" . db_escape_string($efternavn) . "' where id = '{$id}'", __FILE__ . " linje " . __LINE__);
function vareopslag($sort, $fokus, $id, $vis_kost, $ref, $find, $retur) { global $bgcolor; global $bgcolor5; if ($find) { $find = str_replace("*", "%", $find); $find = " and {$fokus} like {$find} and id!='{$id}'"; } else { $find = " and id!='{$id}'"; } # sidehoved($id, "$retur", "../lager/$retur", $fokus, "Kundeordre $id - vareopslag"); # print"<table width=\"100%\" height=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tbody>"; # print"<tr><td valign=\"top\">"; print "<table cellpadding=\"1\" cellspacing=\"1\" border=\"0\t\" width=\"100%\" valign = \"top\">"; print "<tbody><tr>"; print "<td><a href=\"{$retur}?fokus={$fokus}&id={$id}\">Luk</a></td>"; if ($vis_kost) { print "<td colspan=7 align=center><a href={$retur}?sort=varenr&funktion=vareopslag&x={$x}&fokus={$fokus}&id={$id}&find={$find}>Udelad kostpriser</a></td></tr>"; } else { print "<td colspan=3 align=center><a href={$retur}?sort=varenr&funktion=vareopslag&x={$x}&fokus={$fokus}&id={$id}&vis_kost=on&find={$find}>Vis kostpriser</a></td></tr>"; } print "<td><b><a href={$retur}?sort=varenr&funktion=vareopslag&x={$x}&fokus={$fokus}&id={$id}&vis_kost={$vis_kost}&find={$find}>Varenr</a></b></td>"; print "<td><b> Enhed</b></td>"; print "<td><b><a href={$retur}?sort=beskrivelse&funktion=vareopslag&x={$x}&fokus={$fokus}&id={$id}&vis_kost={$vis_kost}&find={$find}>Beskrivelse</a></b></td>"; print "<td align=right><b><a href={$retur}?sort=salgspris&funktion=vareopslag&x={$x}&fokus={$fokus}&id={$id}&find={$find}>Salgspris</a></b></td>"; if ($vis_kost) { print "<td align=right><b> Kostpris</b></td>"; } print "<td align=right><b><a href={$retur}?sort=beholdning&funktion=vareopslag&x={$x}&fokus={$fokus}&id={$id}&vis_kost={$vis_kost}&find={$find}>Beh.</a></b></td>"; print "<td><br></td>"; # print"<td><br></td><td><b>Kunde</b></td>"; print " </tr>\n"; print "<tr><td colspan=\"6\"><hr></td></tr>"; if ($ref) { if ($row = db_fetch_array(db_select("select afd from ansatte where navn = '{$ref}'"))) { if ($row = db_fetch_array(db_select("select kodenr from grupper where box1='{$row['afd']}' and art='LG'"))) { $lager = $row['kodenr']; } } } $lager = $lager * 1; if (!$sort) { $sort = varenr; } if ($find) { $query = db_select("select * from varer where lukket != '1' {$find} order by {$sort}"); } else { $query = db_select("select * from varer where lukket != '1' order by {$sort}"); } while ($row = db_fetch_array($query)) { $query2 = db_select("select box8 from grupper where art='VG' and kodenr='{$row['gruppe']}'"); $row2 = db_fetch_array($query2); if ($row2[box8] == 'on' || $row[samlevare] == 'on') { if ($row[beholdning] != '0' and !$row[beholdning]) { db_modify("update varer set beholdning='0' where id={$row['id']}"); } } elseif ($row[beholdning]) { db_modify("update varer set beholdning='0' where id={$row['id']}"); } if ($linjebg != $bgcolor) { $linjebg = $bgcolor; $color = '#000000'; } else { $linjebg = $bgcolor5; $color = '#000000'; } print "<tr bgcolor=\"{$linjebg}\">"; print "<td><a href=\"{$retur}?vare_id={$row['id']}&fokus={$fokus}&id={$id}\">{$row['varenr']}</a></td>"; print "<td>{$row['enhed']}<br></td>"; print "<td>{$row['beskrivelse']}<br></td>"; $salgspris = dkdecimal($row[salgspris]); print "<td align=right>{$salgspris}<br></td>"; if ($vis_kost == 'on') { $query2 = db_select("select kostpris from vare_lev where vare_id = {$row['id']} order by posnr"); $row2 = db_fetch_array($query2); $kostpris = dkdecimal($row2[kostpris]); print "<td align=right>{$kostpris}<br></td>"; } $reserveret = 0; # $linjetext="<span title= 'Der er $y i tilbud og $z i ordre '>"; if ($lager >= 1) { $q2 = db_select("select * from batch_kob where vare_id={$row['id']} and rest>0 and lager={$lager}"); while ($r2 = db_fetch_array($q2)) { $q3 = db_select("select * from reservation where batch_kob_id={$r2['id']}"); while ($r3 = db_fetch_array($q3)) { $reserveret = $reserveret + $r3[antal]; } } $linjetext = "<span title= 'Reserveret: {$reserveret}'>"; if ($r2 = db_fetch_array(db_select("select beholdning from lagerstatus where vare_id={$row['id']} and lager={$lager}"))) { print "<td align=right>{$linjetext} {$r2['beholdning']}</span></td>"; } } else { $q2 = db_select("select * from batch_kob where vare_id={$row['id']} and rest > 0"); while ($r2 = db_fetch_array($q2)) { $q3 = db_select("select * from reservation where batch_kob_id={$r2['id']}"); while ($r3 = db_fetch_array($q3)) { $reserveret = $reserveret + $r3[antal]; } } $linjetext = "<span title= 'Reserveret: {$reserveret}'>"; print "<td align=right>{$linjetext} {$row['beholdning']}</span></td>"; } print "</tr>\n"; } print "</tbody></table></td></tr></tbody></table>"; exit; }
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 s**t 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; $forfalden_plus90 = 0; $y = 0; $faktnr = array(); $f = 0; if ($art == 'D') { $tmp = ""; } else { $tmp = "desc"; } # if ($fromdate && $todate) $q=db_select("select * from openpost where transdate>='$fromdate' and transdate<='$todate' and konto_id='$konto_id[$x]'",__FILE__ . " linje " . __LINE__); # elseif ($todate) $q=db_select("select * from openpost where transdate<='$todate' and konto_id='$konto_id[$x]'",__FILE__ . " linje " . __LINE__); # else $q=db_select("select * from openpost where konto_id='$konto_id[$x]'",__FILE__ . " linje " . __LINE__); # if ($fromdate && $todate) $tekst="select * from openpost where transdate>='$fromdate' and transdate<='$todate' and konto_id='$konto_id[$x]' order by faktnr,amount $tmp"; if ($todate) { $tekst = "select * from openpost where transdate<='{$todate}' and konto_id='{$konto_id[$x]}' order by faktnr,amount {$tmp}"; } else { $tekst = "select * from openpost where konto_id='{$konto_id[$x]}' order by faktnr,amount {$tmp}"; } $q = db_select("{$tekst}", __FILE__ . " linje " . __LINE__); # if ($regnaar) $q=db_select("select * from openpost where konto_id=$id[$x] and transdate <= '$regnslut' order by faktnr,amount $tmp",__FILE__ . " linje " . __LINE__); # else $q=db_select("select * from openpost where konto_id=$id[$x] and udlignet!='1' order by faktnr,amount $tmp",__FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { if ($r['udlignet'] != 1 || $r['transdate'] <= $todate && $r['udlign_date'] && $r['udlign_date'] > $todate) { if ($r['faktnr'] && !in_array($r['faktnr'], $faktnr)) { $f++; $faktnr[$f] = $r['faktnr']; $forfaldsdag = $r['forfaldsdate']; } elseif (!$r['faktnr']) { $forfaldsdag = $r['transdate']; } $oid = $r['id']; $transdate = $r['transdate']; if ($r['valuta']) { $valuta = $r['valuta']; } else { $valuta = 'DKK'; } if ($r['valutakurs']) { $valutakurs = $r['valutakurs']; } else { $valutakurs = 100; } $udlignet = "0"; $amount = $r['amount']; if ($amount > 0) { $amount += 0.0001; } else { $amount -= 0.0001; } if (!$forfaldsdag && $art == 'D' && $amount < 0) { $forfaldsdag = $r['transdate']; } elseif (!$forfaldsdag && $art == 'K' && $amount > 0) { $forfaldsdag = $r['transdate']; } elseif (!$forfaldsdag) { $forfaldsdag = $r['forfaldsdate']; } if ($r['faktnr'] && !$r['kladde_id'] && ($amount > 0 || $amount < 0 && strstr($r['beskrivelse'], "Lev. fakt")) && $r['refnr'] > 1) { #rettet 20090715 if ($r2 = db_fetch_array(db_select("select betalingsbet, betalingsdage from ordrer where id='{$r['refnr']}' and fakturanr = '{$r['faktnr']}'", __FILE__ . " linje " . __LINE__))) { $betalingsbet[$x] = trim($r2['betalingsbet']); $betalingsdage[$x] = trim($r2['betalingsdage']); $tmp = usdate(forfaldsdag($transdate, $betalingsbet[$x], $betalingsdage[$x])); if ($tmp != $forfaldsdag) { $forfaldsdag = $tmp; db_modify("update openpost set forfaldsdate = '{$forfaldsdag}' where id='{$oid}'", __FILE__ . " linje " . __LINE__); } } } #elseif () $amount = $amount * $valutakurs / 100; if ($amount > 0) { $amount = round($amount + 0.0001, 2); } else { $amount = round($amount - 0.0001, 2); } ### nedenstående er indført grundet en fejl i 2.0.3 som skrev forkert forfaldsdato i openpost og fjernet i 2.0.8. # $tmp=usdate(forfaldsdag($transdate, $betalingsbet[$x], $betalingsdage[$x])); # if ($tmp && !$forfaldsdag) db_modify("update openpost set forfaldsdate='$tmp' where id='$oid'",__FILE__ . " linje " . __LINE__); # $forfaldsdag=$tmp; ################ $fakt_utid = strtotime($transdate); $forf_utid = strtotime($forfaldsdag); $dage = round(($forf_utid - $fakt_utid) / 86400, 0); $forfaldsdag_plus8 = usdate(forfaldsdag($transdate, 'netto', $dage + 8)); $forfaldsdag_plus30 = usdate(forfaldsdag($transdate, 'netto', $dage + 30)); $forfaldsdag_plus60 = usdate(forfaldsdag($transdate, 'netto', $dage + 60)); $forfaldsdag_plus90 = usdate(forfaldsdag($transdate, 'netto', $dage + 90)); if ($forfaldsdag < $currentdate) { $rykkerbelob = $rykkerbelob + $amount; } if ($forfaldsdag < $currentdate && $forfaldsdag_plus8 > $currentdate) { $forfalden = $forfalden + $amount; } if ($forfaldsdag_plus8 <= $currentdate && $forfaldsdag_plus30 > $currentdate) { $forfalden_plus8 = $forfalden_plus8 + $amount; } if ($forfaldsdag_plus30 <= $currentdate && $forfaldsdag_plus60 > $currentdate) { $forfalden_plus30 = $forfalden_plus30 + $amount; } if ($forfaldsdag_plus60 <= $currentdate && $forfaldsdag_plus90 > $currentdate) { $forfalden_plus60 = $forfalden_plus60 + $amount; } if ($forfaldsdag_plus90 <= $currentdate) { $forfalden_plus90 = $forfalden_plus90 + $amount; } $y = $y + $amount; } } $y > 0 ? $y = round($y + 0.0001, 2) : ($y = round($y - 0.0001, 2)); if ($y > 0.01 || $udlignet == "0") { if ($linjebg != $bgcolor) { $linjebg = $bgcolor; $color = '#000000'; } elseif ($linjebg != $bgcolor5) { $linjebg = $bgcolor5; $color = '#000000'; } $forfaldsum = $forfaldsum + $forfalden; $forfaldsum_plus8 = $forfaldsum_plus8 + $forfalden_plus8; $forfaldsum_plus30 = $forfaldsum_plus30 + $forfalden_plus30; $forfaldsum_plus60 = $forfaldsum_plus60 + $forfalden_plus60; $forfaldsum_plus90 = $forfaldsum_plus90 + $forfalden_plus90; $sum = $sum + $y; print "<tr bgcolor=\"{$linjebg}\">"; if ($popup) { print "<td onClick=\"window.open('rapport.php?rapportart=kontokort&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$kontonr[$x]}&konto_til={$kontonr[$x]}&submit=ok','kreditorrapport','{$jsvars}')\" onMouseOver=\"this.style.cursor = 'pointer'\"><a>"; } else { print "<td><a href=rapport.php?rapportart=kontokort&kilde=openpost&kto_fra={$konto_fra}&kilde_kto_til={$konto_til}&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$kontonr[$x]}&konto_til={$kontonr[$x]}&submit=ok>"; } print "<span title='Klik for detaljer' style=\"text-decoration: underline;\">{$kontonr[$x]}</span></a></td>"; print "<td>{$firmanavn[$x]}</td>"; /* if ($forfalden_plus90 != 0) $color="rgb(255, 0, 0)"; else $color="rgb(0, 0, 0)"; $tmp=dkdecimal($forfalden_plus90); print "<td align=right><span style='color: $color;'>$tmp</span></td>"; if ($forfalden_plus60 != 0) $color="rgb(255, 0, 0)"; else $color="rgb(0, 0, 0)"; $tmp=dkdecimal($forfalden_plus60); print "<td align=right><span style='color: $color;'>$tmp</span></td>"; if ($forfalden_plus60 != 0) $color="rgb(255, 0, 0)"; else $color="rgb(0, 0, 0)"; $tmp=dkdecimal($forfalden_plus30); print "<td align=right><span style='color: $color;'>$tmp</span></td>"; if ($forfalden_plus30 != 0) $color="rgb(255, 0, 0)"; else $color="rgb(0, 0, 0)"; $tmp=dkdecimal($forfalden_plus8); print "<td align=right><span style='color: $color;'>$tmp</span></td>"; if ($forfalden != 0) $color="rgb(255, 0, 0)"; else $color="rgb(0, 0, 0)"; $tmp=dkdecimal($forfalden); */ if ($art == 'D' && $forfalden_plus90 > 0 || $art == 'K' && $forfalden_plus90 < 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfalden_plus90); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; if ($art == 'D' && $forfalden_plus60 > 0 || $art == 'K' && $forfalden_plus60 < 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfalden_plus60); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; if ($art == 'D' && $forfalden_plus30 > 0 || $art == 'K' && $forfalden_plus30 < 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfalden_plus30); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; if ($art == 'D' && $forfalden_plus8 > 0 || $art == 'K' && $forfalden_plus8 < 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfalden_plus8); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; if ($art == 'D' && $forfalden > 0 || $art == 'K' && $forfalden < 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfalden); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; $tmp = dkdecimal($y); if (abs($y) < 0.01) { print "<td align=right title=\"Klik her for at udligne åbne poster\"><a href=\"rapport.php?submit=ok&rapportart=openpost&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$konto_fra}&konto_til={$konto_til}&udlign={$konto_id[$x]}\">{$tmp}</a></td>"; } else { print "<td align=right>{$tmp}</td>"; } if ($kontoudtog[$x] == 'on' && $art == "D") { print "<td align=center><input type=checkbox name=kontoudtog[{$x}] checked>"; } elseif ($art == "D") { print "<td align=center><input type=checkbox name=kontoudtog[{$x}]>"; } print "</tr>\n"; } print "<input type=hidden name=rykkerbelob[{$x}] value={$rykkerbelob}>"; } print "<tr><td colspan=10><hr></td></tr>\n"; print "<tr><td><br></td><td>I alt</td>"; if ($forfaldsum_plus90 != 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfaldsum_plus90); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; if ($forfaldsum_plus60 != 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfaldsum_plus60); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; if ($forfaldsum_plus60 != 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfaldsum_plus30); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; if ($forfaldsum_plus30 != 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfaldsum_plus8); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; if ($forfaldsum != 0) { $color = "rgb(255, 0, 0)"; } else { $color = "rgb(0, 0, 0)"; } $tmp = dkdecimal($forfaldsum); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; $color = "rgb(0, 0, 0)"; $tmp = dkdecimal($sum); print "<td align=right><span style='color: {$color};'>{$tmp}</span></td>"; print "<input type=hidden name=rapportart value=\"openpost\">"; print "<input type=hidden name=regnaar value={$regnaar}>"; print "<input type=hidden name=dato_fra value={$dato_fra}>"; print "<input type=hidden name=dato_til value={$dato_til}>"; print "<input type=hidden name=konto_fra value={$konto_fra}>"; print "<input type=hidden name=konto_til value={$konto_til}>"; print "<input type=hidden name=kontoantal value={$kontoantal}>"; if ($art == 'D') { print "<tr><td colspan=10 align=center><span title=\"Klik her for at maile kontoudtog til de modtagere som er afmærket herover\"><input type=submit value=\"Mail kontoudtog\" name=\"submit\"></span> \n\t\t<span title='Klik her for at oprette rykker til de som er afmærkede herover'><input type=submit value=\"Opret rykker\" name=\"submit\"></span> \n\t\t<span onmouseover=\"return overlib('" . findtekst(242, $sprog_id) . "', WIDTH=800);\" onmouseout=\"return nd();\"><input type=submit value=\"Ryk alle\" name=\"submit\"></span></td></tr>\n"; } print "</form>\n"; print "<tr><td colspan=10><hr></td></tr>\n"; print "</tbody></table>"; }
function momsrubrik($rubrik_konto, $rubrik_navn, $regnaar, $regnstart, $regnslut) { print "<tr><td>" . $rubrik_konto . "</td><td colspan='3'>" . $rubrik_navn . "</td>"; if ($rubrik_konto) { $q = db_select("select * from kontoplan where regnskabsaar='{$regnaar}' and kontonr={$rubrik_konto}", __FILE__ . " linje " . __LINE__); $r = db_fetch_array($q); # $kontobeskrivelse[$x]=$r['beskrivelse']; $rubriksum = 0; $q = db_select("select * from transaktioner where transdate>='{$regnstart}' and transdate<='{$regnslut}' and kontonr={$rubrik_konto}", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $rubriksum += afrund($r['debet'], 2) - afrund($r['kredit'], 2); } print "<td align='right'>" . dkdecimal($rubriksum) . "</td>"; } else { print "<td align='right'><span title='Intet beløb i den angivne periode.'>-</span></td>"; } print "<td> </td></tr>\n"; return; }
print "<td title=\"Hvis dette felt er afmærket medtages linjen ikke ved næste genfakturering\" align = \"center\">\n\t\t<input class=\"inputbox\" {$onfocus} type=\"checkbox\" name=\"kdo_{$y}\" checked></td>"; print "</tr>"; if ($procenttillag[$x]) { $tillag = $ordresum * $procenttillag[$x] / 100; #echo htmlentities($procentbeskr)." -> $procenttillag[$x]<br>"; $pctbesk = str_replace('$procenttillæg;', dkdecimal($procenttillag[$x]), $procentbeskr); print "<tr>"; print "<td></td>"; print "<td>{$procentvare}</td>"; print "<td></td>"; print "<td>{$pctbesk}</td>"; print "<td colspan=\"2\"></td>"; if ($procentfakt) { print "<td></td>"; } print "<td align=\"right\">" . dkdecimal($tillag) . "</td>"; print "<td</td>"; print "</tr>"; } print "</tbody></table></td></tr>"; } print "<input type=\"hidden\" name=\"fokus\" id=\"fokus\">"; print "<input type=\"hidden\" name=\"linjeantal\" value=\"{$y}\">"; if ($submit != 'Fakturer' || $fejltekst) { print "<td align=\"center\" width={$width}><input type=\"submit\" style=\"width:80px\" accesskey=\"g\" value=\"Gem\" name=\"submit\" onclick=\"javascript:docChange = false;\">\n"; if (!$fejltekst) { print " <input type=\"submit\" style=\"width:80px\" accesskey=\"f\" value=\"Fakturer\" name=\"submit\" onclick=\"javascript:docChange = false;\">\n"; } print "</td>"; } print "</tbody></table></td></tr>";
function bidrag($feltnavn, $sum, $sum_m_moms, $kostpris, $udlignet) { global $ialt; global $totalkost; global $genberegn; $ialt = $ialt + $sum; $totalkost = $totalkost + $kostpris; $dk_db = dkdecimal($sum - $kostpris, 2); $sum = round($sum, 2); $kostpris = round($kostpris, 2); if ($sum) { $dk_dg = dkdecimal(($sum - $kostpris) * 100 / $sum, 2); } else { $dk_dg = '0,00'; } $feltnavn == 'sum' ? $tmp = $sum : ($tmp = $sum_m_moms); $tmp = dkdecimal($tmp, 2); if ($genberegn) { print "<span title= 'db: {$dk_db} - dg: {$dk_dg}%'>{$tmp}/{$dk_db}/{$dk_dg}%<br></span>"; } else { if ($udlignet) { $span = "style='color: #000000;' title='db: {$dk_db} - dg: {$dk_dg}%'"; } else { $span = "style='color: #FF0000;' title='Ikke udlignet\r\ndb: {$dk_db} - dg: {$dk_dg}%'"; } print "<span {$span}>{$tmp}<br></span>"; } }
function formularprint($id, $formular, $lev_nr, $charset, $udskriv_alle_til) { print "<!--function formularprint start-->"; include "../includes/std_func.php"; include "../includes/var2str.php"; global $db; global $db_id; global $dkdato; global $form_id; global $charset; global $formularsprog; global $fp; global $gebyr; global $ialt; # global $id; global $lev_nr; global $linjeafstand; global $logo; global $logoart; global $moms; global $momsgrundlag; global $momssats; global $nextside; global $printerid; global $ref; global $side; global $subtotal; global $sum; global $transportsum; global $y; global $ya; global $mailantal; global $bruger_id; global $sprog_id; global $exec_path; global $vis_saet; global $brugsamletpris; $fp1 = NULL; $kommentarprint = NULL; $skjul_nul_lin = NULL; $folgeseddel = 0; $mailantal = 0; $nomailantal = 0; $side_x = 210; $side_y = 297; $side_x = afrund($side_x * 2.86, 0); $side_y = afrund($side_y * 2.86, 0); $preview = NULL; $initext = "%!\n%%Creator: Saldi\n%%Pages: 1\n%%BoundingBox: 0 0 {$side_x} {$side_y}\n%%EndComments\n<< /PageSize [{$side_x} {$side_y}] >> setpagedevice\n"; #$initext="%!\n%%Creator: Saldi\n%%Pages: 1\n%%EndComments\n"; $form = array(); $q = db_SELECT("select box2,box14 from grupper where art = 'DIV' and kodenr = '3'", __FILE__ . " linje " . __LINE__); $r = db_fetch_array($q); $rabatvare_id = $r['box2'] * 1; $brugsamletpris = $r['box14']; if ($vis_saet) { $brugsamletpris = 'on'; } if ($id == -1) { # Saa er der flere fakturaer $ordre_antal = $_GET['ordre_antal']; $ordre_id = explode(",", $_GET['skriv']); if (strpos($formular, ",")) { list($formular, $folgeseddel) = explode(",", $formular); } } elseif (!is_numeric($id)) { $preview = 1; $ordre_id[0] = 0; $ordre_antal = 1; } else { $ordre_id[0] = $id; $ordre_antal = 1; } if ($formular == 3) { $folgeseddel = 1; } if ($formular != 3 && $folgeseddel) { for ($q = 0; $q < $ordre_antal; $q++) { $form[$q] = $formular; $r = db_fetch_array(db_select("select lev_addr1,lev_postnr from ordrer where id = {$ordre_id[$q]}", __FILE__ . " linje " . __LINE__)); if ($r['lev_addr1'] && $r['lev_postnr']) { $form[$q] = 3; $ordre_antal++; for ($z = $ordre_antal; $z > $q; $z--) { $ordre_id[$z] = $ordre_id[$z - 1]; } $q++; $form[$q] = $formular; } } } $r = db_fetch_array(db_select("select box6,box12 from grupper where art = 'POS' and kodenr = '2'", __FILE__ . " linje " . __LINE__)); $vis_saet = trim($r['box12']); if ($vis_saet) { $brugsamletpris = 'on'; } $r = db_fetch_array(db_select("select * from grupper where art='DIV' and kodenr='3'", __FILE__ . " linje " . __LINE__)); $incl_moms = $r['box1']; if ($folgeseddel) { $kommentarprint = $r['box3']; $skjul_nul_lin = $r['box8']; } $fsize = filesize("../includes/faktinit.ps"); $initfil = fopen("../includes/faktinit.ps", "r"); $initext = $initext . fread($initfil, $fsize); fclose($initfil); if (!file_exists("../temp/{$db}")) { mkdir("../temp/{$db}", 0775); } $mappe = "../temp/{$db}/{$bruger_id}" . "_*"; system("rm -r {$mappe}"); $mappe = "../temp/{$db}/" . abs($bruger_id) . "_" . date("his"); mkdir("{$mappe}", 0775); if ($ordre_antal > 1) { $printfilnavn = 'udskrift'; if ($formular <= 1) { $printfilnavn = "tilbud"; } if ($formular == 2) { $printfilnavn = "ordrebek"; } if ($formular == 3) { $printfilnavn = "flg_seddel"; } if ($formular == 4) { $printfilnavn = "faktura"; } if ($formular == 9) { $printfilnavn = "plukliste"; } if ($formular == 12) { $printfilnavn = "forslag"; } if ($formular == 13) { $printfilnavn = "rekvisition"; } if ($formular == 14) { $printfilnavn = "lev_fakt"; } $fp1 = fopen("{$mappe}/{$printfilnavn}", "w"); } for ($o = 0; $o < $ordre_antal; $o++) { $fp = $fp1; if (isset($form[$o])) { $formular = $form[$o]; } $varenr = array(); $lev_varenr = array(); $leveres = array(); $vare_id = array(); $linje_id = array(); $antal = array(); $tidl_lev = array(); $rest = array(); $enhed = array(); $rabat = array(); $momssats = array(); $pris = array(); $l_sum = array(); $linjesum = array(); $sum = ''; $transportsum = 0; if ($preview) { $ref = 'Egen ref'; $ordrenr = 'Ordrenummer'; $fakturanr = 'Fakturanummer'; $mail_fakt = ''; $email[0] = 'Kundens email'; $pbs = ''; } else { $query = db_select("select afd,status,email,ordrenr,fakturanr,mail_fakt,pbs,art,ref,sprog,udskriv_til,mail_subj,mail_text,dokument,procenttillag from ordrer where id = '{$ordre_id[$o]}'", __FILE__ . " linje " . __LINE__); $row = db_fetch_array($query); $status = $row['status']; $afd = $row['afd']; $art = $row['art']; $ref = $row['ref']; $ordrenr = $row['ordrenr']; if (!$udskriv_alle_til) { $udskriv_til = $row['udskriv_til']; } else { $udskriv_til = $udskriv_alle_til; } $fakturanr = $row['fakturanr']; $mail_fakt = $row['mail_fakt']; $email[0] = $row['email']; $pbs = $row['pbs']; $mail_subj = $row['mail_subj']; $mail_text = $row['mail_text']; $mail_bilag = $row['dokument']; $procenttillag = $row['procenttillag'] * 1; # $ordresum=$row['sum']; # $ordremomssum=$row['moms']; $formularsprog = strtolower($row['sprog']); if (!$formularsprog) { $formularsprog = "dansk"; } if ($formular == 4 || $formular == 5) { if (!$fakturanr) { #20130508 return "Fakturering afbrudt (Fakturanr mangler)"; } elseif ($row['status'] < 3) { #20130508 return "Fakturering afbrudt (Status ikke opdateret)"; } elseif ($row['art'] == "DK") { $formular = 5; } else { $formular = 4; } } $y = 185; $antal_ordrelinjer = 25; $x = 0; $r = db_fetch_array(db_SELECT("select adresser.gruppe,ordrer.procenttillag from ordrer,adresser where ordrer.id = '{$ordre_id[$o]}' and adresser.id=ordrer.konto_id", __FILE__ . " linje " . __LINE__)); $gruppe = $r['gruppe']; $procenttillag = $r['procenttillag']; $r = db_fetch_array(db_select("select box8 from grupper where art='DG' and kodenr='{$gruppe}'", __FILE__ . " linje " . __LINE__)); $b2b = $r['box8']; } $bgr = "bg"; if ($formular == 5 && file_exists("../logolib/{$db_id}/kreditnota_bg.pdf")) { $bgr = "kreditnota_bg"; } elseif ($formular >= 3 && file_exists("../logolib/{$db_id}/faktura_bg.pdf")) { $bgr = "faktura_bg"; } elseif ($formular == 2 && file_exists("../logolib/{$db_id}/ordrer_bg.pdf")) { $bgr = "ordrer_bg"; } elseif ($formular <= 1 && file_exists("../logolib/{$db_id}/tilbud_bg.pdf")) { $bgr = "tilbud_bg"; } #cho "formular: $formular bg: $bgr<br>"; #exit(); print "<!-- kommentar for at skjule uddata til siden \n"; if (!file_exists("../logolib/{$db_id}")) { mkdir("../logolib/{$db_id}"); } if (system("which pdftk") && file_exists("../logolib/{$db_id}/{$bgr}.pdf")) { $logoart = 'PDF'; } elseif ($udskriv_til == 'PDF-tekst') { $logoart = 'PDF'; } elseif (file_exists("../logolib/{$db_id}/{$formular}.ps")) { $logo = "../logolib/{$db_id}/{$formular}.ps"; $logoart = 'PS'; } elseif (file_exists("../logolib/{$db_id}/{$bgr}.ps")) { $logo = "../logolib/{$db_id}/{$bgr}.ps"; $logoart = 'PS'; } else { $query = db_select("select * from formularer where formular = '{$formular}' and art = '1' and beskrivelse = 'LOGO' and lower(sprog)='{$formularsprog}'", __FILE__ . " linje " . __LINE__); if ($row = db_fetch_array($query)) { $logo_X = $row['xa'] * 2.86; $logo_Y = $row['ya'] * 2.86; } else { $logo_X = 430; $logo_Y = 758; } if (file_exists("../logolib/logo_{$db_id}.eps")) { $logo = "../logolib/logo_{$db_id}.eps"; } else { $logo = "../logolib/logo.eps"; } $logoart = 'EPS'; } print "-->\n"; if ($logoart != 'PDF') { $fsize = filesize($logo); $logofil = fopen($logo, "r"); $translate = 0; $logo = ""; while (!feof($logofil)) { $linje = fgets($logofil); if ($logoart == 'EPS') { if (substr($linje, 0, 2) != "%!") { if (strstr($linje, "translate") && !$translate) { $linje = "{$logo_X} {$logo_Y} translate \n"; $translate = 1; } $logo = $logo . $linje; } } else { if (strstr($linje, 'showpage')) { $linje = ''; } if (strstr($linje, '%%PageTrailer')) { $linje = ''; } if (strstr($linje, '%%Trailer')) { $linje = ''; } if (strstr($linje, '%%Pages:')) { $linje = ''; } if (strstr($linje, '%%EOF')) { $linje = ''; } $logo = $logo . $linje; } } fclose($logofil); } #cho "select * from formularer where formular = '$formular' and art = '3' and lower(sprog)='$formularsprog'<br>"; $query = db_select("select * from formularer where formular = '{$formular}' and art = '3' and lower(sprog)='{$formularsprog}'", __FILE__ . " linje " . __LINE__); while ($row = db_fetch_array($query)) { if ($row['beskrivelse'] == 'generelt') { $antal_ordrelinjer = $row['xa']; $ya = $row['ya']; $linjeafstand = $row['xb']; # $Opkt=$y-($antal_ordrelinjer*$linjeafstand); } else { $x++; $variabel[$x] = $row['beskrivelse']; $justering[$x] = $row['justering']; $xa[$x] = $row['xa']; $str[$x] = $row['str']; $laengde[$x] = $row['xb']; $color[$x] = $row['color']; $fed[$x] = $row['fed']; $kursiv[$x] = $row['kursiv']; $form_font[$x] = $row['font']; } $var_antal = $x; } if ($formular == 3 && !$lev_nr) { $r2 = db_fetch_array(db_select("select MAX(lev_nr) as lev_nr from batch_salg where ordre_id = {$ordre_id[$o]}", __FILE__ . " linje " . __LINE__)); $lev_nr = $r2['lev_nr'] * 1; } if ($formular == 3 || $formular == 9) { $udskriv_til = 'PDF'; } if ($mail_fakt && $formular != 3 && $udskriv_til != 'PDF') { $mailantal++; if ($formular <= 1) { $pfnavn = "tilbud" . $ordrenr; } if ($formular == 2) { $pfnavn = "ordrebek" . $ordrenr; } if ($formular == 4) { $pfnavn = "fakt" . $fakturanr; } if ($formular == 5) { $pfnavn = "kn" . $fakturanr; } if ($formular == 9) { $pfnavn = "plukliste" . $ordrenr; } if ($formular == 12) { $printfilnavn = "forslag" . $ordrenr; } if ($formular == 13) { $printfilnavn = "rekvisition.{$ordrenr}"; } if ($formular == 14) { $printfilnavn = "lev_fakt.{$ordrenr}"; } $email[$mailantal] = $email[0]; $mailsprog[$mailantal] = $formularsprog; $form_nr[$mailantal] = $formular; $pfliste[$mailantal] = $pfnavn; $pfnavn = $mappe . "/" . $pfnavn; $fp2 = fopen("{$pfnavn}", "w"); $fp = $fp2; } else { $nomailantal++; if ($ordre_antal <= 1) { #mere sige navn til udskrifter. if ($formular <= 1) { $printfilnavn = "tilbud" . $ordrenr; } if ($formular == 2) { $printfilnavn = "ordrebek" . $ordrenr; } if ($formular == 3) { $printfilnavn = "flgs" . $ordrenr . "_" . $lev_nr; } if ($formular == 4) { $printfilnavn = "fakt" . $fakturanr; } if ($formular == 5) { $printfilnavn = "kn" . $fakturanr; } if ($formular == 9) { $printfilnavn = "plukliste" . $ordrenr; } if ($formular == 12) { $printfilnavn = "forslag" . $ordrenr; } if ($formular == 13) { $printfilnavn = "rekvisition.{$ordrenr}"; } if ($formular == 14) { $printfilnavn = "lev_fakt.{$ordrenr}"; } $pfnavn = $mappe . "/" . $printfilnavn; $fp = fopen("{$pfnavn}", "w"); } } $side = 1; if ($logoart == 'PS') { fwrite($fp, $logo); } fwrite($fp, $initext); $rabat[0] = formulartekst($ordre_id[$o], $formular, $formularsprog); if ($ordre_id[$o]) { $id = $ordre_id[$o]; $x = 0; $sum = 0; $moms = 0; $momssum = 0; $tmp = 0; $saetnr = 0; #cho "$formular<br>"; #xit; if ($preview) { for ($x = 1; $x <= 22; $x++) { $posnr[$x] = $x; $varenr[$x] = utf8_iso8859('Varenr') . $x; $projekt[$x] = utf8_iso8859('Projektnr'); $beskrivelse[$x] = utf8_iso8859('Eksempel på en linjetekst'); } } else { if ($brugsamletpris) { $r = db_fetch_array(db_select("select varenr from ordrelinjer where ordre_id = {$ordre_id[$o]} and vare_id='{$rabatvare_id}'", __FILE__ . " linje " . __LINE__)); if ($r['varenr']) { $rabatvarenr = $r['varenr']; $rvnr = 1; } else { $rvnr = 0; } } # if ($rvnr) $qtxt="select * from ordrelinjer where ordre_id = '$ordre_id[$o]' order by saet,posnr"; # else #20150302 if ($brugsamletpris && $formular == 3) { $qtxt = "select * from ordrelinjer where ordre_id = '{$ordre_id[$o]}' and samlevare != 'on' and varenr != '{$rabatvarenr}' order by posnr"; } else { $qtxt = "select * from ordrelinjer where ordre_id = '{$ordre_id[$o]}' order by posnr"; } $q = db_select($qtxt, __FILE__ . " linje " . __LINE__); while ($row = db_fetch_array($q)) { if ($row['posnr'] > 0 && (!$row['samlevare'] || !is_numeric($row['samlevare'])) && (!in_array($row['posnr'], $posnr) || $formular != 3)) { # if ($x>=1 && $row['saet'] && !$saet[$x]) { # $x++; # $beskrivelse[$x]=" "; # $saet[$x]=0; # $samlevare[$x]=0; # } elseif ($x>=1 && $saet[$x] && $samlevare[$x]) { # $x--; # } $x++; $posnr[$x] = trim($row['posnr']); $varenr[$x] = trim($row['varenr']); $lev_varenr[$x] = trim($row['lev_varenr']); $projekt[$x] = $row['projekt']; $beskrivelse[$x] = stripslashes(trim($row['beskrivelse'])); if ($varenr[$x]) { $vare_id[$x] = $row['vare_id']; $linje_id[$x] = $row['id']; $antal[$x] = $row['antal'] * 1; $leveres[$x] = $row['leveres'] * 1; $dkantal[$x] = str_replace(".", ",", $antal[$x]); $momsfri[$x] = $row['momsfri']; $omvbet[$x] = $row['omvbet']; $saet[$x] = $row['saet']; $samlevare[$x] = $row['samlevare']; #cho "$posnr[$x] $saet[$x] $samlevare[$x]<br>"; $varemomssats[$x] = $row['momssats'] * 1; if (!$momsfri[$x] && !$varemomssats[$x]) { $varemomssats[$x] = $momssats; } if ($varemomssats[$x] > $momssats) { $varemomssats[$x] = $momssats; } list($a, $b) = explode(",", $dkantal[$x]); if ($b) { $dkantal[$x] = "{$a},{$b}"; } else { $dkantal[$x] = $a; } if ($formular == 5) { $antal[$x] = $antal[$x] * -1; $dkantal[$x] = str_replace("-", "", $dkantal[$x]); } if ($formular == 3 || $formular == 9) { if (in_array('lokation', $variabel)) { $r2 = db_fetch_array(db_select("select location from varer where id='{$vare_id[$x]}'", __FILE__ . " linje " . __LINE__)); if ($r2['location']) { if ($afd && strstr($r2['location'], "|")) { # 20150417 Ændret strpos til strstr $lokation = array(); $lokation = explode("|", $r2['location']); $beskrivelse[$x] .= chr(9) . $lokation[$afd - 1]; } else { $beskrivelse[$x] .= chr(9) . $r2['location']; } } } $lev_nr *= 1; $lev_antal[$x] = 0; $q2 = db_select("select antal from batch_salg where linje_id = {$linje_id[$x]} and lev_nr = {$lev_nr}", __FILE__ . " linje " . __LINE__); while ($r2 = db_fetch_array($q2)) { $lev_antal[$x] = $lev_antal[$x] + $r2['antal']; } $tidl_lev[$x] = 0; $q2 = db_select("select antal from batch_salg where linje_id = {$linje_id[$x]} and lev_nr < {$lev_nr}", __FILE__ . " linje " . __LINE__); while ($r2 = db_fetch_array($q2)) { $tidl_lev[$x] = $tidl_lev[$x] + $r2['antal']; } $rest[$x] = $antal[$x] - $lev_antal[$x] - $tidl_lev[$x]; } $enhed[$x] = $row['enhed']; $pris[$x] = $row['pris']; # if ($rvnr) { # if ($varenr[$x]=='R') list($pris[$x])=explode("|",$row['lev_varenr']); # $rabat[$x]=0; # } else { $rabat[$x] = $row['rabat']; # } $procent[$x] = $row['procent']; $row['rabat'] != 0 ? $m_rabat[$x] = 0 : ($m_rabat[$x] = $row['m_rabat'] * 1); $rabatart[$x] = $row['rabatart']; if ($rabatart[$x] == "amount") { $l_sum[$x] = afrund(($pris[$x] - $rabat[$x]) * $antal[$x], 2); $linjesum[$x] = ($pris[$x] - $rabat[$x]) * $antal[$x]; $linjemoms[$x] = $varemomssats[$x] / 100 * (($pris[$x] - $rabat[$x]) * $antal[$x]); } else { $l_sum[$x] = afrund($row['pris'] * $antal[$x] - $pris[$x] * $antal[$x] * $rabat[$x] / 100, 2); #Afrunding tilfoejet 2009.01.26 grundet diff i ordre 98 i saldi_104 $linjesum[$x] = $row['pris'] * $antal[$x] - $pris[$x] * $antal[$x] * $rabat[$x] / 100; $linjemoms[$x] = $varemomssats[$x] / 100 * ($pris[$x] * $antal[$x] - $row['pris'] * $antal[$x] * $rabat[$x] / 100); } if ($momsfri[$x] == 'on' || $omvbet[$x]) { $linjemoms[$x] = 0; } if ($procent[$x] || $procent[$x] == '0') { $l_sum[$x] = afrund($l_sum[$x] - $l_sum[$x] * (100 - $procent[$x]) / 100, 2); $linjesum[$x] = afrund($linjesum[$x] - $linjesum[$x] * (100 - $procent[$x]) / 100, 2); $linjemoms[$x] = afrund($linjemoms[$x] - $linjemoms[$x] * (100 - $procent[$x]) / 100, 2); } $sum += $linjesum[$x]; if ($momsfri[$x] != 'on' && !$omvbet[$x]) { $moms += afrund($l_sum[$x] * $varemomssats[$x] / 100, 3); #Decimaltal aendret til 3 2010.12.17 grundet momsdiff (0,01 kr) i ordre id 371 i saldi_297 $momssum += afrund($linjesum[$x], 2); #Afrunding tilfoejet 2009.01.26 grundet diff i ordre 98 i saldi_104 if ($incl_moms && !$b2b) { $tmp = afrund($pris[$x] + $pris[$x] * $varemomssats[$x] / 100, 2); if ($rabatart[$x] == "amount") { $linjesum[$x] = ($tmp - $rabat[$x]) * $antal[$x]; } else { $linjesum[$x] = $tmp * $antal[$x] - $tmp * $antal[$x] * $rabat[$x] / 100; } $pris[$x] = $tmp; } } if ($rvnr) { if ($varenr[$x] == $rabatvarenr) { list($pris[$x]) = explode("|", $row['lev_varenr']); } $rabat[$x] = 0; $linjesum[$x] = ($pris[$x] - $rabat[$x]) * $antal[$x]; } } else { $dkantal[$x] = NULL; $varemomssats[$x] = NULL; } $beskrivelse[$x] = var2str($beskrivelse[$x], $ordre_id[$o], $posnr[$x], $varenr[$x], $dkantal[$x], $enhed[$x], $pris[$x], $procent[$x], $serienr[$x], $varemomssats[$x], $rabat[$x]); if ($formular == 3 && $skjul_nul_lin && !$lev_antal[$x]) { $varenr[$x] = NULL; } # } else { $dkantal[$x] = NULL; } if ($saet[$x]) { if ($lev_varenr[$x]) { list($linjesum[$x]) = explode("|", $lev_varenr[$x], 2); $dkantal[$x] = ''; } else { $linjesum[$x] = ''; } $pris[$x] = ''; /* if ($saetnr && $saetnr!=$saet[$x]) { $r=db_fetch_array(db_select("select beskrivelse from varer where id = '$svid'",__FILE__ . " linje " . __LINE__)); $beskrivelse[$x]=$r['beskrivelse']; $linjesum[$x]=$saetpris; $saet[$x]=0; $saetpris=0; $saetpris=afrund($linjesum[$x-1],2); } else $saetpris+=afrund($linjesum[$x],2); $saetnr=$saet[$x]; */ } } /* if ($saet[$x] && $saetnr) { $x++; $r=db_fetch_array(db_select("select beskrivelse from varer where id = '$svid'",__FILE__ . " linje " . __LINE__)); $beskrivelse[$x]=$r['beskrivelse']; $linjesum[$x]=$saetpris; $saetpris=0; } */ $tmp = $row['rabat'] * 1; if ($x > 0 && $formular < 4 && !$tmp && $m_rabat[$x] && $status < 3) { $y = $x; $x++; $posnr[$x] = $posnr[$y]; $vare_id[$x] = $vare_id[$y]; $varenr[$x] = $varenr[$y]; $lev_varenr[$x] = $lev_varenr[$y]; $antal[$x] = $antal[$y]; $projekt[$x] = $projekt[$y]; # $beskrivelse[$x]=findtekst(366,$sprog_id); $dkantal[$x] = $dkantal[$y]; $lev_antal[$x] = $lev_antal[$y]; $leveres[$x] = $leveres[$y]; $tidl_lev[$x] = $tidl_lev[$y]; $rest[$x] = $rest[$y]; $enhed[$x] = ''; $rabat[$x] = $rabat[$y]; $incl_moms && !$b2b ? $tmp = $m_rabat[$y] + $m_rabat[$y] * $varemomssats[$y] / 100 : ($tmp = $m_rabat[$y]); $pris[$x] = $tmp * -1; $rabatpct = afrund($tmp * 100 / usdecimal($pris[$y]), 2); $l_sum[$x] = afrund($tmp * -$antal[$x], 3); $linjesum[$x] = $l_sum[$x]; # $linjesum[$x]=dkdecimal($l_sum[$x]); if ($varemomssats[$y] > 0) { $linjemoms[$x] = $varemomssats[$y] * $linjesum[$x] * 0.01; } else { $linjemoms[$x] = $varemomssats[$y] * $linjesum[$x]; } $sum += $l_sum[$x]; if ($momsfri[$y] != 'on' && !$omvbet[$x]) { $moms += afrund($m_rabat[$y] * $antal[$x] * $varemomssats[$y] / -100, 3); $momssum = $momssum + afrund($m_rabat[$y] * -$antal[$x], 2); } $rabatart[$x] == 'amount' ? $beskrivelse[$x] = findtekst(466, $sprog_id) : ($beskrivelse[$x] = findtekst(467, $sprog_id)); $beskrivelse[$x] = str_replace('$rabatpct', $rabatpct, $beskrivelse[$x]); } $linjeantal = $x; } if ($status < 3 && $procenttillag > 0) { $r = db_fetch_array(db_select("select box13 from grupper where art = 'DIV' and kodenr = '3'", __FILE__ . " linje " . __LINE__)); list($tmp, $procentvare) = explode(chr(9), $r['box13']); if ($procentvare && ($r = db_fetch_array(db_select("select beskrivelse from varer where varenr='{$procentvare}'", __FILE__ . " linje " . __LINE__)))) { $x++; $linjeantal++; $posnr[$x] = $posnr[$x - 1] + 1; $varenr[$x] = $procentvare; $beskrivelse[$x] = $r['beskrivelse']; $procent[$x] = $r['procent']; $dkantal[$x] = 1; $linjesum[$x] = $sum * $procenttillag / 100; if ($momssats) { $momssum += $linjesum[$x]; } $linjemoms[$x] = $linjesum[$x] / 100 * $momssats; $sum += $sum * $procenttillag / 100; $moms += $linjemoms[$x]; $pris[$x] = $linjesum[$x]; } } $y = $ya; $y_tjek = $y; $Opkt = $y - $antal_ordrelinjer * $linjeafstand; for ($x = 1; $x <= $linjeantal; $x++) { $beskrivelse[$x] = str_replace('$procenttillæg;', dkdecimal($procenttillag), $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$procenttillæg', dkdecimal($procenttillag), $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$antal;', $dkantal[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$pris;', $pris[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$linjesum;', $linjesum[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$varenr;', $varenr[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$rabat;', $rabat[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$procent;', $procent[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$antal', $dkantal[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$pris', $pris[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$linjesum', $linjesum[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$varenr', $varenr[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$rabat', $rabat[$x], $beskrivelse[$x]); $beskrivelse[$x] = str_replace('$procent', $procent[$x], $beskrivelse[$x]); if ($charset == "utf-8") { $varenr[$x] = utf8_iso8859($varenr[$x]); $lev_varenr[$x] = utf8_iso8859($lev_varenr[$x]); $beskrivelse[$x] = utf8_iso8859($beskrivelse[$x]); } /* if ($saet[$x]) { $linjesum[$x]=''; $linjemoms[$x]=''; $pris[$x]=''; $rabat[$x]=''; $procent[$x]=''; } else { */ $linjesum[$x] = dkdecimal($linjesum[$x]); $linjemoms[$x] = dkdecimal($linjemoms[$x]); $pris[$x] = dkdecimal($pris[$x]); $rabat[$x] = dkdecimal($rabat[$x]); $procent[$x] = dkdecimal($procent[$x]); # } $transportsum = $transportsum + $l_sum[$x - 1]; $skriv = 0; if ($kommentarprint == 'on' || $formular != 3 || $varenr[$x]) { $skriv = 1; } #Fordi tekst uden varenr ikke skal med paa foelgesedlen med mindre det er angivet i "formularprint"; # if ($saet[$x] && $samlevare[$x]) $skriv=0; #Fordi tekst uden varenr ikke skal med paa foelgesedlen med mindre det er angivet i "formularprint"; if ($skriv) { for ($z = 1; $z <= $var_antal; $z++) { if (substr($variabel[$z], 0, 8) == "fritekst") { $tmp = substr($variabel[$z], 9); $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$tmp}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } if ($y_tjek != $y) { #Det først skrevne felt på en linje bliver "ædt" ved sideskift. Derfor dette dummy felt. $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); $y_tjek = $y; } if ($variabel[$z] == "posnr") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$posnr[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "varenr") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$varenr[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "lev_varenr") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$lev_varenr[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "leveres") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$leveres[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "projekt") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$projekt[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "antal") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$dkantal[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "lev_antal") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$lev_antal[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "tidl_lev") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$tidl_lev[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "lev_rest") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$rest[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "pris") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$pris[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "enhed") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$enhed[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "momssats") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$varemomssats[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "rabat") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$rabat[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "procent") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$procent[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "linjemoms") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$linjemoms[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "varemomssats") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$varemomssats[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "linjesum") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$linjesum[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] != "beskrivelse" && $variabel[$z] != "lokation") { $svar = skriv("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$variabel[$z]}", "fritekst_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", "{$formular}"); } elseif ($variabel[$z] == "beskrivelse") { $skriv_beskriv[$x] = $z; } } if ($z = $skriv_beskriv[$x]) { $y2 = ombryd("{$str[$z]}", "{$fed[$z]}", "{$kursiv[$z]}", "{$color[$z]}", "{$beskrivelse[$x]}", "ordrelinjer_" . $Opkt, "{$xa[$z]}", "{$y}", "{$justering[$z]}", "{$form_font[$z]}", $laengde[$z], $formular, $linjeafstand); } $y = $y2; if ($y == 0) { $y = $ya; } $y = $y - $linjeafstand; } } if ($brugsamletpris) { $r = db_fetch_array(db_select("select sum,moms from ordrer where id = '{$id}'")); $sum = $r['sum']; $moms = $r['moms']; } $momssum = afrund($momssum, 2); $sum = afrund($sum, 2); $ialt = dkdecimal($sum + $moms); $momsgrundlag = dkdecimal($momssum); $moms = dkdecimal($moms); $sum = dkdecimal($sum); } if ($id) { find_form_tekst($id, 'S', $formular, 0, $linjeafstand, ""); } # Sum paa sidste side. if ($ordre_id[$o]) { bundtekst($ordre_id[$o]); } # Uden denne skrives kun side 1 if ($mail_fakt) { fclose($fp2); } #cho "$o A $ordre_id[$o] $mappe/$pfliste[$o]<br>"; } fclose($fp); #cho "$mailantal -> $nomailantal<br>"; #xit; if ($mailantal > 0) { ini_set("include_path", ".:../phpmailer"); require "class.phpmailer.php"; if (!isset($exec_path)) { $exec_path = "/usr/bin"; } for ($x = 1; $x <= $mailantal; $x++) { #cho "$x B $ordre_id[$x] $mappe/$pfliste[$x]<br>"; print "<!-- kommentar for at skjule uddata til siden \n"; system("{$exec_path}/ps2pdf {$mappe}/{$pfliste[$x]} {$mappe}/{$pfliste[$x]}.pdf"); print "--> \n"; if ($logoart == 'PDF') { print "<!-- kommentar for at skjule uddata til siden \n"; $out = $mappe . "/" . $pfliste[$x] . "x.pdf"; system("{$exec_path}/pdftk {$mappe}/{$pfliste[$x]}.pdf background ../logolib/{$db_id}/{$bgr}.pdf output {$out}"); # unlink ("$mappe/$pfliste[$x].pdf"); system("mv {$out} {$mappe}/{$pfliste[$x]}.pdf"); print "--> \n"; } $o = $x - 1; $svar = send_mails("{$ordre_id[$o]}", "{$mappe}/{$pfliste[$x]}.pdf", $email[$x], $mailsprog[$x], $form_nr[$x], "{$mail_subj}", "{$mail_text}", "{$mail_bilag}", $x); # return($svar); } } #if ($mailantal>0) include("mail_faktura.php"); if ($nomailantal > 0) { print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/udskriv.php?ps_fil={$mappe}/{$printfilnavn}&id={$id}&udskriv_til={$udskriv_til}&art={$art}&bgr={$bgr}\">"; } elseif ($popup) { print "<meta http-equiv=\"refresh\" content=\"0;URL=../includes/luk.php\">"; } #else print "<meta http-equiv=\"refresh\" content=\"0;URL=ordre.php?id=$id\">"; return 'OK'; print "<!--function formularprint s**t-->"; }
if ($ret) { $tekst = "Skriv fra & til dato som mmddåå:mmddåå. Hvis der kun skrives én dato, sættes dato til dags dato."; print "<form name=omsaetning action=top100.php method=post>"; print "<tr><td colspan=4 align=center title=\"{$tekst}\">Vælg periode <input type=text name=periode value=\"{$periode}\"> "; print "<input type=submit accesskey=\"O\" value=\"OK\" name=\"submit\"></td></tr>"; print "<tr><td colspan=4><hr></td></tr>\n"; print "</form>"; } else { $x = 0; print "<tr><td>Nr.</td><td>Kontonr.</td><td>Firmanavn</td><td align=right>Omsætning</td><tr>\n"; print "<tr><td colspan=4><hr></td></tr>\n"; $q = db_select("select konto_id, sum(sum) as totalsum from ordrer where (art='DO' or art= 'DK') and fakturadate>='{$from}' and fakturadate<='{$to}' group by konto_id order by sum(sum) desc", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $x++; if ($x <= 100) { $sum = dkdecimal($r['totalsum']); $r2 = db_fetch_array(db_select("select * from adresser where id='{$r['konto_id']}'", __FILE__ . " linje " . __LINE__)); if (!isset($linjebg) || $linjebg != $bgcolor) { $linjebg = $bgcolor; $color = '#000000'; } else { $linjebg = $bgcolor5; $color = '#000000'; } print "<tr bgcolor=\"{$linjebg}\"><td>{$x}</td>"; print "<td>{$r2['kontonr']}</td><td>{$r2['firmanavn']}</td><td align=right>{$sum}</td></tr>\n"; } } print "</tbody></table>"; } ?>
$txt = str_replace('$stregkode', $r['varenr'], $txt); } if (strpos($txt, '$enhedspris/$enhed')) { if ($r['enhed'] && $r['indhold']) { $txt = str_replace('$enhedspris', dkdecimal($r['pris'] / $r['indhold']), $txt); $txt = str_replace('$enhed', $r['enhed'], $txt); } else { $txt = str_replace('($enhedspris/$enhed)', '', $txt); $txt = str_replace('$enhedspris/$enhed', '', $txt); } } else { $txt = str_replace('$enhedspris', dkdecimal($r['pris'] / $r['indhold']), $txt); $txt = str_replace('$enhed', $r['enhed'], $txt); } $txt = str_replace('$img', $img, $txt); $txt = str_replace('$pris', dkdecimal($salgspris), $txt); $txt = str_replace('$dkkpris', $dkkpris, $txt); $txt = str_replace('$enhed', $r['enhed'], $txt); $txt = str_replace('$varemrk', $r['trademark'], $txt); $txt = str_replace('$indhold', $r['indhold'], $txt); $txt = str_replace('$special_pris', $special_price, $txt); $txt = str_replace('$special_fra_dato', dkdato($r['special_from_date']), $txt); $txt = str_replace('$special_til_dato', dkdato($r['special_to_date']), $txt); $txt = str_replace('$special_fra_tid', substr($r['special_from_time'], 0, 5), $txt); $txt = str_replace('$special_til_tid', substr($r['special_to_time'], 0, 5), $txt); $fp = fopen("../temp/{$db}/label.html", 'w'); fwrite($fp, $txt); fclose($fp); include "../temp/{$db}/label.html"; /* if ($beskrivelse) { #Dymo
function menubuttons($id, $menu_id, $vare_id, $plads) { global $afd_navn; global $bgcolor5; global $bon; global $bord; global $bordnr; global $bordnavn; global $brugernavn; global $fokus; global $folger; global $indbetaling; global $kasse; global $kontonr; global $momssats; global $pris_ny; global $sum; global $url; global $varenr_ny; global $vare_id; global $vare_id_ny; #echo $fokus; $dd = date("Y-m-d"); $tt = date("H:i:s"); if ($kasse == "?") { find_kasse($kasse); } $vare_id || $vare_id_ny ? $disabled = "disabled=\"disabled\"" : ($disabled = NULL); $r = db_fetch_array(db_select("select box2,box3,box4,box7,box10 from grupper where art = 'POS' and kodenr='2'", __FILE__ . " linje " . __LINE__)); $x = $kasse - 1; $optalassist = $r['box2']; $tmp = explode(chr(9), $r['box3']); $printserver = trim($tmp[$x]); $tmp = explode(chr(9), $r['box4']); #20131205 $terminal_ip = strtolower(trim($tmp[$x])); $tmp = explode(chr(9), $r['box10']); #20140820 $koekkenprint = strtolower(trim($tmp[$x])); $r['box7'] ? $bord = explode(chr(9), $r['box7']) : ($bord = NULL); #20140508 if ($varenr_ny && $plads == 'H') { #20140702 $tmp = strtolower($varenr_ny); $r = db_fetch_array(db_select("select id,folgevare from varer where lower(varenr) = '{$tmp}' or lower(stregkode) = '{$tmp}'", __FILE__ . " linje " . __LINE__)); $vare_id = $r['id']; if ($r['folgevare'] < 0) { $menu_id = $r['folgevare'] * -1; $folger = $vare_id; } } elseif ($folger && $plads == 'H') { $r = db_fetch_array(db_select("select folgevare from varer where id = '{$folger}'", __FILE__ . " linje " . __LINE__)); if ($menu_id != abs($r['folgevare'])) { $folger = NULL; } } #elseif ($folger && $plads!='H') $menu_id=NULL; $kasse = trim($kasse); $r = db_fetch_array(db_select("select * from grupper where art = 'POS' and kodenr='1'", __FILE__ . " linje " . __LINE__)); $kasseantal = $r['box1'] * 1; $afd = explode(chr(9), $r['box3']); $tmp = $kasse - 1; $afdnr = $afd[$tmp]; $r = db_fetch_array(db_select("select * from grupper where art = 'AFD' and kodenr='{$afdnr}'", __FILE__ . " linje " . __LINE__)); $afd_navn = $r['beskrivelse']; $tid = date("H:i"); if (!$menu_id && $menu_id != '0' && $afd_navn) { $r = db_fetch_array(db_select("select kodenr from grupper where art='POSBUT' and kode='{$plads}' and box1='{$afdnr}' and (box7 < box8) and (box7<='{$tid}' and box8>='{$tid}')", __FILE__ . " linje " . __LINE__)); $menu_id = $r['kodenr']; } if (!$menu_id && $menu_id != '0') { $qtxt = "select kodenr from grupper where art='POSBUT' and kode='{$plads}' and (box7 < box8) and (box7<='{$tid}' and box8>='{$tid}')"; $r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); $menu_id = $r['kodenr']; if (!$menu_id && $menu_id != '0') { #her tages højde for at s**t tidspkt kan være mindre en starttidspkt $qtxt = "select kodenr from grupper where art='POSBUT' and (box7 > box8) and ((box7>='{$tid}' and box8>='{$tid}') or (box7<='{$tid}' and box8<='{$tid}'))"; $r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); $menu_id = $r['kodenr']; } } $qtxt = "select * from grupper where art='POSBUT' and kodenr='{$menu_id}'"; $r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); $r['kode'] == 'H' ? $menu = 'sidemenu' : ($menu = 'bundmenu'); $menuid = $r['kodenr']; $beskrivelse = $r['box1']; $cols = $r['box2']; $rows = $r['box3']; $height = $r['box4']; $width = $r['box5']; $radius = $r['box11']; $fontsize = $r['box10']; $cellspacing = 0; if (!$fontsize) { $fontsize = $height * $width / 200; } # $stil="style=\"width:".$width."px;height:".$height."px;text-align:center;font-size:".$fontsize."px; background-color:#$b;\""; $stil = "STYLE=\"display: table-cell;moz-border-radius:" . $radius . "px;-webkit-border-radius:" . $radius . "px;width:" . $width . "px;height:" . $height . "px;"; $stil .= "text-align:center;vertical-align:middle;font-size:" . $fontsize . "px;border: 1px solid #{$bgcolor5};white-space: normal;background-color: {$b};\""; $nostil = "STYLE=\"display: table-cell;moz-border-radius:0px;-webkit-border-radius:0px;width:" . $width . "px;height:" . $height . "px;text-align:center;"; $nostil .= "vertical-align:middle;font-size:" . $fontsize . "px;white-space: normal;border: 0px solid #{$bgcolor};\""; # background-color: $bgcolor;\""; $twidth = $width * $cols . "px"; $theight = $height * $rows . "px"; print "<table border=\"0\" cellspacing=\"{$cellspacing}\" cellpadding=\"1\" width=\"{$twidth}\" height=\"{$theight}\" valign=\"top\"><tbody>\n"; # table 1 -> if (substr($beskrivelse, 0, 1) != "!") { print "<tr><td colspan=\"{$cols}\" align=\"center\" bgcolor=\"{$bgcolor5}\">{$beskrivelse}</td></tr>\n"; } for ($x = 1; $x <= $rows; $x++) { print "<tr>\n"; for ($y = 1; $y <= $cols; $y++) { $qtxt = "select * from pos_buttons where menu_id={$menuid} and row='{$x}' and col='{$y}'"; $r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); $a = $r['beskrivelse']; $b = $r['color']; $c = $r['vare_id'] * 1; $d = $r['funktion'] * 1; if ($a == '--') { print "<td><input type=\"button\" {$stil} value= \"\"></td>"; } elseif ($a == '---') { print "<td width=\"" . $width . "px\" {$nostil}></td>"; } elseif ($a || $a == '0') { if ($d < 6) { $knap = "<input type=\"button\" {$stil} value= \"{$a}\">"; $knap = str_replace("background-color: ;", "background-color: {$b};", $knap); } if (!$d || $d == 1) { if (strpos($a, '$pris')) { $ugedag = date('N'); $uxtid = date("U"); $tidspkt = date("H:i:s"); $qtxt = "select salgspris from varetilbud where vare_id={$c} and ugedag='{$ugedag}' and startdag<='{$uxtid}' and slutdag >='{$uxtid}' and starttid <='{$tidspkt}' and sluttid >='{$tidspkt}'"; $r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); if ($r['salgspris']) { $pris = $r['salgspris']; } else { $qtxt = "select salgspris,special_price,special_from_date,special_to_date,special_from_time,special_to_time from varer where id={$c}"; $r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); #echo "($r[special_from_date] <= $dd && $r[special_to_date] >= $dd && $r[special_from_time] <= $tt && $r[special_to_time] >= $tt)<br>"; if ($r['special_from_date'] <= $dd && $r['special_to_date'] >= $dd && $r['special_from_time'] <= $tt && $r['special_to_time'] >= $tt) { $pris = $r['special_price']; } else { $pris = $r['salgspris']; } } $pris = dkdecimal($pris + $pris * $momssats / 100, 2); if (strpos($knap, '$pris')) { $knap = str_replace('$pris', " {$pris}", $knap); $tmp = 1; $knap = str_replace("\n", " ", $knap, $tmp); } } print "<td><a style=\"text-decoration:none\" href=pos_ordre.php?id={$id}&{$menu}={$menu_id}&vare_id={$vare_id}&vare_id_ny={$c}&varenr_ny={$varenr_ny}&pris_ny={$pris_ny}&folger={$folger}&fokus={$fokus}&bordnr={$bordnr}>{$knap}</a>\n"; } elseif ($d == 2) { print "<td><a style=\"text-decoration:none\" href=pos_ordre.php?id={$id}&vare_id={$vare_id}&{$menu}={$c}&varenr_ny={$varenr_ny}&pris_ny={$pris_ny}&folger={$folger}&fokus={$fokus}&bordnr={$bordnr}>{$knap}</a>\n"; } elseif ($d == 3) { print "<td><a style=\"text-decoration:none\" href=pos_ordre.php?id={$id}&konto_id={$c}&varenr_ny={$varenr_ny}&pris_ny={$pris_ny}&folger={$folger}&fokus={$fokus}&bordnr={$bordnr}>{$knap}</a>\n"; } elseif ($d == 4) { print "<td><a style=\"text-decoration:none\" href=pos_ordre.php?id={$id}&spec_func=spec_{$c}&varenr_ny={$varenr_ny}&pris_ny={$pris_ny}&folger={$folger}&fokus={$fokus}&bordnr={$bordnr}>{$knap}</a>\n"; } elseif ($d == 5) { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT TYPE=\"button\" {$tmp} NAME=\"{$a}\" VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += '{$a}';pos_ordre.{$fokus}.focus();\">\n"; } elseif ($d == 6) { if ($c == 1) { $txt = 'Bord'; for ($z = 0; $z < count($bord); $z++) { if ($bordnr == $z) { $txt = $bord[$z]; } } $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT {$disabled} {$tmp} TYPE=\"submit\" NAME=\"bordvalg\" VALUE=\"{$txt}\">"; } elseif ($c == '2') { $txt = str_replace('$brugernavn', $brugernavn, $a); $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT {$disabled} onclick=\"window.location.href='pos_ordre.php?id={$id}&skift_bruger=1&bordnr={$bordnr}'\" type=\"button\" {$tmp} value= \"{$txt}\">\n"; } elseif ($c == '3') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT {$disabled} {$tmp} TYPE=\"submit\" NAME=\"del_bord\" VALUE=\"Del bord\">"; } elseif ($c == '4') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT {$tmp} TYPE=\"submit\" NAME=\"OK\" VALUE=\"Enter\">"; } elseif ($c == '5') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><input {$disabled} type=\"button\" onclick=\"window.location.href='pos_ordre.php?id={$id}&find_bon=1'\" {$tmp} value=\"{$a}\">\n"; # $knap=str_replace("background-color: ;","background-color: $b;",$knap); # print "<td>".$knap; } elseif ($c == '6') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT {$disabled} {$tmp} TYPE=\"submit\" NAME=\"flyt_bord\" VALUE=\"Flyt bord\">"; } elseif ($c == '7') { $knap = "<input {$disabled} type=\"button\" onclick=\"window.location.href='pos_ordre.php?id={$id}&kasse={$kasse}&kassebeholdning=on&bordnr={$bordnr}'\" {$stil} value=\"{$a}\">\n"; $knap = str_replace("background-color: ;", "background-color: {$b};", $knap); print "<td>" . $knap; } elseif ($c == '8') { $knap = "<input {$disabled} type=\"button\" onclick=\"window.location.href='pos_ordre.php?id={$id}&kasse=?&bordnr={$bordnr}'\" {$stil} value=\"Kasse {$kasse}\">\n"; $knap = str_replace("background-color: ;", "background-color: {$b};", $knap); print "<td>" . $knap; } elseif ($c == '9' || $c == '23') { $kstil = str_replace("background-color: ;", "background-color: {$b};", $stil); $qtxt = "select sum(ordrelinjer.antal) as iordre, sum(ordrelinjer.leveret) as bestilt from ordrelinjer,varer "; $qtxt .= "where ordrelinjer.ordre_id='{$id}' and varer.kategori!='' and ordrelinjer.vare_id=varer.id"; $r = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); if ($r['iordre'] > $r['bestilt']) { $kstil = str_replace($b, '#ff0000', $kstil); } if ($c == 9) { print "<td><INPUT {$disabled} {$kstil} TYPE=\"submit\" NAME=\"koekken\"VALUE=\"{$a}\">"; } else { print "<td><INPUT {$disabled} {$kstil} TYPE=\"submit\" NAME=\"send_koekken\"VALUE=\"{$a}\">"; } } elseif ($c == '10') { $knap = "<input {$disabled} type=\"button\" onclick=\"window.location.href='../index/menu.php'\" {$stil} value=\"{$a}\">\n"; $knap = str_replace("background-color: ;", "background-color: {$b};", $knap); print "<td>" . $knap; } elseif ($c == '11') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT {$disabled} {$tmp} TYPE=\"submit\" NAME=\"skuffe\" VALUE=\"Skuffe\">"; } elseif ($c == '12') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT {$disabled} {$tmp} TYPE=\"submit\" NAME=\"udskriv\" VALUE=\"Udskriv\">"; } elseif ($c == '13') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td onclick=\"return confirm('Slet alt og start forfra')\"><INPUT TYPE=\"submit\" {$tmp} NAME=\"forfra\"VALUE=\"Forfra\" OnClick=\"pos_ordre.{$fokus}.value += 'f';pos_ordre.{$fokus}.focus();\">\n"; } elseif ($c == '14') { $knap = "<input {$disabled} onclick=\"window.location.href='pos_ordre.php?id={$id}&skift_bruger=2&brugernavn={$a}&bordnr={$bordnr}&{$menu}={$menu_id}'\" type=\"button\" {$stil} value= \"{$a}\">\n"; if (strtolower($brugernavn) == strtolower($a)) { $knap = str_replace("background-color: ;", "background-color: #00ff00;", $knap); } else { $knap = str_replace("background-color: ;", "background-color: {$b};", $knap); } print "<td>" . $knap; } elseif ($c == '15') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT TYPE=\"button\" {$tmp} NAME=\"clear\" VALUE=\"Ryd\" OnClick=\"pos_ordre.{$fokus}.value = '';pos_ordre.{$fokus}.focus();\">"; } elseif ($c == '16') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<TD><INPUT TYPE=\"submit\" {$tmp} NAME=\"afslut\"VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += 'a';pos_ordre.{$fokus}.focus();\">\n"; } elseif ($c == '17') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); $disabled ? $dis = NULL : ($dis = "disabled='disabled'"); print "<td><INPUT TYPE=\"submit\" {$tmp} {$dis} NAME=\"{$a}\" VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += 'p';pos_ordre.{$fokus}.focus();\">\n"; } elseif ($c == '18') { $disabled ? $dis = NULL : ($dis = "disabled='disabled'"); $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT TYPE=\"submit\" {$tmp} {$dis} NAME=\"{$a}\" VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += 'r';pos_ordre.{$fokus}.focus();\">\n"; } elseif ($c == '19') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<TD><INPUT TYPE=\"submit\" {$stil} NAME=\"tilbage\"VALUE=\"Tilbage\" OnClick=\"pos_ordre.{$fokus}.value += 't';pos_ordre.{$fokus}.focus();\"></TD>\n"; # print "<TD onclick=\"return confirm('Tilbage til varescanning')\"><INPUT TYPE=\"submit\" $stil NAME=\"tilbage\"VALUE=\"Tilbage\" OnClick=\"pos_ordre.$fokus.value += 't';pos_ordre.$fokus.focus();\"></TD>\n"; } elseif ($c == '20') { $knap = "<input {$disabled} type=\"button\" onclick=\"window.location.href='pos_ordre.php'\" {$stil} value=\"{$a}\">\n"; $knap = str_replace("background-color: ;", "background-color: {$b};", $knap); print "<td>" . $knap; $r = db_fetch_array(db_select("select box13 from grupper where art = 'POS' and kodenr = '1'", __FILE__ . " linje " . __LINE__)); $timeout = $r['box13'] * 1; if ($timeout && !$bon) { print "<meta http-equiv=\"refresh\" content=\"{$timeout};URL=pos_ordre.php?id=0\">\n"; } } elseif ($c == '21') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<TD align=\"center\"><INPUT TYPE=\"submit\" {$tmp} NAME=\"krediter\" VALUE=\"{$a}\">\n"; } elseif ($c == '22') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); if ($_COOKIE['salditerm']) { $terminal_ip = $_COOKIE['salditerm']; } if (!$terminal_ip || $terminal_ip == 'box') { $filnavn = "http://saldi.dk/kasse/" . $_SERVER['REMOTE_ADDR'] . ".ip"; if ($fp = fopen($filnavn, 'r')) { $terminal_ip = trim(fgets($fp)); fclose($fp); } } if (isset($_SERVER['HTTPS']) && $_SERVER['HTTPS']) { $url = 'https://'; } else { $url = 'http://'; } $url .= $_SERVER['SERVER_NAME']; #.$_SERVER['PHP_SELF']; if (!strpos($url, $_SERVER['PHP_SELF'])) { $url .= $_SERVER['PHP_SELF']; } $href = "http://{$terminal_ip}/pointd/point.php?url={$url}&id={$id}&kasse={$kasse}"; print "<td><input {$disabled} type=\"button\" onclick=\"window.location.href='{$href}'\" {$tmp} value=\"{$a}\">\n"; } elseif ($c == '23') { #se ved c==9 } elseif ($c == '24') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); $a = str_replace('$bord', $bord[$bordnr], $a); print "<td><INPUT {$disabled} {$tmp} TYPE=\"submit\" NAME=\"kor_bord\"VALUE=\"{$a}\">"; } elseif ($c == '25') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<TD align=\"center\"><INPUT TYPE=\"submit\" {$disabled} {$tmp} NAME=\"kontoopslag\" VALUE=\"{$a}\">\n"; } elseif ($c == '26') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); !$kontonr || $sum || $disabled ? $dis = "disabled='disabled'" : ($dis = NULL); print "<TD align=\"center\"><INPUT TYPE=\"submit\" {$dis} {$tmp} NAME=\"indbetal\" VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += 'i';pos_ordre.{$fokus}.focus();\">\n"; } elseif ($c == '27') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<TD align=\"center\"><INPUT TYPE=\"submit\" {$tmp} NAME=\"betaling\" VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += 'k';pos_ordre.{$fokus}.focus();\">\n"; } elseif ($c == '28') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); list($txt, $m) = explode("+", $a); print "<input type=\"hidden\" name=\"sidemenu\" value=\"{$m}\">"; print "<td><INPUT {$tmp} TYPE=\"submit\" NAME=\"OK\" VALUE=\"{$txt}\">"; } elseif ($c == '29') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<TD><INPUT TYPE=\"submit\" {$tmp} {$disabled} NAME=\"afslut\"VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value = 'v';pos_ordre.{$fokus}.focus();\">\n"; } elseif ($c == '30') { $disabled ? $dis = "disabled='disabled'" : ($dis = NULL); $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); if ($sum && $kontonr) { $returnconfirm = "onclick=\"javascript:return confirm('Flyt denne ordre til kontant eller anden kunde?')\""; } # elseif ($sum) $returnconfirm="onclick=\"javascript:return confirm('Flyt denne ordre til kunde?')\""; # else $returnconfirm=NULL; $returnconfirm = NULL; print "<TD align=\"center\"><INPUT TYPE=\"submit\" {$dis} {$tmp} NAME=\"stamkunder\" VALUE=\"{$a}\" {$returnconfirm}>\n"; } elseif ($c == '31') { !$kontonr || $disabled ? $dis = "disabled='disabled'" : ($dis = NULL); $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<TD align=\"center\"><INPUT TYPE=\"submit\" {$dis} {$tmp} NAME=\"kontoudtog\" VALUE=\"{$a}\">\n"; } elseif ($c == '32') { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); print "<td><INPUT {$disabled} {$tmp} TYPE=\"submit\" NAME=\"udskriv_sidste\" VALUE=\"{$a}\">"; } else { $knap = str_replace('$kasse', $kasse, $knap); $knap = str_replace('$brugernavn', $brugernavn, $knap); $tmp = systemknap($c); if (strpos($tmp, 'nclick')) { $knap = str_replace(">", $tmp . ">", $knap); } else { $knap = str_replace("type=\"button\"", $tmp, $knap); } print "<td>" . $knap; } } elseif ($d == 7) { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); (!$id && !$varenr_ny || !$sum || $kontonr) && !$indbetaling ? $tmp2 = "disabled=disabled " . $tmp : ($tmp2 = $tmp); if ($a == 'Kontant') { print "<TD><INPUT TYPE=\"submit\" {$tmp2} NAME='betaling' VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += 'c';pos_ordre.{$fokus}.focus();\"></TD>\n"; } elseif ($a == 'Kontant på beløb') { print "<TD><INPUT TYPE=\"submit\" {$tmp2} NAME='betaling' VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += 'c';pos_ordre.{$fokus}.focus();\"></TD>\n"; } elseif ($a == 'Konto') { !$kontonr || !$sum ? $tmp2 = "disabled=disabled " . $tmp : ($tmp2 = $tmp); print "<TD><INPUT TYPE=\"submit\" {$tmp2} NAME='betaling' VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += 'c';pos_ordre.{$fokus}.focus();\"></TD>\n"; } else { print "<TD><INPUT TYPE=\"submit\" {$tmp2} NAME='betaling' VALUE=\"{$a}\" OnClick=\"pos_ordre.{$fokus}.value += 'd';pos_ordre.{$fokus}.focus();\"></TD>\n"; } #20160418 } elseif ($d == 8) { $tmp = str_replace("background-color: ;", "background-color: {$b};", $stil); (!$id && !$varenr_ny || !$sum || $kontonr) && !$indbetaling ? $tmp2 = "disabled=disabled " . $tmp : ($tmp2 = $tmp); print "<TD align=\"center\"><INPUT TYPE=\"submit\" {$tmp2} NAME=\"betvaluta\" VALUE=\"{$a}\"></TD>\n"; } else { print "<td><br>"; } print "</td>\n"; } else { print "<td></td>"; } } print "</tr>\n"; } print "</tbody></table>\n"; # <- table 1 }
if ($linjebg != $bgcolor) { $linjebg = $bgcolor; $color = '#000000'; } else { $linjebg = $bgcolor5; $color = '#000000'; } print "<tr bgcolor=\"{$linjebg}\">"; print "<td><small>{$font} {$row['varenr']}</a></small></td>"; print "<td><small>{$font} {$row['beskrivelse']}<br></small></td>"; $salgspris = dkdecimal($row[salgspris]); print "<td align=right><small>{$font} {$salgspris}<br></small></td>"; if ($vis_kost == 'on') { $query2 = db_select("select kostpris from vare_lev where vare_id = {$row['id']} order by posnr"); $row2 = db_fetch_array($query2); $kostpris = dkdecimal($row2[kostpris]); print "<td align=right><small>{$font} {$kostpris}<br></small></td>"; } $reserveret = 0; # $linjetext="<span title= 'Der er $y i tilbud og $z i ordre '>"; if ($lager >= 1) { $q2 = db_select("select * from batch_kob where vare_id={$row['id']} and rest>0 and lager={$lager}"); while ($r2 = db_fetch_array($q2)) { $q3 = db_select("select * from reservation where batch_kob_id={$r2['id']}"); while ($r3 = db_fetch_array($q3)) { $reserveret = $reserveret + $r3[antal]; } } $linjetext = "<span title= 'Reserveret: {$reserveret}'>"; if ($r2 = db_fetch_array(db_select("select beholdning from lagerstatus where vare_id={$row['id']} and lager={$lager}"))) { print "<td align=right>{$linjetext}<small>{$font} {$r2['beholdning']}</small></span></td>";
echo $bgcolor2; ?> ">Beskrivelse</a></b></td> <td align=right><b><font face="Helvetica, Arial, sans-serif" color="<?php echo $bgcolor2; ?> ">Kurs</a></b></td> </tr> <?php $x = 0; $dd = date("Y-m-d"); $q = db_select("select * from grupper where art = 'VK' order by box1"); while ($r = db_fetch_array($q)) { $x++; if ($r2 = db_fetch_array(db_select("select kurs from valuta where gruppe='{$r['kodenr']}' and valdate <= '{$dd}' order by valdate desc"))) { $kurs = dkdecimal($r2['kurs']); } else { $kurs = "-"; } if ($bgcolor1 != $bgcolor) { $bgcolor1 = $bgcolor; $color = '#000000'; } elseif ($bgcolor1 != $bgcolor5) { $bgcolor1 = $bgcolor5; $color = '#000000'; } print "<tr bgcolor=\"{$bgcolor1}\">"; print "<td><a href=valutakort.php?kodenr={$r['kodenr']}&valuta={$r['box1']}>{$font} {$r['box1']}</a><br></small></td>"; print "<td><small>{$font} {$r['beskrivelse']}<br></small></td>"; print "<td align=right><small>{$font} {$kurs}<br></small></td>"; print "</tr>";
function udskriv($start, $s**t, $sort, $udskriv, $udvalg) { global $lagerantal; global $varenummer; global $v_startstjerne; global $v_slutstjerne; global $v_strlen; global $beskrivelse; global $b_startstjerne; global $b_slutstjerne; global $b_strlen; global $forslag; global $beholdning; global $i_tilbud; global $i_ordre; global $i_forslag; global $bestilt; global $brugernavn; global $bgcolor; global $bgcolor5; global $alle_varer; global $charset; global $popup; global $vis_lev; global $incl_moms; $tidspkt = time("u"); $z = 0; $z1 = 0; $linjebg = NULL; $varer_i_ordre = array(); $vis_VG = array(); $vis_K = array(); if ($r = db_fetch_array(db_select("select * from grupper where art='VV' and box1='{$brugernavn}'", __FILE__ . " linje " . __LINE__))) { $vis_VG = explode(",", $r['box2']); if ($r['box3']) { $vis_K = explode(",", $r['box3']); } else { $vis_VG[0] = 1; } $vis_lukkede = $r['box4']; } else { db_modify("insert into grupper (beskrivelse, art, box1, box2, box3, box4) values ('varevisning', 'VV', '{$brugernavn}', 'on', 'on', 'on')", __FILE__ . " linje " . __LINE__); } if ($vis_lukkede != 'on') { $udvalg = $udvalg . " and lukket != '1'"; } if (!$vis_VG[0]) { if ($vis_VG[1]) { $udvalg = $udvalg . " and (gruppe = '{$vis_VG['1']}'"; $x = 2; while ($vis_VG[$x]) { $udvalg = $udvalg . " or gruppe = '{$vis_VG[$x]}'"; $x++; } $udvalg = $udvalg . ")"; } else { $udvalg = $udvalg . " and gruppe = ''"; } } if (!$vis_K[0]) { $lev_vare_liste = array(); $x = 1; if ($vis_K[1]) { $tmp = "where lev_id = '{$vis_K['1']}'"; $x = 2; while ($vis_K[$x]) { $tmp = $tmp . " or lev_id = '{$vis_K[$x]}'"; $x++; } } $y = 0; $q = db_select("select distinct vare_id from vare_lev {$tmp}", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $y++; $lev_vare_liste[$y] = $r['vare_id']; } } if ($forslag) { $x = 0; $lagergrupper = array(); $q = db_select("select * from grupper where art='VG' and box8='on'", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $x++; $lagergrupper[$x] = $r['kodenr']; } } if (($beholdning || $forslag) && !$udskriv) { $varer_i_ordre = find_varer_i_ordre(); } if (!$s**t) { $s**t = $start + 50; } if ($beskrivelse || $varenummer || $forslag) { $s**t = 999999; } $query = db_select("select * from varer where id > 0 {$udvalg} order by {$sort}", __FILE__ . " linje " . __LINE__); while ($row = db_fetch_array($query)) { # if ($row['stregkode'] && $varenummer == $row['stregkode']) { #remmet phr 2011-04-11 grundet probl. med 2 varer hvor ene vares nummer = anden vares stregkode. # $varenummer=$row['varenr']; # } $z++; # $z bruges som taeller til at kontrollere hvor mange linjer der indgaar i listen. $vis1 = 1; $vis2 = 1; if ($udskriv && $forslag && !$alle_varer) { if (isset($forslag[$z])) { $vis1 = 1; $vis2 = 1; } else { $vis1 = 0; } } // Her frasorteres varer som ikke kommer fra den valgte lev. if (isset($vis_K[1]) && $vis1 == 1 && isset($lev_vare_liste) && in_array($row['id'], $lev_vare_liste) || $vis_K[0]) { } elseif (!$vis_K[1] && $vis1 == 1 && isset($lev_vare_liste) && !in_array($row['id'], $lev_vare_liste)) { } elseif (!$forslag) { $vis1 = 0; $z--; } if (isset($vis_K[1]) && $vis2 == 1 && isset($lev_vare_liste) && in_array($row['id'], $lev_vare_liste) || $vis_K[0]) { } elseif (!$vis_K[1] && $vis2 == 1 && isset($lev_vare_liste) && !in_array($row['id'], $lev_vare_liste)) { } else { $vis2 = 0; } // Her frasorteres varer i bestillingsforslag som ikke lagerfoerte - skal staa nederst i frasortering. if ($forslag && !in_array($row['gruppe'], $lagergrupper)) { $vis1 = 0; $vis2 = 0; } // frasortering s**t if (($z >= $start && $z < $s**t || $forslag) && $vis1 == 1 && $vis2 == 1) { $z1++; if ($udskriv) { $y = 0; $linjebg != $bgcolor ? $linjebg = $bgcolor : ($linjebg = $bgcolor5); $row['lukket'] == '1' ? $color = 'red' : ($color = 'black'); print "<tr bgcolor=\"{$linjebg}\">"; $kort = "kort" . $row['id']; if ($popup) { print "<td onMouseOver=\"this.style.cursor = 'pointer'\"; onClick=\"javascript:{$kort}=window.open('varekort.php?opener=varer.php&id={$row['id']}&returside=../includes/luk.php','{$kort}','scrollbars=1,resizable=1');{$kort}.focus();\"><FONT style=\"color:{$color};\"><span style=\"text-decoration: underline;\">" . htmlentities(stripslashes($row['varenr']), ENT_COMPAT, $charset) . "</span></td>"; } else { print "<td> <a href=\"varekort.php?id={$row['id']}&returside=varer.php\"><FONT style=\"COLOR:{$color};\">" . htmlentities(stripslashes($row['varenr']), ENT_COMPAT, $charset) . "</font></a></td>"; } print "<td><FONT style=\"color:{$color}\">" . htmlentities(stripslashes($row['enhed']), ENT_COMPAT, $charset) . "</font><br></td>"; print "<td><FONT style=\"color:{$color}\">" . htmlentities(stripslashes($row['beskrivelse']), ENT_COMPAT, $charset) . "</font><br></td>"; if (!$vis_lev) { if ($lagerantal > 1 && !$forslag) { $r2 = db_fetch_array(db_select("select sum(beholdning) as lagersum from lagerstatus where vare_id = {$row['id']}", __FILE__ . " linje " . __LINE__)); $diff = $row['beholdning'] - $r2['lagersum']; for ($x = 1; $x <= $lagerantal; $x++) { $qtxt = "select lager, beholdning from lagerstatus where vare_id = {$row['id']} and lager = {$x}"; $r2 = db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__)); $y = $r2['beholdning']; if ($x == 1) { $y += $diff; } if ($y >= 1) { print "<td align=center onClick=\"lagerflyt({$row['id']}, {$x})\" onMouseOver=\"this.style.cursor = 'pointer'\"><span title= 'Flyt til andet lager'><u>" . dkdecimal($y) . "</u></td>"; } else { print "<td align=center>" . dkdecimal($y) . "</td></td>"; } } } # if (($beholdning||$forslag)&&!$udskriv) { # if (in_array($row['id'],$varer_i_ordre)) { if ($forslag || $beholdning) { $tmp = find_beholdning($row['id'], $udskriv); $i_tilbud[$z] = $tmp[1]; $it_ordrenr[$z] = $tmp[5]; $i_ordre[$z] = $tmp[2]; $io_ordrenr[$z] = $tmp[6]; $i_forslag[$z] = $tmp[3]; $if_ordrenr[$z] = $tmp[7]; $bestilt[$z] = $tmp[4]; $b_ordrenr[$z] = $tmp[8]; } if ($beholdning) { $it_ordrenr[$z] ? $title = "title=\"Tilbud: {$it_ordrenr[$z]}\"" : ($title = "title=\"\""); print "<td align=\"right\" {$title}>{$i_tilbud[$z]}</td>"; $io_ordrenr[$z] ? $title = "title=\"Ordre: {$io_ordrenr[$z]}\"" : ($title = "title=\"\""); print "<td align=\"right\" {$title}>{$i_ordre[$z]}</td>"; $b_ordrenr[$z] ? $title = "title=\"Ordre: {$b_ordrenr[$z]}\"" : ($title = "title=\"\""); print "<td align=\"right\" {$title}>{$bestilt[$z]}</td>"; } print "<td align=right>" . dkdecimal($row['beholdning']) . "</td>"; if ($forslag) { $tmp = $row['beholdning'] - $i_ordre[$z]; if ($row['min_lager'] * 1 > $tmp || $alle_varer) { $gb = $gb + 1; $genbestil[$z] = $row['max_lager'] - $row['beholdning'] + $i_ordre[$z]; if ($genbestil[$z] < 0) { $genbestil[$z] = 0; } print "<td align=right><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:60px\" name=\"gb_antal_{$gb}\" value=\"{$genbestil[$z]}\"></td>"; print "<input type=\"hidden\" name=\"gb_id_{$gb}\" value=\"{$row['id']}\">"; print "<input type=\"hidden\" name=\"genbestil_ant\" value=\"{$gb}\">"; } else { print "<td></td>"; } } } if (!$forslag) { $salgspris = dkdecimal($row['salgspris'] * (100 + $incl_moms) / 100); print "<td align=right>{$salgspris}<br></td>"; } if ($vis_lev == 'on') { $query2 = db_select("select kostpris, lev_id, lev_varenr from vare_lev where vare_id = {$row['id']} order by posnr", __FILE__ . " linje " . __LINE__); $row2 = db_fetch_array($query2); if ($row2['lev_id']) { $lev_varenr = $row2['lev_varenr']; $levquery = db_select("select kontonr, firmanavn from adresser where id={$row2['lev_id']}", __FILE__ . " linje " . __LINE__); $levrow = db_fetch_array($levquery); $kostpris = dkdecimal($row2['kostpris']); } elseif ($row['samlevare'] == 'on') { $kostpris = dkdecimal($row['kostpris']); } print "<td align=right>{$kostpris}</td>"; $query2 = db_select("select box8 from grupper where art='VG' and kodenr='{$row['gruppe']}'", __FILE__ . " linje " . __LINE__); $row2 = db_fetch_array($query2); if ($row2['box8'] == 'on' || $row['samlevare'] == 'on') { $ordre_id = array(); $x = 0; $query2 = db_select("select id from ordrer where status >= 1 and status < 3 and art = 'DO'", __FILE__ . " linje " . __LINE__); while ($row2 = db_fetch_array($query2)) { $x++; $ordre_id[$x] = $row2['id']; } $x = 0; $query2 = db_select("select id, ordre_id, antal from ordrelinjer where vare_id = {$row['id']}", __FILE__ . " linje " . __LINE__); while ($row2 = db_fetch_array($query2)) { if (in_array($row2['ordre_id'], $ordre_id)) { $x = $x + $row2['antal']; $query3 = db_select("select antal from batch_salg where linje_id = {$row2['id']}", __FILE__ . " linje " . __LINE__); while ($row3 = db_fetch_array($query3)) { $x = $x - $row3['antal']; } } } $linjetext = "<span title= 'Der er {$x} i ordre'>"; print "<td align=right>{$linjetext}{$row['beholdning']}</span></td>"; print "<td></td>"; print "<td>{$levrow['kontonr']} - " . htmlentities(stripslashes($levrow['firmanavn']), ENT_COMPAT, $charset) . "</td>"; print "<td>" . htmlentities(stripslashes($lev_varenr), ENT_COMPAT, $charset) . "</td>"; } else { print "<td></td>"; } } print "</tr>\n"; } elseif ($forslag || $beholdning) { if (in_array($row['id'], $varer_i_ordre)) { $tmp = find_beholdning($row['id'], $udskriv); $i_tilbud[$z] = $tmp[1]; $it_ordrenr[$z] = $tmp[5]; $i_ordre[$z] = $tmp[2]; $io_ordrenr[$z] = $tmp[6]; $i_forslag[$z] = $tmp[3]; $if_ordrenr[$z] = $tmp[7]; $bestilt[$z] = $tmp[4]; $b_ordrenr[$z] = $tmp[8]; } else { $i_tilbud[$z] = 0; $i_ordre[$z] = 0; $i_forslag[$z] = 0; $bestilt[$z] = 0; } if ($row['min_lager'] * 1 > $row['beholdning'] - $i_ordre[$z] + $i_forslag[$z] + $bestilt[$z]) { $genbestil[$z] = $row['max_lager'] - $row['beholdning'] + $i_ordre[$z] - ($i_forslag[$z] + $bestilt[$z]); if ($forslag) { $forslag[$z] = $row['id']; } } } } elseif ($udskriv && $z >= $s**t && !$forslag) { break; } if ($z >= $s**t) { break; } if (time("u") - $tidspkt > 60) { print "<BODY onLoad=\"javascript:alert('Timeout - reducer linjeantal')\">"; break; } } return $z; }
$color = '#000000'; } else { $linjebg = $bgcolor5; $color = '#000000'; } print "<tr bgcolor=\"{$linjebg}\">"; print "<td>"; if ($bilag[$x]) { print "<a href=kontospec.php?bilag={$bilag[$x]} target=\"_blank\">{$bilag[$x]}</a><br>"; } print "</td>"; print "<td>" . dkdato($transdate[$x]) . "</a><br></td>"; print "<td>{$beskrivelse[$x]}</a><br></td>"; print "<td align=\"right\">{$kontonr}</a><br></td>"; print "<td align=\"right\">" . dkdecimal($debet[$x]) . "</a><br></td>"; print "<td align=\"right\">" . dkdecimal($kredit[$x]) . "</a><br></td>"; print "<td align=\"right\" title=\"Ordrenr: {$ordrenr[$x]}\">{$faktura[$x]}</a><br></td>"; print "<td align=\"right\"><a href=kassekladde.php?kladde_id={$kladde_id[$x]}&returside=kontospec.php target=\"_blank\">{$kladde_id[$x]}</a><br></td>"; print "<td align=\"right\">{$afd[$x]}</a><br></td>"; print "<td align=\"right\">{$projekt[$x]}</a><br></td>"; print "</tr>"; } } function lagerbev($kontonr, $varekob, $varelager_i, $varelager_u, $regnstart, $regnslut) { $r = db_fetch_array(db_select("select kontotype from kontoplan where kontonr='{$kontonr}' order by regnskabsaar desc limit 1", __FILE__ . " linje " . __LINE__)); $kontotype = $r['kontotype']; if (in_array($kontonr, $varekob) || in_array($kontonr, $varelager_i) || in_array($kontonr, $varelager_u)) { $z = 0; $lager = array(); $gruppe = array();
function pos_valg() { global $sprog_id; global $bgcolor; global $bgcolor5; $kassekonti = array(); $afd = array(); $r = db_fetch_array(db_select("select * from grupper where art = 'POS' and kodenr = '1'", __FILE__ . " linje " . __LINE__)); $id1 = $r['id']; $kasseantal = $r['box1'] * 1; $kassekonti = explode(chr(9), $r['box2']); $afd = explode(chr(9), $r['box3']); $kortantal = $r['box4'] * 1; $korttyper = explode(chr(9), $r['box5']); $kortkonti = explode(chr(9), $r['box6']); $moms = explode(chr(9), $r['box7']); $rabatvareid = $r['box8'] * 1; $r['box9'] ? $straksbogfor = 'checked' : ($straksbogfor = ''); $r['box10'] ? $udskriv_bon = 'checked' : ($udskriv_bon = ''); $r['box11'] ? $vis_kontoopslag = 'checked' : ($vis_kontoopslag = ''); $r['box12'] ? $vis_hurtigknap = 'checked' : ($vis_hurtigknap = ''); $timeout = $r['box13'] * 1; $r['box14'] ? $vis_indbetaling = 'checked' : ($vis_indbetaling = ''); if ($r = db_fetch_array(db_select("select * from grupper where art = 'POS' and kodenr = '2'", __FILE__ . " linje " . __LINE__))) { $id2 = $r['id']; } else { db_modify("insert into grupper(beskrivelse,kode,kodenr,art,box1,box2,box3,box4,box5,box6,box7,box8,box9,box10,box11,box12,box13,box14)values('Pos valg','','2','POS','0','','','','','','','','','','','','','')", __FILE__ . " linje " . __LINE__); $r = db_fetch_array(db_select("select * from grupper where art = 'POS' and kodenr = '2'", __FILE__ . " linje " . __LINE__)); $id2 = $r['id']; } $kasseprimo = dkdecimal($r['box1']); $r['box2'] ? $optalassist = 'checked' : ($optalassist = NULL); $printer_ip = explode(chr(9), $r['box3']); $terminal_ip = explode(chr(9), $r['box4']); $betalingskort = explode(chr(9), $r['box5']); #20131210 $div_kort_kto = $r['box6']; #20140129 #cho $r[box7]; if ($r['box7']) { $bord = explode(chr(9), str_replace("\n", " ", $r['box7'])); } #20140506 $mellemkonti = explode(chr(9), $r['box8']); $diffkonti = explode(chr(9), $r['box9']); $koekkenprinter = explode(chr(9), $r['box10']); $vare_id = $r['box11']; $r['box12'] ? $vis_saet = 'checked' : ($vis_saet = ''); $q = db_select("select * from grupper where art = 'POSBUT'", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $posbuttons++; } if ($vare_id) { $r = db_fetch_array(db_select("select varenr from varer where id = '{$vare_id}'", __FILE__ . " linje " . __LINE__)); $varenr = $r['varenr']; } if ($rabatvareid) { $r = db_fetch_array(db_select("select varenr from varer where id = '{$rabatvareid}'", __FILE__ . " linje " . __LINE__)); $rabatvarenr = $r['varenr']; } $x = 0; if ($kasseantal) { $q = db_select("select * from grupper where art = 'AFD' order by kodenr", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $x++; $afd_nr[$x] = $r['kodenr']; $afd_navn[$x] = $r['beskrivelse']; } $afd_antal = $x; $x = 0; $q = db_select("select * from grupper where art = 'SM' order by kodenr", __FILE__ . " linje " . __LINE__); while ($r = db_fetch_array($q)) { $x++; $moms_nr[$x] = $r['kodenr']; $moms_navn[$x] = $r['beskrivelse']; } $moms_antal = $x; } print "<form name=diverse action=diverse.php?sektion=pos_valg method=post>"; print "<tr><td colspan='6'><hr></td></tr>"; print "<tr bgcolor='{$bgcolor5}'><td colspan='6'><b><u>" . findtekst(265, $sprog_id) . "</u></b></td></tr>"; print "<tr><td colspan='6'><br></td></tr>"; print "<input type=hidden name=id1 value='{$id1}'>"; print "<input type=hidden name=id2 value='{$id2}'>"; print "<tr><td title='" . findtekst(266, $sprog_id) . "'>" . findtekst(267, $sprog_id) . "</td><td><input class='inputbox' type='text' style='text-align:right;width:70px;' name='kasseantal' value='{$kasseantal}'></td></tr>"; # print "<tr><td title='".findtekst(285,$sprog_id)."'>".findtekst(285,$sprog_id)."</td>"; if ($kasseantal) { # print "<tr><td title='".findtekst(730,$sprog_id)."'>".findtekst(729,$sprog_id)."</td><td><input class='inputbox' type='text' style='text-align:right;width:70px;' name='varenr' value='$varenr'></td></tr>"; print "<tr><td title='" . findtekst(288, $sprog_id) . "'>" . findtekst(287, $sprog_id) . "</td><td><input class='inputbox' type='text' style='text-align:right;width:70px;' name='rabatvarenr' value='{$rabatvarenr}'></td></tr>"; print "<tr><td colspan='6'><hr></td></tr>"; print "<tr><td>" . findtekst(272, $sprog_id) . "</td>"; if ($afd_antal) { print "<td title='" . findtekst(273, $sprog_id) . "'>" . findtekst(274, $sprog_id) . "</td>"; } if ($moms_antal) { print "<td title='" . findtekst(285, $sprog_id) . "'>" . findtekst(286, $sprog_id) . "</td>"; } print "<td title='" . findtekst(275, $sprog_id) . "'>" . findtekst(276, $sprog_id) . "</td>"; print "<td title='" . findtekst(716, $sprog_id) . "'>" . findtekst(715, $sprog_id) . "</td>"; print "<td title='" . findtekst(722, $sprog_id) . "'>" . findtekst(721, $sprog_id) . "</td>"; print "<td title='" . findtekst(705, $sprog_id) . "'><!--Tekst 705-->" . findtekst(704, $sprog_id) . "<!--Tekst 704--></td>"; print "<td title='" . findtekst(707, $sprog_id) . "'><!--Tekst 707-->" . findtekst(706, $sprog_id) . "<!--Tekst 706--></td>"; print "<td title='" . findtekst(726, $sprog_id) . "'><!--Tekst 726-->" . findtekst(725, $sprog_id) . "<!--Tekst 725--></td></tr>"; for ($x = 0; $x < $kasseantal; $x++) { print "<tr bgcolor={$bgcolor5}>"; $tmp = $x + 1; print "<td>{$tmp}</td>"; if ($afd_antal) { print "<td title='" . findtekst(273, $sprog_id) . "'><SELECT class='inputbox' NAME=afd_nr[{$x}] title='" . findtekst(273, $sprog_id) . "'>"; for ($y = 1; $y <= $afd_antal; $y++) { if ($afd[$x] == $afd_nr[$y]) { print "<option value='{$afd_nr[$y]}'>{$afd_navn[$y]}</option>"; } } print "<option value='0'></option>"; for ($y = 1; $y <= $afd_antal; $y++) { if ($afd[$x] != $afd_nr[$y]) { print "<option value='{$afd_nr[$y]}'>{$afd_navn[$y]}</option>"; } } -(print "</SELECT></td>"); } if ($moms_antal) { print "<td title='" . findtekst(273, $sprog_id) . "'><SELECT class='inputbox' NAME=moms_nr[{$x}] title='" . findtekst(273, $sprog_id) . "'>"; for ($y = 1; $y <= $moms_antal; $y++) { if ($moms[$x] == $moms_nr[$y]) { print "<option value='{$moms_nr[$y]}'>{$moms_navn[$y]}</option>"; } } print "<option value='0'></option>"; for ($y = 1; $y <= $moms_antal; $y++) { if ($moms[$x] != $moms_nr[$y]) { print "<option value='{$moms_nr[$y]}'>{$moms_navn[$y]}</option>"; } } -(print "</SELECT></td>"); } print "<td><input class='inputbox' type='text' style='text-align:right;width:50px;' name='kassekonti[{$x}]' value='{$kassekonti[$x]}'></td>"; print "<td><input class='inputbox' type='text' style='text-align:right;width:50px;' name='mellemkonti[{$x}]' value='{$mellemkonti[$x]}'></td>"; print "<td><input class='inputbox' type='text' style='text-align:right;width:50px;' name='diffkonti[{$x}]' value='{$diffkonti[$x]}'></td>"; if (!$printer_ip[$x]) { $printer_ip[$x] = 'localhost'; } print "<td><input class='inputbox' type='text' style='text-align:right;width:100px;' name='printer_ip[{$x}]' value='{$printer_ip[$x]}'></td>"; print "<td align='center'><input class='inputbox' type='text' style='text-align:right;width:100px;' name='terminal_ip[{$x}]' value='{$terminal_ip[$x]}'></td>"; print "<td align='center'><input class='inputbox' type='text' style='text-align:right;width:100px;' name='koekkenprinter[{$x}]' value='{$koekkenprinter[$x]}'></td></tr>"; } } print "<tr><td colspan='6'><hr></td></tr>"; print "<tr><td title='" . findtekst(279, $sprog_id) . "'>" . findtekst(280, $sprog_id) . "</td><td><input class='inputbox' type='text' style='text-align:right' size='1' name='kortantal' value='{$kortantal}'></td></tr>"; if ($kortantal) { print "<tr><td></td><td title='" . findtekst(281, $sprog_id) . "'>" . findtekst(283, $sprog_id) . "</td>"; print "<td title='" . findtekst(282, $sprog_id) . "'>" . findtekst(284, $sprog_id) . "</td>"; print "<td title='" . findtekst(711, $sprog_id) . "'>" . findtekst(710, $sprog_id) . "</td></tr>"; print "<tr><td colspan='6'></td></tr>"; for ($x = 0; $x < $kortantal; $x++) { $betalingskort[$x] ? $betalingskort[$x] = 'checked' : ($betalingskort[$x] = NULL); # 20131210 print "<tr bgcolor={$bgcolor5}>"; $tmp = $x + 1; print "<td>{$tmp}</td>"; print "<td title='" . findtekst(281, $sprog_id) . "'><input class='inputbox' type='text' style='text-align:left' size='15' name='korttyper[{$x}]' value='{$korttyper[$x]}'></td>"; print "<td title='" . findtekst(282, $sprog_id) . "'><input class='inputbox' type='text' style='text-align:right' size='3' name='kortkonti[{$x}]' value='{$kortkonti[$x]}'></td>"; print "<td title='" . findtekst(711, $sprog_id) . "' align='center'><input class='inputbox' type='checkbox' style='text-align:right' name='betalingskort[{$x}]' {$betalingskort[$x]}></td></tr>"; #20131210 } $bet_term = NULL; for ($x = 0; $x < count($terminal_ip); $x++) { if ($terminal_ip[$x]) { $bet_term = 1; } #Så er der betalinggsterminal på min 1. kasse. } if ($bet_term) { $tmp++; print "<tr bgcolor={$bgcolor5}>"; print "<td>{$tmp}</td>"; print "<td title='" . findtekst(713, $sprog_id) . "'>" . findtekst(712, $sprog_id) . "</td>"; print "<td title='" . findtekst(713, $sprog_id) . "'><input class='inputbox' type='text' style='text-align:right' size='3' name='div_kort_kto' value='{$div_kort_kto}'></td>"; print "<td title='" . findtekst(713, $sprog_id) . "' align='center'><INPUT DISABLED='disabled' class='inputbox' type='checkbox' style='text-align:right' checked></td></tr>"; } } print "<tr><td colspan='6'><hr></td></tr>"; # 20140508 -> $bordantal = count($bord); print "<tr><td title='" . findtekst(673, $sprog_id) . "'>" . findtekst(674, $sprog_id) . "</td><td><input class='inputbox' type='text' style='text-align:right' size='1' name='bordantal' value='{$bordantal}'></td></tr>"; if ($bordantal) { print "<tr><td></td><td title='" . findtekst(675, $sprog_id) . "'>" . findtekst(676, $sprog_id) . "</td></tr>"; print "<tr><td colspan='6'></td></tr>"; for ($x = 0; $x < $bordantal; $x++) { print "<tr bgcolor={$bgcolor5}>"; $tmp = $x + 1; print "<td>{$tmp}</td>"; print "<td title='" . findtekst(675, $sprog_id) . "'><input class='inputbox' type='text' style='text-align:left' size='15' name='bord[{$x}]' value='{$bord[$x]}'></td></tr>"; } } print "<tr><td colspan='6'><hr></td></tr>"; # <- 20140508 print "<tr><td title='" . findtekst(453, $sprog_id) . "'>" . findtekst(454, $sprog_id) . "</td><td title='" . findtekst(453, $sprog_id) . "'><input class='inputbox' type='checkbox' name='straksbogfor' {$straksbogfor}></td></tr>"; print "<tr><td title='" . findtekst(456, $sprog_id) . "'>" . findtekst(457, $sprog_id) . "</td><td title='" . findtekst(456, $sprog_id) . "'><input class='inputbox' type='checkbox' name='udskriv_bon' {$udskriv_bon}></td></tr>"; print "<tr><td title='" . findtekst(458, $sprog_id) . "'>" . findtekst(459, $sprog_id) . "</td><td title='" . findtekst(458, $sprog_id) . "'><input class='inputbox' type='checkbox' name='vis_hurtigknap' {$vis_hurtigknap}></td></tr>"; print "<tr><td title='" . findtekst(460, $sprog_id) . "'>" . findtekst(461, $sprog_id) . "</td><td title='" . findtekst(460, $sprog_id) . "'><input class='inputbox' type='checkbox' name='vis_kontoopslag' {$vis_kontoopslag}></td></tr>"; print "<tr><td title='" . findtekst(464, $sprog_id) . "'>" . findtekst(465, $sprog_id) . "</td><td title='" . findtekst(464, $sprog_id) . "'><input class='inputbox' type='checkbox' name='vis_indbetaling' {$vis_indbetaling}></td></tr>"; print "<tr><td title='" . findtekst(734, $sprog_id) . "'>" . findtekst(735, $sprog_id) . "</td><td title='" . findtekst(744, $sprog_id) . "'><input class='inputbox' type='checkbox' name='vis_saet' {$vis_saet}></td></tr>"; print "<tr><td title='" . findtekst(462, $sprog_id) . "'>" . findtekst(463, $sprog_id) . "</td><td title='" . findtekst(462, $sprog_id) . "'><input class='inputbox' type='text' style='text-align:right;width:25px' name='timeout' value='{$timeout}'></td></tr>"; print "<tr><td title='" . findtekst(701, $sprog_id) . "'>" . findtekst(700, $sprog_id) . "</td><td title='" . findtekst(701, $sprog_id) . "'><input class='inputbox' type='text' style='text-align:right;width:100px' name='kasseprimo' value='{$kasseprimo}'></td></tr>"; print "<tr><td title='" . findtekst(703, $sprog_id) . "'>" . findtekst(702, $sprog_id) . "</td><td title='" . findtekst(703, $sprog_id) . "'><input class='inputbox' type='checkbox' name='optalassist' {$optalassist}></td></tr>"; print "<tr><td><br></td></tr>"; print "<tr><td><br></td></tr>"; print "<td><br></td><td><br></td><td><br></td><td align = center><input type=submit accesskey='g' value='Gem/opdatér' name='submit'></td>"; print "</form>"; print "<tr><td><a href=posmenuer.php>Klik her for at oprette / rette genvejstaster på kassesiden</a></td></tr>"; }