supprimer_session();
break;
case 'gerer_candidature':
gerer_candidature();
break;
case 'modifier_candidature':
modifier_candidature();
break;
case 'modifier_motif':
modifier_motif();
break;
case 'lister_session':
lister_session();
break;
case 'importer':
importer();
break;
case 'exporter':
exporter();
break;
case 'imprimer':
imprimer();
break;
case 'rechercher_session':
rechercher();
break;
case 'visualiser_session':
visualiser_session();
break;
case 'session_rapide':
session_rapide();
if (move_uploaded_file($_FILES['uploadedfile']['tmp_name'], $filnavn)) {
importer($filnavn, 0, 0);
} else {
echo "Der er sket en fejl under hentningen, prøv venligst igen";
}
} elseif ($filnavn = $_POST['filnavn']) {
$opret_lev = if_isset($_POST['opret_lev']);
$opret_vare = if_isset($_POST['opret_vare']);
$opret_varenr = if_isset($_POST['opret_varenr']);
$gl_varenr = if_isset($_POST['gl_varenr']);
$salgspris = if_isset($_POST['salgspris']);
importer($filnavn, $opret_lev, $opret_vare);
}
} elseif ($_POST['indsaet']) {
$filnavn = if_isset($_POST['filnavn']);
importer($filnavn, $opret_lev, $opret_vare);
} elseif (isset($_POST['pulje'])) {
$puljefil = if_isset($_GET['puljefil']);
gennemse($kilde_id, $kilde, $bilag_id, $bilag, $fokus, $filnavn, $puljefil);
} elseif (isset($_POST['pulje']) || $funktion == 'gennemse') {
$puljefil = if_isset($_GET['puljefil']);
gennemse($kilde_id, $kilde, $bilag_id, $bilag, $fokus, $filnavn, $puljefil);
} else {
upload($filnavn);
}
print "</tbody></table>";
#####################################################################################################
function upload($filnavn)
{
print "<tr><td width=100% align=center><table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\"><tbody>";
/*
$title = "OIOUBL import";
include "../includes/connect.php";
include "../includes/online.php";
include "../includes/std_func.php";
print "<div align=\"center\">";
$dir = '../ublfiler/ind/';
$filer = scandir($dir);
$fejllog = $dir . "fejl.log";
if (file_exists("{$fejllog}")) {
unlink("{$fejllog}");
}
for ($x = 0; $x < count($filer); $x++) {
if (substr($filer[$x], -3) == 'xml') {
echo "importerer {$filer[$x]}<br>";
$filnavn = "../ublfiler/ind/" . $filer[$x];
$svar = importer($filnavn, $fejllog);
echo "Svar {$svar}<br>";
if ($svar == 'OK') {
$flyt_til = "../ublfiler/ok/" . $filer[$x];
rename($filnavn, $flyt_til);
} else {
echo "Import af {$filer[$x]} fejlet<br>{$fejl}<br>";
}
}
}
if (file_exists("{$fejllog}")) {
echo "<a href=\"{$fejllog}\" target=\"blank\">Se fejllog</a><br>";
}
function importer($filnavn, $fejllog)
{
global $charset;
#tabel 1 ->
print "<tr><td width=\"100%\"><table name=\"tabel_1.1\" width=\"100%\" cellspacing=\"2\" border=\"0\"><tbody>\n";
# tabel 1.1 ->
print "<td width=10% {$top_bund}><a href={$returside} accesskey=L>Luk</a></td>\n";
print "<td width=80% {$top_bund}>{$title}</td>\n";
print "<td width=10% {$top_bund}>";
$importer ? print "<a href=optalling.php>Afbryd</a>" : (print "<a href=optalling.php?importer=1>Importer</a>");
print "</a><br></td>\n";
print "</tbody></table name=\"tabel_1.1\"></td></tr>\n";
# <- tabel 1.1
if ($vis_ej_exist) {
$vis_ej_exist = "<a href=\"../temp/{$db}/optael_ej_exist.txt\" target=\"blank\">Ikke oprettede varer</a>";
}
print "<tr><td>{$vis_ej_exist}<br></td></tr>\n";
if ($importer) {
importer($lager);
exit;
}
#if(!db_fetch_array(db_select("select id from regulering where vare_id='$vare_id' and optalt='$optalt' and beholdning='$beholdning' and tidspkt='$tidspkt'",__FILE__ . " linje " . __LINE__))) {
#cho "($vare_id && ($optalt || $optalt=='0'))<br>";
if ($vare_id && ($optalt || $optalt == '0')) {
# if ($optalt) { # remmet 20120913 saa det er muligt at optaelle til 0.
$optalt = usdecimal($optalt);
$beholdning *= 1;
$lager *= 1;
#cho "select id from regulering where vare_id='$vare_id' and optalt='$optalt' and beholdning='$beholdning' and tidspkt='$tidspkt'<br>";
$qtxt = "select id from regulering where vare_id='{$vare_id}' and optalt='{$optalt}' and lager= '{$lager}' and beholdning='{$beholdning}' and tidspkt='{$tidspkt}' and bogfort='0'";
if (!db_fetch_array(db_select($qtxt, __FILE__ . " linje " . __LINE__))) {
$qtxt = "insert into regulering (vare_id,optalt,beholdning,bogfort,tidspkt,variant_id,lager)";
$qtxt .= " values ";
$qtxt .= "('{$vare_id}','{$optalt}','{$beholdning}','0','{$tidspkt}','0',{$lager})";
