var foto1;
var iTry=0;

function alertSize() {
  var myWidth = 0, myHeight = 0;
  if( typeof( window.innerWidth ) == 'number' ) {
    //Non-IE
    myWidth = window.innerWidth;
    myHeight = window.innerHeight;
  } else if( document.documentElement && ( document.documentElement.clientWidth || document.documentElement.clientHeight ) ) {
    //IE 6+ in 'standards compliant mode'
    myWidth = document.documentElement.clientWidth;
    myHeight = document.documentElement.clientHeight;
  } else if( document.body && ( document.body.clientWidth || document.body.clientHeight ) ) {
    //IE 4 compatible
    myWidth = document.body.clientWidth;
    myHeight = document.body.clientHeight;
  }
  window.alert( 'Width = ' + myWidth );
  window.alert( 'Height = ' + myHeight );
}

function getWindowHeight() {
  var myHeight = 0;
  if( typeof( window.innerWidth ) == 'number' ) {
    //Non-IE
    myHeight = window.innerHeight;
  } else if( document.documentElement && ( document.documentElement.clientWidth || document.documentElement.clientHeight ) ) {
    //IE 6+ in 'standards compliant mode'
    myHeight = document.documentElement.clientHeight;
  } else if( document.body && ( document.body.clientWidth || document.body.clientHeight ) ) {
    //IE 4 compatible
    myHeight = document.body.clientHeight;
  }

  return myHeight;
}

function ReadjustHeight(iHeight, sElement)
{
  AnElem = document.getElementById(sElement);
  if (AnElem != null)
  {
    AnElem.style.height = (getWindowHeight() - iHeight);
  }
}

function Trim(psValue)
{
  if(psValue.length > 0)
  {
    psValue = RTrim(psValue);
    psValue = LTrim(psValue);
  }

  return psValue;
}

function RTrim(psValue)
{
  if(psValue.length > 0)
  {
    var w_space = String.fromCharCode(32);
    var iTemp = psValue.length - 1;

    while(iTemp > -1)
    {
      if (psValue.charAt(iTemp) != w_space)
      {
        psValue = psValue.substring(0, iTemp + 1);
        break;
      }

      iTemp = iTemp - 1;
    }
  }

  return psValue;
}

function LTrim(psValue)
{
  if(psValue.length > 0)
  {
    var w_space = String.fromCharCode(32);
    var iTemp = 0;

    while(iTemp < psValue.length)
    {
      if (psValue.charAt(iTemp) != w_space)
      {
        psValue = psValue.substring(iTemp, psValue.length);
        break;
      }

      iTemp = iTemp + 1;
    }
  }

  return psValue;
}

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_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_findObj(n, d) { //v4.01
  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 && d.getElementById) x=d.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 SetRemarksLength(iLength)
{
  if (document.frmcontact.REMARKS.value.length > iLength)
  {
    document.frmcontact.REMARKS.value = Trim(document.frmcontact.REMARKS.value);
    document.frmcontact.REMARKS.value = document.frmcontact.REMARKS.value.substr(0, iLength);
  }
}

function DoMail()
{
  x=document.frmcontact
  x.COMPANY.value    = Trim(x.COMPANY.value);
  x.CONTACT.value    = Trim(x.CONTACT.value);
  x.ADDRESS.value    = Trim(x.ADDRESS.value);
  x.POSTALCODE.value = Trim(x.POSTALCODE.value);
  x.CITY.value       = Trim(x.CITY.value);
  x.PHONE.value      = Trim(x.PHONE.value);
  x.FAX.value        = Trim(x.FAX.value);
  x.EMAIL.value      = Trim(x.EMAIL.value);
  x.REMARKS.value    = Trim(x.REMARKS.value);
  x.REMARKS.value    = x.REMARKS.value.substr(0,500);

  sContact           = x.CONTACT.value;
  sPhone             = x.PHONE.value
  sEmail             = x.EMAIL.value
  at                 = x.EMAIL.value.indexOf("@")
  sRemarks           = x.REMARKS.value.substr(0,500);

  sError             = "";
  submitOK           = "True"

  if (sContact == "")
  {
    sError = sError + JSTR_CONTACT + miz + unescape("%0D")
    submitOK="False"
  }

  if ((sPhone == "") && (sEmail == ""))
  {
    sError = sError + JSTR_PHONEOREMAIL + miz + unescape("%0D")
    submitOK="False"
  }

  if (sEmail.length > 0)
  {
    if (at==-1)
    {
      sError = sError + JSTR_INCORRECTEMAIL + unescape("%0D")
      submitOK="False"
    }
    else
    {
      at=x.EMAIL.value.indexOf(".")
      if (at==-1)
      {
        sError = sError + JSTR_INCORRECTEMAIL + unescape("%0D")
        submitOK="False"
      }
      else
      {
        at=x.EMAIL.value.indexOf(" ")
        if (at > -1)
        {
          sError = sError + JSTR_EMAILSPACES + unescape("%0D")
          submitOK="False"
        }
      }
    }
  }

  if (sRemarks == "")
  {
    sError = sError + JSTR_REMARKS + miz + unescape("%0D")
    submitOK="False"
  }

  if (submitOK=="True")
  {
    document.frmcontact.LMAIL.value = "2";
    document.frmcontact.submit()
  }
  else
  {
    alert(sError)
  }
  return null;
}

function ShowAGD(sSysKeyAgd)
{
  document.forms[0].SSYSKEY_AGD.value = sSysKeyAgd;
  document.forms[0].ACTION.value = '1';
  document.forms[0].submit();
}

function DeleteAGD(sSysKeyAgd)
{
  var a = confirm(JSTR_DELETESKIRMISH, "Ja", "Nee");
  if (a)
  {
    document.forms[0].SSYSKEY_AGD.value = sSysKeyAgd;
    document.forms[0].ACTION.value = 'delete';
    document.forms[0].submit();
  }
  return null;
}

function ShowBFD(sSysKeyBfd)
{
  document.forms[0].SSYSKEY_BFD.value = sSysKeyBfd;
  document.forms[0].ACTION.value = '1';
  document.forms[0].submit();
}

function ShowTEM(sSysKeyTem)
{
  document.forms[0].SSYSKEY_TEM.value = sSysKeyTem;
  document.forms[0].ACTION.value = '1';
  document.forms[0].submit();
}

function DoSaveEdit()
{
  document.forms[0].ACTION.value = 'insupd';
  document.forms[0].submit();
  return null;
}

function DoCancelEdit()
{
  document.forms[0].ACTION.value = 'cancel';
  document.forms[0].submit();
  return null;
}

function DoCopyAgenda(sSysKeyAgd)
{
  document.forms[0].SSYSKEY_AGD.value = sSysKeyAgd;
  document.forms[0].ACTION.value = 'copy';
  document.forms[0].submit();
  return null;
}

function toggleMe(a)
{
  for (tel = 1; tel <= 3; tel++)
  {
    var b = 'para' + tel;
    if (a != b)
    {
      var e=document.getElementById(b);
      e.style.display="none";
    }
  }

  var e=document.getElementById(a);

  if(!e)return true;

  if(e.style.display=="none")
  {
    e.style.display="block"
  }
  else
  {
    e.style.display="none"
  }

  return true;
}

function ShowFoto(img)
{
  window.status = '';
  iTry = 0;
  img = img.toLowerCase();
  img = 'http://www.skirmish.nl/images/' + img;
  ClosePic();
  ShowPict(img);
}

function ShowPict(img)
{
  window.status = '';
  iTry = iTry + 1;

  foto1= new Image();
  foto1.src=(img);

  if (((foto1.width>50)&&(foto1.height>50)) || foto1.complete)
  {
    e = document.getElementById('thepic');
    e.style.backgroundImage = 'url(' + img + ')';
    e.style.height = foto1.height+2;
    e.style.width = foto1.width+2;
    e.style.visibility = 'visible';
  }
  else
  {
    if (iTry < 5)
    {
      func="ShowPict('"+img+"')";
      interv=setTimeout(func,100);
    }
  }
}

function ClosePic()
{
    e = document.getElementById('thepic');
    e.style.backgroundImage = 'url(none)';
    e.style.height = 0;
    e.style.width = 0;
    e.style.visibility = 'hidden';
}

function focusedit(sId)
{
   e = document.getElementById(sId);
   e.className = "editboxfocus";
   return true;
}

function bluredit(sId)
{
   e = document.getElementById(sId);
   e.className = "editboxblur";
   return true;
}

function valiDD()
{
  var sError = "";

  var arr_inputs = document.getElementsByTagName("*");
  for (var i = 0; i < arr_inputs.length; i++)
  {
    var aninput = arr_inputs[i];

    if ((aninput.tagName == "INPUT" && (aninput.type == "text" || aninput.type == "password")) || aninput.tagName == "SELECT")
    {
      aninput.value = Trim(aninput.value);

      sValidate = aninput.getAttribute('validate');
      if (sValidate != null && sValidate.indexOf("m") > -1 && aninput.value.length == 0)
      {
        sError = sError + aninput.getAttribute('caption') + miz + unescape("%0D") + unescape("%0A");
      }

      if (sValidate != null && sValidate.indexOf("e") > -1 && aninput.value.length > 0)
      {
        var at = "@";
        var dot = ".";
        var str = aninput.value;
        var lat = str.indexOf(at);
        var lstr = str.length;
        var ldot = str.indexOf(dot);

        if (str.indexOf(at)==-1 || str.indexOf(at)==0 || str.indexOf(at)==lstr)
        {
          sError = sError + aninput.getAttribute('caption') + JSTR_NONVALIDEMAIL + unescape("%0D")
        }
        else if (str.indexOf(dot)==-1 || str.indexOf(dot)==0 || str.indexOf(dot)==lstr)
        {
          sError = sError + aninput.getAttribute('caption') + JSTR_NONVALIDEMAIL + unescape("%0D")
        }
        else if (str.indexOf(at,(lat+1))!=-1)
        {
          sError = sError + aninput.getAttribute('caption') + JSTR_NONVALIDEMAIL + unescape("%0D")
        }
        else if (str.substring(lat-1,lat)==dot || str.substring(lat+1,lat+2)==dot)
        {
          sError = sError + aninput.getAttribute('caption') + JSTR_NONVALIDEMAIL + unescape("%0D")
        }
        else if (str.indexOf(dot,(lat+2))==-1)
        {
          sError = sError + aninput.getAttribute('caption') + JSTR_NONVALIDEMAIL + unescape("%0D")
        }
        else if (str.indexOf(" ")!=-1)
        {
          sError = sError + aninput.getAttribute('caption') + JSTR_NONVALIDEMAIL + unescape("%0D")
        }
      }
    }
  }

  return sError;
}

function valiLotReg()
{
  var sError = valiDD();

  if (document.forms[0].SPWD_LOT1.value.length > 0 &&
      document.forms[0].SPWD_LT21.value.length > 0 &&
      document.forms[0].SPWD_LOT1.value != document.forms[0].SPWD_LT21.value)
  {
    sError = sError + document.forms[0].SPWD_LOT1.getAttribute('caption') + JSTR_AND + document.forms[0].SPWD_LT21.getAttribute('caption') + JSTR_DIFFER + unescape("%0D")
  }

  if (sError == "")
  {
    document.forms[0].ACTION.value = "insupd";
    return true;
  }
  else
  {
    alert(sError)
    return false;
  }
}

function valiAgenda()
{
  var sError = valiDD();


  if (document.forms[0].SBERICHT_AGD1.value.length < 30)
  {

    sError = sError + document.forms[0].SBERICHT_AGD1.getAttribute('caption') + miz + unescape("%0D") + unescape("%0A");
  }

  if (sError == "")
  {
    document.forms[0].ACTION.value = "insupd";
    return true;
  }
  else
  {
    alert(sError)
    return false;
  }
}

function valiSTD()
{
  var sError   = valiDD();

  if (sError == "")
  {
    document.forms[0].ACTION.value = "insupd";
    return true;
  }
  else
  {
    alert(sError)
    return false;
  }
}