// Title: Timestamp picker
// Description: See the demo at url
// URL: http://us.geocities.com/tspicker/
// Script featured on: http://javascriptkit.com/script/script2/timestamp.shtml
// Version: 1.0
// Date: 12-05-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

function show_calendar(str_target, str_datetime) {
	var arr_months = ["January", "February", "March", "Apri", "May", "June",
		"July", "August", "September", "October", "November", "December"];
	var week_days = ["Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"];
	var n_weekstart = 0; // day week starts from (normally 0 or 1)

	var dt_datetime = (str_datetime == null || str_datetime =="" || str_datetime.toLowerCase() == "mm/dd/yyyy" ?  new Date() : str2dt(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_prev_year = new Date(dt_datetime);
	dt_prev_year.setMonth(dt_datetime.getMonth()-12);
	var dt_next_year = new Date(dt_datetime);
	dt_next_year.setMonth(dt_datetime.getMonth()+12);
	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 (
		"<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">\n"+
		"<html xmlns=\"http://www.w3.org/1999/xhtml\">\n"+
		"<head>\n"+
		"<title>Calendar</title>\n"+
		"<style type=\"text/css\">\n"+
		"<!--\n"+
		"body {\n"+
		"	background-color: #FFFFFF;\n"+
		"}\n"+
		"p {\n"+
		"	color: #009900;\n"+
		"	font-family: Verdana, Arial, Helvetica, sans-serif;\n"+
		"	font-size: 10px;\n"+
		"	font-weight: bold;\n"+
		"	text-align: center;\n"+
		"}\n"+
		"p a {\n"+
		"	color: #009900;\n"+
		"}\n"+
		".calBorde {\n"+
		"	background-color: #000000;\n"+
		"}\n"+
		".calMes{\n"+
		"	color: #FFFFFF;\n"+
		"	font-family: Verdana, Arial, Helvetica, sans-serif;\n"+
		"	font-size: 10px;\n"+
		"	font-weight: bold;\n"+
		"}\n"+
		".calDia {\n"+
		"	background-color: #006600;\n"+
		"	color: #FFFFFF;\n"+
		"	font-family: Verdana, Arial, Helvetica, sans-serif;\n"+
		"	font-size: 10px;\n"+
		"	font-weight: bold;\n"+
		"	text-align: center;\n"+
		"}\n"+
		".calDiaFin {\n"+
		"	background-color: #DAE1DC;\n"+
		"	color:  #1F4391;\n"+
		"	font-family: Verdana, Arial, Helvetica, sans-serif;\n"+
		"	font-size: 10px;\n"+
		"	text-align: right;\n"+
		"}\n"+
		".calDiaFin a {\n"+
		"	color: #000000;\n"+
		"}\n"+
		".calDiaSem {\n"+
		"	background-color: #FFFFFF;\n"+
		"	color:  #1F4391;\n"+
		"	font-family: Verdana, Arial, Helvetica, sans-serif;\n"+
		"	font-size: 10px;\n"+
		"	text-align: right;\n"+
		"}\n"+
		".calDiaSem a {\n"+
		"	color: #009900;\n"+
		"}\n"+
		".calDiaAct {\n"+
		"	background-color: #009900;\n"+
		"	color: #FFFFFF;\n"+
		"	font-family: Verdana, Arial, Helvetica, sans-serif;\n"+
		"	font-size: 10px;\n"+
		"	text-align: right;\n"+
		"}\n"+
		".calDiaAct a {\n"+
		"	color: #FFFFFF;\n"+
		"}\n"+
		".calDiaOtro {\n"+
		"	background-color: #999999;\n"+
		"	color: #FFFFFF;\n"+
		"	font-family: Verdana, Arial, Helvetica, sans-serif;\n"+
		"	font-size: 10px;\n"+
		"	text-align: right;\n"+
		"}\n"+
		".calDiaOtro a {\n"+
		"	color: #FFFFFF;\n"+
		"}\n"+
		"-->\n"+
		"</style>\n"+
		"</head>\n"+
		"<body>\n"+
		"<table cellspacing=\"0\" border=\"0\" width=\"100%\">\n"+
		"  <tr>\n"+
		"    <td class=\"calBorde\"><table cellspacing=\"1\" cellpadding=\"3\" border=\"0\" width=\"100%\">\n"+
		"        <tr class=\"calMes\">\n"+
		"          <td width=\"14%\" align=\"right\"><a href=\"javascript:window.opener.show_calendar('"+str_target+"', '"+dt2dtstr(dt_prev_year)+"');\"><img src=\"images/anio_ant.gif\" width=\"16\" height=\"16\" border=\"0\" alt=\"\"></a></td>\n"+
		"          <td width=\"14%\" align=\"right\"><a href=\"javascript:window.opener.show_calendar('"+str_target+"', '"+ dt2dtstr(dt_prev_month)+"');\"><img src=\"images/mes_ant.gif\" width=\"16\" height=\"16\" border=\"0\" alt=\"\"></a></td>\n"+
		"          <td colspan=\"3\" align=\"center\">"+arr_months[dt_datetime.getMonth()]+"<br />"+dt_datetime.getFullYear()+"</td>\n"+
		"          <td width=\"14%\"><a href=\"javascript:window.opener.show_calendar('"+str_target+"', '"+dt2dtstr(dt_next_month)+"');\"><img src=\"images/mes_sig.gif\" width=\"16\" height=\"16\" border=\"0\" alt=\"\"></a></td>\n"+
		"          <td width=\"14%\"><a href=\"javascript:window.opener.show_calendar('"+str_target+"', '"+dt2dtstr(dt_next_year)+"');\"><img src=\"images/anio_sig.gif\" width=\"16\" height=\"16\" border=\"0\" alt=\"\"></a></td>\n"+
		"        </tr>\n"
	);

	var dt_current_day = new Date(dt_firstday);
	// print weekdays titles
	str_buffer += "        <tr class=\"calDia\">\n";
	for (var n=0; n<7; n++)
		str_buffer += "          <td>"+week_days[(n_weekstart+n)%7]+"</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 class=\"calDiaAct\">";
				else if (dt_current_day.getMonth() != dt_datetime.getMonth())
					// weekend days
					str_buffer += "          <td class=\"calDiaOtro\">";
				else if (dt_current_day.getDay() == 0 || dt_current_day.getDay() == 6)
					// weekend days
					str_buffer += "          <td class=\"calDiaFin\">";
				else
					// print working days of current month
					str_buffer += "          <td class=\"calDiaSem\">";

				str_buffer += "<a href=\"javascript:window.opener."+str_target+".value='"+dt2dtstr(dt_current_day)+"'; window.close();\">"+dt_current_day.getDate()+"</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></td>\n"+
					"  </tr>\n"+
					"</table>\n"+
					"<p><a href=\"javascript:window.close();\">Close Window</a></p>\n"+
					"</body>\n"+
					"</html>\n";

	var vWinCal = window.open("", "Calendar", 
		"width=230,height=210,status=no,resizable=yes,top=200,left=200");
	vWinCal.opener = self;
	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 str2dt (str_datetime) {
	var re_date = /^(\d+)\/(\d+)\/(\d+)$/;
	if (!re_date.exec(str_datetime))
		return alert("Invalid date format [mm/dd/aaaa] "+ str_datetime);
	return (new Date (RegExp.$3, RegExp.$1-1, RegExp.$2, RegExp.$4, RegExp.$5, RegExp.$6));
}

function dt2dtstr (dt_datetime) {
	var tmp = 0;
	var fecha = "";

	tmp = dt_datetime.getMonth() + 1;
	if (tmp < 10)
		fecha = "0";
	fecha += tmp + "/";

	tmp = dt_datetime.getDate();
	if (tmp < 10)
		fecha += "0";
	fecha += tmp + "/" + dt_datetime.getFullYear();
	return (fecha);
}

function dt2tmstr (dt_datetime) {
	return (new String (
			dt_datetime.getHours()+":"+dt_datetime.getMinutes()+":"+dt_datetime.getSeconds()));
}


