function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_showHideLayers() { //v3.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; }
    obj.visibility=v; }
}

function lmgo(seite) {
  var f=document.edekaform;
  f.seite.value=seite;
  if (f.DatumVon) f.DatumVon.value=f.DatumVon.defaultValue;  // das ist nicht "Suchen"-Click, also Sucheingaben ignorieren!
  if (f.SchlagStempel) f.SchlagStempel.value=f.SchlagStempel.defaultValue;
  f.submit();
}

function lmlgo(seite) {//Leitstand
  var f=document.edekaform;
  f.seite.value=seite;  
  if(f.h_ismenu)f.h_ismenu.value=1;
  if(document.getElementById('F_Form')){
    if (typeof(onHideForm)=='function')
      onHideForm();
    Visible(1);
    PointToPoint('*',50);    
  }
  f.submit();
}

function tmgo(spalte) {
  var f=document.edekaform;
  var old = f.seite.value;
  f.seite.value = spalte + old.substr(old.indexOf('_'));
  f.submit();
}

function lmakt(level) {
  var x=document.getElementById('lm'+level+'x');
  if (x) {
    x.style.display='none';
    document.getElementById('lm'+level+'l').style.display='inline';
  }
}

function TestChargeNr(elem) {  // Testet ein Zahleneingabefeld, z.B.  TestChargeNr(document.edekaform.SchlagStempel)
  if (!elem || !elem.value) return false;
  if (RegExp('^[0-9]{6,10}$').test(elem.value)) {
    if (elem.value.length==6 && elem.value>='080331') {
      var xx=SaveDate(2000+Number(elem.value.substr(0,2)), Number(elem.value.substr(2,2))-1, Number(elem.value.substr(4,2)));
      if (!isNaN(xx) && xx<=(new Date())) return true; // 6stellige LosNr
    }
    elem.value = '00000'.substr(0,10-elem.value.length)+elem.value;
    return true;
  }
  return false;
}

function init_LMenu() {
  if (typeof(internal_init_LMenu)=='function')
    internal_init_LMenu();
}

function TestDatumCharge(dat, chg) {  // TestDatumCharge(document.edekaform.DatumVon, document.edekaform.SchlagStempel)
  var dat_empty = !dat || !dat.value;
  var chg_empty = !chg || !chg.value;
  var jetzt = new Date();
  var datval = dat_empty ? jetzt : StrToDate(dat.value);
  if (isNaN(datval) || datval.getTime()>jetzt.getTime() || datval.getTime()<=jetzt.getTime()-15*24*60*60*1000) {
    if (dat.type!='hidden') {
      dat.focus();
      if (isNaN(datval)) alert('Ungültiges Datum. \nKorrigieren Sie bitte Ihre Eingaben.');
      else if (datval.getTime()>jetzt.getTime()) alert('Das Kaufdatum darf nicht größer als das aktuelle Datum sein. \nKorrigieren Sie bitte Ihre Eingaben.');
      else alert('Das Kaufdatum darf max. 14 Tage alt sein. \nKorrigieren Sie bitte Ihre Eingaben.');

    }
    return false;
  }
  if (!chg_empty && !TestChargeNr(chg)) {
    if (chg.type!='hidden') {
      chg.focus();
      alert('Ungültige Chargennummer (6 bis 10 Ziffern). \nKorrigieren Sie bitte Ihre Eingaben.');
    }
    return false;
  }
  if (dat_empty && chg_empty) {
    if (dat && dat.type!='hidden' && chg && chg.type!='hidden') 
      alert('Bitte Chargennummer oder Kaufdatum eintragen.');
    return false;
  }
  return true;
}

/*  Formulartest.js enthält:
function SaveDate(j,m,d) {
function StrToDate(s) {
function CommaToPoint (Nr) {
function TesteZahl(Z) { // Testet ein Zahleneingabefeld, z.B.  TestZahl(document.form.Zahl1)
function openWindow(pageToLoad, winName, center, popwidth, popheight) {
*/