PageRenderTime 48ms CodeModel.GetById 17ms RepoModel.GetById 1ms app.codeStats 0ms

/finans/kontrolspor.php

https://github.com/nielsrune/saldi
PHP | 311 lines | 270 code | 17 blank | 24 comment | 21 complexity | af2d8433e16002f4b17ed565333727ba MD5 | raw file
Possible License(s): LGPL-2.1 
    

  1. <?php
    2. 

  2. // ----------finans/kontrolspor.php-------------lap 3.2.5-----2011-11-27-----
    3. 

  3. // LICENS
    4. 

  4. //
    5. 

  5. // Dette program er fri software. Du kan gendistribuere det og / eller
    6. 

  6. // modificere det under betingelserne i GNU General Public License (GPL)
    7. 

  7. // som er udgivet af The Free Software Foundation; enten i version 2
    8. 

  8. // af denne licens eller en senere version efter eget valg
    9. 

  9. // Fra og med version 3.2.2 dog under iagttagelse af følgende:
    10. 

  10. // 
    11. 

  11. // Programmet må ikke uden forudgående skriftlig aftale anvendes
    12. 

  12. // i konkurrence med DANOSOFT ApS eller anden rettighedshaver til programmet.
    13. 

  13. //
    14. 

  14. // Dette program er udgivet med haab om at det vil vaere til gavn,
    15. 

  15. // men UDEN NOGEN FORM FOR REKLAMATIONSRET ELLER GARANTI. Se
    16. 

  16. // GNU General Public Licensen for flere detaljer.
    17. 

  17. //
    18. 

  18. // En dansk oversaettelse af licensen kan laeses her:
    19. 

  19. // http://www.fundanemt.com/gpl_da.html
    20. 

  20. //
    21. 

  21. // Copyright (c) 2003-2011 DANOSOFT ApS
    22. 

  22. // ----------------------------------------------------------------------
    23. 

  23. ob_start();
    24. 

  24. @session_start();
    25. 

  25. $s_id=session_id();
    26. 

  26. $title="Kontrolspor";
    27. 

  27. $modulnr=4;
    28. 

  28. $css="../css/standard.css";
    29. 

  29. 

  30. print "<script LANGUAGE=\"JavaScript\" SRC=\"../javascript/overlib.js\"></script>";
    31. 

  31. 

  32. include("../includes/connect.php");
    33. 

  33. include("../includes/online.php");
    34. 

  34. include("../includes/std_func.php");
    35. 

  35. include("../includes/udvaelg.php");
    36. 

  36. 

  37. $id = $_GET['id'];
    38. 

  38. $kontonr = $_GET['kontonr'];
    39. 

  39. $bilag = $_GET['bilag'];
    40. 

  40. $transdate = $_GET['transdate'];
    41. 

  41. $logdate = $_GET['logdate'];
    42. 

  42. $logtime = $_GET['logtime'];
    43. 

  43. $debet = $_GET['debet'];
    44. 

  44. $kredit = $_GET['kredit'];
    45. 

  45. $kladde_id = $_GET['kladde_id'];
    46. 

  46. $projekt_id=$_GET['projekt_id'];
    47. 

  47. $afd=$_GET['afd'];
    48. 

  48. $beskrivelse=$_GET['beskrivelse'];
    49. 

  49. $faktura=$_GET['faktura'];
    50. 

  50. $sort = $_GET['sort'];
    51. 

  51. $nysort = $_GET['nysort'];
    52. 

  52. $idnumre = $_GET['idnumre'];
    53. 

  53. $kontonumre = $_GET['kontonumre'];
    54. 

  54. $fakturanumre = $_GET['fakturanumre'];
    55. 

  55. $bilagsnumre = $_GET['bilagsnumre'];
    56. 

  56. $debetbelob = $_GET['debetbelob'];
    57. 

  57. $kreditbelob = $_GET['kreditbelob'];
    58. 

  58. $transdatoer = $_GET['transdatoer'];
    59. 

  59. $logdatoer = $_GET['logdatoer'];
    60. 

  60. $logtid = $_GET['logtid'];
    61. 

  61. $kladdenumre = $_GET['kladdenumre'];
    62. 

  62. $projektnumre = $_GET['projektnumre'];
    63. 

  63. $beskrivelse = $_GET['beskrivelse'];
    64. 

  64. $start = $_GET['start'];
    65. 

  65. $csv =  if_isset($_GET['csv']);
    66. 

  66. 

  67. if ($submit=$_POST['submit']){
    68. 

  68. 	$linjeantal = trim($_POST['linjeantal']);
    69. 

  69. 	$idnumre = trim($_POST['idnumre']);
    70. 

  70. 	$kontonumre = trim($_POST['kontonumre']);
    71. 

  71. 	$fakturanumre = trim($_POST['fakturanumre']);
    72. 

  72. 	$bilagsnumre = trim($_POST['bilagsnumre']);
    73. 

  73. 	$debetbelob = trim($_POST['debetbelob']);
    74. 

  74. 	$kreditbelob = trim($_POST['kreditbelob']);
    75. 

  75. 	$transdatoer = trim($_POST['transdatoer']);
    76. 

  76. 	$logdatoer = trim($_POST['logdatoer']);
    77. 

  77. 	$logtid = trim($_POST['logtid']);
    78. 

  78. 	$kladdenumre = trim($_POST['kladdenumre']);
    79. 

  79. 	$projektnumre = trim($_POST['projektnumre']);
    80. 

  80. 	$beskrivelse = trim($_POST['beskrivelse']);
    81. 

  81. 	$sort = $_POST['sort'];
    82. 

  82. 	$nysort = $_POST['nysort'];
    83. 

  83. 

  84. 	$cookievalue="$idnumre;$kontonumre;$fakturanumre;$bilagsnumre;$debetbelob;$kreditbelob;$transdatoer;$logdatoer;$logtid;$kladdenumre;$projeknumre;$beskrivelse;$linjeantal";
    85. 

  85. 	setcookie("saldi_kontrolspor", $cookievalue);
    86. 

  86. } else {
    87. 

  87. 	list ($idnumre, $kontonumre, $fakturanumre, $bilagsnumre, $debetbelob, $kreditbelob, $transdatoer, $logdatoer, $logtid, $kladdenumre, $projeknumre, $beskrivelse, $linjeantal) = explode(";", $_COOKIE['saldi_kontrolspor']);
    88. 

  88. 	$beskrivelse=str_replace("semikolon",";",$beskrivelse);
    89. 

  89. }
    90. 

  90. ob_end_flush();  //Sender det "bufferede" output afsted...
    91. 

  91. 

  92. if (!$idnumre&&!$kontonumre&&!$fakturanumre&&!$bilagsnumre&&!$debetbelob&&!$kreditbelob&&!$transdatoer&&!$logdatoer&&!$logtid&&!$kladdenumre&&!$projeknumre&&!$beskrivelse) {
    93. 

  93. 	$r=db_fetch_array(db_select("select * from grupper where art = 'RA' and kodenr='$regnaar'",__FILE__ . " linje " . __LINE__));
    94. 

  94. 	$transdatoer="01".$r['box1'].substr($r['box2'],-2).":31".$r['box3'].substr($r['box4'],-2);
    95. 

  95. }
    96. 

  96. 

  97. $r=db_fetch_array(db_select("select * from grupper where art = 'PRJ' and kodenr!='0'",__FILE__ . " linje " . __LINE__));
    98. 

  98. $vis_projekt=$r['id'];
    99. 

  99. 

  100. if ($logtid) {
    101. 

  101. 	list ($h,$m)=explode(":",$logtid);
    102. 

  102. 	$h=$h*1;
    103. 

  103. 	$m=$m*1;
    104. 

  104. 	if (strlen($h)>2) $h=substr($h,-2);
    105. 

  105. 	if (strlen($m)>2) $m=substr($m,-2);
    106. 

  106. 	$logtid="$h:$m";
    107. 

  107. }
    108. 

  108. 

  109. # $valg="idnumre=$idnumre&kontonumre=$kontonumre&fakturanumre=$fakturanumre&bilagsnumre$bilagsnumre&debetbelob=$debetbelob&kreditbelob=$kreditbelob&transdatoer=$transdatoer&logdatoer=$logdatoer&logtid=$logtid&kladdenumre=$kladdenumre&projeknumre=$projeknumre&$beskrivelse = $_GET['beskrivelse'];
    110. 

    111. 

  111. 

  112. $tidspkt=date("U");
    113. 

  113. 

  114. $modulnr=2;
    115. 

  115. 

  116. 

  117. if (!$sort) {$sort = "id desc";}
    118. 

  118. elseif ($nysort==$sort){$sort=$sort." desc";}
    119. 

  119. elseif ($nysort) {$sort=$nysort;}
    120. 

  120. 

  121. print "<table width=100% height=100% border=0 cellspacing=0 cellpadding=0><tbody>";
    122. 

  122. print "<tr><td height = 25 align=center valign=top>";
    123. 

  123. print "<table width=100% align=center border=0 cellspacing=2 cellpadding=0><tbody>";
    124. 

  124. print "<tr>";
    125. 

  125. print "<td width=10% $top_bund>";
    126. 

  126. 	if ($popup) print "<a href=../includes/luk.php accesskey=L>Luk</a></td>";
    127. 

  127. 	else print "<a href=rapport.php accesskey=L>Luk</a></td>";
    128. 

  128. print "<td width=80% $top_bund>Kontrolspor</td>";
    129. 

  129. print "<td width=10% $top_bund><a href=kontrolspor.php?sort=$sort&valg=$valg$hreftext&csv=1' title=\"".findtekst(505,$sprog_id)."\">CSV</a></td>";
    130. 

  130. print "</tr>\n";
    131. 

  131. print "<tr>";
    132. 

  132. 

  133. print "<form name=transaktionsliste action=kontrolspor.php method=post>";
    134. 

  134. if (!$linjeantal) $linjeantal=50;
    135. 

  135. # echo "A next $next start $start | linjeantal $linjeantal<br>"; 
    136. 

  136. $next=udskriv($idnumre, $bilagsnumre, $kladdenumre, $fakturanumre, $kontonumre, $transdatoer, $logdatoer, $debetbelob, $kreditbelob, $logtid, $beskrivelse, $sort, $start+50,'',$projektnumre);
    137. 

  137. # echo "B next $next start $start | linjeantal $linjeantal<br>"; 
    138. 

  138. if ($start>=$linjeantal) {
    139. 

  139. 	$tmp=$start-$linjeantal;
    140. 

  140. 	print "<td><a href='kontrolspor.php?sort=$sort&start=$tmp'><img src=../ikoner/left.png style=\"border: 0px solid; width: 15px; height: 15px;\"></a></td>";
    141. 

  141. } else print  "<td></td>";
    142. 

  142. print "<td align=center><span title= 'Angiv maksimale antal linjer, som skal vises pr. side'><input class=\"inputbox\" type=text style=\"text-align:right;width:30px\" name=\"linjeantal\" value=\"$linjeantal\"></td>";
    143. 

  143. $tmp=$start+$linjeantal;
    144. 

  144. if ($next>0) {
    145. 

  145. 	print "<td align=right><a href='kontrolspor.php?sort=$sort&start=$tmp'><img src=../ikoner/right.png style=\"border: 0px solid; width: 15px; height: 15px;\"></a></td>";
    146. 

  146. } else print  "<td></td>";
    147. 

  147. print "</tr>\n";
    148. 

  148. 

  149. print "</tbody></table>";
    150. 

  150. print " </td></tr><tr><td align=center valign=top>";
    151. 

  151. print "<table cellpadding=1 cellspacing=1 border=0 width=100% valign = top>";
    152. 

  152. 

  153. print "<tbody>";
    154. 

  154. print "<tr>";
    155. 

  155. print "<td align=center><b><a href='kontrolspor.php?nysort=id&sort=$sort&valg=$valg$hreftext'>Id</b></td>";
    156. 

  156. print "<td align=center><b><a href='kontrolspor.php?nysort=transdate&sort=$sort&valg=$valg$hreftext'>Dato</a></b></td>";
    157. 

  157. print "<td align=center><b><a href='kontrolspor.php?nysort=logdate&sort=$sort&valg=$valg$hreftext'>Log. dato</a></b></td>";
    158. 

  158. print "<td align=center><b>Tidspkt.</a></b></td>";
    159. 

  159. print "<td align=center><b><a href='kontrolspor.php?nysort=kladde_id&sort=$sort&valg=$valg$hreftext'>Kladde</a></b></td>";
    160. 

  160. print "<td align=center><b><a href='kontrolspor.php?nysort=bilag&sort=$sort&valg=$valg$hreftext'>Bilag</a></b></td>";
    161. 

  161. print "<td align=center><b><a href='kontrolspor.php?nysort=kontonr&sort=$sort&valg=$valg$hreftext'>Konto</b></td>";
    162. 

  162. print "<td align=center><b><a href='kontrolspor.php?nysort=faktura&sort=$sort&valg=$valg$hreftext'>Fakturanr</a></b></td>";
    163. 

  163. print "<td align=center><b><a href='kontrolspor.php?nysort=debet&sort=$sort&valg=$valg$hreftext'>Debet</a></b></td>";
    164. 

  164. print "<td align=center><b><a href='kontrolspor.php?nysort=kredit&sort=$sort&valg=$valg$hreftext'>Kredit</a></b></td>";
    165. 

  165. if($vis_projekt) print "<td align=center><b><a href='kontrolspor.php?nysort=projekt&sort=$sort&valg=$valg$hreftext'>Projekt</a></b></td>";
    166. 

  166. print "<td align=center><b><a href='kontrolspor.php?nysort=beskrivelse&sort=$sort&valg=$valg$hreftext'>S&oslash;getekst</a></b></td>";
    167. 

  167. print "</tr>\n";
    168. 

  168. 

  169. print "<form name=ordreliste action=kontrolspor.php method=post>";
    170. 

  170. print "<input type=hidden name=valg value=\"$valg\">";
    171. 

  171. print "<input type=hidden name=sort value=\"$sort\">";
    172. 

  172. #print "<input type=hidden name=nysort value=\"$nysort\">";
    173. 

  173. print "<input type=hidden name=kontoid value=\"$kontoid\">";
    174. 

  174. print "<input type=hidden name=start value=\"$start\">";
    175. 

  175. print "<tr>";
    176. 

  176. print "<td align=right><span title= 'Angiv et id-nummer eller angiv to adskilt af kolon (f.eks 345:350)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:50px\" name=\"idnumre\" value=\"$idnumre\"></td>";
    177. 

  177. print "<td align=right><span title= 'Angiv en dato eller angiv to adskilt af kolon (f.eks 010605:300605)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:80px\" name=\"transdatoer\" value=\"$transdatoer\"></td>";
    178. 

  178. print "<td align=right><span title= 'Angiv en dato eller angiv to adskilt af kolon (f.eks 010605:300605)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:80px\" name=\"logdatoer\" value=\"$logdatoer\"></td>";
    179. 

  179. print "<td align=right><span title= 'Angiv et tidspunkt  (f.eks 17:35)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:50px\" name=\"logtid\" value=\"$logtid\"></td>";
    180. 

  180. print "<td align=right><span title= 'Angiv et kassekladdenummer eller angiv to adskilt af kolon (f.eks 345:350)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:50px\" name=\"kladdenumre\" value=\"$kladdenumre\"></td>";
    181. 

  181. print "<td align=right><span title= 'Angiv et bilagsnummer eller angiv to adskilt af kolon (f.eks 345:350)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:50px\" name=\"bilagsnumre\" value=\"$bilagsnumre\"></td>";
    182. 

  182. print "<td align=right><span title= 'Angiv et kontonummer eller angiv to adskilt af kolon (f.eks 345:350)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:50px\" name=\"kontonumre\" value=\"$kontonumre\"></td>";
    183. 

  183. print "<td align=right><span title= 'Angiv et fakturanummer eller angiv to adskilt af kolon (f.eks 345:350)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:50px\" name=\"fakturanumre\" value=\"$fakturanumre\"></td>";
    184. 

  184. print "<td align=right><span title= 'Angiv et bel&oslash;b eller angiv to adskilt af kolon (f.eks 10000,00:14999,99)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:80px\" name=\"debetbelob\" value=\"$debetbelob\"></td>";
    185. 

  185. print "<td align=right><span title= 'Angiv et bel&oslash;b eller angiv to adskilt af kolon (f.eks 10000,00:14999,99)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:80px\" name=\"kreditbelob\" value=\"$kreditbelob\"></td>";
    186. 

  186. if ($vis_projekt) print "<td align=right><span title= 'Angiv et projektnummer eller angiv to adskilt af kolon (f.eks 5:7)'><input class=\"inputbox\" type=\"text\" style=\"text-align:right;width:200px\" name=\"projektnumre\" value=\"$projektnumre\"></td>";
    187. 

  187. print "<td><span title= 'Angiv en s&oslash;getekst. Der kan anvendes * f&oslash;r og efter teksten'><input class=\"inputbox\" type=\"text\"  style=\"text-align:left;width:200px\" size=35 name=beskrivelse value=\"$beskrivelse\"></td>";
    188. 

  188. print "<td><input type=submit value=\"OK\" name=\"submit\"></td>";
    189. 

  189. print "</form></tr>\n";
    190. 

  190. udskriv($idnumre,$bilagsnumre,$kladdenumre,$fakturanumre,$kontonumre,$transdatoer,$logdatoer,$debetbelob,$kreditbelob,$logtid,$beskrivelse,$sort,$start,'skriv',$projektnumre);
    191. 

  191. ####################################################################################
    192. 

  192. function udskriv($idnumre, $bilagsnumre, $kladdenumre, $fakturanumre,$kontonumre,$transdatoer,$logdatoer,$debetbelob,$kreditbelob,$logtid,$beskrivelse,$sort,$start,$skriv,$projektnumre) {
    193. 

  193. 

  194. 	global $bgcolor;
    195. 

  195. 	global $bgcolor5;
    196. 

  196. 	global $linjeantal;
    197. 

  197. 	global $regnaar;
    198. 

  198. 	global $vis_projekt;
    199. 

  199. 	global $rettigheder;
    200. 

  200. 	global $csv;
    201. 

  201. 

  202. 	if ($sort=='id') $sort='transaktioner.id';
    203. 

  203. 	$ret_projekt=substr($rettigheder,1,1);
    204. 

  204. 

  205. 	if ($csv) {
    206. 

  206. 		$fp=fopen("../temp/$db/kontrolspor.csv","w");
    207. 

  207. 		fwrite($fp,"Id".chr(9)."Dato".chr(9)."Logdato".chr(9)."Logtid".chr(9)."Kladde id".chr(9)."Bilag".chr(9)."Kontonr".chr(9)."Kontonavn".chr(9)."Faktura".chr(9)."Debet".chr(9)."Kredit".chr(9)."Projekt".chr(9)."Beskrivelse\n");
    208. 

  208. 	}
    209. 

  209. 	$udvaelg='';
    210. 

  210. 	if ($idnumre)		$udvaelg=$udvaelg.udvaelg($idnumre, 'transaktioner.id', 'NR');
    211. 

  211. 	if ($bilagsnumre)	$udvaelg=$udvaelg.udvaelg($bilagsnumre, 'transaktioner.bilag', 'NR');
    212. 

  212. 	if ($kladdenumre)	$udvaelg=$udvaelg.udvaelg($kladdenumre, 'transaktioner.kladde_id', 'NR');
    213. 

  213. 	if ($fakturanumre)	$udvaelg=$udvaelg.udvaelg($fakturanumre, 'transaktioner.faktura', 'TEXT');
    214. 

  214. 	if ($kontonumre)	$udvaelg=$udvaelg.udvaelg($kontonumre, 'transaktioner.kontonr', 'NR');
    215. 

  215. 	if ($transdatoer)	$udvaelg=$udvaelg.udvaelg($transdatoer, 'transaktioner.transdate', 'DATO');
    216. 

  216. 	if ($logdatoer)		$udvaelg=$udvaelg.udvaelg($logdatoer, 'transaktioner.logdate', 'DATO');
    217. 

  217. 	if ($debetbelob) 	$udvaelg=$udvaelg.udvaelg($debetbelob, 'transaktioner.debet', 'BELOB');
    218. 

  218. 	if ($kreditbelob) 	$udvaelg=$udvaelg.udvaelg($kreditbelob, 'transaktioner.kredit', 'BELOB');
    219. 

  219. 	if ($projektnumre) 	$udvaelg=$udvaelg.udvaelg($projektnumre, 'transaktioner.projekt', '');
    220. 

  220. 	if ($logtid) 		$udvaelg=$udvaelg.udvaelg($logtid, 'transaktioner.logtime', 'TID');
    221. 

  221. 

  222. 	$udvaelg=trim($udvaelg);
    223. 

  223. 	if (substr($udvaelg,0,3)=='and') $udvaelg="where".substr($udvaelg, 3);
    224. 

  224. 	if ($sort=="logdate") $sort = $sort.", logtime";
    225. 

  225. 	$beskrivelse=trim(strtolower($beskrivelse));
    226. 

  226. 	if (substr($beskrivelse,0,1)=='*'){
    227. 

  227. 		$beskrivelse=substr($beskrivelse,1);
    228. 

  228. 		$startstjerne=1;
    229. 

  229. 	}
    230. 

  230. 	if (substr($beskrivelse,-1,1)=='*') {
    231. 

  231. 		$beskrivelse=substr($beskrivelse,0,strlen($beskrivelse)-1);
    232. 

  232. 		$slutstjerne=1;
    233. 

  233. 	}
    234. 

  234. 	$b_strlen=strlen($beskrivelse);
    235. 

  235. 	if (!$udvaelg) $udvaelg="where";
    236. 

  236. 	else $udvaelg=$udvaelg." and";
    237. 

  237. 

  238. 	$x=0;
    239. 

  239. # echo "select transaktioner.*, kontoplan.beskrivelse as kontonavn from transaktioner, kontoplan $udvaelg kontoplan.regnskabsaar='$regnaar' and kontoplan.kontonr = transaktioner.kontonr order by $sort<br>";
    240. 

  240. 	$query = db_select("select transaktioner.*, kontoplan.beskrivelse as kontonavn from transaktioner, kontoplan $udvaelg kontoplan.regnskabsaar='$regnaar' and kontoplan.kontonr = transaktioner.kontonr order by $sort",__FILE__ . " linje " . __LINE__);
    241. 

  241. 	while ($row =db_fetch_array($query)) {
    242. 

  242. 		if (($beskrivelse)&&($row['beskrivelse'])){
    243. 

  243. 			$udskriv=0;
    244. 

  244. 			if ($startstjerne){
    245. 

  245. 				if ($slutstjerne) {
    246. 

  246. 					if (strpos(strtolower($row['beskrivelse']), $beskrivelse)) $udskriv=1;
    247. 

  247. 				} elseif (substr(strtolower($row['beskrivelse']),-$b_strlen,$b_strlen)==$beskrivelse) $udskriv=1;
    248. 

  248. 			} elseif ($slutstjerne) {
    249. 

  249. 				if (substr(strtolower($row['beskrivelse']),0,$b_strlen)==$beskrivelse) $udskriv=1;
    250. 

  250. 			} elseif (strtolower($row['beskrivelse']) == $beskrivelse) $udskriv=1;
    251. 

  251. 		} else $udskriv=1;
    252. 

  252. 		if ($udskriv) $x++;
    253. 

  253. # echo "(($x>=$start)&&($x<$start+$linjeantal) && ($udskriv))<br>";
    254. 

  254. 		if ((($x>=$start)&&($x<$start+$linjeantal) && ($udskriv)) || $csv){
    255. 

  255. 				$y++;
    256. 

  256. 			if ($csv || $skriv) {
    257. 

  257. # echo "Y1 $y<br>";
    258. 

  258. 				$transdato=dkdato($row['transdate']);
    259. 

  259. 				$logdato=dkdato($row['logdate']);
    260. 

  260. 				$debetsum=afrund($debetsum+$row['debet'],2);
    261. 

  261. 				$kreditsum=afrund($kreditsum+$row['kredit'],2);
    262. 

  262. 				if ($skriv && !$csv) {
    263. 

  263. 					if ($linjebg!=$bgcolor) {$linjebg=$bgcolor; $color='#000000';}
    264. 

  264. 					else {$linjebg=$bgcolor5; $color='#000000';}
    265. 

  265. 					print "<tr bgcolor=\"$linjebg\">";
    266. 

  266. 					print "<td align=right> $row[id]</span><br></td>";
    267. 

  267. 					print "<td align=right> $transdato<br></td>";
    268. 

  268. 					print "<td align=right> $logdato<br></td>";
    269. 

  269. 					print "<td align=right>". substr($row['logtime'],0,5)."<br></td>";
    270. 

  270. 					print "<td align=right> $row[kladde_id]<br></td>";
    271. 

  271. 					print "<td align=right> $row[bilag]<br></td>";
    272. 

  272. 					print "<td align=right><span title='$row[kontonavn]'>$row[kontonr]<br></span></td>";
    273. 

  273. 					print "<td align=right> $row[faktura]<br></td>";
    274. 

  274. 					if ($row[debet]) print "<td align=right> ".dkdecimal($row['debet'])."<br></td>";
    275. 

  275. 					else print "<td>&nbsp;</td>";
    276. 

  276. 					if ($row[kredit]) print "<td align=right> ".dkdecimal($row['kredit'])."<br></td>";
    277. 

  277. 					else print "<td>&nbsp;</td>";
    278. 

  278. 					if ($vis_projekt) {
    279. 

  279. 						($row['projekt'] && $ret_projekt)?$title="Projektnummeret kan rettes ved at klikke her":$title=NULL;
    280. 

  280. 						($ret_projekt)?$tmp="<a href=\"../includes/ret_transaktion.php?id=$row[id]&felt=projekt\">$row[projekt]</a>":$tmp=$row['projekt'];
    281. 

  281. 						print "<td align=right title=\"$title\">$tmp<br></td>";
    282. 

  282. 					}
    283. 

  283. 					print "<td> &nbsp; $row[beskrivelse]<br></td>";
    284. 

  284. 					print "</tr>\n";
    285. 

  285. 				}
    286. 

  286. 				if ($csv) {
    287. 

  287. 					fwrite($fp,$row['id'].chr(9).$transdato.chr(9).$logdato.chr(9).substr($row['logtime'],0,5).chr(9).$row['kladde_id'].chr(9).$row['bilag'].chr(9).$row['kontonr'].chr(9).utf8_decode(stripslashes($row['kontonavn'])).chr(9).$row['faktura'].chr(9).dkdecimal($row['debet']).chr(9).dkdecimal($row['kredit']).chr(9).$row['projekt'].chr(9).utf8_decode(stripslashes($row['beskrivelse']))."\n");
    288. 

  288. 				}
    289. 

  289. 			}
    290. 

  290. 		}
    291. 

  291. 	}
    292. 

  292. 	if ($csv){ fclose($fp);
    293. 

  293. 		print "<BODY onLoad=\"JavaScript:window.open('../temp/$db/kontrolspor.csv' ,'' ,'$jsvars');\">\n";
    294. 

  294. 	}
    295. 

  295. 	if (!$csv && ($debetsum || $kreditsum)) {
    296. 

  296. 		($vis_projekt)?$colspan=12:$colspan=11;
    297. 

  297. 		print "<tr><td colspan=\"$colspan\"><hr></td></tr>";
    298. 

  298. 		print "<td colspan=8>Kontrolsum<br></td><td align=right>".dkdecimal($debetsum)."<br></td><td align=right>".dkdecimal($kreditsum)."<br></td><td><br></td></tr>";
    299. 

  299. 	}
    300. 

  300. #	print "<tr><td colspan=11><hr></td></tr>";
    301. 

  301. # echo "Y2 $y<br>";
    302. 

  302. 

  303. 	return ($y);
    304. 

  304. } #endfunction udskriv()
    305. 

  305. ?>
    306. 

  306. </tbody>
    307. 

  307. </table>
    308. 

  308. 	</td></tr>
    309. 

  309. </tbody></table>
    310. 

  310. 

  311. </body></html>
    312. 

  312.