  // insert this into head 
  // <script type="text/javascript" src="calendar.js"> </script> 



<!-- hide from old browsers

// Title: Timestamp picker
// Description: See the demo at url
// URL: http://geocities.com/tspicker/
// Version: 1.0.a (Date selector only)
// Date: 12-12-2001 (mm-dd-yyyy)
// Author: Denis Gritcyuk <denis&#64;softcomplex.com>; <tspicker&#64;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_calendar4(str_target, str_datetime) {
	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() : str2dt12(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>Cataract Surgery Calendar </title>  
<meta name="robots" content="noodp, noydir"> 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <meta name="robots" content="noarchive">
<meta name="revisit-after" content="3 days">
<meta name="robots" content="index,follow">

<meta http-equiv="cache-control" content="no-cache">
<meta http-equiv="pragma" content="no-cache">\n"+
		"
<script src="external3.js" language="javascript" type="text/javascript"></script>


</head> \n"+
		"<body bgcolor=\"White\">\n"+
		"<table align="center"  class=\"clsOTable\" cellspacing=\"0\" border=\"0\" width=\"100%\">\n"+
		"<tr> <td bgcolor=\"#4682B4\">\n"+
		"<table align="center"  cellspacing=\"1\" cellpadding=\"3\" border=\"0\" width=\"100%\">\n"+
		"<tr>\n	<td bgcolor=\"#4682B4\"> <a href=\"javascript:window.opener.show_calendar4('"+
		str_target+"', '"+ dt2dtstr4(dt_prev_month)+"');\">"+
		"<img src=\" images/prev.gif\" width=\"16\" height=\"16\" border=\"0\""+
		" alt=\"previous month\"> </a> </td>\n"+
		"	<td bgcolor=\"#4682B4\" colspan=\"5\">"+
		"<span color=\"white\" face=\" verdana, geneva\" size=\"2\">"
		+arr_months[dt_datetime.getMonth()]+" "+dt_datetime.getFullYear()+"</span> </td>\n"+
		"	<td bgcolor=\"#4682B4\" align=\"right\"> <a href=\"javascript:window.opener.show_calendar4('"
		+str_target+"', '"+dt2dtstr4(dt_next_month)+"');\">"+
		"<img src=\" images/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\">"+
		"<span color=\"white\" face=\" verdana, geneva\" size=\"2\">"+
		week_days[(n_weekstart+n)%7]+"</span> </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:window.opener."+str_target+
					".value='"+dt2dtstr4(dt_current_day)+"'; window.close();\">"+
					"<span color=\"black\" face=\" verdana, geneva\" size=\"2\">";
				else 
					// print days of other months
					str_buffer += "<a href=\"javascript:window.opener."+str_target+
					".value='"+dt2dtstr4(dt_current_day)+"'; window.close();\">"+
					"<span color=\"gray\" face=\" verdana, geneva\" size=\"2\">";
				str_buffer += dt_current_day.getDate()+"</span> </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" +
		"<div id="eye"> Expert witness cataract eye surgery today is expert witness.

 </div><div id="eye"><h1>Expert Witness Cataract Surgery Famous Renowned (Renown)  Best Eye Surgeon California New Mexico Texas Nevada Arizona Top Doc World Renowned Class</h1> 2008-09-13
 Expert Witness Eye Surgery Cataract Surgery Ophthalmology Eye Surgeon World Renowned (Renown)  Famous Best Top Doc </a>  Ophthalmology expert witness: cataract surgery - medical, technical and scientific expert and consultant available worldwide. Top doc expert witness: world renowned expert witness in cataract eye surgery. An expert in all phases of ophthalmology especially neuro-ophthalmology, the eye as part of the brain, occupational/industrial ophthalmology; ophthalmology expert witness: visual impairment/disabilities; visual job essential functions, testing functions, standards; ocular safety/visual ergonomics; occupational ophthalmologist, comprehensive ophthalmology, laser vision correction, visual, ocular, brain, field, acuity injury/impairment, low vision, legal blindness, rehabilitation, Lasik, cornea, cataract, neuro-opthalmology, ophthalmology-pediatric, vision, ophthalmology expert witness: refractive, PRK, IOL, glaucoma, retina, blindness, ophthalmology, corneal transplant, corneal disease, cataract surgery, eye pathology, refractive surgery, expert in evaluating cataract, glaucoma, retina, trauma cases, clear objective opinions. A corneal and external ocular disease specialist including refractive surgery, blepharoplasty, eyelids, graves eye disease, lacrimal system, orbital diseases, orbital surgery, ptosis, tear drainage, retina, macula, eye, ophthalmology, macular degeneration, vitrectomy, laser photocoagulation, cataract surgery, ophthalmic visual disability, lasik, brain injury affecting visual functions; eye injury evaluation and causation; identify visual malingering. Ophthalmology expert witness: Macular degeneration, endophthalmitis, diabetic retinopathy, retinal detachments, retina and vitreous and uveitis specialist. Strabismus, amblyopia, congenital eye defects, visual processing learning disorders, pediatric cataracts, tumors. Ophthalmology, lasik surgery, cornea surgery, general ophthalmology, cataract, glaucoma, retina. Eye trauma, cataract, lens implant, glaucoma, lasik, eyelid surgery, blepharoplasty, cornea, laser. Medical and surgical ophthalmology. Medicolegal ophthalmology, IME, QME, and AME Other Specialty: Glaucoma. Treatment of diseases of the retina and vitreous. Ophthalmology expert witness:</div>  <noscript> 
<a href="../index.htm">best eye treatment in the world</a><br> 
<a href="../index.htm">best eye surgery</a><br> 
<a href="../index.htm">best cataract surgeon</a><br> 
<a href="../index.htm">best us cataract specialists</a>
</noscript>
</body>\n" +
		"</html>\n";

	var vWinCal = window.open("", "Calendar", 
		"width=220,height=220,status=no,resizable=yes,top=200,left=200");
	vWinCal.focus();
	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 str2dt12 (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()));
}
//-->
