/* MarcGrabanski.com */

function popCalendar(e){
	try {
		if (!e.className) e = this;
	} catch(err) {
		e = window.event.srcElement;
	}

	var x = document.getElementById(popUpCal.calendarId);
	popUpCal.selectedMonth = new Date().getMonth();
	popUpCal.selectedYear = new Date().getFullYear();
	insertAfter(x, e);
	x.style.display = 'block';
	popUpCal.drawCalendar(e);
	popUpCal.setupLinks(e);
}

var popUpCal = {
	selectedMonth: new Date().getMonth(),
	selectedYear: new Date().getFullYear(),
	selectedDay: new Date().getDate(),
	calendarId: 'calendarDiv',
	inputClass: 'calSelectDate',

	init: function () {
		var x = getElementsByClass(popUpCal.inputClass, document, 'input');
		for (var i=0; i<x.length; i++) {
			x[i].onfocus = popCalendar;
		}
	},

	drawCalendar: function (inputObj) {
		var html = '';
		html = '<a id="calendarClose">Close</a>'
			+'<table cellpadding="0" cellspacing="0" id="calendarMonth"><tr>'
			+'<td><a id="prevMonth">&lt;&lt;</a></td>'
			+'<td id="thisMonth">'+getMonthName(popUpCal.selectedMonth)+' '+popUpCal.selectedYear+'</td>'
			+'<td><a id="nextMonth">&gt;&gt;</a></td>'
			+'</tr></table>'
			+'<table id="calendar" cellpadding="0" cellspacing="0">'
			+'<tr class="weekDaysTitleRow">';
 		var weekDays = new Array('S','M','T','W','T','F','S');
 		for (var j=0; j<weekDays.length; j++) {
			html += '<td>'+weekDays[j]+'</td>';
		}

		var daysInMonth = getDaysInMonth(popUpCal.selectedYear, popUpCal.selectedMonth);
		var startDay = getFirstDayofMonth(popUpCal.selectedYear, popUpCal.selectedMonth);
		var numRows = 0;
		var printDate = 1;
		if (startDay != 7) {
			numRows = Math.ceil(((startDay+1)+(daysInMonth))/7); // calculate the number of rows to generate
		}

		// calculate number of days before calendar starts
		if (startDay != 7) {
			var noPrintDays = startDay + 1; 
		} else {
			var noPrintDays = 0; // if sunday print right away	
		}
		var today = new Date().getDate();
		var thisMonth = new Date().getMonth();
		var thisYear = new Date().getFullYear();

		// create calendar rows
		for (var e=0; e<numRows; e++) {
			html += '</tr><tr class="weekDaysRow">';
 			// create calendar days
			for (var f=0; f<7; f++) {
				if ( (printDate == today) 
					 && (popUpCal.selectedYear == thisYear) 
					 && (popUpCal.selectedMonth == thisMonth) 
					 && (noPrintDays == 0)) {
					html += '<td id="today" class="weekDaysCell">';
				} else {
					html += '<td class="weekDaysCell">';
				}
				if (noPrintDays == 0) {
					if (printDate <= daysInMonth) {
						html += '<a>'+printDate+'</a>';
					}
					printDate++;
				}
				html += '</td>';
				if(noPrintDays > 0) noPrintDays--;
			}
			html += '</tr>';
		}
		html += '</table>';

		// add calendar to element to calendar Div
		var calendarDiv = document.getElementById(popUpCal.calendarId);
		calendarDiv.innerHTML = html;

		// close button link
		document.getElementById('calendarClose').onclick = function () {
			calendarDiv.style.display = 'none';
		}

		// setup next and previous links
		document.getElementById('prevMonth').onclick = function () {
			popUpCal.selectedMonth--;
			if (popUpCal.selectedMonth < 0) {
				popUpCal.selectedMonth = 11;
				popUpCal.selectedYear--;
			}
			popUpCal.drawCalendar(inputObj);
			popUpCal.setupLinks(inputObj);
		}
		document.getElementById('nextMonth').onclick = function () {
			popUpCal.selectedMonth++;
			if (popUpCal.selectedMonth > 11) {
				popUpCal.selectedMonth = 0;
				popUpCal.selectedYear++;
			}
			popUpCal.drawCalendar(inputObj); 
			popUpCal.setupLinks(inputObj);
		}
	},

	setupLinks: function (inputObj) {
		// set up link events on calendar table
		var y = document.getElementById('calendar');
		var x = y.getElementsByTagName('a');
		for (var i=0; i<x.length; i++) {
			x[i].onmouseover = function () {
				this.parentNode.className = 'weekDaysCellOver';
			}
			x[i].onmouseout = function () {
				this.parentNode.className = 'weekDaysCell';
			}
			x[i].onclick = function () {
				document.getElementById(popUpCal.calendarId).style.display = 'none';
				popUpCal.selectedDay = this.innerHTML;
				inputObj.value = formatDate(popUpCal.selectedDay, popUpCal.selectedMonth, popUpCal.selectedYear);		
			}
		}
	}
}
// Add calendar event
if ( typeof window.addEventListener != "undefined" )
	window.addEventListener( "load", popUpCal.init, false );
else if ( typeof window.attachEvent != "undefined" )
	window.attachEvent( "onload", popUpCal.init );
else {
	if ( window.onload != null ) {
		var oldOnload = window.onload;
		window.onload = function ( e ) {
			oldOnload( e );
			popUpCal.init();
		};
	}
	else 
		window.onload = popUpCal.init;
}

/* Functions Dealing with Dates */

function formatDate(Day, Month, Year) {
	Month++; // adjust javascript month
	if (Month <10) Month = '0'+Month; // add a zero if less than 10
	if (Day < 10) Day = '0'+Day; // add a zero if less than 10
	Year += "";
	var dateString = Year+'-'+Month+'-'+Day;
	return dateString;
}

function getMonthName(month) {
	var monthNames = new Array('January','February','March','April','May','June','July','August','September','October','November','December');
	return monthNames[month];
}

function getDaysInMonth(year, month) {
	return 32 - new Date(year, month, 32).getDate();
}

function getFirstDayofMonth(year, month) {
	var day;
	day = new Date(year, month, 0).getDay();
	return day;
}

/* Common Scripts */

function getElementsByClass(searchClass,node,tag) {
	var classElements = new Array();
	if ( node == null ) node = document;
	if ( tag == null ) tag = '*';
	var els = node.getElementsByTagName(tag);
	var elsLen = els.length;
	var pattern = new RegExp("(^|\\s)"+searchClass+"(\\s|$)");
	for (i = 0, j = 0; i < elsLen; i++) {
		if ( pattern.test(els[i].className) ) {
			classElements[j] = els[i];
			j++;
		}
	}
	return classElements;
}

function insertAfter(newChild, refChild) {
	var n = refChild;
	do n = n.nextSibling;
	while (n && n.nodeType != 1);
	n.appendChild(newChild);
}