function Calendar(oControl, sBase) {

	if (oControl != null) {
		sBase = oControl.id.split('_')[0];
	}

	this.Base = sBase;
	this.MonthYearDropDown = document.getElementById(sBase + '_MonthYear');
	this.DayDropDown = document.getElementById(sBase + '_Day');
	this.Mask = document.getElementById(sBase + '_Mask');
	this.Calendar = document.getElementById(sBase + '_Calendar');
	this.Year = this.MonthYearDropDown.options[this.MonthYearDropDown.selectedIndex].value.split('_')[1];
	this.Month = this.MonthYearDropDown.options[this.MonthYearDropDown.selectedIndex].value.split('_')[0];
	this.Day = this.DayDropDown.options[this.DayDropDown.selectedIndex].value;
	this.CurrentDate = d.New(this.Day, this.Month, this.Year);

	this.Visible = iif(this.Calendar.style.display == 'none', false, true);

	//set date
	this.SetDate = function (iYear, iMonth, iDay) {

		for (var i = 0; i <= this.MonthYearDropDown.options.length - 1; i++) {

			if (this.MonthYearDropDown.options[i].value == iMonth + '_' + iYear) {
				this.MonthYearDropDown.selectedIndex = i;
				this.Year = iYear;
				this.Month = iMonth;
				this.Day = iDay;
				CalendarPopulateDays(this);
				break;
			}
		}
	}

	// set position
	this.SetPosition = function () {
		this.Calendar.style.top = parseInt(this.MonthYearDropDown.offsetTop) + 20 + 'px';
		this.Calendar.style.left = this.MonthYearDropDown.offsetLeft + 'px';
		this.Mask.style.top = parseInt(this.MonthYearDropDown.offsetTop + 20) + 'px';
		this.Mask.style.left = this.MonthYearDropDown.offsetLeft + 'px';
	}
}



function SetCalendarDate(sBase, iDate) {
	var iIndex = iDate - 1;

	oDropdown = f.GetObject(sBase + '_Day')
	oDropdown.selectedIndex = iIndex;
	oDropdown.onchange();
	HideCalendar(sBase);
}


function CalendarDateChange(oDropDown) {

	var oCalendar = new Calendar(oDropDown);

	if (oCalendar.Visible == true) {

		if (oDropDown.id.indexOf('Day') > 0) {
			Cal_ShowCalendar(oDropDown, 1);
		} else {
			Cal_ShowCalendar(oDropDown);
		}
	} else {

		if (oDropDown.id.indexOf('_Month') > -1) {
			CalendarPopulateDays(oCalendar);
		}
	}

}

function CalendarPopulateDays(oCalendar) {

	//    var aDays = Constants.DaysArray;
	var aDays = new Array('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat');

	var iNextYear = parseInt(oCalendar.Year) + 1;
	var dCurrentDate = new Date(oCalendar.Year, oCalendar.Month - 1, 1);
	var dEndDate = new Date(iif(oCalendar.Month == 12, iNextYear, oCalendar.Year),
		iif(oCalendar.Month == 12, 0, oCalendar.Month), 1);
	dEndDate.setDate(dEndDate.getDate() - 1);

	oCalendar.DayDropDown.options.length = 0;

	while (dCurrentDate <= dEndDate) {

		var oOption = document.createElement('option');
		oOption.innerHTML = dCurrentDate.getDate() + ' (' + aDays[dCurrentDate.getDay()] + ')';
		oOption.value = dCurrentDate.getDate();

		if (dCurrentDate.getDate() == oCalendar.Day) {
			oOption.selected = true;
		}
		oCalendar.DayDropDown.appendChild(oOption);

		dCurrentDate.setDate(dCurrentDate.getDate() + 1);
	}
}

function DrawCalendar(oCalendar, bSuppressDayRedraw) {


	//    var aDays = Constants.ShortDaysArray;
	var aDays = new Array('Mo', 'Tu', 'We', 'Th', 'Fr', 'Sa', 'Su');


	//make table
	var oTable = document.createElement('table');
	var oBody = document.createElement('tbody');
	oTable.appendChild(oBody);

	//control row
	var oTR = document.createElement('tr');
	oBody.appendChild(oTR);
	oTR.className = 'calendarcontrol';

	var oTD = document.createElement('td');
	oTD.colSpan = 7;
	oTR.appendChild(oTD)

	var aLink = document.createElement('a');
	aLink.href = 'javascript:CalendarPreviousMonth(\'' + oCalendar.Base + '\')';
	aLink.className = 'calendarpreviousmonth'
	oTD.appendChild(aLink);

	aLink = document.createElement('a');
	aLink.href = 'javascript:CalendarNextMonth(\'' + oCalendar.Base + '\')';
	aLink.className = 'calendarnextmonth'
	oTD.appendChild(aLink);

	var oLabel = document.createElement('label');
	oLabel.className = 'calendarmonthyear';
	oLabel.innerHTML = oCalendar.MonthYearDropDown.options[oCalendar.MonthYearDropDown.selectedIndex].text;
	oTD.appendChild(oLabel);


	aLink = document.createElement('a');
	aLink.href = 'javascript:HideCalendar(\'' + oCalendar.Base + '\')';
	aLink.className = 'calendarhide'
	oTD.appendChild(aLink);

	//day rows
	oTR = document.createElement('tr');
	var oTH;
	for (var i = 0; i < aDays.length; i++) {
		oTH = document.createElement('th');
		oTH.innerHTML = aDays[i];
		oTR.appendChild(oTH);
	}
	oBody.appendChild(oTR);

	//date work
	var iNextYear = parseInt(oCalendar.Year) + 1;
	var dStartDate = new Date(oCalendar.Year, oCalendar.Month - 1, 1);
	var dEndDate = new Date(iif(oCalendar.Month == 12, iNextYear, oCalendar.Year),
		iif(oCalendar.Month == 12, 0, oCalendar.Month), 1);
	dEndDate.setDate(dEndDate.getDate() - 1);

	var dCurrentDate = new Date(oCalendar.Year, oCalendar.Month - 1, 1);
	if (dCurrentDate.getDay() == 0) {
		dCurrentDate.setDate(dCurrentDate.getDate() - 6);
	} else {
		dCurrentDate.setDate(dCurrentDate.getDate() - dCurrentDate.getDay() + 1);
	}

	var dToday = new Date();
	dToday = new Date(dToday.getFullYear(), dToday.getMonth(), dToday.getDate());

	//work out which date to display
	var iDayOfMonth = iif(oCalendar.Day < dEndDate.getDate(), oCalendar.Day, dEndDate.getDate());
	if (new Date(oCalendar.Year, oCalendar.Month - 1, iDayOfMonth) <= dToday) {
		iDayOfMonth = dToday.getDate();
		oCalendar.Day = iDayOfMonth;
	}


	//each row
	// count rows to determine height
	var iRowHeight = 35;
	for (var i = 0; i < 6; i++) {
		oTR = document.createElement('tr');
		oBody.appendChild(oTR);

		iRowHeight += 21;
		for (var j = 0; j < 7; j++) {
			var oTD = document.createElement('td');


			if (dCurrentDate >= dStartDate && dCurrentDate <= dEndDate) {

				if (dCurrentDate >= dToday) {
					var aLink = document.createElement('a');
					aLink.href = 'javascript:SetCalendarDate(\'' + oCalendar.Base + '\',' + dCurrentDate.getDate() + ')';
					aLink.innerHTML = dCurrentDate.getDate();
					aLink.id = oCalendar.Base + '_' + dCurrentDate.getDate();

					if (dCurrentDate.getDate() == iDayOfMonth) {
						aLink.className = 'selected';
					}

					oTD.appendChild(aLink);
				} else {
					oTD.innerHTML = dCurrentDate.getDate();
					oTD.className = 'old';
				}
			} else {
				oTD.className = 'dead';
			}

			dCurrentDate.setDate(dCurrentDate.getDate() + 1);
			oTR.appendChild(oTD);
		}

		if (dCurrentDate > dEndDate) {
			break;
		}

	}

	if (bSuppressDayRedraw == undefined) {
		CalendarPopulateDays(oCalendar);
	}


	oCalendar.Calendar.style.height = iRowHeight + 2 + 'px';
	oCalendar.Mask.style.height = iRowHeight + 4 + 'px';
	oCalendar.Calendar.innerHTML = '';
	oCalendar.Calendar.appendChild(oTable);

	f.SetHTML('lblCalendarMonthYear', dd.GetText(oCalendar.MonthYearDropDown));
}

function CalendarPreviousMonth(sBase) {

	var oYearMonth = document.getElementById(sBase + '_MonthYear');
	if (oYearMonth.selectedIndex > 0) {
		oYearMonth.selectedIndex--;
		var oCalendar = new Calendar(null, sBase);
		DrawCalendar(oCalendar);
	}

}

function CalendarNextMonth(sBase) {

	var oYearMonth = document.getElementById(sBase + '_MonthYear');
	if (oYearMonth.selectedIndex < oYearMonth.length - 1) {
		oYearMonth.selectedIndex++;
		var oCalendar = new Calendar(null, sBase);
		DrawCalendar(oCalendar);
	}
}

function Cal_ShowCalendar(oDropDown, bSuppressDayRedraw) {

	var oCalendar = new Calendar(oDropDown);
	oCalendar.SetPosition();

	DrawCalendar(oCalendar, bSuppressDayRedraw);

	oCalendar.Mask.style.display = 'block';
	oCalendar.Calendar.style.display = 'block';
}


function HideCalendar(sBase) {
	document.getElementById(sBase + '_Mask').style.display = 'none';
	document.getElementById(sBase + '_Calendar').style.display = 'none';
	var oDropDown = document.getElementById(sBase + '_MonthYear')
	oDropDown.onchange();
}