// Copyright (c) 2004-2011 DANOSOFT ApS
// ----------------------------------------------------------------------
ob_start();
@session_start();
$s_id = session_id();
$title = "Ret transaktion";
$modulnr = 1;
$css = "../css/standard.css";
$felter = array('projekt');
include "../includes/connect.php";
include "../includes/online.php";
include "../includes/std_func.php";
$id = if_isset($_GET['id']) * 1;
$felt = if_isset($_GET['felt']);
$returside = if_isset($_GET['returside']);
$ny_feltvaerdi = if_isset($_POST['ny_feltvaerdi']);
print "<table width=\"100%\" height=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tbody>";
#Tabel1 ->
print "<tr><td height = 25 align=center valign=top>";
print "<table width=\"100%\" align=center border=\"0\" cellspacing=\"2\" cellpadding=\"0\"><tbody>";
# Tabel 1.1 ->
print "<tr><td width=\"10%\" {$top_bund}>";
print "<a href=\"../finans/kontrolspor.php\" accesskey=\"L\">Luk</a></td>";
print "<td width=80% {$top_bund}>Kontrolspor</td>";
print "<td width=10% {$top_bund}><br></td></tr>";
print "</tbody></table></tr>\n";
# <- Tabel 1.1
if (!in_array($felt, $felter)) {
print "<BODY onLoad=\"javascript:alert('Forsøg på manipulation konstateret - handling afbrudt')\">";
exit;
}
}
} elseif ($_POST['gem']) {
$id = $_POST['id'];
$kontonr = round($_POST['kontonr'], 0);
$beskrivelse = addslashes($_POST['beskrivelse']);
$kontotype = if_isset($_POST['kontotype']);
# $katagori=if_isset($_POST['katagori']);
$moms = if_isset($_POST['moms']);
$fra_kto = $_POST['fra_kto'] * 1;
$til_kto = if_isset($_POST['kontonr']);
$saldo = if_isset($_POST['saldo']);
$valuta = if_isset($_POST['valuta']);
$ny_valuta = if_isset($_POST['ny_valuta']);
#cho $ny_valuta."<br>";
$genvej = if_isset($_POST['genvej']);
$lukket = if_isset($_POST['lukket']);
if ($kontotype != 'Sum' && $kontotype != 'Resultat') {
$fra_kto = 0;
$til_kto = 0;
}
if (!$valuta) {
$valuta = 'DKK';
}
if (!$ny_valuta) {
$ny_valuta = 'DKK';
}
if ($ny_valuta != $valuta) {
$dd = date("Y-m-d");
#cho $dd."<br>$saldo<br>$ny_valuta<br>";
if ($saldo) {
if ($valuta == 'DKK') {
} else {
$shop_id = NULL;
}
if (!$saldi_vnr && $shop_id) {
$saldi_vnr = $shop_id;
}
#cho "svnr $saldi_vnr<br>";
$shop_vnr = if_isset($_GET['shop_vnr']);
$saldi_id = if_isset($_POST['saldi_id']);
if (!$saldi_id) {
$saldi_id = if_isset($_GET['saldi_id']);
}
#$saldi_grp=if_isset($_GET['saldi_grp']);
$beskrivelse = if_isset($_GET['beskrivelse']);
$pris = if_isset($_GET['pris']) * 1;
$specialpris = if_isset($_GET['specialpris']) * 1;
if ($encoding != 'UTF-8') {
$beskrivelse = utf8_encode($beskrivelse);
$shop_vnr = utf8_encode($shop_vnr);
}
$fp = fopen("log.txt", "a");
fwrite($fp, __LINE__ . " " . date("H:i:s") . "shop id {$shop_id} Besk {$beskrivelse} Pris {$pris} vnr {$shop_vnr}\n");
fclose($fp);
$saldiurl = "://" . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI'];
if ($_SERVER['HTTPS']) {
$saldiurl = "s" . $saldiurl;
}
$saldiurl = "http" . $saldiurl;
$r = db_fetch_array(db_select("select box2 from grupper where art = 'DIV' and kodenr = '5'", __FILE__ . " linje " . __LINE__));
$shopurl = trim($r['box2']);
$url = str_replace("/?", "/hent_vare.php?", $shopurl);
$q = db_select("select * from regnskab where db != '{$sqdb}' {$order}", __FILE__ . " linje " . __LINE__);
while ($r = db_fetch_array($q)) {
if ($admin || in_array($r['id'], $adgang_til)) {
$x++;
$id[$x] = $r['id'];
$regnskab[$x] = $r['regnskab'];
$db_navn[$x] = $r['db'];
$posteringer[$x] = $r['posteringer'] * 1;
$posteret[$x] = $r['posteret'] * 1;
$brugerantal[$x] = $r['brugerantal'] * 1;
$sidst[$x] = $r['sidst'];
# $oprettet[$x]=date("d-m-Y",$r['oprettet']);
$lukket[$x] = if_isset($r['lukket']);
$lukkes[$x] = if_isset($r['lukkes']);
$betalt_til[$x] = if_isset($r['betalt_til']);
$logintekst[$x] = if_isset($r['logintekst']);
if ($lukkes[$x]) {
$lukkes[$x] = dkdato($lukkes[$x]);
}
if ($betalt_til[$x]) {
$betalt_til[$x] = dkdato($betalt_til[$x]);
}
}
}
$antal = $x;
if ($beregn) {
$y = date("Y") - 1;
$m = date("m");
$d = date("d");
$dd = $y . "-" . $m . "-" . $d;
for ($x = 1; $x <= $antal; $x++) {
include "top.php";
if ($ryd = if_isset($_GET['ryd'])) {
db_modify("delete from tekster where sprog_id='{$sprog_id}'", __FILE__ . " linje " . __LINE__);
}
$sort = if_isset($_GET['sort']);
if (!$sort) {
$sort = "tekst";
}
$sprog_id = if_isset($_GET['sprog_id']);
$kopier = if_isset($_GET['kopier']);
$title = "findtekst(30,{$sprog_id})";
if ($_POST) {
$tekstantal = if_isset($_POST['tekstantal']);
$id = if_isset($_POST['id']);
$tekst = if_isset($_POST['tekst']);
$ny_tekst = if_isset($_POST['ny_tekst']);
for ($x = 1; $x <= $tekstantal; $x++) {
$tmp = addslashes(trim($ny_tekst[$x]));
if ($id[$x] && $tmp && $tekst[$x] != $ny_tekst[$x]) {
db_modify("update tekster set tekst='{$tmp}' where id='{$id[$x]}'", __FILE__ . " linje " . __LINE__);
}
}
}
if (!$sprog_id) {
$sprog_id = 1;
}
$x = 0;
if ($kopier) {
$q = db_select("select * from tekster where sprog_id={$kopier} order by tekst", __FILE__ . " linje " . __LINE__);
while ($r = db_fetch_array($q)) {
$x++;
$transdate = date("Y-m-d");
$logtime = date("H:i");
$fejl = 0;
$antal = if_isset($_GET['antal']);
$id[0] = if_isset($_GET['id']);
$ny_beholdning[0] = if_isset($_GET['ny_beholdning']);
$samlevare = if_isset($_GET['samlevare']);
if (isset($_POST['cancel'])) {
$id = if_isset($_POST['id']);
print "<meta http-equiv=\"refresh\" content=\"0;URL=varekort.php?id={$id['0']}\">";
exit;
}
if ($_POST['bilag'] || $_POST['bilag'] == '0') {
$id = if_isset($_POST['id']);
$ny_beholdning = if_isset($_POST['ny_beholdning']);
$bilag = if_isset($_POST['bilag']);
if (!is_numeric($bilag) || strlen($bilag) > 9) {
print "<BODY onLoad=\"javascript:alert('Bilagsnummer skal være et positivt tal og må maks indeholder 9 cifre')\">";
$fejl = 1;
}
}
if (!$fejl && $antal >= 1) {
if ($bilag || $bilag == '0') {
$bilag = $bilag * 1;
if ($samlevare && $antal) {
list($antal, $id, $ny_beholdning) = samlevare($id[0], $ny_beholdning[0]);
$kontonr = array();
}
$r = db_fetch_array(db_select("select * from grupper where kodenr='{$regnaar}' and art='RA'", __FILE__ . " linje " . __LINE__));
$startaar = $row['box2'] * 1;
$startaar >= '2015' ? $aut_lager = 'on' : ($aut_lager = NULL);
exit;
} else {
$title = str_replace('$kontonr', $kontonr, findtekst(433, $sprog_id));
print "<BODY onLoad=\"javascript:alert('Ingen leverandør med kontonummer {$kontonr}')\"><!--tekst 433-->\n";
}
} else {
db_modify("update grupper set box4='' where id='{$id}'", __FILE__ . " linje " . __LINE__);
print "<meta http-equiv=\"refresh\" content=\"0;URL=diverse.php?sektion=prislister\">\n";
}
} elseif (isset($_POST['gem']) && $lev_id) {
if ($prisgruppeantal = if_isset($_GET['prisgruppeantal'])) {
$std_rabat = trim(if_isset($_POST['std_rabat']));
$ny_rabat = if_isset($_POST['ny_rabat']);
$prisgruppe = if_isset($_POST['prisgruppe']);
$std_varegruppe = trim(if_isset($_POST['std_varegruppe']));
$ny_gruppe = if_isset($_POST['ny_gruppe']);
for ($x = 1; $x <= $prisgruppeantal; $x++) {
$ny_rabat[$x] *= 1;
if ($ny_rabat[$x] != $std_rabat) {
$rabat ? $rabat .= chr(9) . $prisgruppe[$x] . "|" . $ny_rabat[$x] : ($rabat = chr(9) . $prisgruppe[$x] . "|" . $ny_rabat[$x]);
}
}
# db_modify("update grupper set box5='$rabat' where id='$id'",__FILE__ . " linje " . __LINE__);
for ($x = 1; $x <= $prisgruppeantal; $x++) {
$ny_gruppe[$x] = trim($ny_gruppe[$x]);
if ($ny_gruppe[$x] && $ny_gruppe[$x] != $std_varegruppe) {
$varegruppe ? $varegruppe .= chr(9) . $prisgruppe[$x] . "|" . $ny_gruppe[$x] : ($varegruppe = chr(9) . $prisgruppe[$x] . "|" . $ny_gruppe[$x]);
}
}
db_modify("update grupper set box5='{$rabat}',box7='{$varegruppe}' where id='{$id}'", __FILE__ . " linje " . __LINE__);
}
// ------- lager/stykliste.php lap 3.2.6 ------2011-11-17----------- // LICENS // // Dette program er fri software. Du kan gendistribuere det og / eller // modificere det under betingelserne i GNU General Public License (GPL) // som er udgivet af The Free Software Foundation; enten i version 2 // af denne licens eller en senere version efter eget valg // Fra og med version 3.2.2 dog under iagttagelse af følgende: // // Programmet må ikke uden forudgående skriftlig aftale anvendes // i konkurrence med DANOSOFT ApS eller anden rettighedshaver til programmet. // // Dette program er udgivet med haab om at det vil vaere til gavn, // men UDEN NOGEN FORM FOR REKLAMATIONSRET ELLER GARANTI. Se // GNU General Public Licensen for flere detaljer. // // En dansk oversaettelse af licensen kan laeses her: // http://www.fundanemt.com/gpl_da.html // // Copyright (c) 2004-2011 DANOSOFT ApS // ---------------------------------------------------------------------- @session_start(); $s_id = session_id(); $modulnr = 9; include "../includes/connect.php"; include "../includes/online.php"; include "../includes/std_func.php"; include "../includes/stykliste.php"; $id = if_isset($_GET['id']); stykliste($id, 'udskriv', '');
if ($ret_vrgnavn) {
ret_varerabatgruppe($ret_vrgnavn);
}
if (isset($_POST['gem'])) {
$id = $_POST['id'];
$rabat = $_POST['rabat'];
$drg_antal = $_POST['drg_antal'];
$dg_antal = $_POST['dg_antal'];
$drgnavn = if_isset($_POST['drgnavn']);
$drg_nr = if_isset($_POST['drg_nr']);
$rabatart = if_isset($_POST['rabatart']);
$ny_rabatart = if_isset($_POST['ny_rabatart']);
$ny_rabat = $_POST['ny_rabat'];
$vrg_antal = $_POST['vrg_antal'];
$vg_antal = $_POST['vg_antal'];
$vrgnavn = if_isset($_POST['vrgnavn']);
for ($x = 0; $x < $drg_antal; $x++) {
if ($drgnavn[$x] && $drgnavn[$x] != '-') {
db_modify("update grupper set box1 = '" . $drgnavn[$x] . "' where art = 'DRG' and kodenr = '" . $drg_nr[$x] . "'", __FILE__ . " linje " . __LINE__);
} elseif ($drgnavn[$x] == '-') {
if (!db_fetch_array(db_select("select * from rabat where debitor = '" . $drg_nr[$x] . "'", __FILE__ . " linje " . __LINE__))) {
db_modify("delete from grupper where art = 'DRG' and kodenr = '" . $drg_nr[$x] . "'", __FILE__ . " linje " . __LINE__);
}
}
}
if (!$drg_antal) {
$drg_antal++;
}
if ($drgnavn[$drg_antal]) {
$kodenr = 0;
$x = 0;
$ny_dato = dkdato(usdate($fakturadato[$x]));
} elseif ($gl_dato && $ny_dato && $fakturadato[$x] == $gl_dato) {
$fakturadato[$x] = $ny_dato;
}
$genfakt[$x] = $_POST['genfakt_' . $x];
if (substr($genfakt[$x], -2) == "*=") {
$r = db_fetch_array(db_select("select nextfakt from ordrer where id = '{$ordreliste[$x]}' and status<'3'", __FILE__ . " linje " . __LINE__));
$gl_genfakt = dkdato($r['nextfakt']);
$genfakt[$x] = str_replace("*=", "", $genfakt[$x]);
$ny_genfakt = dkdato(usdate($genfakt[$x]));
} elseif ($gl_genfakt && $ny_genfakt && $genfakt[$x] == $gl_genfakt) {
$genfakt[$x] = $ny_genfakt;
}
$udskriv_til[$x] = $_POST['udskriv_til_' . $x];
$email[$x] = $_POST['email_' . $x];
$sync_email[$x] = if_isset($_POST['sync_email_' . $x]);
$betalingsbet[$x] = $_POST['betalingsbet_' . $x];
$betalingsdage[$x] = $_POST['betalingsdage_' . $x] * 1;
$procenttillag[$x] = usdecimal($_POST['procenttillag_' . $x]);
if (substr($betalingsdage[$x], -2) == "*=") {
$r = db_fetch_array(db_select("select betalingsbet,betalingsdage from ordrer where id = '{$ordreliste[$x]}' and status<'3'", __FILE__ . " linje " . __LINE__));
$gl_betalingsbet = $r['betalingsbet'];
$gl_betalingsdage = $r['betalingsdage'];
$betalingsdage[$x] = str_replace("*=", "", $betalingsdage[$x]);
$ny_betalingsbet = $betalingsbet[$x];
$ny_betalingsdage = $betalingsdage[$x];
} elseif ($gl_betalingsbet && $ny_betalingsbet && $betalingsbet[$x] == $gl_betalingsbet && $betalingsdage[$x] == $gl_betalingsdage) {
$betalingsbet[$x] = $ny_betalingsbet;
$betalingsdage[$x] = $ny_betalingsdage;
}
if (!$betalingsbet[$x]) {
include "../includes/online.php";
include "../includes/std_func.php";
print "<div align=\"center\">\n";
print "<table width=\"100%\" height=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tbody>\n";
print "<tr><td height = \"25\" align=\"center\" valign=\"top\">\n";
print "<table width=\"100%\" align=\"center\" border=\"0\" cellspacing=\"2\" cellpadding=\"0\"><tbody>\n";
if ($popup) {
print "<td width=\"10%\" {$top_bund}><a href=../includes/luk.php accesskey=L>Luk</a></td>\n";
} else {
print "<td width=\"10%\" {$top_bund}><a href=diverse.php?sektion=div_io accesskey=L>Luk</a></td>\n";
}
print "<td width=\"80%\" {$top_bund}>{$title}</td>\n";
print "<td width=\"10%\" {$top_bund}><br></td>\n";
print "</tbody></table>\n";
print "</td></tr>\n";
$submit = if_isset($_POST['submit']);
if ($submit) {
if (strstr($submit, "Import")) {
$submit = "Importer";
}
$filnavn = $_POST['filnavn'];
$splitter = $_POST['splitter'];
$feltnavn = $_POST['feltnavn'];
$feltantal = $_POST['feltantal'];
$tegnset = $_POST['tegnset'];
if (basename($_FILES['uploadedfile']['name'])) {
$filnavn = "../temp/" . $db . "_" . str_replace(" ", "_", $brugernavn) . ".csv";
if (move_uploaded_file($_FILES['uploadedfile']['tmp_name'], $filnavn)) {
vis_data($filnavn, '', '', 1, $bilag, $tegnset);
} else {
echo "Der er sket en fejl under hentningen, prøv venligst igen";
function openpost($dato_fra, $dato_til, $konto_fra, $konto_til, $rapportart, $art)
{
?>
<script LANGUAGE="JavaScript">
<!--
function confirmSubmit(tekst)
{
var agree=confirm(tekst);
if (agree) return true ;
else return false ;
}
// -->
</script>
<script LANGUAGE="JavaScript" SRC="../javascript/overlib.js"></script>
<?php
#echo "KF1 $konto_fra<br>";
$forfaldsum = NULL;
$forfaldsum_plus8 = NULL;
$forfaldsum_plus30 = NULL;
$forfaldsum_plus60 = NULL;
$forfaldsum_plus90 = NULL;
$linjebg = NULL;
$tmp1 = NULL;
$tmp2 = NULL;
global $bgcolor;
global $bgcolor5;
global $top_bund;
global $md;
global $kontoudtog;
global $ny_rykker;
global $jsvars;
global $popup;
global $sprog_id;
$fromdate = usdate($dato_fra);
$todate = usdate($dato_til);
$skjul_aabenpost = if_isset($_GET['skjul_aabenpost']);
$skjul_aaben_rykker = if_isset($_GET['skjul_aaben_rykker']);
$skjul_bogfort_rykker = if_isset($_GET['skjul_bogfort_rykker']);
$skjul_afsluttet_rykker = if_isset($_GET['skjul_afsluttet_rykker']);
if ($skjul_aabenpost) {
db_modify("update grupper set box7='{$skjul_aabenpost}' where art='DRV' and kodenr='1'", __FILE__ . " linje " . __LINE__);
}
if ($skjul_aaben_rykker) {
db_modify("update grupper set box8='{$skjul_aaben_rykker}' where art='DRV' and kodenr='1'", __FILE__ . " linje " . __LINE__);
}
if ($skjul_bogfort_rykker) {
db_modify("update grupper set box9='{$skjul_bogfort_rykker}' where art='DRV' and kodenr='1'", __FILE__ . " linje " . __LINE__);
}
if ($skjul_afsluttet_rykker) {
db_modify("update grupper set box10='{$skjul_afsluttet_rykker}' where art='DRV' and kodenr='1'", __FILE__ . " linje " . __LINE__);
}
db_modify("update ordrer set art = 'R1' where art = 'RB'", __FILE__ . " linje " . __LINE__);
# 20091012 - er overfloedig
if ($r = db_fetch_array(db_select("select * from grupper where art = 'DRV' and kodenr = '1' order by box2", __FILE__ . " linje " . __LINE__))) {
$skjul_aabenpost = $r['box7'];
$skjul_aaben_rykker = $r['box8'];
$skjul_bogfort_rykker = $r['box9'];
$skjul_afsluttet_rykker = $r['box10'];
}
if ($ny_rykker) {
# echo "1;URL=rapport.php?ny_rykker=1&dato_fra=$dato_fra&dato_til=$dato_til&konto_fra=$konto_fra&konto_til=$konto_til&rapportart=$rapportart";
print "<meta http-equiv=\"refresh\" content=\"1;URL=rapport.php?ny_rykker=1&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$konto_fra}&konto_til={$konto_til}&rapportart={$rapportart}\">";
}
/*
if ($dato_fra && strstr($dato_fra," ")) list ($x,$tmp1) = explode(" ",$dato_fra);
if ($dato_til && strstr($dato_til," ")) list ($x,$tmp2) = explode(" ",$dato_til);
if ($tmp1 && $tmp2) {
$dato_fra=$tmp1;
$dato_til=$tmp2;
}
*/
$maaned_fra = trim($maaned_fra);
$maaned_til = trim($maaned_til);
print "<table width = 100% cellpadding=\"0\" cellspacing=\"0\" border=\"0\"><tbody>";
print "<tr><td width=100% height=\"8\">";
print "<table width=\"100%\" align=\"center\" border=\"0\" cellspacing=\"3\" cellpadding=\"0\"><tbody>";
#B
# print "<td width=\"10%\" $top_bund><a accesskey=l href=\"rapport.php?rapportart=openpost&dato_fra=$dato_fra&dato_til=$dato_til&konto_fra=$konto_fra&konto_til=$konto_til\">Luk</a></td>";
print "<td width=\"10%\" {$top_bund}><a accesskey=l href=\"rapport.php\">Luk</a></td>";
print "<td width=\"80%\" {$top_bund}>Rapport - {$rapportart}</td>";
print "<td width=\"10%\" {$top_bund}>";
if ($skjul_aabenpost == 'on') {
print "<a href=rapport.php?rapportart=openpost&submit=ok&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$kotno_fra}&konto_til={$konto_til}&skjul_aabenpost=off>Vis</a><td></tr>";
} else {
print "<a href=rapport.php?rapportart=openpost&submit=ok&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$konto_fra}&konto_til={$konto_til}&skjul_aabenpost=on>Skjul</a><td></tr>";
}
# <a accesskey=l href=\"rapport.php?rapportart=openpost&dato_fra=$dato_fra&dato_til=$dato_til&konto_fra=$konto_fra&konto_til=$konto_til\"><br></a></td>";
print "</tbody></table></td></tr>\n";
#B s**t
#echo "XX $dato_fra,$dato_til,$konto_fra,$konto_til,$art<br>";
if ($skjul_aabenpost != 'on') {
vis_aabne_poster($dato_fra, $dato_til, $konto_fra, $konto_til, $art);
}
####################################### Rykkeroversigt ##############################################
# if ($skjul_aaben_rykker!='on' || $skjul_bogfort_rykker!='on' || $skjul_afsluttet_rykker!='on')
if (is_numeric($konto_fra) && is_numeric($konto_til)) {
$tekst = "select * from ordrer where " . nr_cast('kontonr') . ">='{$konto_fra}' and " . nr_cast('kontonr') . "<='{$konto_til}' and art LIKE 'R%' 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 ordrer where (firmanavn like '{$konto_fra}' or lower(firmanavn) like '{$tmp1}' or upper(firmanavn) like '{$tmp2}') and art LIKE 'R%' order by firmanavn";
} else {
$tekst = "select * from ordrer where art LIKE 'R%' order by firmanavn";
}
# echo "tekst $tekst<br>";
if ($art == 'D' && db_fetch_array(db_select("{$tekst}", __FILE__ . " linje " . __LINE__))) {
# if ($art=='D' && db_fetch_array(db_select("select * from ordrer where art LIKE 'R%'",__FILE__ . " linje " . __LINE__))) {
# print "<tr><td><br></td></tr>\n";
$x = 0;
$taeller = 0;
$sum = array();
while ($taeller < 3) {
$sum = array();
$taeller++;
print "<tr><td><table width=100% cellpadding=\"0\" cellspacing=\"3\" border=\"0\"><tbody>\n";
if ($taeller == 1) {
print "<tr><td width=10% align=center {$top_bund}><br></td><td width=80% align=center {$top_bund}>Åbne rykkere</td><td width=10% align=center {$top_bund}>\n";
if ($skjul_aaben_rykker == 'on') {
print "<a href=rapport.php?rapportart=openpost&submit=ok&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$kotno_fra}&konto_til={$konto_til}&skjul_aaben_rykker=off>Skjul</a><td></tr>";
} else {
print "<a href=rapport.php?rapportart=openpost&submit=ok&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$konto_fra}&konto_til={$konto_til}&skjul_aaben_rykker=on>Vis</a><td></tr>";
}
} elseif ($taeller == 2) {
print "<tr><td width=10% align=center {$top_bund}><br></td><td width=80% align=center {$top_bund}>Bogførte rykkere</td><td width=10% align=center {$top_bund}>\n";
if ($skjul_bogfort_rykker == 'on') {
print "<a href=rapport.php?rapportart=openpost&submit=ok&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$kotno_fra}&konto_til={$konto_til}&skjul_bogfort_rykker=off>Skjul</a><td></tr>";
} else {
print "<a href=rapport.php?rapportart=openpost&submit=ok&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$konto_fra}&konto_til={$konto_til}&skjul_bogfort_rykker=on>Vis</a><td></tr>";
}
} else {
print "<tr><td width=10% align=center {$top_bund}><br></td><td width=80% align=center {$top_bund}>Afsluttede rykkere</td><td width=10% align=center {$top_bund}>\n";
if ($skjul_afsluttet_rykker == 'on') {
print "<a href=rapport.php?rapportart=openpost&submit=ok&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$kotno_fra}&konto_til={$konto_til}&skjul_afsluttet_rykker=off>Skjul</a><td></tr>";
} else {
print "<a href=rapport.php?rapportart=openpost&submit=ok&dato_fra={$dato_fra}&dato_til={$dato_til}&konto_fra={$konto_fra}&konto_til={$konto_til}&skjul_afsluttet_rykker=on>Vis</a><td></tr>";
}
}
print "</tbody></table></td></tr>";
if ($taeller == 1 && $skjul_aaben_rykker == 'on' || $taeller == 2 && $skjul_bogfort_rykker == 'on' || $taeller == 3 && $skjul_afsluttet_rykker == 'on') {
print "<tr><td width=100%>";
print "<table width=\"100%\" align=\"center\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tbody>";
#B
print "<tr><td>Løbenr.</td><td>Firmanavn</td><td colspan=2 align=center>Dato</td><td align=center>Rykkernr</td><td colspan=3 align=right>Beløb</td></tr>\n";
print "<tr><td colspan=9><hr></td></tr>\n";
if ($taeller == 1) {
$formnavn = 'rykker1';
$status = "< 3";
} else {
$formnavn = 'rykker2';
$status = ">= 3";
}
if ($taeller == 3) {
$betalt = "and betalt = 'on'";
} else {
$betalt = "and betalt != 'on'";
}
print "<form name={$formnavn} action=rapport.php method=post>";
if (is_numeric($konto_fra) && is_numeric($konto_til)) {
$tekst = "select * from ordrer where " . nr_cast('kontonr') . ">='{$konto_fra}' and " . nr_cast('kontonr') . "<='{$konto_til}' and art LIKE 'R%' {$betalt} and status {$status} 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 ordrer where (firmanavn like '{$konto_fra}' or lower(firmanavn) like '{$tmp1}' or upper(firmanavn) like '{$tmp2}') and art LIKE 'R%' {$betalt} and status {$status} order by firmanavn";
} else {
$tekst = "select * from ordrer where art LIKE 'R%' {$betalt} and status {$status} order by firmanavn";
}
# echo "tekst $tekst<br>";
$q1 = db_select("{$tekst}", __FILE__ . " linje " . __LINE__);
# $q1 = db_select("select * from ordrer where art LIKE 'R%' $betalt and status $status order by ordrenr desc",__FILE__ . " linje " . __LINE__);
$x = 0;
while ($r1 = db_fetch_array($q1)) {
$rykkernr = substr($r1['art'], -1);
# $belob=dkdecimal($r1['sum']);
$x++;
$sum[$x] = 0;
$udlignet = 1;
$delsum = 0;
$q2 = db_select("select * from ordrelinjer where ordre_id = '{$r1['id']}'", __FILE__ . " linje " . __LINE__);
while ($r2 = db_fetch_array($q2)) {
# $sum[$x]=$sum[$x]+$r2['pris'];
if ($r2['enhed']) {
$q3 = db_select("select udlignet, amount, valutakurs from openpost where id = '{$r2['enhed']}'", __FILE__ . " linje " . __LINE__);
while ($r3 = db_fetch_array($q3)) {
if (!$r3['udlignet']) {
$udlignet = 0;
} else {
$delsum = $r3['amount'] * $r3['valutakurs'] / 100;
}
if (!$r3['valutakurs']) {
$r3['valutakurs'] = 100;
}
$sum[$x] = $sum[$x] + $r3['amount'] * $r3['valutakurs'] / 100;
}
} else {
$sum[$x] = $sum[$x] + $r2['pris'];
}
}
print "<input type=hidden name=rykker_id[{$x}] value={$r1['id']}>";
$belob = dkdecimal($sum[$x]);
if ($rykkernr == 1) {
$color = "#000000";
} elseif ($rykkernr == 2) {
$color = "#CC6600";
} elseif ($rykkernr == 3) {
$color = "#ff0000";
}
if ($linjebg != $bgcolor) {
$linjebg = $bgcolor;
} elseif ($linjebg != $bgcolor5) {
$linjebg = $bgcolor5;
}
print "<tr style=\"background-color:{$linjebg} ; color: {$color};\">";
print "<td onClick=\"window.open('rykker.php?rykker_id={$r1['id']}','rykker','{$jsvars}')\" onMouseOver=\"this.style.cursor = 'pointer'\"><span title='Klik for detaljer' style=\"text-decoration: underline;\"><a>{$r1['ordrenr']}</a></td>";
print "<td>{$r1['firmanavn']}</td><td colspan=2 align=center>{$r1['ordredate']}</td><td align=center>{$rykkernr}</td>";
if ($udlignet || $delsum >= $sum[$x]) {
$color = "#00aa00";
$title = "Alle poster på rykkeren er betalt";
} elseif ($delsum) {
$color = "#0000aa";
$title = "Rykkeren er delvist betalt med kr " . dkdecimal($delsum) . "";
} else {
$title = "";
}
print "<td colspan=3 align=right style=\"background-color:{$linjebg} ; color: {$color};\" title='{$title}'>{$belob}</td>";
$tmp = $rykkernr + 1;
$tmp = "R" . $tmp;
if (!db_fetch_array(db_select("select * from ordrer where art = '{$tmp}' and ordrenr = '{$r1['ordrenr']}' and betalt != 'on'", __FILE__ . " linje " . __LINE__))) {
print "<td align=center><input type=checkbox name=rykkerbox[{$x}]>";
} else {
db_modify("update ordrer set betalt = 'on' where id = '{$r1['id']}'", __FILE__ . " linje " . __LINE__);
}
print "</tr>\n";
}
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=rykkerantal value={$x}>";
print "<input type=hidden name=kontoantal value={$x}>";
if ($x) {
print "<tr><td colspan=10><hr></td></tr>\n";
if ($taeller == 1) {
print "<tr><td colspan=10 align=center><input type=submit value=\" Slet \" name=\"submit\" onClick=\"return confirmSubmit('Slet valgte ?')\"> ";
} else {
print "<tr><td colspan=10 align=center>";
}
print "<input type=submit value=\"Udskriv\" name=\"submit\" onClick=\"return confirmSubmit('Udskriv valgte ?')\">";
if ($taeller == 2) {
print " <span title='Registrerer rykker som afsluttet og fjernde den fra listen'><input type=submit value=\"Afslut\" name=\"submit\" onClick=\"return confirmSubmit('Afslut valgte ?')\"></span>";
print " <input type=submit value=\"Ny rykker\" name=\"submit\">";
}
if ($taeller == 1) {
print " <input type=submit value=\"Bogfør\" name=\"submit\" onClick=\"return confirmSubmit('Bogfør valgte ?')\"></td></tr>\n";
} else {
print "</td></tr>\n";
}
}
# if ($taeller==1) print "<tr><td>Bogførte</td><td colspan=9><hr></td></tr>\n";
# elseif ($taeller==2) print "<tr><td>Afsluttede</td><td colspan=9><hr></td></tr>\n";
# else print "<tr><td colspan=10><hr></td></tr>\n";
print "</form>\n";
print "</tbody></table></td></tr>";
}
}
}
}
print "<meta http-equiv=\"refresh\" content=\"1;URL=../debitor/ordre.php?id={$ordre_id}&vare_id={$vare_id}&fokus={$fokus}\">";
} elseif ($r['art'] == 'KO') {
print "<meta http-equiv=\"refresh\" content=\"1;URL=../kreditor/ordre.php?id={$ordre_id}&vare_id={$vare_id}&fokus={$fokus}\">";
}
}
}
if ($start < 0) {
$start = 0;
}
$prev = $start - 500;
if ($prev < 0) {
$prev = 0;
}
$s**t = $start + 500;
if ($_POST['prisliste']) {
$prisliste = if_isset($_POST['prisliste']);
}
$varenr[0] = trim($_POST['varenr0']);
$ean[0] = trim($_POST['ean0']);
$prisgruppe[0] = trim($_POST['varegruppe0']);
$beskrivelse[0] = trim($_POST['beskrivelse0']);
$enhed[0] = trim($_POST['enhed0']);
$salgspris[0] = trim($_POST['salgspris0']);
$kostpris[0] = trim($_POST['kostpris0']);
$r = db_fetch_array(db_select("select * from grupper where id={$prisliste}", __FILE__ . " linje " . __LINE__));
$listenavn = $r['beskrivelse'];
$prisfil = $r['box2'];
$rabatter = $r['box5'];
$std_rabat = $r['box6'];
$prisgrupper = array();
$fp = fopen("{$prisfil}", "r");
// http://www.saldi.dk/dok/GNU_GPL_v2.html
//
// Copyright (c) 2004-2015 DANOSOFT ApS
// ----------------------------------------------------------------------
@session_start();
$s_id = session_id();
$modulnr = 9;
$title = "Varefoto";
$css = "../css/standard.css";
include "../includes/connect.php";
include "../includes/online.php";
include "../includes/std_func.php";
$submit = if_isset($_POST['submit']);
$id = if_isset($_GET['id']);
$fotonavn = if_isset($_GET['fotonavn']);
$sletfoto = if_isset($_GET['sletfoto']);
if ($fotonavn) {
$title = $fotonavn;
}
print "<div align=\"center\">\n";
print "<table width=\"100%\" height=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tbody>\n";
print "<tr><td height = \"25\" align=\"center\" valign=\"top\">\n";
print "<table width=\"100%\" align=\"center\" border=\"0\" cellspacing=\"2\" cellpadding=\"0\"><tbody>\n";
print "<td width=\"10%\" {$top_bund}><a href=\"varekort.php?id={$id}\" accesskey=\"L\">Luk</a></td>\n";
print "<td width=\"80%\" {$top_bund}>{$title}</td>\n";
print "<td width=\"10%\" {$top_bund}><br></td>\n";
print "</tbody></table>\n";
print "</td></tr>\n";
if ($submit) {
if ($fotonavn = db_escape_string(basename($_FILES['uploadedfile']['name']))) {
echo "{$fotonavn}<br>";
if ($popup) {
$returside = "../includes/luk.php";
} else {
$returside = "{$side}.php";
}
if ($side == 'historik') {
$box = 'box2';
} elseif ($side == 'debitor') {
$box = 'box3';
}
if (isset($_POST) && $_POST) {
$dg_antal = if_isset($_POST['dg_antal']);
$vis_liste = '';
for ($x = 0; $x <= $dg_antal; $x++) {
$tmp = "box" . "{$x}";
$tmp2 = if_isset($_POST[$tmp]);
if ($tmp2 == 'on') {
$vis_liste = $vis_liste . '1';
} else {
$vis_liste = $vis_liste . '0';
}
}
# brugernavn i box1 er en pre 2.0.7 ting - fremover skal der identificeres paa kodenr / bruger_id.
db_modify("update grupper set {$box}='{$vis_liste}', kodenr = '{$bruger_id}', kode = '{$brugernavn}' where art = 'DGV' and (box1 = '{$brugernavn}' or kodenr = '{$bruger_id}')", __FILE__ . " linje " . __LINE__);
if ($popup) {
print "<BODY onLoad=\"javascript=opener.location.reload();\">";
}
print "<meta http-equiv=\"refresh\" content=\"0;URL={$returside}\">";
}
print "<div align=\"center\">\n<table width=\"100%\" height=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tbody>\n\t<tr><td height = \"25\" align=\"center\" valign=\"top\">\n\t\t<table width=\"100%\" align=\"center\" border=\"0\" cellspacing=\"4\" cellpadding=\"0\"><tbody>\n\t\t\t<td width=\"10%\" align=center><div class=\"top_bund\"><a href={$returside} accesskey=L>Luk</a></div></td>\n\t\t\t<td width=\"80%\" align=center><div class=\"top_bund\">{$title}</a></div></td>\n\t\t\t<td width=\"10%\" align=center><div class=\"top_bund\"><br></div></td>\n\t\t\t </tr>\n\t\t\t</tbody></table>\n\t</td></tr>\n <tr><td valign=\"top\">\n<table cellpadding=\"1\" cellspacing=\"1\" border=\"0\" width=\"100%\" valign = \"top\">\n<tbody>";
print "<form name=grpvisning action=grpvisning.php?sort={$sort}&side={$side} method=post>";
// ----------------------------------------------------------------------
//
// 2014.06.17 Tilføjet pris pr. enhed på etiketter, hvis de er der. PHR - Danosoft. 20140617
// 2014.09.01 Tilføjet opsætning til Cognitive printer - Anvendes hvis det ikke er beskrivelse.
// 2015.09.02 Indsat kontrol for uønsket sql kald.
@session_start();
$s_id = session_id();
$title = "Labelprint";
$modulnr = 9;
$css = "../css/standard.css";
$diffkto = NULL;
include "../includes/connect.php";
include "../includes/online.php";
include "../includes/std_func.php";
$id = if_isset($_GET['id']) * 1;
$img = if_isset($_GET['src']);
$fy_ord = array('<?', '<?php', '?>');
$r = db_fetch_array(db_select("select box1 from grupper where art='LABEL'", __FILE__ . " linje " . __LINE__));
$txt = $r['box1'];
for ($x = 0; $x < count($fy_ord); $x++) {
if (strpos($txt, $fy_ord[$x])) {
print "<BODY onLoad=\"JavaScript:alert('Illegal værdi i labeltekst')\">";
exit;
}
}
$r = db_fetch_array(db_select("select * from varer where id='{$id}'", __FILE__ . " linje " . __LINE__));
$momsfri = 'on';
$incl_moms = 0;
if ($r2 = db_fetch_array(db_select("select box7 from grupper where art='VG' and kodenr='{$r['gruppe']}' and box7!='on'", __FILE__ . " linje " . __LINE__))) {
$momsfri = $r22['box7'];
if ($r2 = db_fetch_array(db_select("select box1 from grupper where art='DIV' and kodenr = '5'", __FILE__ . " linje " . __LINE__))) {
// Copyright (c) 2003-2012 DANOSOFT ApS
// ----------------------------------------------------------------------
@session_start();
$s_id = session_id();
$modulnr = 6;
$title = "Fusioner debitorer";
$css = "../css/standard.css";
include "../includes/connect.php";
include "../includes/online.php";
include "../includes/std_func.php";
$fusion = if_isset($_POST['fusion']);
$returside = if_isset($_GET['returside']);
$ordre_id = if_isset($_GET['ordre_id']);
$fokus = if_isset($_GET['fokus']);
$id = if_isset($_GET['id']);
$kontonr = if_isset($_GET['kontonr']);
if ($fusion == "Fortryd") {
#cho "fortryd<br>";
print "<meta http-equiv=\"refresh\" content=\"0;URL=debitorkort.php?returside={$returside}&ordre_id={$ordre_id}&id={$id}&fokus={$fokus}\">\n";
exit;
}
#cho "select id from adresser where art='D' and kontonr='$kontonr' and id != '$id'<br>";
$r = db_fetch_array(db_select("select id,lukket from adresser where art='D' and kontonr='{$kontonr}' and id != '{$id}'", __FILE__ . " linje " . __LINE__));
$r['lukket'] ? $ny_id = NULL : ($ny_id = $r['id']);
if (!$ny_id) {
$alerttekst = "Der findes ikke andre debotirer med kontonr: {$kontonr}";
# $alerttekst=findtekst(345,$sprog_id);
print "<BODY onLoad=\"javascript:alert('{$alerttekst}')\"><!--tekst 345-->";
print "<meta http-equiv=\"refresh\" content=\"0;URL=debitorkort.php?returside={$returside}&ordre_id={$ordre_id}&id={$id}&fokus={$fokus}\">\n";
}
if ($id && $kontonr && $fusion == 'OK') {
$tidspkt = date("U");
if ($submit = if_isset($_POST['submit'])) {
$felt01 = if_isset($_POST['felt01']);
$felt02 = if_isset($_POST['felt02']);
$felt03 = if_isset($_POST['felt03']);
$felt04 = if_isset($_POST['felt04']);
$felt05 = if_isset($_POST['felt05']);
$felt06 = if_isset($_POST['felt06']);
$felt07 = if_isset($_POST['felt07']);
$felt08 = if_isset($_POST['felt08']);
$valg = if_isset($_POST['valg']);
$sort = if_isset($_POST['sort']);
$nysort = if_isset($_POST['nysort']);
$firma = if_isset($_POST['firma']);
$kontoid = if_isset($_POST['kontoid']);
$firmanavn_ant = if_isset($_POST['firmanavn_antal']);
}
if ($nysort == 'kolonne01') {
$nysort = 'id';
}
if ($nysort == 'kolonne02') {
$nysort = 'firmanavn';
}
if ($nysort == 'kolonne03') {
$nysort = 'postnr';
}
if ($nysort == 'kolonne04') {
$nysort = 'felt_1';
}
if ($nysort == 'kolonne05') {
$nysort = 'felt_2';
@session_start();
$s_id = session_id();
ob_start();
$modulnr = 5;
$title = "POS_ordre";
$css = "../css/pos.css";
include "../includes/connect.php";
include "../includes/online.php";
include "../includes/std_func.php";
$r = db_fetch_array(db_select("select box7 from grupper where art = 'POS' and kodenr='2'", __FILE__ . " linje " . __LINE__));
$r['box7'] ? $bord = explode(chr(9), $r['box7']) : ($bord = NULL);
#20140508
#echo $r['box7']."<br";
$flyt = if_isset($_GET['flyt']);
$id = if_isset($_GET['id']);
$delflyt = if_isset($_GET['delflyt']);
$optaget = array();
$x = 0;
$q = db_select("select id,nr,hvem from ordrer where art = 'PO' and status < 3", __FILE__ . " linje " . __LINE__);
while ($r = db_fetch_array($q)) {
if ($id == $r['id']) {
$bordnr = $r['nr'];
}
if ($r['hvem'] && is_numeric($r['nr'])) {
$optaget[$x] = $r['nr'];
$x++;
}
}
if ($flyt || $flyt == '0') {
print "<b><big>Vælg det bord {$bord[$bordnr]} skal flyttes til.</big></b><br>";
}
$bestilt = array();
}
$sort = if_isset($_GET['sort']);
if (isset($_GET['start'])) {
$start = $_GET['start'];
} else {
$start = 1;
}
if (isset($_GET['linjeantal'])) {
$linjeantal = $_GET['linjeantal'];
}
# else $linjeantal=500;
$s**t = if_isset($_GET['s**t']);
# else $s**t=$start+$linjeantal;
$varenummer = db_escape_string(if_isset($_GET['varenummer']));
$beskrivelse = db_escape_string(if_isset($_GET['beskrivelse']));
}
if (isset($_POST)) {
if (isset($_POST['genbestil_ant'])) {
transaktion('begin');
for ($x = 1; $x <= $_POST['genbestil_ant']; $x++) {
$tmp1 = "gb_id_{$x}";
$tmp1 = $_POST[$tmp1];
$tmp2 = "gb_antal_{$x}";
$tmp2 = $_POST[$tmp2];
if ($tmp2) {
genbestil($tmp1, $tmp2);
}
}
transaktion('commit');
print "<BODY onLoad=\"javascript:alert('Der er oprettet nye indkøbsforslag')\">";
}
} else {
print "<BODY onLoad=\"javascript:alert('Ingen fakturaer er markeret til udskrivning!')\">";
}
}
if (isset($_POST['check']) || isset($_POST['uncheck'])) {
$ordre_antal = if_isset($_POST['ordre_antal']);
$ordre_id = if_isset($_POST['ordre_id']);
if (isset($_POST['check'])) {
$check_all = 'on';
}
}
if ($submit == "Genfakturer" || $submit == "Ret") {
$ordre_antal = if_isset($_POST['ordre_antal']);
$ordre_id = if_isset($_POST['ordre_id']);
$checked = if_isset($_POST['checked']);
for ($x = 1; $x <= $ordre_antal; $x++) {
if ($checked[$x] == "on") {
$y++;
if (!$genfakt) {
$genfakt = $ordre_id[$x];
} else {
$genfakt = $genfakt . "," . $ordre_id[$x];
}
}
}
if ($y > 0) {
if ($popup) {
if ($submit == "Ret") {
print "<BODY onLoad=\"JavaScript:window.open('ret_genfakt.php?ordreliste={$genfakt}' , '' , ',statusbar=no,menubar=no,titlebar=no,toolbar=no,scrollbars=yes, location=1');\">";
} else {
$fokus = $_POST['fokus'];
$posnr = $_POST['posnr'];
$ans_id = $_POST['ans_id'];
$ans_ant = $_POST['ans_ant'];
$cat_valg = $_POST['cat_valg'];
$cat_id = $_POST['cat_id'];
$cat_beskrivelse = $_POST['cat_beskrivelse'];
$cat_antal = $_POST['cat_antal'] * 1;
$ny_kategori = $_POST['ny_kategori'];
$rename_category = if_isset($_POST['rename_category']);
$status = db_escape_string(trim($_POST['status']));
$ny_status = db_escape_string(trim($_POST['ny_status']));
$status_id = $_POST['status_id'];
$status_beskrivelse = $_POST['status_beskrivelse'];
$status_antal = count($status_id);
$rename_status = if_isset($_POST['rename_status']);
if ($gl_kontotype == 'privat') {
$firmanavn = trim($fornavn . " " . $efternavn);
$lev_firmanavn = trim($lev_fornavn . " " . $lev_efternavn);
}
# if (!$pbs) $pbs_nr=NULL;
$status == 'new_status' ? $new_status = 1 : ($new_status = 0);
$status *= 1;
if (substr($ny_kontonr, 0, 1) == "=") {
$ny_kontonr = str_replace("=", "", $ny_kontonr);
print "<meta http-equiv=\"refresh\" content=\"0;URL=kontofusion.php?returside={$returside}&ordre_id={$ordre_id}&id={$id}&fokus={$fokus}&kontonr={$ny_kontonr}\">\n";
exit;
}
if (!$id && !$firmanavn && !$ny_kontonr) {
if (findtekst(255, $sprog_id) == 'Regnskab' && $felt_1 > 1 && is_numeric($felt_1)) {
include "../includes/connect.php";
// http://www.fundanemt.com/gpl_da.html
//
// Copyright (c) 2004-2009 DANOSOFT ApS
// ----------------------------------------------------------------------
@session_start();
$s_id = session_id();
$modulnr = 12;
$title = "Top 100 debitorer";
$css = "../css/standard.css";
include "../includes/connect.php";
include "../includes/online.php";
include "../includes/settings.php";
include "../includes/std_func.php";
include "../includes/db_query.php";
$periode = if_isset($_GET['periode']) ? $_GET['periode'] : Null;
$ret = if_isset($_GET['ret']) ? $_GET['ret'] : Null;
if (isset($_POST['periode'])) {
$periode = $_POST['periode'];
}
$day = date("d");
$month = date("m");
$year = date("y");
$tmp = $year - 1;
if ($tmp < 10) {
$tmp = "0" . $tmp;
}
if (!$periode) {
$periode = "{$day}" . "{$month}" . "{$tmp}" . ":" . "{$day}" . "{$month}" . "{$year}";
}
list($fra, $til) = split(":", $periode);
if (!$til) {
function vis_data($kladde_id, $filnavn, $bilag, $modkonto)
{
global $bgcolor;
global $bgcolor5;
global $charset;
global $bruger_id;
if ($modkonto) {
db_modify("update grupper set box14='{$modkonto}' where ART='KASKL' and kode='2' and kodenr='{$bruger_id}'", __FILE__ . " linje " . __LINE__);
} elseif ($r = db_fetch_array(db_select("select * from grupper where ART = 'KASKL' and kode='2' and kodenr='{$bruger_id}'", __FILE__ . " linje " . __LINE__))) {
$modkonto = if_isset($r['box14']);
#box1 - 3 bruges af import.php
} else {
db_modify("insert into grupper (beskrivelse,art,kode,kodenr) values ('Kassekladdeimport','KASKL','2','{$bruger_id}')", __FILE__ . " linje " . __LINE__);
}
$fp = fopen("{$filnavn}", "r");
if ($fp) {
$y = 0;
$feltantal = 0;
# for ($y=1; $y<20; $y++) {
while ($linje = fgets($fp)) {
$linje = trim(utf8_encode($linje));
if ($linje) {
$y++;
$skriv_linje[$y] = 1;
list($debitor[$y], $beskrivelse[$y], , , $belob[$y], , $date[$y]) = explode(";", $linje);
if (!is_numeric($debitor[$y])) {
$skriv_linje[$y] = 0;
}
$amount[$y] = usdecimal($belob[$y]) * 1;
if (!$amount[$y]) {
$skriv_linje[$y] = 0;
}
list($aar, $maaned, $dag) = explode("-", $date[$y]);
# echo "$maaned,$dag,$aar<br>";
if (checkdate($maaned, $dag, $aar)) {
$dato[$y] = dkdato($date[$y]);
} else {
$skriv_linje[$y] = 0;
}
}
}
}
$linjeantal = $y;
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=\"pbswebimport.php\" method=\"POST\">";
#print "<tr><td colspan=6 width=100% align=center> $filnavn</td></tr>";
print "<tr><td colspan=\"5\" align=\"center\">Modkonto<input class=\"inputbox\" style=\"text-align:right;width:60px\" type=\"text\" name=\"modkonto\" value=\"{$modkonto}\"> ";
print "<input type=\"hidden\" name=\"filnavn\" value={$filnavn}>";
print "<input type=\"hidden\" name=\"kladde_id\" value={$kladde_id}>";
print " <input type=\"submit\" name=\"submit\" value=\"Vis\" />";
if ($kladde_id && $filnavn && $modkonto) {
print " <input type=\"submit\" name=\"submit\" value=\"Flyt\" /></td></tr>";
}
print "<tr><td colspan=\"5\"><hr></td></tr>\n";
print "<tr><td><span title='Angiv 1. bilagsnummer'><input class=\"inputbox\" style=\"text-align:right;width:60px\" type=\"text\" name=bilag value={$bilag}></span></td>";
print "<td><b>Kundenr</b></td><td><b>Tekst</b></td><td><b>Dato</b></td><td><b>Beløb</b></td></tr>";
print "</form>";
$linjebg = $bgcolor;
for ($x = 1; $x <= $linjeantal; $x++) {
$linjebg == $bgcolor ? $linjebg = $bgcolor5 : ($linjebg = $bgcolor);
if ($skriv_linje[$x] == 1) {
$bilag++;
$txtcolor = "0,0,0";
} else {
$txtcolor = "255,0,0";
}
print "<tr bgcolor=\"{$linjebg}\" style=\"color:rgb({$txtcolor});\"><td align=\"right\" width=\"10px\">{$bilag}</td><td>{$debitor[$x]}</td><td>{$beskrivelse[$x]}</td><td>{$dato[$x]}</td><td align=\"right\">{$belob[$x]}</td></span></tr>";
}
print "</tbody></table>";
print "</td></tr>";
}
function kassebeholdning($kasse, $optalt, $godkendt, $cookievalue)
{
global $bruger_id;
global $brugernavn;
global $db;
global $db_encode;
# global $printserver;
global $regnaar;
$dd = date("Y-m-d");
$tid = date("H:m");
if (!$cookievalue) {
$cookievalue = $_COOKIE['saldi_kasseoptael'];
}
list($ore_50, $kr_1, $kr_2, $kr_5, $kr_10, $kr_20, $kr_50, $kr_100, $kr_200, $kr_500, $kr_1000, $kr_andet) = explode(chr(9), $cookievalue);
$r = db_fetch_array(db_select("select * from grupper where art = 'POS' and kodenr = '2'", __FILE__ . " linje " . __LINE__));
$byttepenge = $r['box1'];
$optalassist = $r['box2'];
$printer_ip = explode(chr(9), $r['box3']);
$printserver = $printer_ip[$kasse - 1];
if (!$printserver) {
$printserver = 'localhost';
}
if (!$godkendt && $optalassist) {
kasseoptalling($kasse, $optalt, $ore_50, $kr_1, $kr_2, $kr_5, $kr_10, $kr_20, $kr_50, $kr_100, $kr_200, $kr_500, $kr_1000, $kr_andet);
}
$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 box9 from grupper where art = 'POS' and kodenr = '1'", __FILE__ . " linje " . __LINE__));
if (!$r['box9']) {
posbogfor($kasse, $regnstart);
}
include "../includes/ConvertCharset.class.php";
if ($db_encode == "UTF8") {
$FromCharset = "UTF-8";
} else {
$FromCharset = "iso-8859-15";
}
$ToCharset = "cp865";
$convert = new ConvertCharset();
$pfnavn = "../temp/" . $db . "/" . $bruger_id . ".txt";
$fp = fopen("{$pfnavn}", "w");
$kassopgorelse = "KASSEOPGØRELSE";
$tmp = $convert->Convert($kassopgorelse, $FromCharset, $ToCharset);
fwrite($fp, "\n\n{$tmp}\n\n");
fwrite($fp, "Den {$dd} kl. {$tid}\n");
fwrite($fp, "Kasse nr: {$kasse}\n");
$tmp = $convert->Convert($brugernavn, $FromCharset, $ToCharset);
fwrite($fp, "Optalt af: {$tmp}\n");
if ($optalassist) {
$byttepenge = if_isset($_POST['byttepenge']);
$tilgang = if_isset($_POST['tilgang']);
$optalt = if_isset($_POST['optalt']);
$omsatning = if_isset($_POST['omsatning']);
$udtages = if_isset($_POST['udtages']);
$kontkonto = if_isset($_POST['kontkonto']);
$kortnavn = if_isset($_POST['kortnavn']);
$kortsum = if_isset($_POST['kortsum']);
# fwrite($fp,"Optalt kassebeholdning: ".dkdecimal($optalt)."\n\n");
# fwrite($fp,"Differece $prefix".dkdecimal($diff)."\n\n");
# fwrite($fp,"Optalt tilgang i kasse: ".dkdecimal($optalt-$byttepenge)."\n\n");
$tmp = $convert->Convert('50 øre', $FromCharset, $ToCharset);
fwrite($fp, " {$tmp}: {$ore_50}\n");
fwrite($fp, " 1 kr: {$kr_1}\n");
fwrite($fp, " 2 kr: {$kr_2}\n");
fwrite($fp, " 5 kr: {$kr_5}\n");
fwrite($fp, " 10 kr: {$kr_10}\n");
fwrite($fp, " 20 kr: {$kr_20}\n");
fwrite($fp, " 50 kr: {$kr_50}\n");
fwrite($fp, " 100 kr: {$kr_100}\n");
fwrite($fp, " 200 kr: {$kr_200}\n");
fwrite($fp, " 500 kr: {$kr_500}\n");
fwrite($fp, " 1000 kr: {$kr_1000}\n");
fwrite($fp, "Andet kr: " . dkdecimal($kr_andet) . "\n\n");
$txt1 = "Morgenbeholdning:";
$txt2 = dkdecimal($byttepenge);
while (strlen($txt1) + strlen($txt2) < 40) {
$txt2 = " " . $txt2;
}
fwrite($fp, "{$txt1}{$txt2}\n");
$txt1 = "Dagens tilgang:";
$txt2 = dkdecimal($tilgang);
while (strlen($txt1) + strlen($txt2) < 40) {
$txt2 = " " . $txt2;
}
fwrite($fp, "{$txt1}{$txt2}\n");
$txt1 = "Forventet beholdning:";
$txt2 = dkdecimal($byttepenge + $tilgang);
while (strlen($txt1) + strlen($txt2) < 40) {
$txt2 = " " . $txt2;
}
fwrite($fp, "{$txt1}{$txt2}\n");
$txt1 = "Optalt beholdning:";
$txt2 = dkdecimal($optalt);
while (strlen($txt1) + strlen($txt2) < 40) {
$txt2 = " " . $txt2;
}
fwrite($fp, "{$txt1}{$txt2}\n");
$txt1 = "Difference:";
$txt2 = dkdecimal($optalt - ($byttepenge + $tilgang));
while (strlen($txt1) + strlen($txt2) < 40) {
$txt2 = " " . $txt2;
}
fwrite($fp, "{$txt1}{$txt2}\n");
$txt1 = "Udtaget fra kasse {$kasse}:";
$txt2 = dkdecimal($udtages);
while (strlen($txt1) + strlen($txt2) < 40) {
$txt2 = " " . $txt2;
}
fwrite($fp, "{$txt1}{$txt2}\n\n\n\n");
fwrite($fp, "Underskrift:______________________\n\n");
} else {
$svar = find_kassesalg($kasse, $optalt);
$byttepenge = $svar[0];
$tilgang = $svar[1];
$diff = $svar[2];
$kortantal = $svar[3];
$kontkonto = explode(chr(9), $svar[4]);
$kortnavn = explode(chr(9), $svar[5]);
$kortsum = explode(chr(9), $svar[6]);
fwrite($fp, "Beholdning primo: " . dkdecimal($byttepenge) . "\n\n");
fwrite($fp, "Dagens indbetalinger: " . dkdecimal($tilgang) . "\n\n");
fwrite($fp, "Beholdning ultimo: " . dkdecimal($byttepenge + $tilgang) . "\n\n");
}
for ($x = 0; $x < count($kortnavn); $x++) {
$txt1 = "{$kortnavn[$x]}";
$txt2 = dkdecimal($kortsum[$x]);
while (strlen($txt1) + strlen($txt2) < 40) {
$txt2 = " " . $txt2;
}
# fwrite($fp,"\nSalg paa kort:\n");
fwrite($fp, "{$txt1}{$txt2}\n");
}
fwrite($fp, "\n\n\n");
fclose($fp);
$tmp = "/temp/" . $db . "/" . $bruger_id . ".txt";
$url = "://" . $_SERVER['SERVER_NAME'] . $_SERVER['PHP_SELF'];
$url = str_replace("/debitor/pos_ordre.php", "", $url);
if ($_SERVER[HTTPS]) {
$url = "s" . $url;
}
$url = "http" . $url;
print "<BODY onLoad=\"JavaScript:window.open('http://{$printserver}/saldiprint.php?printfil={$tmp}&url={$url}&bruger_id={$bruger_id}&bonantal=1' , '' , '{$jsvars}');\">\n";
}
// 2013.05.08 Tilføjet "and status < 2" så status ikke bliver sat tilbage ved klik på tilbagenap på mus.
$id = NULL;
if (isset($_GET['id'])) {
$id = $_GET['id'];
}
if ($id && $id >= 1) {
$modulnr = 5;
include "../includes/connect.php";
include "../includes/online.php";
include "../includes/std_func.php";
include "../includes/ordrefunc.php";
include "../includes/fuld_stykliste.php";
$hurtigfakt = if_isset($_GET['hurtigfakt']);
$genfakt = if_isset($_GET['genfakt']);
$pbs = if_isset($_GET['pbs']);
$mail_fakt = if_isset($_GET['mail_fakt']);
transaktion("begin");
$svar = levering($id, $hurtigfakt, $genfakt, 0);
if ($svar == 'OK') {
transaktion("commit");
if ($hurtigfakt == 'on') {
db_modify("update ordrer set status=2 where id='{$id}' and status<2", __FILE__ . " linje " . __LINE__);
print "<meta http-equiv=\"refresh\" content=\"0;URL=bogfor.php?id={$id}&genfakt={$genfakt}&mail_fakt={$mail_fakt}&pbs={$pbs}\">";
exit;
} else {
print "<meta http-equiv=\"refresh\" content=\"0;URL=ordre.php?id={$id}\">";
}
} else {
print "<BODY onLoad=\"javascript:alert('{$svar}')\">";
}
}
$fax = addslashes(trim($_POST['fax']));
$cvrnr = addslashes(trim($_POST['cvrnr']));
$ans_id = $_POST['ans_id'];
$ans_ant = $_POST['ans_ant'];
$lukket_ant = $_POST['lukket_ant'];
$posnr = $_POST['posnr'];
$bank_navn = addslashes(trim($_POST['bank_navn']));
$bank_reg = addslashes(trim($_POST['bank_reg']));
$bank_konto = addslashes(trim($_POST['bank_konto']));
$email = addslashes(trim($_POST['email']));
$ny_email = addslashes(trim($_POST['ny_email']));
$mailfakt = addslashes(trim($_POST['mailfakt']));
$vis_lukket = trim($_POST['vis_lukket']);
$pbs_nr = trim($_POST['pbs_nr']);
$pbs = trim($_POST['pbs']);
$gruppe = if_isset($_POST['gruppe']) * 1;
$fi_nr = trim($_POST['fi_nr']);
if ($postnr && !$bynavn) {
$bynavn = bynavn($postnr);
}
if ($id == 0) {
$query = db_modify("insert into adresser (kontonr,firmanavn,addr1,addr2,postnr,bynavn,tlf,fax,cvrnr,art,bank_navn,bank_reg,bank_konto,email,mailfakt,pbs_nr,pbs,bank_fi,gruppe) values ('{$kontonr}','{$firmanavn}','{$addr1}','{$addr2}','{$postnr}','{$bynavn}','{$tlf}','{$fax}','{$cvrnr}','S','{$bank_navn}','{$bank_reg}','{$bank_konto}','{$ny_email}','{$mailfakt}','{$pbs_nr}','{$pbs}','{$fi_nr}','{$gruppe}')", __FILE__ . " linje " . __LINE__);
$query = db_select("select id from adresser where art = 'S'", __FILE__ . " linje " . __LINE__);
$row = db_fetch_array($query);
$id = $row['id'];
} elseif ($id > 0) {
$query = db_modify("update adresser set kontonr = '{$kontonr}', firmanavn = '{$firmanavn}', addr1 = '{$addr1}', addr2 = '{$addr2}', postnr = '{$postnr}', bynavn = '{$bynavn}', tlf = '{$tlf}', fax = '{$fax}', cvrnr = '{$cvrnr}', bank_navn='{$bank_navn}', bank_reg='{$bank_reg}', bank_konto='{$bank_konto}',email='{$ny_email}',mailfakt='{$mailfakt}', notes = '{$notes}', pbs_nr='{$pbs_nr}', pbs='{$pbs}', bank_fi='{$fi_nr}',gruppe='{$gruppe}' where art = 'S'", __FILE__ . " linje " . __LINE__);
for ($x = 1; $x <= $ans_ant; $x++) {
if ($posnr[$x] && $posnr[$x] != '-' && $ans_id[$x]) {
db_modify("update ansatte set posnr = '{$posnr[$x]}' where id = '{$ans_id[$x]}'", __FILE__ . " linje " . __LINE__);
} elseif ($ans_id[$x]) {
function momsangivelse($regnaar, $maaned_fra, $maaned_til, $aar_fra, $aar_til, $dato_fra, $dato_til, $konto_fra, $konto_til, $rapportart, $ansat_fra, $ansat_til, $afd, $projekt_fra, $projekt_til, $simulering, $lagerbev)
{
global $connection;
global $top_bund;
global $md;
global $ansatte;
global $ansatte_id;
global $afd_navn;
global $prj_navn_fra;
global $prj_navn_til;
global $menu;
$medtag_primo = if_isset($_GET['medtag_primo']);
if ($row = db_fetch_array(db_select("select firmanavn from adresser where art='S'", __FILE__ . " linje " . __LINE__))) {
$firmanavn = $row['firmanavn'];
}
if ($afd && ($row = db_fetch_array(db_select("select beskrivelse from grupper where art='AFD' and kodenr='{$afd}'", __FILE__ . " linje " . __LINE__)))) {
$afd_navn = $row['beskrivelse'];
}
$regnaar = $regnaar * 1;
#fordi den er i tekstformat og skal vaere numerisk
# list ($x, $maaned_fra) = explode(" ", $maaned_fra);
# list ($x, $maaned_til) = explode(" ", $maaned_til);
$maaned_fra = trim($maaned_fra);
$maaned_til = trim($maaned_til);
$konto_fra = trim($konto_fra);
$konto_til = trim($konto_til);
$mf = $maaned_fra;
$mt = $maaned_til;
for ($x = 1; $x <= 12; $x++) {
if ($maaned_fra == $md[$x]) {
$maaned_fra = $x;
}
if ($maaned_til == $md[$x]) {
$maaned_til = $x;
}
if (strlen($maaned_fra) == 1) {
$maaned_fra = "0" . $maaned_fra;
}
if (strlen($maaned_til) == 1) {
$maaned_til = "0" . $maaned_til;
}
}
$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;
##
$regnaarstart = $startaar . "-" . $startmaaned . "-" . '01';
if ($maaned_fra) {
$startmaaned = $maaned_fra;
}
if ($maaned_til) {
$slutmaaned = $maaned_til;
}
if ($dato_fra) {
$startdato = $dato_fra;
}
if ($dato_til) {
$slutdato = $dato_til;
}
# if ($slutmaaned<10){$slutmaaned="0".$slutmaaned;}
while (!checkdate($startmaaned, $startdato, $startaar)) {
$startdato = $startdato - 1;
if ($startdato < 28) {
break 1;
}
}
while (!checkdate($slutmaaned, $slutdato, $slutaar)) {
$slutdato = $slutdato - 1;
if ($slutdato < 28) {
break 1;
}
}
if (strlen($startdato) < 2) {
$startdato = "0" . $startdato;
}
$regnstart = $aar_fra . "-" . $startmaaned . "-" . $startdato;
$regnslut = $aar_til . "-" . $slutmaaned . "-" . $slutdato;
# $regnstart = $startaar. "-" . $startmaaned . "-" . $startdato;
# $regnslut = $slutaar . "-" . $slutmaaned . "-" . $slutdato;
# print " <a accesskey=L href=\"rapport.php?rapportart=$rapportart®naar=$regnaar&dato_fra=$startdato&maaned_fra=$mf&dato_til=$slutdato&maaned_til=$mt&konto_fra=$konto_fra&konto_til=$konto_til&afd=$afd\">Luk</a><br><br>";
print "<table width = 100% cellpadding=\"1\" cellspacing=\"1\" border=\"0\"><tbody>";
if ($menu == 'T') {
$leftbutton = "<a title=\"Klik her for at komme til forsiden af rapporter\" href=\"rapport.php?rapportart=kontokort®naar={$regnaar}&dato_fra={$startdato}&maaned_fra={$mf}&aar_fra={$aar_fra}&dato_til={$slutdato}&maaned_til={$mt}&aar_til={$aar_til}&konto_fra={$konto_fra}&konto_til={$konto_til}&ansat_fra={$ansat_fra}&ansat_til={$ansat_til}&afd={$afd}&projekt_fra={$projekt_fra}&projekt_til={$projekt_til}&simulering={$simulering}&lagerbev={$lagerbev}\" accesskey=\"L\">LUK</a>";
$rightbutton = "";
include "../includes/topmenu.php";
} elseif ($menu == 'S') {
include "../includes/sidemenu.php";
} else {
print "<tr><td colspan=\"6\" height=\"8\">";
print "<table width=\"100%\" align=\"center\" border=\"0\" cellspacing=\"3\" cellpadding=\"0\"><tbody>";
#B
print "<td width=\"10%\" {$top_bund}><a accesskey=L href=\"rapport.php?rapportart={$rapportart}®naar={$regnaar}&dato_fra={$startdato}&maaned_fra={$mf}&aar_fra={$aar_fra}&dato_til={$slutdato}&maaned_til={$mt}&aar_til={$aar_til}&konto_fra={$konto_fra}&konto_til={$konto_til}&ansat_fra={$ansat_fra}&ansat_til={$ansat_til}&afd={$afd}&projekt_fra={$projekt_fra}&projekt_til={$projekt_til}&simulering={$simulering}&lagerbev={$lagerbev}\">Luk</a></td>";
print "<td width=\"80%\" {$top_bund}> Rapport - " . ucfirst($rapportart) . "</td>";
print "<td width=\"10%\" {$top_bund}><br></td>";
print "</tbody></table>";
#B s**t
print "</td></tr>";
}
print "<tr><td colspan=\"4\"><big><big>" . ucfirst($rapportart) . "</span></big></big></td>";
print "<td colspan=2 align=right><table style=\"text-align: left; width: 400px;\" border=\"0\" cellspacing=\"1\" cellpadding=\"1\"><tbody><tr>";
if ($afd) {
print "<td>Afdeling</span></td>";
print "<td>{$afd}: {$afd_navn}</span></td></tr>";
}
print "<td>Regnskabsår</span></td>";
print "<td>{$regnaar}.</span></td></tr>";
print "<tr><td>Periode</span></td>";
print "<td>Fra </td><td>" . dkdato($regnstart) . "</td></tr><tr><td></td><td>Til </td><td>" . dkdato($regnslut) . "</span></td></tr>";
if ($ansat_fra) {
if (!$ansat_til || $ansat_fra == $ansat_til) {
print "<tr><td>Medarbejder</span></td><td>{$ansatte}</span></td></tr>";
} else {
print "<tr><td>Medarbejdere</span></td><td>{$ansatte}</span></td></tr>";
}
}
if ($afd) {
print "<tr><td>Afdeling</span></td><td>{$afd_navn}</span></td></tr>";
}
if ($projekt_fra) {
print "<tr><td>Projekt</td>";
if (!strstr($projekt_fra, "?")) {
print "<td>{$prj_navn_fra} ";
if ($projekt_til && $projekt_fra != $projekt_til) {
print "- {$prj_navn_til} ";
}
} else {
print "<td>{$projekt_fra} ";
}
print "</td></tr>";
}
print "</tbody></table></td></tr>";
print "<tr><td colspan=4><big><b>{$firmanavn}</b></big></td></tr>";
print "<tr><td colspan=6><hr></td></tr>";
$dim = '';
if ($afd || $ansat_fra || $projekt_fra) {
if ($afd) {
$dim = "and afd = {$afd} ";
}
if ($ansat_fra) {
$dim = $dim . "and ansat = '{$ansat_fra}' ";
}
$projekt_fra = str2low($projekt_fra);
$projekt_til = str2low($projekt_til);
if ($projekt_fra && $projekt_til && $projekt_fra != $projekt_til) {
$dim = $dim . " and lower(projekt) >= '{$projekt_fra}' and lower(projekt) <= '{$projekt_til}' ";
} elseif ($projekt_fra) {
$tmp = str_replace("?", "_", $projekt_fra);
if (substr($tmp, -1) == '_') {
while (substr($tmp, -1) == '_') {
$tmp = substr($tmp, 0, strlen($tmp) - 1);
}
$tmp = str2low($tmp) . "%";
}
$dim = $dim . "and lower(projekt) LIKE '{$tmp}' ";
}
}
$row = db_fetch_array($query = db_select("select box1, box2 from grupper where art='MR'", __FILE__ . " linje " . __LINE__));
if ($row[box1] && $row[box2]) {
$konto_fra = $row['box1'];
$konto_til = $row['box2'];
$x = 0;
$query = db_select("select * from kontoplan where regnskabsaar='{$regnaar}' and kontonr>={$konto_fra} and kontonr<={$konto_til} order by kontonr", __FILE__ . " linje " . __LINE__);
while ($row = db_fetch_array($query)) {
$x++;
$kontonr[$x] = $row['kontonr'] * 1;
$kontobeskrivelse[$x] = $row['beskrivelse'];
$kontotype[$x] = $row['kontotype'];
$primo[$x] = $row['primo'];
$aarsum[$x] = 0;
}
$kontoantal = $x;
$kto_aar[$x] = 0;
$kto_periode[$x] = 0;
$ktonr = array();
$x = 0;
$query = db_select("select * from transaktioner where transdate>='{$regnstart}' and transdate<='{$regnslut}' and kontonr>='{$konto_fra}' and kontonr<='{$konto_til}' {$dim} order by kontonr", __FILE__ . " linje " . __LINE__);
while ($row = db_fetch_array($query)) {
if (!in_array($row['kontonr'], $ktonr)) {
# Her fanges konto med bevaegelser i perioden.
$x++;
$ktonr[$x] = $row['kontonr'] * 1;
$kto_aar[$x] = 0;
if ($medtag_primo && !$afd && ($r2 = db_fetch_array(db_select("select primo from kontoplan where regnskabsaar='{$regnaar}' and kontonr={$ktonr[$x]} and kontotype='S'", __FILE__ . " linje " . __LINE__)))) {
$kto_aar[$x] = afrund($r2['primo'], 2);
}
}
$kto_aar[$x] = $kto_aar[$x] + afrund($row['debet'], 2) - afrund($row['kredit'], 2);
}
$kto_antal = $x;
if ($medtag_primo && !$afd) {
for ($x = 1; $x <= $kontoantal; $x++) {
# Her fanges konto med primovaerdi og ingen bevaegelser i perioden.
if (!in_array($kontonr[$x], $ktonr)) {
if ($primo[$x]) {
$kto_antal++;
$ktonr[$kto_antal] = $kontonr[$x];
$kto_aar[$kto_antal] = $primo[$x];
}
}
}
}
for ($x = 1; $x <= $kontoantal; $x++) {
for ($y = 1; $y <= $kto_antal; $y++) {
if ($kontotype[$x] == 'D' || $kontotype[$x] == 'S') {
if ($kontonr[$x] == $ktonr[$y]) {
$aarsum[$x] = $aarsum[$x] + $kto_aar[$y];
}
} elseif ($kontotype[$x] == 'Z') {
if ($fra_kto[$x] <= $ktonr[$y] && $kontonr[$x] >= $ktonr[$y] && $kontonr[$x] != $ktonr[$y]) {
$aarsum[$x] = $aarsum[$x] + $kto_aar[$y];
}
}
}
}
for ($x = 1; $x <= $kontoantal; $x++) {
if ($kontonr[$x] >= $konto_fra && $kontonr[$x] <= $konto_til) {
print "<tr>";
$aarsum[$x] = afrund($aarsum[$x], 0);
print "<td>{$kontonr[$x]} </td>";
$tmp = kontobemaerkning($kontobeskrivelse[$x]);
print "<td {$tmp} colspan=3>{$kontobeskrivelse[$x]} </td>";
$row = db_fetch_array($query = db_select("select art from grupper where box1='{$kontonr[$x]}' and art<>'MR'", __FILE__ . " linje " . __LINE__));
if ($row[art] == 'SM' || $row[art] == 'YM' || $row[art] == 'EM') {
print "<td> </td>";
$tmp = dkdecimal($aarsum[$x] * -1);
} else {
$tmp = dkdecimal($aarsum[$x]);
}
print "<td align=right>{$tmp} </td>";
print "</tr>\n";
$afgiftssum = $afgiftssum + $aarsum[$x];
}
}
$tmp = dkdecimal($afgiftssum * -1);
print "<tr><td colspan=6><hr></td></tr>";
print "<tr><td></td><td> Afgiftsbeløb i alt </td><td colspan=4 align=right>{$tmp} </td></tr>";
print "<tr><td colspan=6><hr></td></tr>";
# Kommentering fjernes, naar Rubrik-konti er klar
# # Tilfoejer de fem Rubrik-konti: A1, A2, B1, B2 og C
# $row = db_fetch_array($query = db_select("select box3, box4, box5, box6, box7 from grupper where art='MR'",__FILE__ . " linje " . __LINE__));
#
# momsrubrik($row[box3], "Rubrik A. Værdien uden moms af varekøb i andre EU-lande (EU-erhvervelser)", $regnaar, $regnstart, $regnslut);
# momsrubrik($row[box4], "Rubrik A. Værdien uden moms af ydelseskøb i andre EU-lande", $regnaar, $regnstart, $regnslut);
# momsrubrik($row[box5], "Rubrik B. Værdien af varesalg uden moms til andre EU-lande (EU-leverancer)", $regnaar, $regnstart, $regnslut);
# momsrubrik($row[box6], "Rubrik B. Værdien af visse ydelsessalg uden moms til andre EU-lande", $regnaar, $regnstart, $regnslut);
# momsrubrik($row[box7], "Rubrik C. Værdien af andre varer og ydelser, der leveres uden afgift", $regnaar, $regnstart, $regnslut);
$x = 0;
print "<tr><td colspan=6><hr></td></tr>";
print "</tbody></table>";
} else {
print "<BODY onLoad=\"javascript:alert('Rapportspecifikation ikke defineret (Indstillinger -> Moms)')\">";
print "<meta http-equiv=\"refresh\" content=\"0;URL=rapport.php?rapportart=kontokort®naar={$regnaar}&dato_fra={$startdato}&maaned_fra={$mf}&dato_til={$slutdato}&maaned_til={$mt}&konto_fra={$konto_fra}&konto_til={$konto_til}&ansat_fra={$ansat_fra}&afd={$afd}&projekt_fra={$projekt_fra}&projekt_til={$projekt_til}&simulering={$simulering}&lagerbev={$lagerbev}\">";
}
}
// En dansk oversaettelse af licensen kan laeses her:
// http://www.saldi.dk/dok/GNU_GPL_v2.html
//
// Copyright (c) 2004-2015 DANOSOFT ApS
// ----------------------------------------------------------------------
// 2015.02.18 Tilføjet funktion lagerbev.
@session_start();
$s_id = session_id();
$title = "Kontospecifikation";
$css = "../css/standard.css";
include "../includes/connect.php";
include "../includes/online.php";
include "../includes/std_func.php";
$kontonr = if_isset($_GET['kontonr']);
$month = if_isset($_GET['month']);
$bilag = if_isset($_GET['bilag']);
#if(!$month){$month=13;}
$query = db_select("select * from grupper where art='RA' and kodenr='{$regnaar}'");
if ($row = db_fetch_array($query)) {
$startaar = $row['box2'];
$month = trim($month);
if (!$month) {
$start = $startaar . '-' . $row['box1'] . '-01';
$slutdato = 31;
$month = $row['box3'] * 1;
$year = $row['box4'] * 1;
} else {
$month = $month - 1 + $row['box1'];
$year = $row['box2'];
while ($month > 12) {
$year++;
function submit()
{
global $wpdb, $wpsc_cart, $wpsc_gateways;
#echo '<pre>'; print_r($this->cart_data); echo '</pre>'; die('fim');
// Instantiate a new payment request
$paymentRequest = new PaymentRequest();
// Sets the currency
$paymentRequest->setCurrency("BRL");
$pagseguro_freight = $wpsc_cart->selected_shipping_method == $wpsc_gateways['wpsc_merchant_pagseguro']['name'];
$freight = 0;
if ($pagseguro_freight) {
$freight = sprintf('%01.2f', $this->cart_data['cart_tax'] + $this->cart_data['base_shipping']);
}
foreach ($wpsc_cart->cart_items as $item) {
$paymentRequest->addItem($item->product_id, $item->product_name, $item->quantity, $item->unit_price, intval(round($item->weight * 453.59237)), $freight);
}
// Sets a reference code for this payment request, it's useful to identify this payment in future notifications.
$paymentRequest->setReference($this->cart_data['session_id']);
$collected_data = array();
$checkout_form_sql = "SELECT id, unique_name FROM `" . WPSC_TABLE_CHECKOUT_FORMS . "`";
$checkout_form = $wpdb->get_results($checkout_form_sql, ARRAY_A);
// Pega a referência dos campos de formulário definido pelo usuário
foreach ($checkout_form as $item) {
$collected_data[$item['unique_name']] = $item['id'];
}
// Pega os dados do post
$_client = $_POST["collected_data"];
list($prefix, $phone) = splitPhone($_client[if_isset($collected_data['billingphone'])]);
$street = explode(',', $_client[if_isset($collected_data['billingaddress'])]);
$street = array_slice(array_merge($street, array("", "", "", "")), 0, 4);
list($address, $number, $complement, $neighborhood) = $street;
// Sets your customer information.
$paymentRequest->setSender($_client[if_isset($collected_data['billingfirstname'])] . ' ' . $_client[if_isset($collected_data['billinglastname'])], $_client[if_isset($collected_data['billingemail'])], $prefix, $phone);
# $shipping = get_option('pagseguro_shipping_configs');
// Get the freight data
if ($pagseguro_freight) {
$freight_type = strtoupper($wpsc_cart->selected_shipping_option);
$FREIGHT_CODE = 0;
if ($freight_type == 'PAC') {
$FREIGHT_CODE = ShippingType::getCodeByType('PAC');
} elseif ($freight_type == 'SEDEX') {
$FREIGHT_CODE = ShippingType::getCodeByType('SEDEX');
}
if ($FREIGHT_CODE > 0) {
$paymentRequest->setShippingType($FREIGHT_CODE);
$paymentRequest->setShippingAddress($_client[if_isset($collected_data['shippingpostcode'])], $address, $number, $complement, $neighborhood, $_client[if_isset(utf8_decode($collected_data['shippingcity']))], $_client[if_isset(utf8_decode($collected_data['shippingstate']))], $wpsc_gateways['wpsc_merchant_pagseguro']['supported_iso_codes'][$_client[if_isset($collected_data['shippingcountry'])]]);
}
}
$extra = 0;
if ($this->cart_data['has_discounts']) {
$extra = $this->cart_data['cart_discount_value'] * -1;
}
$paymentRequest->setExtraAmount($extra);
#$paymentRequest->setRedirectUrl($this->cart_data['transaction_results_url']);
$paymentRequest->setRedirectUrl('http://homologacao.visie.com.br/bibliotecas/pagseguro/opencart1505/notification.php');
// Pegando as configurações definidas no admin do módulo
$email = get_option('pagseguro_email');
$token = get_option("pagseguro_token");
/**
* Você pode utilizar o método getData para capturar as credenciais
* do usuário (email e token)
* $email = PagSeguroConfig::getData('credentials', 'email');
* $token = PagSeguroConfig::getData('credentials', 'token');
*/
try {
/**
* #### Crendenciais #####
* Se desejar, utilize as credenciais pré-definidas no arquivo de configurações
* $credentials = PagSeguroConfig::getAccountCredentials();
*/
$credentials = new AccountCredentials($email, $token);
if ($geteway_url = $paymentRequest->register($credentials)) {
$_SESSION["pagseguro_id"] = $sessionid;
$wpsc_cart->empty_cart();
wp_redirect($geteway_url);
exit;
}
} catch (PagSeguroServiceException $e) {
die($e->getMessage());
}
}
