function check_record() {
	var retval = true;
	if(window.RecordChanged)
		retval = confirm('Wollen Sie die bereits eingegebenen Daten verwerfen?');
	return(retval);
}

function confirmation(message) {
	message = reverse_htmlentities(message);
	return(confirm(message));
}

function refreshImage(fieldid,imageid) {
	try {
		var newImg = document.createElement("img");
		var field = document.getElementById(fieldid);
		newImg.src = field.value;
		var i = document.getElementById(imageid);
		i.src = newImg.src;
	} catch(e) {
	}
	return true;
}
    
function clearImage(fieldid,imageid) {
	try {
		field = document.getElementById(fieldid);
		field.value = "";
		image = document.getElementById(imageid);
		image.src = undefined;
	} catch(e) {
	}
	return true;
}

function strip_tags(text) {
	var retval = text.replace(/\<\/?[^>]*\>/g, "");
	return(retval);
}

function reverse_htmlentities(text) {
	var retval = text;
	retval = retval.replace(/\&quot\;/g,unescape('%22'));
	retval = retval.replace(/\&amp\;/g,unescape('%26'));
	retval = retval.replace(/\&lt\;/g,unescape('%3C'));
	retval = retval.replace(/\&gt\;/g,unescape('%3E'));
	retval = retval.replace(/\&nbsp\;/g,unescape('%A0'));
	retval = retval.replace(/\&iexcl\;/g,unescape('%A1'));
	retval = retval.replace(/\&cent\;/g,unescape('%A2'));
	retval = retval.replace(/\&pound\;/g,unescape('%A3'));
	retval = retval.replace(/\&yen\;/g,unescape('%A5'));
	retval = retval.replace(/\&brvbar\;/g,unescape('%A6'));
	retval = retval.replace(/\&sect\;/g,unescape('%A7'));
	retval = retval.replace(/\&uml\;/g,unescape('%A8'));
	retval = retval.replace(/\&copy\;/g,unescape('%A9'));
	retval = retval.replace(/\&ordf\;/g,unescape('%AA'));
	retval = retval.replace(/\&laquo\;/g,unescape('%AB'));
	retval = retval.replace(/\&not\;/g,unescape('%AC'));
	retval = retval.replace(/\&shy\;/g,unescape('%AD'));
	retval = retval.replace(/\&reg\;/g,unescape('%AE'));
	retval = retval.replace(/\&macr\;/g,unescape('%AF'));
	retval = retval.replace(/\&deg\;/g,unescape('%B0'));
	retval = retval.replace(/\&plusmn\;/g,unescape('%B1'));
	retval = retval.replace(/\&sup2\;/g,unescape('%B2'));
	retval = retval.replace(/\&sup3\;/g,unescape('%B3'));
	retval = retval.replace(/\&acute\;/g,unescape('%B4'));
	retval = retval.replace(/\&micro\;/g,unescape('%B5'));
	retval = retval.replace(/\&para\;/g,unescape('%B6'));
	retval = retval.replace(/\&middot\;/g,unescape('%B7'));
	retval = retval.replace(/\&cedil\;/g,unescape('%B8'));
	retval = retval.replace(/\&sup1\;/g,unescape('%B9'));
	retval = retval.replace(/\&ordm\;/g,unescape('%BA'));
	retval = retval.replace(/\&raquo\;/g,unescape('%BB'));
	retval = retval.replace(/\&frac14\;/g,unescape('%BC'));
	retval = retval.replace(/\&frac12\;/g,unescape('%BD'));
	retval = retval.replace(/\&frac34\;/g,unescape('%BE'));
	retval = retval.replace(/\&iquest\;/g,unescape('%BF'));
	retval = retval.replace(/\&Agrave\;/g,unescape('%C0'));
	retval = retval.replace(/\&Aacute\;/g,unescape('%C1'));
	retval = retval.replace(/\&Acirc\;/g,unescape('%C2'));
	retval = retval.replace(/\&Atilde\;/g,unescape('%C3'));
	retval = retval.replace(/\&Auml\;/g,unescape('%C4'));
	retval = retval.replace(/\&Aring\;/g,unescape('%C5'));
	retval = retval.replace(/\&AElig\;/g,unescape('%C6'));
	retval = retval.replace(/\&Ccedil\;/g,unescape('%C7'));
	retval = retval.replace(/\&Egrave\;/g,unescape('%C8'));
	retval = retval.replace(/\&Eacute\;/g,unescape('%C9'));
	retval = retval.replace(/\&Ecirc\;/g,unescape('%CA'));
	retval = retval.replace(/\&Euml\;/g,unescape('%CB'));
	retval = retval.replace(/\&Igrave\;/g,unescape('%CC'));
	retval = retval.replace(/\&Iacute\;/g,unescape('%CD'));
	retval = retval.replace(/\&Icirc\;/g,unescape('%CE'));
	retval = retval.replace(/\&Iuml\;/g,unescape('%CF'));
	retval = retval.replace(/\&ETH\;/g,unescape('%D0'));
	retval = retval.replace(/\&Ntilde\;/g,unescape('%D1'));
	retval = retval.replace(/\&Ograve\;/g,unescape('%D2'));
	retval = retval.replace(/\&Oacute\;/g,unescape('%D3'));
	retval = retval.replace(/\&Ocirc\;/g,unescape('%D4'));
	retval = retval.replace(/\&Otilde\;/g,unescape('%D5'));
	retval = retval.replace(/\&Ouml\;/g,unescape('%D6'));
	retval = retval.replace(/\&times\;/g,unescape('%D7'));
	retval = retval.replace(/\&Oslash\;/g,unescape('%D8'));
	retval = retval.replace(/\&Ugrave\;/g,unescape('%D9'));
	retval = retval.replace(/\&Uacute\;/g,unescape('%DA'));
	retval = retval.replace(/\&Ucirc\;/g,unescape('%DB'));
	retval = retval.replace(/\&Uuml\;/g,unescape('%DC'));
	retval = retval.replace(/\&Yacute\;/g,unescape('%DD'));
	retval = retval.replace(/\&THORN\;/g,unescape('%DE'));
	retval = retval.replace(/\&szlig\;/g,unescape('%DF'));
	retval = retval.replace(/\&agrave\;/g,unescape('%E0'));
	retval = retval.replace(/\&aacute\;/g,unescape('%E1'));
	retval = retval.replace(/\&acirc\;/g,unescape('%E2'));
	retval = retval.replace(/\&atilde\;/g,unescape('%E3'));
	retval = retval.replace(/\&auml\;/g,unescape('%E4'));
	retval = retval.replace(/\&aring\;/g,unescape('%E5'));
	retval = retval.replace(/\&aelig\;/g,unescape('%E6'));
	retval = retval.replace(/\&ccedil\;/g,unescape('%E7'));
	retval = retval.replace(/\&egrave\;/g,unescape('%E8'));
	retval = retval.replace(/\&eacute\;/g,unescape('%E9'));
	retval = retval.replace(/\&ecirc\;/g,unescape('%EA'));
	retval = retval.replace(/\&euml\;/g,unescape('%EB'));
	retval = retval.replace(/\&igrave\;/g,unescape('%EC'));
	retval = retval.replace(/\&iacute\;/g,unescape('%ED'));
	retval = retval.replace(/\&icirc\;/g,unescape('%EE'));
	retval = retval.replace(/\&iuml\;/g,unescape('%EF'));
	retval = retval.replace(/\&eth\;/g,unescape('%F0'));
	retval = retval.replace(/\&ntilde\;/g,unescape('%F1'));
	retval = retval.replace(/\&ograve\;/g,unescape('%F2'));
	retval = retval.replace(/\&oacute\;/g,unescape('%F3'));
	retval = retval.replace(/\&ocirc\;/g,unescape('%F4'));
	retval = retval.replace(/\&otilde\;/g,unescape('%F5'));
	retval = retval.replace(/\&ouml\;/g,unescape('%F6'));
	retval = retval.replace(/\&divide\;/g,unescape('%F7'));
	retval = retval.replace(/\&oslash\;/g,unescape('%F8'));
	retval = retval.replace(/\&ugrave\;/g,unescape('%F9'));
	retval = retval.replace(/\&uacute\;/g,unescape('%FA'));
	retval = retval.replace(/\&ucirc\;/g,unescape('%FB'));
	retval = retval.replace(/\&uuml\;/g,unescape('%FC'));
	retval = retval.replace(/\&yacute\;/g,unescape('%FD'));
	retval = retval.replace(/\&thorn\;/g,unescape('%FE'));
	retval = retval.replace(/\&yuml\;/g,unescape('%FF'));
	return(retval);
}

function expand_link(obj) {
	if (!document.getElementById) { return true; }
	if (obj.className != 'page_content_link_expand') { return false; }
	var items = obj.parentNode.parentNode.getElementsByTagName('li');
	for (var i=0; i<items.length; i++) {
		if (items[i].className == 'page_content_link_active' || items[i].className == 'page_content_link_expand') {
			items[i].className = (items[i]==obj) ? 'page_content_link_active' : 'page_content_link_expand';
		}
	}
	return false;
}