} else {
$oioubl = NULL;
}
$y++;
transaktion('begin');
levering($ordreliste[$x], 'on', 'on');
$svar = bogfor($ordreliste[$x], 'on', 'on');
if ($svar == 'OK') {
if ($pbs) {
pbsfakt($ordreliste[$x]);
$y--;
#20130117
} elseif ($oioubl) {
$printfilnavn = "doktype-faktura_dokid-" . $ordreliste[$x] . ".xml";
$fp = fopen("../temp/{$db}/{$printfilnavn}", "w");
fwrite($fp, oioubldoc_faktura($ordreliste[$x], 'faktura', NULL));
fclose($fp);
#echo "'oioubl_dok.php?id=$ordreliste[$x]&doktype=$oioubl&genfakt=1' ,'' ,'$jsvars'<br>";
# print "<BODY onLoad=\"JavaScript:window.open('oioubl_dok.php?id=$ordreliste[$x]&doktype=$oioubl&genfakt=1' ,'' ,'$jsvars');\">\n";
$r = db_fetch_array(db_select("select box8 from grupper where art = 'DIV' and kodenr = '2'", __FILE__ . " linje " . __LINE__));
if ($r['box8']) {
list($oiourl, $oiobruger, $oiokode) = explode(chr(9), $r['box8']);
if ($oiourl && $oiobruger && $oiokode) {
$fp = fopen("../temp/{$db}/oioftpscript1.{$ordreliste[$x]}", "w");
if ($fp) {
fwrite($fp, "set confirm-close no\nput {$printfilnavn}\nbye\n");
}
fclose($fp);
$fp = fopen("../temp/{$db}/oioftplog.{$ordreliste[$x]}", "w");
fwrite($fp, "cd ../temp/{$db}\n\r{$exec_path}/ncftp ftp://{$oiobruger}:{$oiokode}@{$oiourl}\n\r");
fclose($fp);
$returside = "ordre.php?id={$id}";
}
$bg = "nix";
## TIL TEST - START
#$id = 2;
#$doktype = "faktura";
## TIL TEST - END
# Udskriv OIOUBL-faktura
$printfilnavn = "doktype-" . $doktype . "_dokid-" . $id . ".xml";
if (!file_exists("../temp/{$db}")) {
mkdir("../temp/{$db}", 0775);
}
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>";
$fp = fopen("../temp/{$db}/{$printfilnavn}", "w");
if (strtolower($doktype) == "faktura" || strtolower($doktype) == "kreditnota") {
fwrite($fp, oioubldoc_faktura($id, $doktype, $testdok));
}
fclose($fp);
// 2012.09.20 Integration med ebconnect.
$r = db_fetch_array(db_select("select box8 from grupper where art = 'DIV' and kodenr = '2'", __FILE__ . " linje " . __LINE__));
if ($r['box8']) {
list($oiourl, $oiobruger, $oiokode) = explode(chr(9), $r['box8']);
if ($oiourl && $oiobruger && $oiokode) {
$fp = fopen("../temp/{$db}/oioftpscript.{$bruger_id}", "w");
if ($fp) {
fwrite($fp, "set confirm-close no\nput {$printfilnavn}\nbye\n");
}
fclose($fp);
$fp = fopen("../temp/{$db}/oioftplog", "w");
fwrite($fp, "cd ../temp/{$db}\n\r{$exec_path}/ncftp ftp://{$oiobruger}:{$oiokode}@{$oiourl}\n\rrm {$printfilnavn}\n\r");
fclose($fp);
