//<script>
function fsubmit(f) {
	// Submit formu met drie parameters:
	// param1 : formulier
	// param2 : modus
	// param3 : id 
	if (arguments.length > 1)
		if (arguments[1] != null && arguments[1] != '') 
			document.forms[f].modus.value = arguments[1];
		if (arguments[2] != null && arguments[2] != '')
			document.forms[f].iId.value = arguments[2];
	document.forms[f].submit();
}

	
function fask() {
	var question = "Weet u het zeker?";
	if (confirm(question)) 
		return true;
	else
		return false
	
}


var popproduct;
function ShowPrdPopup() {
	if (document.frmPrdList.pId.value != "-1") {
		var link = "popproduct.asp?pid=" + document.frmPrdList.pId.value;
		if (popproduct != null)
			if (!popproduct.closed) popproduct.close();
		popproduct = window.open(link,"popproduct","width=520,height=550,location=0,menubar=0,resizable=0,statusbar=0,scrollbars=1");
	}
}

function SearchPrdPopup(iId) {
	var link = "popproduct.asp?pid=" + iId;
	if (popproduct != null)
		if (!popproduct.closed) popproduct.close();
	popproduct = window.open(link,"popproduct","width=520,height=550,location=0,menubar=0,resizable=0,statusbar=0,scrollbars=1");
}

function isEmail(str) {
  // are regular expressions supported?
  var supported = 0;
  if (window.RegExp) {
    var tempStr = "a";
    var tempReg = new RegExp(tempStr);
    if (tempReg.test(tempStr)) supported = 1;
  }
  if (!supported) 
    return (str.indexOf(".") > 2) && (str.indexOf("@") > 0);
  var r1 = new RegExp("(@.*@)|(\\.\\.)|(@\\.)|(^\\.)");
  var r2 = new RegExp("^.+\\@(\\[?)[a-zA-Z0-9\\-\\.]+\\.([a-zA-Z]{2,3}|[0-9]{1,3})(\\]?)$");
  return (!r1.test(str) && r2.test(str));
}

/* 
 Deze functie maakt alle velden van het formulier leeg
 parameters : 
 	* f 			: 	formname	
	* a_sElements	:	namen van de velden in het formulier die geleegd moeten worden
 note: 
 	van de webeditor moeten hidden velden hier ook bij staan.
	het legen van het webeditorobject zelf moet gebeuren binnen de href met de aanroep 
		van deze functie
*/
function wis(f, a_sElements)
	{
	aElements = a_sElements.split(",");
	for (var i = 0; i < aElements.length; aElements++)
		{
		document.forms[f].elements[aElements[i]].value='';
		}
	}


	
function emailCheck (emailStr) {
	var emailPat=/^(.+)@(.+)$/
	var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
	var validChars="\[^\\s" + specialChars + "\]"
	var quotedUser="(\"[^\"]*\")"
	var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
	var atom=validChars + '+'
	var word="(" + atom + "|" + quotedUser + ")"
	var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
	var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")
	var matchArray=emailStr.match(emailPat)
	
	if (matchArray==null) {
	  /* Too many/few @'s or something; basically, this address doesn't
	     even fit the general mould of a valid e-mail address. */
		//alert("Email address seems incorrect (check @ and .'s)")
		return false
		}

	var user=matchArray[1]
	var domain=matchArray[2]
	
	// See if "user" is valid 
	if (user.match(userPat)==null) {
	    // user is not valid
	    //alert("The username doesn't seem to be valid.")
	    return false
		}
	
	/* if the e-mail address is at an IP address (as opposed to a symbolic
	   host name) make sure the IP address is valid. */
	var IPArray=domain.match(ipDomainPat)
	if (IPArray!=null) {
	    // this is an IP address
		  for (var i=1;i<=4;i++) 
		  	{
		    if (IPArray[i]>255) {
		        //alert("Destination IP address is invalid!");
			return false
		   }
	    }
	    return true
		}
	
	// Domain is symbolic name
	var domainArray=domain.match(domainPat)
	if (domainArray==null) {
		//alert("The domain name doesn't seem to be valid.")
	    return false
	}
	
	/* domain name seems valid, but now make sure that it ends in a
	   three-letter word (like com, edu, gov) or a two-letter word,
	   representing country (uk, nl), and that there's a hostname preceding 
	   the domain or country. */
	
	/* Now we need to break up the domain to get a count of how many atoms
	   it consists of. */
	var atomPat=new RegExp(atom,"g")
	var domArr=domain.match(atomPat)
	var len=domArr.length
	if (domArr[domArr.length-1].length<2 || 
	    domArr[domArr.length-1].length>3) {
	   // the address must end in a two letter or three letter word.
	   //alert("The address must end in a three-letter domain, or two letter country.");
	   return false;
	}
	
	// Make sure there's a host name preceding the domain.
	if (len<2) {
	   var errStr="This address is missing a hostname!"
	   return false;
	}
	
	// If we've gotten this far, everything's valid!
	return true;
}

//Deze functie wordt gebruikt vanuit de printpopup
var tVertraag = 0;
function vertraging() {
	if (tVertraag == 0)	
		{
		tVertraag = setTimeout("vertraging()", 5000);
		}
	else
		{
		clearTimeout(tVertraag);
		return true;
		}
}