function checkForm(id){
	tmpReqArray = eval('reqArray_' + id);
	tmpTypArray = eval('typArray_' + id);
	tmpErrArray = eval('errArray_' + id);
	tmpMsgArray = eval('msgArray_' + id);
	tmpValArray = eval('valArray_' + id);
	for(var i=0;i<tmpErrArray.length;i++){
		if(tmpReqArray[i] == 1){
			switch (tmpTypArray[i]){
				case "text":
				case "textarea":
				case "file":	
					if (!validateLen(tmpErrArray[i],tmpMsgArray[i])){
						return false;
					}
				break;
				case "select":
					if (!isSelected(tmpErrArray[i],tmpMsgArray[i])){
						return false;
					}
				break;
				case "radio":
				case "checkbox":
					if (!isChecked(document["form_" + id],tmpErrArray[i],tmpMsgArray[i])){
						return false;
					}
				break;
			}
		}
		switch (tmpValArray[i]){
			case 2:
				if(!isInteger(tmpErrArray[i],tmpMsgArray[i])){
					return false;
				}
			break;
			case 9:
				if(!isFloat(tmpErrArray[i],tmpMsgArray[i])){
					return false;
				}
			break;
			case 14:
				if(tmpErrArray[i].value.length > 0){
					if(!validEmail(tmpErrArray[i],tmpMsgArray[i])){
						return false;
					}
				}
			break;
		}
	}
	document["form_" + id].elements[document["form_" + id].elements.length-1].disabled = true;
	return true;
}
function validateLen(obj,msg){
	if(obj.value.length == 0){
		alert(msg);
		obj.focus();
		return false;
	}
	else return true;
}
function isSelected(obj,msg){
	if(obj.value == 0){
		alert(msg);
		obj.focus();
		return false;
	}
	else return true;
}
function isChecked(obj,nam,msg){
	valid = false;
	for(i=0;i<obj.elements.length;i++){
		if(obj.elements[i].name == nam && obj.elements[i].value == 1){
			valid = true;
			break;
		}
	}
	if(!valid){
		alert(msg);
		/*for(i=0;i<obj.elements.length;i++){
			if(obj.elements[i].name == nam){
				obj.elements[i].focus();
				break;
			}
		}*/
	}
	return valid;
}
function validEmail(obj,msg){
	var valid = true;
	i1 = obj.value.indexOf("@");
	if (i1 < 1) valid = false;
	else {
		i2 = obj.value.indexOf(".", i1);
		if(i2 - i1 < 2) valid = false;
		if(i2 == obj.value.length - 1) valid= false;
	}
	if (!valid){ 
		alert(msg);
		obj.select();
	}
	return valid;
}
function isInteger(obj,msg){
	if(isNaN(obj.value) || (obj.value.indexOf(".") != -1)){
		alert(msg);
		obj.select();
		return false;
	}
	else return true;
}
function isFloat(obj,msg){
	if(isNaN(obj.value)){
		alert(msg);
		obj.select();
		return false;
	}
	else return true;
}
function allDay(obj,i){
	if(i > 0) dis = true;
	else dis = false;
	obj["HOUR"].disabled = dis;
	obj["MINUTE"].disabled = dis;
	obj["HOUR_END"].disabled = dis;
	obj["MINUTE_END"].disabled = dis;
}
function openWindow(url,wid,hei,nam,scr,res){
	FixedWindow=window.open(url,"" + nam + "","screenX=30,left=30,scrollbars=" + scr + ",toolbar=0,location=0,directories=0,statusbar=0,menubar=0,resizable=" + res + ",screenY=30,top=30,width=" + wid + ",height=" + hei + "");	
}
function setExternalLink(fld,fid){
	tmpForm = document["form_" + fid];
	if(tmpForm["POST_" + fld].value.length == 0){
		val = "";
	}
	else {
		val = tmpForm["PRE_" + fld].options[tmpForm["PRE_" + fld].selectedIndex].text + tmpForm["POST_" + fld].value;
	}
	tmpForm[fld].value = val;
}
function checkFields(obj){
	for(var i=0;i<obj.form.elements.length;i++){
		if(obj.form.elements[i].parent == obj.id){
			switch (eval(obj.form.elements[i].name)){
				case 17:
					var sUrl = returnURL(document.getElementById("Ifr" + obj.name).src,"SEL,FLD") + "&FLD=" + obj.form.elements[i].id + "&SEL=" + obj.value;
					document.getElementById("Ifr" + obj.form.elements[i].name).src = sUrl;
				break;
				case 19:
					var sUrl = document.getElementById("Ifr" + obj.form.elements[i].name).src;
					document.getElementById("Ifr" + obj.form.elements[i].name).src = returnURL(sUrl,"VAL") + "&VAL=" + obj.value;
				break;
			}
		}
	}
}
function checkFields(obj){
	for(var i=1;i<obj.form.elements.length;i++){
		switch (obj.form.elements[i].type){
			case "hidden":
				if(eval("PAR" + obj.form.elements[i].id) == obj.id){
					switch (eval("TYP" + obj.form.elements[i].id)){
						case 17:
							var sUrl = returnURL(document.getElementById("Ifr" + obj.name).src,"SEL,FLD") + "&FLD=" + obj.form.elements[i].id + "&SEL=" + obj.value;
							document.getElementById("Ifr" + obj.form.elements[i].name).src = sUrl;
						break;
						case 19:
							var sUrl = document.getElementById("Ifr" + obj.form.elements[i].name).src;
							document.getElementById("Ifr" + obj.form.elements[i].name).src = returnURL(sUrl,"VAL") + "&VAL=" + obj.value;
						break;
					}
				}
			break;
		}
	}
}
function relateLink(obj){
	for(var i=1;i<obj.form.elements.length;i++){
		switch (obj.form.elements[i].type){
			case "hidden":
				switch(eval("TYP" + obj.id)){
					case 5:
					case 19:
						if(eval("PAR" + obj.form.elements[i].id) == obj.id){
							switch(eval("TYP" + obj.form.elements[i].id)){
								case 17:
									var oObj = null;
									for(var j=0;j<window.frames.length;j++){
										if(window.frames[j].fld == obj.form.elements[i].id){
											var oObj = window.frames[j];
											break;
										}
									}
									if(oObj){
										oObj.document.myForm.TMP.options[oObj.ArrFLD[obj.value]].selected = true;
										obj.form.elements[i].value = obj.value;
									}
								break;
								case 19:
									var sUrl = document.getElementById("Ifr" + obj.form.elements[i].name).src;
									document.getElementById("Ifr" + obj.form.elements[i].name).src = returnURL(sUrl,"VAL") + "&VAL=" + obj.value;
								break;
							}
						}
					break;
					case 17:
						if(obj.form.elements[i].id == eval("PAR" + obj.id)){
							switch(eval("TYP" + obj.form.elements[i].id)){
								case 5:
								case 19:
									var oObj = null;
									for(var j=0;j<window.frames.length;j++){
										if(window.frames[j].fld == obj.form.elements[i].id){
											var oObj = window.frames[j];
											break;
										}
									}
									if(oObj){
										oObj.document.myForm.TMP.options[oObj.ArrFLD[obj.value]].selected = true;
										obj.form.elements[i].value = obj.value;
										relateLink(obj.form.elements[i]);
									}
								break;
							}
						}
					break;
				}
			break;
		}
	}
}
function returnURL(myURL,mySTR){
	strArray = mySTR.split(',');
	tmpURL = myURL.toString();
	x = tmpURL.indexOf('?');
	if(x > 0){
		defURL = tmpURL.substring(0,x);
		locURL = tmpURL.substring(x+1).split('&');
		for(var i=0;i<locURL.length;i++){
			tmp = true;
			for(var j=0;j<strArray.length;j++){
				tmpLOC = locURL[i].substring(0,locURL[i].indexOf('='));
				if(tmpLOC == strArray[j]){
					tmp = false;
				}
			}
			if (tmp){
				if (defURL.indexOf('?') == -1) defURL += "?" + locURL[i];
				else defURL += "&" + locURL[i];
			}
		}
	}
	else defURL = tmpURL + "?x=0"
	return defURL;
}