//	Substitute values in text fields (with prefix A) with other text fields (with prefix B)
	function replace_by_prefix(orig_prefix,sub_prefix,form){
		//alert(form.name)
		var orig_elems = new Array()
		var sub_elems = new Array()
		var orig_prefix_len = orig_prefix.length
		var sub_prefix_len = sub_prefix.length
		elems = form.elements
		for(x=0; x<elems.length; x++){
			if(elems[x].name.substr(0,orig_prefix_len) == orig_prefix){
				orig_elems[orig_elems.length] = elems[x]
			}else{
				if(elems[x].name.substr(0,sub_prefix_len) == sub_prefix){
					sub_elems[sub_elems.length] = elems[x]
				}
			}
		}
		for(x=0; x<orig_elems.length; x++){
			for(y=0; y<sub_elems.length; y++){
				orig_name = orig_elems[x].name
				sub_name = sub_elems[y].name
				if(sub_name.substr(sub_prefix_len,sub_name.length) == orig_name.substr(orig_prefix_len,orig_name.length)){
					orig_elems[x].value = sub_elems[y].value
				}
			}
		}
	}
	function clear_all(orig_prefix,form){
		var orig_prefix_len = orig_prefix.length
		elems = form.elements
		for(x=0; x<elems.length; x++){
			if(elems[x].name.substr(0,orig_prefix_len) == orig_prefix){
				elems[x].value = "";
			}
		}
	}
	function chk_replace_by_prefix(orig_prefix,sub_prefix,form){
		clear_all(orig_prefix,form)
		if(event.srcElement.checked){
			replace_by_prefix(orig_prefix,sub_prefix,form)
		}else{
			clear_all(orig_prefix,form)
		}
	}
	function uncheck(elem){
		elem.checked = false
	}
	
// ---------- limit length of textarea field and update the text box that shows characters left ---------- //
function check_textarea_len(elem,indicator_elem_name,len){
	indicator_elem = document.getElementById(indicator_elem_name)
	if(elem.value.length > len){
		elem.value = elem.value.substr(0,len)
	}
	indicator_elem.value = len - elem.value.length
}