function show_calendar(str_ptr, str_mm, str_dd, str_yy) {
	var arr_months = ["January", "February", "March", "April", "May", "June",
		"July", "August", "September", "October", "November", "December"];
	var week_days = ["Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"];
	var n_weekstart = 1; // day week starts from (normally 0 or 1)
	
	var tempDate = str_mm + "/" + str_dd + "/" + str_yy;
	var dt_datetime = (str_dd == null || str_dd =="" ?  str2dt4(str_mm) : str2dt4(tempDate));
	
	var currentDate = new Date();
	var currentMonth = currentDate.getMonth()+1;
	var currentDay = currentDate.getDate();
	var currentYear = currentDate.getFullYear();
	var inMonth = dt_datetime.getMonth()+1;
	var inDay = dt_datetime.getDate();
	var inYear = dt_datetime.getFullYear();

	var nextFlag = 1; var prevFlag = 1;
	
	var daysEl = daysElapsed(currentDay,currentMonth,currentYear,inDay,inMonth,inYear);

	// See if the date coming in has already passed us by
	// If so, switch the year of the month being displayed
	if (daysEl < 0)
	{
		dt_datetime.setYear(inYear+1);
		inYear = dt_datetime.getFullYear();
	} 
	
	// If this month is showing, don't allow user to view previous month
	if ((currentMonth == inMonth) && (currentYear == inYear))
	{
		prevFlag = 0;
	}
	
	// If the next month will be the same month of the following year,
	// (i.e., next month is Jan 2003 and current month is Jan 2002)
	// don't allow user to view next month
	if ((inMonth+1 == currentMonth) && (inYear-1 == currentYear))
	{
		nextFlag = 0;
	}

	//var dt_datetime = (str_month == null || str_month =="" ?  new Date() : str2dt4(str_month+"/1/2002"));
	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_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
	//alert(dt_prev_month);
	var str_buffer = new String (
		"<html>\n"+
		"<head>\n"+
		"	<title>Calendar</title>\n"+
		"<script language=\"JavaScript\" src=\"js/SetDate.js\"></script>\n"+
		"</head>\n"+
		"<body bgcolor=\"White\">\n"+
		"<table class=\"clsOTable\" cellspacing=\"0\" border=\"0\" width=\"100%\">\n"+
		"<tr><td bgcolor=\"#000088\">\n"+
		"<table cellspacing=\"1\" cellpadding=\"3\" border=\"0\" width=\"100%\">\n"+
		"<tr>\n	<td bgcolor=\"#000088\">");
		
		if (prevFlag == 1)
		{
			str_buffer += "<a href=\"javascript:window.opener.show_calendar('"+
			str_ptr+"', '"+ dt2dtstr4(dt_prev_month)+"','','');\" title='Previous Month' style='color:#ffffff'>"+
			"<<</a>";
		}
		else
		{
			str_buffer += "&nbsp;";
		}
		
		str_buffer += "</td>\n"+
		"	<td align=\"center\" bgcolor=\"#000088\" colspan=\"5\">"+
		"<font color=\"white\" face=\"arial\" size=\"2\">"
		+arr_months[dt_datetime.getMonth()]+" "+dt_datetime.getFullYear()+"</font></td>\n"+
		"	<td bgcolor=\"#000088\" align=\"right\">";
		
		if (nextFlag == 1)
		{
			str_buffer += "<a href=\"javascript:window.opener.show_calendar('"
			+str_ptr+"', '"+dt2dtstr4(dt_next_month)+"','','');\" title='Next Month' style='color:#ffffff'>"+
			">></a>";
		}
		else
		{
			str_buffer += "&nbsp;";
		}
		
		str_buffer += "</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=\"#COCOCO\">"+
		"<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\">";
					//str_buffer += "	<td bgcolor=\"white\" align=\"right\">";
				if (dt_current_day.getDay() == 0 || dt_current_day.getDay() == 6)
					// weekend days
					str_buffer += "	<td bgcolor=\"#C3D5FE\" align=\"right\">";
				else
					// print working days of current month
					str_buffer += "	<td bgcolor=\"#EFF1FD\" align=\"right\">";

				if (dt_current_day.getMonth() == dt_datetime.getMonth())
					// print days of current month
					
					str_buffer += "<a href=\"javascript:SetDate('"+str_ptr+"', '"+dt2dtstr4(dt_current_day)+"'); window.close();\">"+
					//str_buffer += "<a href=\"javascript:window.opener."+str_target+
					//".value='"+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:SetDate('"+str_ptr+"', '"+dt2dtstr4(dt_current_day)+"'); window.close();\">"+
					//str_buffer += "<a href=\"javascript:window.opener."+str_target+
					//".value='"+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 Vars;
	if (str_ptr == "document.book.dep")
	{
		Vars = "width=240,height=210,status=no,resizable=yes,top=225,left=200";
	}
	else
	{
		Vars = "width=240,height=210,status=no,resizable=yes,top=293,left=200";
	}

	var vWinCal = window.open("", "Calendar", Vars);
	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 str2dt4 (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.$1-1, RegExp.$2));
}
function dt2dtstr4 (dt_datetime) {
	return (new String (
			(dt_datetime.getMonth()+1)+"/"+dt_datetime.getDate()+"/"+dt_datetime.getFullYear()));
}


