

function calendar(str_target, str_datetime, language, showcalender) {
	
	var arr_months = ["Januari", "Februari", "Maart", "April", "Mei", "Juni",
		"Juli", "Augustus", "September", "Oktober", "November", "December"];
	var week_days = ["Zo", "Ma", "Di", "Wo", "Do", "Vr", "Za"];
	if (language != null && language == "fr") {
		arr_months = ["Janvier", "Frevrier", "Mars", "Avril", "Mai", "Juin",
			"Juillet", "Aout", "Septembre", "Octobre", "Novembre", "Decembre"];
		week_days = ["Di", "Lu", "Ma", "Me", "Je", "Ve", "Sa"];
	}
	var n_weekstart = 1; // day week starts from (normally 0 or 1)

	var to_day = new Date();
	var dt_datetime = (str_datetime == null || str_datetime =="" ?  new Date() : str2dt2(str_datetime));
	var dt_prev_month = new Date(dt_datetime);
	dt_prev_month.setMonth(dt_datetime.getMonth()-1);
	if (dt_datetime.getMonth()%12 != (dt_prev_month.getMonth()+1)%12) {
		dt_prev_month.setMonth(dt_datetime.getMonth());
		dt_prev_month.setDate(0);
	}
	var dt_next_month = new Date(dt_datetime);
	dt_next_month.setMonth(dt_datetime.getMonth()+1);
	if ((dt_datetime.getMonth() + 1)%12 != dt_next_month.getMonth()%12)
		dt_next_month.setDate(0);
	
	var dt_next_year = new Date(dt_datetime);
	dt_next_year.setFullYear(dt_datetime.getFullYear()+1);

	var dt_prev_year = new Date(dt_datetime);
	dt_prev_year.setFullYear(dt_datetime.getFullYear()-1);

	
	var dt_firstday = new Date(dt_datetime);
	dt_firstday.setDate(1);
	dt_firstday.setDate(1-(7+dt_firstday.getDay()-n_weekstart)%7);
	var dt_lastday = new Date(dt_next_month);
	dt_lastday.setDate(0);
	
	// html generation (feel free to tune it for your particular application)
	// print calendar header
	var str_buffer = new String (
		"<html>\n"+
		"<head>\n"+
		"	<title>Calendar</title>\n"+
		"</head>\n"+
		"<body bgcolor=\"white\">\n"+
		"<table class=\"clsOTable\" cellspacing=\"0\" border=\"0\" width=\"100%\">\n"+
		"<tr><td bgcolor=\"#db9501\">\n"+
		"<table cellspacing=\"1\" cellpadding=\"3\" border=\"0\" width=\"100%\">\n"+
		"<tr>\n	<td bgcolor=\"#db9501\"><a style=\"color:white; text-decoration:none;\" href=\"javascript:window.opener." + showcalender + "('"+
		str_target+"', '"+ dt2dtstr2(dt_prev_year)+"');\">"+
		"&lt;&lt;</a></td>\n"+
		"<td bgcolor=\"#db9501\"><a style=\"color:white; text-decoration:none;\" href=\"javascript:window.opener." + showcalender + "('"+
		str_target+"', '"+ dt2dtstr2(dt_prev_month)+"');\">"+
		"&lt;</a></td>\n"+
		"	<td bgcolor=\"#db9501\" colspan=\"3\">"+
		"<font color=\"white\" face=\"tahoma, verdana\" size=\"2\">"
		+arr_months[dt_datetime.getMonth()]+" "+dt_datetime.getFullYear()+"</font></td>\n"+
		"	<td bgcolor=\"#db9501\" align=\"right\"><a style=\"color:white; text-decoration:none;\" href=\"javascript:window.opener." + showcalender + "('"
		+str_target+"', '"+dt2dtstr2(dt_next_month)+"');\">"+
		"&gt;</a></td>\n"+
		"<td bgcolor=\"#db9501\"><a style=\"color:white; text-decoration:none;\" href=\"javascript:window.opener." + showcalender + "('"+
		str_target+"', '"+ dt2dtstr2(dt_next_year)+"');\">"+
		"&gt;&gt;</a></td></tr>\n"
	);

	var dt_current_day = new Date(dt_firstday);
	// print weekdays titles
	str_buffer += "<tr>\n";
	for (var n=0; n<7; n++)
		str_buffer += "	<td bgcolor=\"#f9eacd\">"+
		"<font color=\"#550000\" face=\"tahoma, verdana\" size=\"2\">"+
		week_days[(n_weekstart+n)%7]+"</font></td>\n";
	// print calendar table
	str_buffer += "</tr>\n";
	while (dt_current_day.getMonth() == dt_datetime.getMonth() ||
		dt_current_day.getMonth() == dt_firstday.getMonth()) {
		// print row heder
		str_buffer += "<tr>\n";
		for (var n_current_wday=0; n_current_wday<7; n_current_wday++) {
				if (dt_current_day.getDate() == dt_datetime.getDate() &&
					dt_current_day.getMonth() == dt_datetime.getMonth())
					// print current date
					str_buffer += "	<td bgcolor=\"#db950\" align=\"right\">";
				else if (dt_current_day.getDay() == 0 || dt_current_day.getDay() == 6)
					// weekend days
					str_buffer += "	<td bgcolor=\"white\" align=\"right\">";
				else
					// print working days of current month
					str_buffer += "	<td bgcolor=\"white\" align=\"right\">";

				if (dt_current_day.getMonth() == dt_datetime.getMonth()){
					// print days of current month
					if (dt_current_day >= to_day) 
						str_buffer += "<a href=\"javascript:window.opener."+str_target+
						".value='"+dt2dtstr2(dt_current_day)+"'; window.close();\">"+
						"<font color=\"black\" face=\"tahoma, verdana\" size=\"2\">";
					else
						str_buffer += "<font color=\"black\" face=\"tahoma, verdana\" size=\"2\">";
							
				} else { 
					// print days of other months
					if (dt_current_day >= to_day) 
						str_buffer += "<a href=\"javascript:window.opener."+str_target+
						".value='"+dt2dtstr2(dt_current_day)+"'; window.close();\">"+
						"<font color=\"gray\" face=\"tahoma, verdana\" size=\"2\">";
					else
						str_buffer += "<font color=\"gray\" face=\"tahoma, verdana\" size=\"2\">";
				}
				str_buffer += dt_current_day.getDate()+"</font></a></td>\n";
				dt_current_day.setDate(dt_current_day.getDate()+1);
		}
		// print row footer
		str_buffer += "</tr>\n";
	}
	// print calendar footer
	str_buffer +=
		"</table>\n" +
		"</tr>\n</td>\n</table>\n" +
		"</body>\n" +
		"</html>\n";
	return str_buffer
}

function show_calendar_from(str_target, str_datetime, language) {
	var str_buffer = calendar(str_target, str_datetime, language, "show_calendar_from");
	var vWinCal = window.open("", "Calendar From", 
		"width=200,height=250,status=no,resizable=yes, top=300, left=600");
	vWinCal.opener = self;
	vWinCal.focus();
	var calc_doc = vWinCal.document;
	calc_doc.write (str_buffer);
	calc_doc.close();

}
function show_calendar_to(str_target, str_datetime, str_datetime_from, language) {
	var str_buffer ;
	if (str_datetime == null || str_datetime =="" )
		str_buffer = calendar(str_target, str_datetime_from, language, "show_calendar_to");
	else
		str_buffer = calendar(str_target, str_datetime, language, "show_calendar_to");
	var vWinCal = window.open("", "Calendar To", 
		"width=200,height=250,status=no,resizable=yes, top=500, left=600");
	vWinCal.opener = self;
	vWinCal.focus();
	var calc_doc = vWinCal.document;
	calc_doc.write (str_buffer);
	calc_doc.close();

}
// datetime parsing and formatting routimes. modify them if you wish other datetime format
function str2dt2 (str_datetime) {
	var re_date = /^(\d+)\/(\d+)\/(\d+)$/;
	if (!re_date.exec(str_datetime))
		return alert("Invalid Datetime format: "+ str_datetime);
	return (new Date (RegExp.$3, RegExp.$2-1, RegExp.$1));
}
function dt2dtstr2 (dt_datetime) {
	return (new String (
			padDate(dt_datetime.getDate())+"/"+padDate(dt_datetime.getMonth()+1)+"/"+dt_datetime.getFullYear()));
}

function padDate(mintendate)
{
 if(mintendate < 10)
   return "0" + mintendate;
 else
   return mintendate;
}

