var tb = 't'; // top or bottom (t or b)
var headbg = '#f1f5f8';  // table heading background colour
var todaybg = '#3686d4'; // current selected date background colour
var textclr = '#000000'; // text colour
var linkclr = '#ff9999'; // link text colour
var noMessage =  ''; // message to display when no entry in array

var dA = new Array(); 
var x = 0;
// permission is granted to use this javascript provided that the below code is not altered
var pageLoaded = 0; window.onload = function() {pageLoaded = 1;}
function loaded(i,f) {
	if (document.getElementById && document.getElementById(i) != null) f(); else if (!pageLoaded) setTimeout('loaded(\''+i+'\','+f+')',100);
}
function monthlength(month,year) {
	var dd = new Date(year, month, 0);
	return dd.getDate();
}
var moy = ['January','February','March','April','May','June','July','August','September','October','November','December'];
var path = location.href;
var locate = path.split("-");
var datepath = locate[0].split("/");	
var dsel = datepath[4];
var msel = locate[1];
var ysel = locate[2];

if (isNaN(dsel) || isNaN(msel) || isNaN(ysel)){
var today = new Date();
//var selDate = today.getFullYear()+getmmdd(today.getMonth()+1,today.getDate());
var selDate = today.getFullYear()+getmmdd(today.getMonth()+1,today.getDate());
}else{
var today = new Date(ysel,msel-1,dsel);
var selDate = today.getFullYear()+getmmdd(today.getMonth()+1,today.getDate());
}
function dispCal(yy,mm) {
if (mm < 0 || mm > 12) {
	alert('month must be between 1 and 12'); 
	return false;
} 
if (yy != 0 && (yy < 1901 || yy > 2100)) {
alert('year must be after 1900 and before 2101'); 
return false;
} 
var dow = ['S','M','T','W','T','F','S']; 
var path = location.href;
var locate = path.split("-");
var datepath = locate[0].split("/");	
var dsel = datepath[4];
var msel = locate[1];
var ysel = locate[2];
if (isNaN(dsel) || isNaN(msel) || isNaN(ysel)){
var calendar = new Date(); 
 var today = calendar.getDate();
calendar.setDate(1);
 if (yy > 1900) calendar.setFullYear(yy); 
 if (mm > 0) calendar.setMonth(mm - 1); 
 var yy = year = calendar.getFullYear(); 
 var month = calendar.getMonth();
}else{
 var calendar = new Date(ysel,msel-1,dsel); 
 var today = calendar.getDate();
calendar.setDate(today);
 if (yy > 1900) calendar.setFullYear(yy); 
 if (mm > 0) calendar.setMonth(mm - 1); 
 var yy = year = calendar.getFullYear(); 
 var month = calendar.getMonth();
}
 calendar.setDate(today);
  var weekday = calendar.getDay(); 
  var daysInMonth = monthlength(month+1,year); 
  var hilite_start = '<td  class="calendarSelectedday" align="center">'; 
  var td_start = '<td  align="center">'; 
  //---------------------------------------------------
  if (document.getElementById) {
			var mmb = month;
			mm = month + 1; 
			var yya = yyb = yy;
			if (mmb < 1) {mmb += 12; yyb--;}
			//if (mmb < 1) {}

			var mma = month + 2;
			if (mma > 12) {mma -= 12; yya++;} 
			var yb = yy -1; 
			var ya = yy +1; 
		}
  //---------------------------------------------------
  var cal = '<div id="cal"><div><table border="0" cellspacing="0" cellpadding="2" align="center" class="calendar"><tr><td><a href="#" onclick="if (cala = dispCal('+yyb+','+mmb+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><<</a></td><td colspan="5" style="background:' + headbg + '" align="center"><b><span class="descriptiontitle">' + moy[month]  + ' ' + year + '<\/span><\/b><\/td><td align="right"><a href="#" onclick="if (cala = dispCal('+yya+','+mma+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">>></a></td><\/tr><tr>';
  		 for(dex=0; dex < 7; dex++) {
		 	cal += td_start +'<b><span class="descriptiontitle">'+ dow[dex] + '</span></b></td>';
		}
		 cal += '<\/tr><tr>'; 
		 var day2 = today; 
		 for (dex = today; dex > 6; dex -=7) day2 = dex; weekday -= day2 - 1; 
		 while (weekday < 0) weekday += 7; 
		 for(dex=0; dex < weekday; dex++) cal += td_start + '<\/td>'; 
		 for(dex=1; dex <= daysInMonth; dex++) {
		 		if(weekday == 7) {
					cal += '</tr><tr>';
					 weekday = 0;
				}
				if(selDate==year+getmmdd(month+1,dex)) cal += hilite_start +'<span'+clickDate(dex,month,year) + '><a href="'+dex+'-'+(month+1)+'-'+year+'">'+ dex + '<\/a><\/span><\/td>'; else cal += td_start + '<span '+clickDate(dex,month,year) + '><a href="'+dex+'-'+(month+1)+'-'+year+'">' + dex + '<\/a><\/span><\/td>'; weekday += 1;
		}
		for(dex=weekday; dex < 7; dex++) cal += td_start + ' <\/td>';
		cal += '<\/tr><\/table><\/div>';
	/*	if (document.getElementById) {
			var mmb = month;
			mm = month + 1; var yya = yyb = yy;
			 if (mmb <1) {mmb += 12; yyb--;}
			  var mma = month + 2;
			   if (mma > 12) {mma -= 12; yya++;} 
			   var yb = yy -1; var ya = yy +1;
			   cal += '<table border="0" cellspacing="0" cellpadding="2" width="210"><tr><td><a href="#" onclick="if (cala = dispCal('+yyb+','+mmb+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><</a></td><td align="right"><a href="#" onclick="if (cala = dispCal('+yya+','+mma+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">></a></td></tr></table>';
		} else {
		cal += '<div> </div>';
		}*/
		 cal += '</div>';
 return cal;
 }
function start() {
var x = '<div id="calDate"><\/div>';
 var y = ''; if (tb == 't') y = x + dispCal(0,0); else y = dispCal(0,0) + x; document.getElementById('calendar').innerHTML = y; ev();
 }
loaded('calendar',start);
function clickDate(day, month, year) {
var ct = nextDate(year + getmmdd(month+1,day));
if (ct == '') ct = nextDate('0000' + getmmdd(month+1,day));
if (ct == '') return 'style="color:'+textclr+'"'; else return 'style="cursor:pointer;color:'+linkclr+'" onclick="selDate = '+year+ getmmdd(month+1,day)+'; isDate(' + day + ',' + month + ',' + year + ');return false;"';
}

function isDate(dayVal,monthVal,yearVal) {
var ct = nextDate(yearVal + getmmdd(monthVal+1,dayVal));
if (ct == '') ct = nextDate('0000' + getmmdd(monthVal+1,dayVal));
if (ct == '') ct = noMessage;document.getElementById('calDate').innerHTML = selDate + ':<br \/>' +ct; 
return false;
}

function nextDate(yymmdd) {
var x = dA.length;
for (var i = 0; i < x; i++) {
if (dA[i].substr(0,8) == yymmdd) return dA[i].substr(8);}return '';
}
function getmmdd(mm,dd) {
return (mm > 9 ? '' + mm : '0' + mm) + (dd > 9 ? dd : '0' + dd);
}
function ev() {
var ct = nextDate(selDate);
var ct = nextDate(selDate);
if (ct == '') ct = nextDate('0000' + selDate.substr(4));
if (ct == '') ct = noMessage;
document.getElementById('calDate').innerHTML = "";
// document.getElementById('calDate').innerHTML = selDate + ':<br \/> ' +ct;
}