function makeHttpRequest(queryStr, dArr, lang_code) {
	var http_request = false;
	if (window.XMLHttpRequest) {
		http_request = new XMLHttpRequest();
		if (http_request.overrideMimeType) {
			http_request.overrideMimeType('text/html');
		}
	} else if (window.ActiveXObject) {
		try {
			http_request = new ActiveXObject("Msxml2.XMLHTTP");
		} catch (e) {
			try {
				http_request = new ActiveXObject("Microsoft.XMLHTTP");
			} catch (e) {}
		}
	}
	if (!http_request) {
		alert('Cannot create XMLHTTP instance');
		return false;
	}

	http_request.open('GET.html', queryStr, true);
	http_request.onreadystatechange=function() { 
		if (http_request.readyState == 4) {
			if (http_request.responseText != '') {
				var events = document.getElementById('date-events');
				events.innerHTML = http_request.responseText;
				setCalTime(dArr['day'], getMonthStr(dArr['month'], lang_code));
			}
		}
	}
	http_request.send(null);
}
function getMonthStr(month, lang_code) {
	switch (lang_code) {
		case 'fi':
			monthnames = new Array('Tammikuu', 'Helmikuu', 'Maaliskuu', 'Huhtikuu', 'Toukokuu', 'Kesäkuu', 'Heinäkuu', 'Elokuu', 'Syyskuu', 'Lokakuu', 'Marraskuu', 'Joulukuu');
			break;
		case 'en':
			monthnames = new Array('January', 'February', 'March', 'April', 'May', 'June', 'July', 'August', 'September', 'October', 'November', 'December');
			break;
		case 'se':
			monthnames = new Array('Januari', 'Februari', 'Mars', 'April', 'Maj', 'Juni', 'Juli', 'Augusti', 'September', 'Oktober', 'November', 'December');
			break;
		default:
			return month;
	}
	return monthnames[parseInt(month)-1].toUpperCase();
}
function getDateEvents(id, lang_code) {
	var dateStr;
	if (dArr = dates[id]) dateStr = dArr['year'] + '-' + dArr['month'] + '-' + dArr['day'];
	makeHttpRequest('calendarb1f8.html?pid=' + parent_id + '&date=' + dateStr, dArr, lang_code);
}

function getNextDate(lang_code) {
	if (sel_date_index < max_index) {
		getDateEvents(++sel_date_index, lang_code);
	}
}
function getPrevDate(lang_code) {
	if (sel_date_index > 0) {
		getDateEvents(--sel_date_index, lang_code);
	}
}

function setCalTime(day, month) {
	var isInternetExplorer = navigator.appName.indexOf("Microsoft") != -1;
	var kalenteriObj = isInternetExplorer ? document.all.kalenteri : window.document.kalenteri;
	kalenteriObj.SetVariable('txt', month + '');
	kalenteriObj.SetVariable('num', day + '');
}

function setCookie(name,value) {
	var today = new Date();
	var expire = new Date();
	expire.setTime(today.getTime() + 1000*60*60*24*365);
	document.cookie = name+"="+escape(value) + ";expires="+expire.toGMTString();
}