// Title: Timestamp picker
// Description: See the demo at url
// URL: http://www.geocities.com/tspicker/
// Version: 1.0.a (Date selector only)
// Date: 12-12-2001 (mm-dd-yyyy)
// Author: Denis Gritcyuk <denis@softcomplex.com>; <tspicker@yahoo.com>
// Notes: Permission given to use this script in any kind of applications if
//    header lines are left unchanged. Feel free to contact the author
//    for feature requests and/or donations
//
// -------------------------------------------------------------------
// UPDATED FOR DYNAMIC USE BY JOSH TREFETHEN - josh@exciteworks.com 


function show_calendar(FormDayName,FormMonthName,FormYearName, str_datetime, str_path) {
	
	var arr_months = ["January", "February", "March", "April", "May", "June",
		"July", "August", "September", "October", "November", "December"];
	var week_days = ["Su", "Mo", "Tu", "We", "Th", "Fr", "Sa"];
	var n_weekstart = 1; // day week starts from (normally 0 or 1)
	var dt_datetime = (str_datetime == null || str_datetime =="" ?  new Date() : str2dt4(str_datetime));
	var dt_prev_month = new Date(dt_datetime);
	dt_prev_month.setMonth(dt_datetime.getMonth()-1);
	var dt_next_month = new Date(dt_datetime);
	dt_next_month.setMonth(dt_datetime.getMonth()+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"+
		"<script src='javascript/popDateTime/popDateTimeHelper.js'></script>\n"+
		"<script>\n"+
		"function setOpenerDate(str_newDate) {\n"+
		"	var dt_newDate = (str_newDate == null || str_newDate =='' ?  new Date() : str2dt4(str_newDate));\n"+
		"	var newDay=dt_newDate.getDate();\n"+
		"	var newMonth=dt_newDate.getMonth();\n"+
		"	var newYear=dt_newDate.getFullYear();\n"+		
		"	for (var i=0;i<eval('window.opener.document.all."+FormDayName+".options.length');i++) {\n"+
		"		if (eval('window.opener.document.all."+FormDayName+".options['+i+'].value') == newDay) {\n"+
		"			eval('window.opener.document.all."+FormDayName+".options['+i+'].selected=true');\n"+
		"		}\n"+
		"	}\n"+
		"	for (var i=0;i<eval('window.opener.document.all."+FormMonthName+".options.length');i++) {\n"+
		"		if (eval('window.opener.document.all."+FormMonthName+".options['+i+'].value') == (newMonth+1)) {\n"+
		"			eval('window.opener.document.all."+FormMonthName+".options['+i+'].selected=true');\n"+
		"		}\n"+
		"	}\n"+
		"	for (var i=0;i<eval('window.opener.document.all."+FormYearName+".options.length');i++) {\n"+
		"		if (eval('window.opener.document.all."+FormYearName+".options['+i+'].value') == newYear) {\n"+
		"			eval('window.opener.document.all."+FormYearName+".options['+i+'].selected=true');\n"+
		"		}\n"+
		"	}\n"+
		"}\n"+
		"</script>"+
		"</head>\n"+
		"<body bgcolor=\"White\">\n"+
		"<table class=\"clsOTable\" cellspacing=\"0\" border=\"0\" width=\"100%\">\n"+
		"<tr><td bgcolor=\"#4682B4\">\n"+
		"<table cellspacing=\"1\" cellpadding=\"3\" border=\"0\" width=\"100%\">\n"+
		"<tr>\n<td bgcolor=\"#4682B4\"><a href=\"javascript:window.opener.show_calendar('"+FormDayName+"','"+FormMonthName+"','"+FormYearName+"','"+dt2dtstr4(dt_prev_month)+"','"+str_path+"');\">"+
		"<img src=\""+str_path+"prev.gif\" width=\"16\" height=\"16\" border=\"0\""+
		" alt=\"previous month\"></a></td>\n"+
		"	<td bgcolor=\"#4682B4\" colspan=\"5\">"+
		"<font color=\"white\" face=\"tahoma, verdana\" size=\"2\">"
		+arr_months[dt_datetime.getMonth()]+" "+dt_datetime.getFullYear()+"</font></td>\n"+
		"	<td bgcolor=\"#4682B4\" align=\"right\"><a href=\"javascript:window.opener.show_calendar('"+FormDayName+"','"+FormMonthName+"','"+FormYearName+ "','"+dt2dtstr4(dt_next_month)+"','"+str_path+"');\">"+
		"<img src=\""+str_path+"next.gif\" width=\"16\" height=\"16\" border=\"0\""+
		" alt=\"next month\"></a></td>\n</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=\"#87CEFA\">"+
		"<font color=\"white\" 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=\"#FFB6C1\" align=\"right\">";
			else if (dt_current_day.getDay() == 0 || dt_current_day.getDay() == 6)
				// weekend days
				str_buffer += "	<td bgcolor=\"#DBEAF5\" 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
				str_buffer += "<a href=\"javascript:setOpenerDate('"+dt2dtstr4(dt_current_day)+"'); window.close();\">"+
				"<font color=\"black\" face=\"tahoma, verdana\" size=\"2\">";
			else 
				// print days of other months
				str_buffer += "<a href=\"javascript:setOpenerDate('"+dt2dtstr4(dt_current_day)+"'); window.close();\">"+
				"<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";

	var vWinCal = window.open("", "Calendar", 
		"width=200,height=250,status=yes,resizable=yes,top=200,left=200");
	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
// modifed by ohf and tps
function str2dt4 (str_datetime) {
	var re_date = /^(\d+)\/(\d+)\/(\d+)$/;
	if (!re_date.exec(str_datetime))
		return alert("Invalid Datetime format: "+ str_datetime);
	var theyear=RegExp.$3;
	//alert(theyear);
	if (!(theyear.length == 4)) 
		theyear="20" + theyear;
	return (new Date (theyear, RegExp.$2-1,RegExp.$1)); // modifed for eur format (ie 05/02/03 is Feb 5, 2003)
}
function dt2dtstr4 (dt_datetime) {
	return (new String (
			dt_datetime.getDate()+"/"+(dt_datetime.getMonth()+1)+"/"+dt_datetime.getFullYear()));
}
