var MONTH_NAMES=new Array('January','February','March','April','May','June','July','August','September','October','November','December','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');var DAY_NAMES=new Array('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday','Sun','Mon','Tue','Wed','Thu','Fri','Sat');
function LZ(x){return(x<0||x>9?"":"0")+x}
function isDate(val,format){var date=getDateFromFormat(val,format);if(date==0){return false;}return true;}
function compareDates(date1,dateformat1,date2,dateformat2){var d1=getDateFromFormat(date1,dateformat1);var d2=getDateFromFormat(date2,dateformat2);if(d1==0 || d2==0){return -1;}else if(d1 > d2){return 1;}return 0;}
function formatDate(date,format){format=format+"";var result="";var i_format=0;var c="";var token="";var y=date.getYear()+"";var M=date.getMonth()+1;var d=date.getDate();var E=date.getDay();var H=date.getHours();var m=date.getMinutes();var s=date.getSeconds();var yyyy,yy,MMM,MM,dd,hh,h,mm,ss,ampm,HH,H,KK,K,kk,k;var value=new Object();if(y.length < 4){y=""+(y-0+1900);}value["y"]=""+y;value["yyyy"]=y;value["yy"]=y.substring(2,4);value["M"]=M;value["MM"]=LZ(M);value["MMM"]=MONTH_NAMES[M-1];value["NNN"]=MONTH_NAMES[M+11];value["d"]=d;value["dd"]=LZ(d);value["E"]=DAY_NAMES[E+7];value["EE"]=DAY_NAMES[E];value["H"]=H;value["HH"]=LZ(H);if(H==0){value["h"]=12;}else if(H>12){value["h"]=H-12;}else{value["h"]=H;}value["hh"]=LZ(value["h"]);if(H>11){value["K"]=H-12;}else{value["K"]=H;}value["k"]=H+1;value["KK"]=LZ(value["K"]);value["kk"]=LZ(value["k"]);if(H > 11){value["a"]="PM";}else{value["a"]="AM";}value["m"]=m;value["mm"]=LZ(m);value["s"]=s;value["ss"]=LZ(s);while(i_format < format.length){c=format.charAt(i_format);token="";while((format.charAt(i_format)==c) &&(i_format < format.length)){token += format.charAt(i_format++);}if(value[token] != null){result=result + value[token];}else{result=result + token;}}return result;}
function _isInteger(val){var digits="1234567890";for(var i=0;i < val.length;i++){if(digits.indexOf(val.charAt(i))==-1){return false;}}return true;}
function _getInt(str,i,minlength,maxlength){for(var x=maxlength;x>=minlength;x--){var token=str.substring(i,i+x);if(token.length < minlength){return null;}if(_isInteger(token)){return token;}}return null;}
function getDateFromFormat(val,format){val=val+"";format=format+"";var i_val=0;var i_format=0;var c="";var token="";var token2="";var x,y;var now=new Date();var year=now.getYear();var month=now.getMonth()+1;var date=1;var hh=now.getHours();var mm=now.getMinutes();var ss=now.getSeconds();var ampm="";while(i_format < format.length){c=format.charAt(i_format);token="";while((format.charAt(i_format)==c) &&(i_format < format.length)){token += format.charAt(i_format++);}if(token=="yyyy" || token=="yy" || token=="y"){if(token=="yyyy"){x=4;y=4;}if(token=="yy"){x=2;y=2;}if(token=="y"){x=2;y=4;}year=_getInt(val,i_val,x,y);if(year==null){return 0;}i_val += year.length;if(year.length==2){if(year > 70){year=1900+(year-0);}else{year=2000+(year-0);}}}else if(token=="MMM"||token=="NNN"){month=0;for(var i=0;i<MONTH_NAMES.length;i++){var month_name=MONTH_NAMES[i];if(val.substring(i_val,i_val+month_name.length).toLowerCase()==month_name.toLowerCase()){if(token=="MMM"||(token=="NNN"&&i>11)){month=i+1;if(month>12){month -= 12;}i_val += month_name.length;break;}}}if((month < 1)||(month>12)){return 0;}}else if(token=="EE"||token=="E"){for(var i=0;i<DAY_NAMES.length;i++){var day_name=DAY_NAMES[i];if(val.substring(i_val,i_val+day_name.length).toLowerCase()==day_name.toLowerCase()){i_val += day_name.length;break;}}}else if(token=="MM"||token=="M"){month=_getInt(val,i_val,token.length,2);if(month==null||(month<1)||(month>12)){return 0;}i_val+=month.length;}else if(token=="dd"||token=="d"){date=_getInt(val,i_val,token.length,2);if(date==null||(date<1)||(date>31)){return 0;}i_val+=date.length;}else if(token=="hh"||token=="h"){hh=_getInt(val,i_val,token.length,2);if(hh==null||(hh<1)||(hh>12)){return 0;}i_val+=hh.length;}else if(token=="HH"||token=="H"){hh=_getInt(val,i_val,token.length,2);if(hh==null||(hh<0)||(hh>23)){return 0;}i_val+=hh.length;}else if(token=="KK"||token=="K"){hh=_getInt(val,i_val,token.length,2);if(hh==null||(hh<0)||(hh>11)){return 0;}i_val+=hh.length;}else if(token=="kk"||token=="k"){hh=_getInt(val,i_val,token.length,2);if(hh==null||(hh<1)||(hh>24)){return 0;}i_val+=hh.length;hh--;}else if(token=="mm"||token=="m"){mm=_getInt(val,i_val,token.length,2);if(mm==null||(mm<0)||(mm>59)){return 0;}i_val+=mm.length;}else if(token=="ss"||token=="s"){ss=_getInt(val,i_val,token.length,2);if(ss==null||(ss<0)||(ss>59)){return 0;}i_val+=ss.length;}else if(token=="a"){if(val.substring(i_val,i_val+2).toLowerCase()=="am"){ampm="AM";}else if(val.substring(i_val,i_val+2).toLowerCase()=="pm"){ampm="PM";}else{return 0;}i_val+=2;}else{if(val.substring(i_val,i_val+token.length)!=token){return 0;}else{i_val+=token.length;}}}if(i_val != val.length){return 0;}if(month==2){if( ((year%4==0)&&(year%100 != 0) ) ||(year%400==0) ){if(date > 29){return 0;}}else{if(date > 28){return 0;}}}if((month==4)||(month==6)||(month==9)||(month==11)){if(date > 30){return 0;}}if(hh<12 && ampm=="PM"){hh=hh-0+12;}else if(hh>11 && ampm=="AM"){hh-=12;}var newdate=new Date(year,month-1,date,hh,mm,ss);return newdate.getTime();}
function parseDate(val){var preferEuro=(arguments.length==2)?arguments[1]:false;generalFormats=new Array('y-M-d','MMM d, y','MMM d,y','y-MMM-d','d-MMM-y','MMM d');monthFirst=new Array('M/d/y','M-d-y','M.d.y','MMM-d','M/d','M-d');dateFirst =new Array('d/M/y','d-M-y','d.M.y','d-MMM','d/M','d-M');var checkList=new Array('generalFormats',preferEuro?'dateFirst':'monthFirst',preferEuro?'monthFirst':'dateFirst');var d=null;for(var i=0;i<checkList.length;i++){var l=window[checkList[i]];for(var j=0;j<l.length;j++){d=getDateFromFormat(val,l[j]);if(d!=0){return new Date(d);}}}return null;}

function confirmSave(theform)
{	
//   	return theform && isdirty(theform) ? confirm('Loose changes?') : true;
   	return true;
}

function confirmLink(theLink)
{
    var is_confirmed = confirm('Dit record wissen?');
    if (is_confirmed) {
        theLink.href += '&is_js_confirmed=1';
    }
    return is_confirmed;
}

function cleartabs()
{
	var frm = window.parent.frames['topFrame'];
	var cell = frm.document.getElementById('menu');
	cell.innerHTML = '';
}

function addtab(caption, url, suffix)
{
	var frm = window.parent.frames['topFrame'];
	var cell = frm.document.getElementById('menu');
	if (url == null)
		cell.innerHTML += caption;
	else
		cell.innerHTML += '<a href="' + url + '" target="mainFrame">' + caption + '</a>';
	cell.innerHTML += suffix;
}

function encodehtml(text)
{
	return text.replace(/&/g,"&amp;").replace(/</g,"&lt;").replace(/>/g,"&gt;").replace(/\"/g,"&quot;");
}

function addtab1(url, suffix)
{
	var frm = window.parent.frames['topFrame'];
	var cell = frm.document.getElementById('menu');

	// iterate through arguments
	caption = "";
	for (var i = 2; i < arguments.length; i++)
	{
		var arg = arguments[i] == '' ? '<i>&lt;new&gt;</i>' : encodehtml(arguments[i]);
		if (i == arguments.length - 1)
			caption += '<span class="positie_eind">' + arg + '</span>';
		else
			caption += '<span class="positie' + (i - 1) + '">' + arg + '</span><img class="arrow" src="images/arrow.gif">';
	}
	if (url == null)
		cell.innerHTML += caption;
	else
		cell.innerHTML += '<a href="' + url + '" target="mainFrame">' + caption + '</a>';
	cell.innerHTML += suffix;
}

function setadd(url, caption)
{
	var frm = window.parent.frames['topFrame'];
	var cell = frm.document.getElementById('add');
	var addcaption1 = frm.document.getElementById('addcaption1');
	var addcaption2 = frm.document.getElementById('addcaption2');

	cell.href = url;
	if (url == null)
	{
		addcaption1.innerHTML = "";
		addcaption2.innerHTML = "";
	}else
	{
		addcaption1.innerHTML = caption;
		addcaption2.innerHTML = "  |  ";
	}
}


function getform(node)
{
	var n = node;
	
	while (n.tagName != 'FORM')
		n = n.parentNode;
	return n;
}

function fe_isdirty(formelement)
{
	switch (formelement.type)
	{
		case 'button':
		case 'submit':
			return false;
		case 'select-one':
			return !formelement.options[formelement.selectedIndex].defaultSelected;
		case 'file':
			return formelement.value != '';
		case 'checkbox':
			return formelement.checked != formelement.defaultChecked;
	}
	return formelement.value != formelement.defaultValue;
}

function isdirty(myform)
{
	var i;
	for (i = 0; i < myform.elements.length; i++)
	{
		var e = myform.elements[i]; 
//		alert(e.name + ': ' + e.type + ' ' + fe_isdirty(e));
		if (fe_isdirty(e))
			return true;
	}
	return false;
}

function getElementValue(element_id)
{
	return self.document.getElementById(element_id).value;
}

function getElementSelected(element_id)
{
	var el = self.document.getElementById(element_id);
	return el.options[el.selectedIndex].text;
}

function setElementValue(element_id, value)
{
	return self.document.getElementById(element_id).value = value;
}

function updatenode(idname, val)
{
	var links = top.frames['leftFrame'].document.links;
	var loc = self.document.location;
	var href = loc.protocol + '//' + loc.hostname + loc.pathname + '?' + idname + '=' + getElementValue(idname);
	for (var i = 0; i < links.length; i++)
		if (links[i].href == href)
 	 		links[i].innerHTML = encodehtml(val);
}

function seterrorhandlerstyle()
{
	var errorhandler;
	
	errorhandler = document.getElementById('errorhandler');
	errorhandler.style.display = errorhandler.innerHTML == '' ? 'none' : 'block';
}

function getPrompt(el, fieldname)
{
	if (el.title != '')
	{
		return el.title;
	}
	
	while (el.tagName != 'TR')
	{
		el = el.parentNode;
	}
	return el.cells[0].innerHTML;
}

function initdates(datearr)
{
	for (var i = 0; i < datearr.length; i++)
	{
		var fieldname = datearr[i];
		var el = document.getElementById(fieldname);
		var el1 = document.getElementById(fieldname + '_input');
		var d = parseDate(el.value)	;
		if (d != null)
			el1.value = formatDate(d,'dd-MM-yyyy');
	}		
}

function validateform(idname, val, requiredarr, numericarr, datearr, lang)
{
	rc = '';

	// required fields
	ok = true;
	if (requiredarr != null)
	{
		for (var i = 0; i < requiredarr.length; i++)
		{
			var fieldname = requiredarr[i];
			var el = document.getElementById(fieldname + '_input');
			if (el == null)
				el = document.getElementById(fieldname);
			if (el.value == '')
			{
				if (ok)
				{
                    var txt = (missingfields == undefined) ? 'Required missing fields' : missingfields;
                    rc += '<p>' + txt + ': ' + getPrompt(el, fieldname);

					ok = false;
				}
				else
					rc += ', ' + getPrompt(el, fieldname);
			}
		}
		if (!ok)
			rc += '</p>';
	}		

	// numeric fields
	oknum = true;
	if (numericarr != null)
	{
		for (var i = 0; i < numericarr.length; i++)
		{
			var fieldname = numericarr[i];
			var el = document.getElementById(fieldname);
			var numval = el.value.replace(',', '.');
			if (numval != '' && isNaN(numval))
			{
				if (oknum)
				{
					rc += '<p>' + (lang == null ? 'velden moeten numeriek zijn: ' : 'fields should be numeric: ') + getPrompt(el, fieldname);
					oknum = false;
				}
				else
					rc += ', ' + getPrompt(el, fieldname);
			}
			else
				el.value = numval;
		}
		if (!oknum)
			rc += '</p>';
	}

	// date fields
	okdate = true;
	if (datearr != null)
	{
		for (var i = 0; i < datearr.length; i++)
		{
			var fieldname = datearr[i];
			var el = document.getElementById(fieldname + '_input');
			var el1 = document.getElementById(fieldname);
			if (el.value == '')			
				el1.value = '';			
			else
			{
				var d = parseDate(el.value, true);
				if (d == null)
				{
					if (okdate)
					{
						rc += '<p>ongeldige datum(s): ' + getPrompt(el, fieldname);
						okdate = false;
					}
					else
						rc += ', ' + getPrompt(el, fieldname);
				}
				else
					el1.value = formatDate(d,'yyyy-MM-dd');
			}
		}
		if (!okdate)
			rc += '</p>';
	}

	if (ok && oknum && okdate)
	{
		if (idname != null)
			updatenode(idname, getElementValue(val));
		return true;
	}
	else
	{
		document.getElementById('errorhandler').innerHTML =  rc;
		seterrorhandlerstyle();
		scroll(0,0);
		return false;
	}
}

function postprocessdates()
{
	var els = document.getElementsByName('input_geboortedatum[]');
	var els1 = document.getElementsByName('geboortedatum[]');
	for (var i = 0; i < els.length; i++)
	{
		var d = parseDate(els[i].value, true);
		els1[i].value = formatDate(d,'yyyy-MM-dd');
	}	
}
