/* Simple Calendar Widget - http://www.tarrget.info/calendar/scw.htm

HOW TO ADD THE CALENDAR TO YOUR PAGE
<script type='text/JavaScript' src='<<script location>>'></script>
...
<<event>>= "scwShow (<<element>>,this);",
(e.g. onClick = "scwShow(document.getElementById('ele'), this);" or onMouseOver= "scwShow(this,this);")

You can also disable days of the week by adding arguments to the call to scwShow. The values should be Sunday = 0 through to Saturday = 6.
A call to scwShow with Friday and Monday disabled would look something like this: scwShow (<<element>>,this,5,1);

You can use the following technique to run a function when the calendar closes:
scwNextAction = <<function>>.runsAfterSCW(this,<<arguments>>); scwShow(<<element>>,this <<,optional arguments above>>);
Where <<function>> is a function defined on the calling page and <<arguments>> is the list of arguments being passed to that function. */

// This date is used throughout to determine today's date.
var scwDateNow = new Date(Date.parse(new Date().toDateString()));

//******************************************************************************
// Customisation section

var scwBaseYear = scwDateNow.getFullYear()-10;
var scwDropDownYears = 20;
var scwLanguage;

function scwSetDefaultLanguage() {
	try { scwSetLanguage(); }
	catch (exception) {
		scwToday = 'Сегодня:';
		scwDrag = 'кликните сюда чтобы перетащить календарь';
		scwArrMonthNames = ['Январь','Февраль','Март','Апрель','Май','Июнь', 'Июль','Август','Сентябрь','Октябрь','Ноябрь','Декабрь'];
		scwArrWeekInits = ['ВС','ПН','ВТ','СР','ЧТ','ПТ','СБ'];
		scwInvalidDateMsg = 'Введена неправильная дата.\n';
		scwOutOfRangeMsg = 'Введенная дата не может быть отображена.';
		scwDoesNotExistMsg = 'Такой даты не существует.';
		scwInvalidAlert = ['Неверная дата (',').'];
		scwDateDisablingError = ['Ошибка ',' это не объект класса "Дата".'];
		scwRangeDisablingError = ['Ошибка ',' требуется две части.'];
	}
}

var scwWeekStart = 1;
var scwWeekNumberDisplay = false;
var scwWeekNumberBaseDay = 4;
var scwShowInvalidDateMsg = true,
	scwShowOutOfRangeMsg = true,
	scwShowDoesNotExistMsg = true,
	scwShowInvalidAlert = true,
	scwShowDateDisablingError = true,
	scwShowRangeDisablingError = true;
var scwArrDelimiters = ['/','-','.',',',' '];

// Displayed "Today" date format
var scwDateDisplayFormat = 'DD MMM, YYYY'; // e.g. 'MMM-DD-YYYY' for the US

// Output date format
var scwDateOutputFormat = 'dd.mm.yyyy'; // e.g. 'MMM-DD-YYYY' for the US

// The input date is fully parsed so a format is not required, but there is no way to differentiate the sequence reliably.
// e.g. Is 05/08/03		5th August	2003,
//						8th May		2003 or even
//						3rd August	2005?
// So, you have to state how the code should interpret input dates. The sequence should always contain one D, one M and one Y only, in any order.

var scwDateInputSequence = 'DMY'; // e.g. 'MDY' for the US

// Note: Because the user may select a date then trigger the calendar again to select another, it is necessary to
// have the input date sequence in the same order as the output display format.  To allow the flexibility of having
// a full input date and a partial (e.g. only Month and Year) output, the input sequence is set separately.
// The same reason determines that the delimiters used should be in scwArrDelimiters.
var scwZindex = 1;
var scwBlnStrict = false;
var scwEnabledDay = [true, true, true, true, true, true, true,
						true, true, true, true, true, true, true,
						true, true, true, true, true, true, true,
						true, true, true, true, true, true, true,
						true, true, true, true, true, true, true,
						true, true, true, true, true, true, true];
var scwDisabledDates = new Array();
var scwActiveToday = true;
var scwOutOfRangeDisable = true;
var scwAllowDrag = false;
var scwClickToHide = true;
document.writeln('<style type="text/css">'+
	'.scw		{padding:1px;vertical-align:middle;}'+
	'iframe.scw	{position:absolute;z-index:' + scwZindex + ';top:0px;left:0px;visibility:hidden;' + 'width:1px;height:1px;}'+
	'table.scw	{padding:0px;visibility:hidden;'+ 'position:absolute;cursor:default;'+ 'width:200px;top:0px;left:0px;'+ 'z-index:' + (scwZindex+1) + ';text-align:center;}'+
	'</style>');
document.writeln('<style type="text/css">'+
'/* IMPORTANT: The SCW calendar script requires all the classes defined here.*/' +
'table.scw				{padding:			1px;'+
						'vertical-align:	middle;'+
						'border: ridge		1px;'+
						'font-size:			8pt;'+
						'font-family:		Arial,Helvetica,Sans-Serif;'+
						'font-weight:		normal;}'+
'td.scwDrag, td.scwHead {padding: 0px 0px; text-align: center;}'+
'td.scwDrag				{font-size:		8pt;}' +
'select.scwHead			{margin:		3px 1px;}'+
'input.scwHead			{height:		22px;'+
						'width:			22px;'+
						'vertical-align:middle;'+
						'text-align:	center;'+
						'margin:		2px 1px;'+
						'font-weight:	bold;'+
						'font-size:		8pt;'+
						'font-family:	fixedSys;}'+
'td.scwWeekNumberHead,td.scwWeek'+
						'{padding:		0px;'+
						'text-align:	center;'+
						'font-weight:	bold;}'+
'td.scwFoot,'+
'td.scwFootHover,'+
'td.scwFoot:hover,'+
'td.scwFootDisabled		{padding:		0px;'+
						'text-align:	center;'+
						'font-weight:	bold;}'+
'table.scwCells			{text-align:	right;'+
						'background-color:	#ffa500;'+
						'font-size:		8pt;'+
						'width:			96%;}'+
'td.scwCells,'+
'td.scwCellsHover,'+
'td.scwCells:hover,'+
'td.scwCellsDisabled,'+
'td.scwCellsExMonth,'+
'td.scwCellsExMonthHover,'+
'td.scwCellsExMonth:hover,'+
'td.scwCellsExMonthDisabled,'+
'td.scwCellsWeekend,'+
'td.scwCellsWeekendHover,'+
'td.scwCellsWeekend:hover,'+
'td.scwCellsWeekendDisabled,'+
'td.scwInputDate,'+
'td.scwInputDateHover,'+
'td.scwInputDate:hover,'+
'td.scwInputDateDisabled,'+
'td.scwWeekNo,'+
'td.scwWeeks				{padding:			1px;'+
							'width:				16px;'+
							'height:			16px;'+
							'font-weight:		normal;'+
							'vertical-align:	middle;}'+
'/* Blend the colours into your page here...*/'+
'/* Calendar background */'+
'table.scw					{background-color:  #ffd700;}'+
'/* Drag Handle */'+
'td.scwDrag					{background-color:	#9999CC;'+
							'color:				#CCCCFF;}'+
'/* Week number heading */'+
'td.scwWeekNumberHead		{color: #ffffff;}'+
'/* Week day headings */'+
'td.scwWeek					{color: #ffffff;}'+
'/* Week numbers */'+
'td.scwWeekNo				{background-color:	#776677;'+
							'color:				#CCCCCC;}'+
'/* Enabled Days */'+
'/* Week Day */'+
'td.scwCells				{background-color:	#fffacd;'+
							'color:				#000000;}'+
'/* Day matching the input date */'+
'td.scwInputDate			{background-color:	#ffffff;'+
							'font-weight:		bold;'+
							'color:				#000000;}'+
'/* Weekend Day */'+
'td.scwCellsWeekend			{background-color:	#ffdab9;'+
							'color:				#000000;}'+
'/* Day outside the current month */'+
'td.scwCellsExMonth			{background-color:	#dfdddd;'+
							'color:				#c0c0c0;}'+
'/* Today selector */'+
'td.scwFoot					{color:				#FFFFFF;}'+
'/* MouseOver/Hover formatting If you want to "turn off" any of the formatting then just set to the same as the standard format above.'+
'Note: The reason that the following are implemented using both a class and a :hover'+
'pseudoclass is because Opera handles the rendering involved in the class swap very poorly and IE6 '+
'(and below) only implements pseudoclasses on the anchor tag.*/'+
'/* Active cells */'+
'td.scwCells:hover,'+
'td.scwCellsHover			{background-color:	#FFFF00;'+
							'cursor:			pointer;'+
							'cursor:			hand;'+
							'color:				#000000;}'+
'/* Day matching the input date */'+
'td.scwInputDate:hover,'+
'td.scwInputDateHover		{background-color:	#FFFF00;'+
							'cursor:			pointer;'+
							'cursor:			hand;'+
							'font-weight:		bold;'+
							'color:				#000000;}'+
'/* Weekend cells */'+
'td.scwCellsWeekend:hover,'+
'td.scwCellsWeekendHover	{background-color:	#FFFF00;'+
							'cursor:			pointer;'+
							'cursor:			hand;'+
							'color:				#000000;}'+
'/* Day outside the current month */'+
'td.scwCellsExMonth:hover,'+
'td.scwCellsExMonthHover	{background-color:	#FFFF00;'+
							'cursor:			pointer;'+
							'cursor:			hand;'+
							'color:				#000000;}'+
'/* Today selector */'+
'td.scwFoot:hover,'+
'td.scwFootHover			{color:				#FFFF00;'+
							'cursor:			pointer;'+
							'cursor:			hand;'+
							'font-weight:		bold;}'+
'/* Disabled cells */'+
'/* Week Day */'+
'/* Day matching the input date */'+
'td.scwInputDateDisabled	{background-color:	#999999;'+
							'color:				#000000;}'+
'td.scwCellsDisabled		{background-color:	#999999;'+
							'color:				#000000;}'+
'/* Weekend Day */'+
'td.scwCellsWeekendDisabled {background-color:	#999999;'+
							'color:				#CC6666;}'+
'/* Day outside the current month */'+
'td.scwCellsExMonthDisabled {background-color:	#999999;'+
							'color:				#666666;}'+
'td.scwFootDisabled			{background-color:	#6666CC;'+
							'color:				#FFFFFF;}'+
'</style>');

// End of customisation section
//******************************************************************************

//  Variables required by both scwShow and scwShowMonth
var scwTargetEle,
	scwTriggerEle,
	scwMonthSum = 0,
	scwBlnFullInputDate = false,
	scwPassEnabledDay = new Array(),
	scwSeedDate = new Date(),
	scwParmActiveToday = true,
	scwWeekStart = scwWeekStart%7,
	scwToday,
	scwDrag,
	scwArrMonthNames,
	scwArrWeekInits,
	scwInvalidDateMsg,
	scwOutOfRangeMsg,
	scwDoesNotExistMsg,
	scwInvalidAlert,
	scwDateDisablingError,
	scwRangeDisablingError;

// Add a method to format a date into the required pattern
Date.prototype.scwFormat =
	function(scwFormat)
		{var charCount = 0,
			codeChar  = '',
			result    = '';

		for (var i=0;i<=scwFormat.length;i++)
			{if (i<scwFormat.length && scwFormat.charAt(i)==codeChar)
					{// If we haven't hit the end of the string and the format string character is the same as the previous one, just clock up one to the length of the current element definition
					charCount++;
					}
			else   {switch (codeChar)
						{case 'y': case 'Y':
							result += (this.getFullYear()%Math.
										pow(10,charCount)).toString().
										scwPadLeft(charCount);
							break;
						case 'm': case 'M':
							// If we find an M, check the number of them to determine whether to get the month number or the month name.
							result += (charCount<3)
										?(this.getMonth()+1).
											toString().scwPadLeft(charCount)
										:scwArrMonthNames[this.getMonth()];
							break;
						case 'd': case 'D':
							// If we find a D, get the date and format it
							result += this.getDate().toString().
										scwPadLeft(charCount);
							break;
						default:
							// Copy any unrecognised characters across
							while (charCount-- > 0) {result += codeChar;}
						}

					if (i<scwFormat.length)
						{// Store the character we have just worked on
						codeChar  = scwFormat.charAt(i);
						charCount = 1;
						}
					}
			}
		return result;
		}

// Add a method to left pad zeroes
String.prototype.scwPadLeft =
	function(padToLength)
		{var result = '';
		for (var i=0;i<(padToLength - this.length);i++) {result += '0';}
		return (result + this);
		}

// Set up a closure so that any next function can be triggered after the calendar has been closed AND that function can take arguments.
Function.prototype.runsAfterSCW =
	function()  {var func = this,
					args = new Array(arguments.length);

				for (var i=0;i<args.length;++i)
					{args[i] = arguments[i];}

				return function()
					{// concat/join the two argument arrays
					for (var i=0;i<arguments.length;++i)
						{args[args.length] = arguments[i];}

					return (args.shift()==scwTriggerEle)
								?func.apply(this, args):null;
					}
				};

// Use a global variable for the return value from the next action IE fails to pass the function through if the target element is in a form and scwNextAction is not defined.
var scwNextActionReturn, scwNextAction;

// ****************************************************************************
// Start of Function Library
// Exposed functions:
// scwShow				Entry point for display of calendar,
//						called in main page.
// showCal				Legacy name of scwShow:
//						Passes only legacy arguments,
//						not the optional day disabling arguments.
// scwShowMonth			Displays a month on the calendar,
//						Called when a month is set or changed.
// scwBeginDrag			Controls calendar dragging.
// scwCancel			Called when the calendar background is clicked:
//						Calls scwStopPropagation and may call scwHide.
// scwHide				Hides the calendar, called on various events.
// scwStopPropagation	Stops the propagation of an event.

function showCal(scwEle,scwSourceEle)    {scwShow(scwEle,scwSourceEle);}
function scwShow(scwEle,scwSourceEle)
	{scwTriggerEle = scwSourceEle;

	// Take any parameters that there might be from the third onwards as day numbers to be disabled 0 = Sunday through to 6 = Saturday.
	scwParmActiveToday = true;

	for (var i=0;i<7;i++)
		{scwPassEnabledDay[(i+7-scwWeekStart)%7] = true;
		for (var j=2;j<arguments.length;j++)
			{if (arguments[j]==i)
				{scwPassEnabledDay[(i+7-scwWeekStart)%7] = false;
				if (scwDateNow.getDay()==i) scwParmActiveToday = false;
				}
			}
		}

	// If no value is preset then the seed date is Today (when today is in range) OR The middle of the date range.
	scwSeedDate = scwDateNow;

	// Strip space characters from start and end of date input
	scwEle.value = scwEle.value.replace(/^\s+/,'').replace(/\s+$/,'');

	// Set the language-dependent elements
	scwSetDefaultLanguage();

	document.getElementById('scwDragText').innerHTML = scwDrag;

	document.getElementById('scwMonths').options.length = 0;
	for (i=0;i<scwArrMonthNames.length;i++)
		document.getElementById('scwMonths').options[i] = new Option(scwArrMonthNames[i],scwArrMonthNames[i]);

	document.getElementById('scwYears').options.length = 0;
	for (i=0;i<scwDropDownYears;i++)
		document.getElementById('scwYears').options[i] = new Option((scwBaseYear+i),(scwBaseYear+i));

	for (i=0;i<scwArrWeekInits.length;i++)
		document.getElementById('scwWeekInit' + i).innerHTML = scwArrWeekInits[(i+scwWeekStart)%scwArrWeekInits.length];

	if (document.getElementById('scwFoot'))
		document.getElementById('scwFoot').innerHTML = scwToday + " " + scwDateNow.scwFormat(scwDateDisplayFormat);

	if (scwEle.value.length==0) { // If no value is entered and today is within the range, use today's date, otherwise use the middle of the valid range.

		scwBlnFullInputDate=false;

		if ((new Date(scwBaseYear+scwDropDownYears-1,11,31)) < scwSeedDate || (new Date(scwBaseYear,0,1)) > scwSeedDate) {
			scwSeedDate = new Date(scwBaseYear + Math.floor(scwDropDownYears / 2), 5, 1);
			}
	} else {
		function scwInputFormat(scwEleValue) {
			var scwArrSeed = new Array(), scwArrInput = scwEle.value.split(new RegExp('[\\'+scwArrDelimiters.join('\\')+']+','g'));

			// "Escape" all the user defined date delimiters above - several delimiters will need it and it does no harm for the others.

			// Strip any empty array elements (caused by delimiters) from the beginning or end of the array. They will still appear in the output string if in the output format.
			if (scwArrInput[0].length==0) scwArrInput.splice(0,1);

			if (scwArrInput[scwArrInput.length-1].length==0)
				scwArrInput.splice(scwArrInput.length-1,1);

			scwBlnFullInputDate = false;

			switch (scwArrInput.length)
				{case 1: { // Year only entry
					scwArrSeed[0] = parseInt(scwArrInput[0],10); // Year
					scwArrSeed[1] = '6'; // Month
					scwArrSeed[2] = 1; // Day
					break; }
				case 2: { // Year and Month entry
					scwArrSeed[0] = parseInt(scwArrInput[scwDateInputSequence.replace(/D/i,'').search(/Y/i)],10); // Year
					scwArrSeed[1] = scwArrInput[scwDateInputSequence.replace(/D/i,'').search(/M/i)]; // Month
					scwArrSeed[2] = 1; // Day
					break; }
				case 3: { // Day Month and Year entry
					scwArrSeed[0] = parseInt(scwArrInput[scwDateInputSequence.search(/Y/i)],10); // Year
					scwArrSeed[1] = scwArrInput[scwDateInputSequence.search(/M/i)]; // Month
					scwArrSeed[2] = parseInt(scwArrInput[scwDateInputSequence.search(/D/i)],10); // Day
					scwBlnFullInputDate = true;
					break; }
				default: { // A stuff-up has led to more than three elements in the date.
					scwArrSeed[0] = 0; // Year
					scwArrSeed[1] = 0; // Month
					scwArrSeed[2] = 0; // Day
					}
				}

			// These regular expressions validate the input date format to the following rules; 
			// Day 1-31 (optional zero on single digits)
			// Month 1-12 (optional zero on single digits) or case insensitive name
			// Year One, Two or four digits

			// Months names are as set in the language-dependent definitions and delimiters are set just below there

			var scwExpValDay    = /^(0?[1-9]|[1-2]\d|3[0-1])$/,
				scwExpValMonth  = new RegExp("^(0?[1-9]|1[0-2]|" + scwArrMonthNames.join("|") + ")$","i"),
				scwExpValYear   = /^(\d{1,2}|\d{4})$/;

			// Apply validation and report failures

			if (scwExpValYear.exec(scwArrSeed[0])  == null ||
				scwExpValMonth.exec(scwArrSeed[1]) == null ||
				scwExpValDay.exec(scwArrSeed[2])   == null )
				{if (scwShowInvalidDateMsg)
					alert(scwInvalidDateMsg + scwInvalidAlert[0] + scwEleValue + scwInvalidAlert[1]);
				scwBlnFullInputDate = false;
				scwArrSeed[0] = scwBaseYear +
								Math.floor(scwDropDownYears/2); // Year
				scwArrSeed[1] = '6'; // Month
				scwArrSeed[2] = 1; // Day
				}

			// Return the Year in scwArrSeed[0]
			// Month in scwArrSeed[1]
			// Day in scwArrSeed[2]

			return scwArrSeed;
			}

		// Parse the string into an array using the allowed delimiters

		scwArrSeedDate = scwInputFormat(scwEle.value);

		// So now we have the Year, Month and Day in an array.

		// If the year is one or two digits then the routine assumes a year belongs in the 21st Century unless it is less than 50 in which case it assumes the 20th Century is intended.

		if (scwArrSeedDate[0]<100) scwArrSeedDate[0] += (scwArrSeedDate[0]>50)?1900:2000;

		// Check whether the month is in digits or an abbreviation

		if (scwArrSeedDate[1].search(/\d+/)!=0) {
			month = scwArrMonthNames.join('|').toUpperCase().search(scwArrSeedDate[1].substr(0,3).toUpperCase());
			scwArrSeedDate[1] = Math.floor(month/4)+1;
			}

		scwSeedDate = new Date(scwArrSeedDate[0],
								scwArrSeedDate[1]-1,
								scwArrSeedDate[2]);
		}

	// Test that we have arrived at a valid date

	if (isNaN(scwSeedDate))
		{if (scwShowInvalidDateMsg)
			alert(  scwInvalidDateMsg +
					scwInvalidAlert[0] + scwEle.value +
					scwInvalidAlert[1]);
		scwSeedDate = new Date(scwBaseYear +
				Math.floor(scwDropDownYears/2),5,1);
		scwBlnFullInputDate=false;
		}
	else
		{// Test that the date is within range,
		// if not then set date to a sensible date in range.

		if ((new Date(scwBaseYear,0,1)) > scwSeedDate)
			{if (scwBlnStrict && scwShowOutOfRangeMsg)
				alert(scwOutOfRangeMsg);
			scwSeedDate = new Date(scwBaseYear,0,1);
			scwBlnFullInputDate=false;
			}
		else
			{if ((new Date(scwBaseYear+scwDropDownYears-1,11,31))<
				scwSeedDate)
				{if (scwBlnStrict && scwShowOutOfRangeMsg)
					alert(scwOutOfRangeMsg);
				scwSeedDate = new Date(scwBaseYear +
										Math.floor(scwDropDownYears)-1,
												11,1);
				scwBlnFullInputDate=false;
				}
			else
				{if (scwBlnStrict && scwBlnFullInputDate &&
					(scwSeedDate.getDate()      != scwArrSeedDate[2] ||
					(scwSeedDate.getMonth()+1) != scwArrSeedDate[1] ||
					scwSeedDate.getFullYear()  != scwArrSeedDate[0]
					)
					)
					{if (scwShowDoesNotExistMsg) alert(scwDoesNotExistMsg);
					scwSeedDate = new Date(scwSeedDate.getFullYear(),
											scwSeedDate.getMonth()-1,1);
					scwBlnFullInputDate=false;
					}
				}
			}
		}

	// Test the disabled dates for validity
	// Give error message if not valid.

	for (var i=0;i<scwDisabledDates.length;i++)
		{if (!((typeof scwDisabledDates[i]      == 'object') &&
			(scwDisabledDates[i].constructor == Date)))
			{if ((typeof scwDisabledDates[i]      == 'object') &&
				(scwDisabledDates[i].constructor == Array))
				{var scwPass = true;

				if (scwDisabledDates[i].length !=2)
					{if (scwShowRangeDisablingError)
						alert(  scwRangeDisablingError[0] +
								scwDisabledDates[i] +
								scwRangeDisablingError[1]);
					scwPass = false;
					}
				else
					{for (var j=0;j<scwDisabledDates[i].length;j++)
						{if (!((typeof scwDisabledDates[i][j]
								== 'object') &&
							(scwDisabledDates[i][j].constructor
								== Date)))
							{if (scwShowRangeDisablingError)
								alert(  scwDateDisablingError[0] +
										scwDisabledDates[i][j] +
										scwDateDisablingError[1]);
							scwPass = false;
							}
						}
					}

				if (scwPass &&
					(scwDisabledDates[i][0] > scwDisabledDates[i][1])
					)
					{scwDisabledDates[i].reverse();}
				}
			else
				{if (scwShowRangeDisablingError)
					alert(  scwDateDisablingError[0] +
							scwDisabledDates[i] +
							scwDateDisablingError[1]);
				}
			}
		}

	// Calculate the number of months that the entered (or
	// defaulted) month is after the start of the allowed
	// date range.

	scwMonthSum =  12*(scwSeedDate.getFullYear()-scwBaseYear)+
						scwSeedDate.getMonth();

	// Set the drop down boxes.

	document.getElementById('scwYears').options.selectedIndex =
		Math.floor(scwMonthSum/12);
	document.getElementById('scwMonths').options.selectedIndex=
		(scwMonthSum%12);

	// Position the calendar box

	var offsetTop =parseInt(scwEle.offsetTop ,10) +
					parseInt(scwEle.offsetHeight,10),
		offsetLeft=parseInt(scwEle.offsetLeft,10);

	scwTargetEle=scwEle;

	do {scwEle=scwEle.offsetParent;
		offsetTop +=parseInt(scwEle.offsetTop,10);
		offsetLeft+=parseInt(scwEle.offsetLeft,10);
		}
	while (scwEle.tagName!='BODY' && scwEle.tagName!='HTML');

	document.getElementById('scw').style.top =offsetTop +'px';
	document.getElementById('scw').style.left=offsetLeft+'px';

	if (document.getElementById('scwIframe'))
		{document.getElementById('scwIframe').style.top=offsetTop +'px';
		document.getElementById('scwIframe').style.left=offsetLeft+'px';
		document.getElementById('scwIframe').style.width=
			(document.getElementById('scw').offsetWidth-2)+'px';
		document.getElementById('scwIframe').style.height=
			(document.getElementById('scw').offsetHeight-2)+'px';
		document.getElementById('scwIframe').style.visibility='visible';
		}

	// Check whether or not dragging is allowed and display drag handle
	// if necessary

	document.getElementById('scwDrag').style.display=
		(scwAllowDrag)
			?((document.getElementById('scwIFrame')||
			document.getElementById('scwIEgte7'))?'block':'table-row')
			:'none';

	// Display the month

	scwShowMonth(0);

	// Show it on the page

	document.getElementById('scw').style.visibility='visible';

	if (typeof event=='undefined')
			{scwSourceEle.parentNode.
					addEventListener("click",scwStopPropagation,false);
			}
	else   {event.cancelBubble = true;}
	}

function scwHide()
	{document.getElementById('scw').style.visibility='hidden';
	if (document.getElementById('scwIframe'))
		{document.getElementById('scwIframe').style.visibility='hidden';}

	if (typeof scwNextAction!='undefined' && scwNextAction!=null)
		{scwNextActionReturn = scwNextAction();
		// Explicit null set to prevent closure causing memory leak
		scwNextAction = null;
		}
	}

function scwCancel(scwEvt)
	{if (scwClickToHide) scwHide();
	scwStopPropagation(scwEvt);
	}

function scwStopPropagation(scwEvt)
	{if (scwEvt.stopPropagation)
			scwEvt.stopPropagation();    // Capture phase
	else   scwEvt.cancelBubble = true;  // Bubbling phase
	}

function scwBeginDrag(event)
	{var elementToDrag = document.getElementById('scw');

	var deltaX    = event.clientX,
		deltaY    = event.clientY,
		offsetEle = elementToDrag;

	do {deltaX   -= parseInt(offsetEle.offsetLeft,10);
		deltaY   -= parseInt(offsetEle.offsetTop ,10);
		offsetEle = offsetEle.offsetParent;
		}
	while (offsetEle.tagName!='BODY' &&
			offsetEle.tagName!='HTML');

	if (document.addEventListener)
			{document.addEventListener('mousemove',
									moveHandler,
									true);        // Capture phase
			document.addEventListener('mouseup',
									upHandler,
									true);        // Capture phase
			}
	else   {elementToDrag.attachEvent('onmousemove',
									moveHandler); // Bubbling phase
			elementToDrag.attachEvent('onmouseup',
										upHandler); // Bubbling phase
			elementToDrag.setCapture();
			}

	scwStopPropagation(event);

	function moveHandler(scwEvt)
		{if (!scwEvt) scwEvt = window.event;

		elementToDrag.style.left = (scwEvt.clientX - deltaX) + 'px';
		elementToDrag.style.top  = (scwEvt.clientY - deltaY) + 'px';

		if (document.getElementById('scwIframe'))
			{document.getElementById('scwIframe').style.left =
				(scwEvt.clientX - deltaX) + 'px';
			document.getElementById('scwIframe').style.top  =
				(scwEvt.clientY - deltaY) + 'px';
			}

		scwStopPropagation(scwEvt);
		}

	function upHandler(scwEvt)
		{if (!scwEvt) scwEvt = window.event;

		if (document.removeEventListener)
				{document.removeEventListener('mousemove',
											moveHandler,
											true);     // Capture phase
				document.removeEventListener('mouseup',
											upHandler,
											true);     // Capture phase
				}
		else   {elementToDrag.detachEvent('onmouseup',
											upHandler); // Bubbling phase
				elementToDrag.detachEvent('onmousemove',
										moveHandler); // Bubbling phase
				elementToDrag.releaseCapture();
				}

		scwStopPropagation(scwEvt);
		}
	}

function scwShowMonth(scwBias)
	{// Set the selectable Month and Year
	// May be called: from the left and right arrows
	// (shift month -1 and +1 respectively)
	// from the month selection list
	// from the year selection list
	// from the showCal routine
	// (which initiates the display).

	var scwShowDate  = new Date(Date.parse(new Date().toDateString())),
		scwStartDate = new Date();

	scwSelYears  = document.getElementById('scwYears');
	scwSelMonths = document.getElementById('scwMonths');

	if (scwSelYears.options.selectedIndex>-1)
		{scwMonthSum=12*(scwSelYears.options.selectedIndex)+scwBias;
		if (scwSelMonths.options.selectedIndex>-1)
			{scwMonthSum+=scwSelMonths.options.selectedIndex;}
		}
	else
		{if (scwSelMonths.options.selectedIndex>-1)
			{scwMonthSum+=scwSelMonths.options.selectedIndex;}
		}

	scwShowDate.setFullYear(scwBaseYear + Math.floor(scwMonthSum/12),
							(scwMonthSum%12),
							1);

	// If the Week numbers are displayed, shift the week day names
	// to the right.
	document.getElementById("scwWeek_").style.display=
		(scwWeekNumberDisplay)
			?((document.getElementById('scwIFrame')||
			document.getElementById('scwIEgte7'))?'block':'table-cell')
			:'none';

	if ((12*parseInt((scwShowDate.getFullYear()-scwBaseYear),10)) +
		parseInt(scwShowDate.getMonth(),10) < (12*scwDropDownYears)  &&
		(12*parseInt((scwShowDate.getFullYear()-scwBaseYear),10)) +
		parseInt(scwShowDate.getMonth(),10) > -1)
		{scwSelYears.options.selectedIndex=Math.floor(scwMonthSum/12);
		scwSelMonths.options.selectedIndex=(scwMonthSum%12);

		scwCurMonth = scwShowDate.getMonth();

		scwShowDate.setDate((((scwShowDate.
								getDay()-scwWeekStart)<0)?-6:1)+
							scwWeekStart-scwShowDate.getDay());

		scwStartDate = new Date(scwShowDate);

		var scwFoot = document.getElementById('scwFoot');

		function scwFootOutput() {scwSetOutput(scwDateNow);}

		if (scwDisabledDates.length==0)
			{if (scwActiveToday && scwParmActiveToday)
				{scwFoot.onclick     = scwFootOutput;
				scwFoot.className   = 'scwFoot';

				if (document.getElementById('scwIFrame'))
					{scwFoot.onmouseover  = scwChangeClass;
					scwFoot.onmouseout   = scwChangeClass;
					}

				}
			else
				{scwFoot.onclick     = null;
				scwFoot.className   = 'scwFootDisabled';

				if (document.getElementById('scwIFrame'))
					{scwFoot.onmouseover  = null;
					scwFoot.onmouseout   = null;
					}

				if (document.addEventListener)
						{scwFoot.addEventListener('click',
												scwStopPropagation,
												false);}
				else   {scwFoot.attachEvent('onclick',
											scwStopPropagation);}
				}
			}
		else
			{for (var k=0;k<scwDisabledDates.length;k++)
				{if (!scwActiveToday || !scwParmActiveToday ||
					((typeof scwDisabledDates[k] == 'object') &&
						(((scwDisabledDates[k].constructor == Date) &&
						scwDateNow.valueOf() == scwDisabledDates[k].
														valueOf()
						) ||
						((scwDisabledDates[k].constructor == Array) &&
						scwDateNow.valueOf() >= scwDisabledDates[k][0].
													valueOf() &&
						scwDateNow.valueOf() <= scwDisabledDates[k][1].
													valueOf()
						)
						)
					)
					)
					{scwFoot.onclick     = null;
					scwFoot.className   = 'scwFootDisabled';

					if (document.getElementById('scwIFrame'))
						{scwFoot.onmouseover  = null;
						scwFoot.onmouseout   = null;
						}

					if (document.addEventListener)
							{scwFoot.addEventListener('click',
													scwStopPropagation,
													false);
							}
					else {scwFoot.attachEvent('onclick',
												scwStopPropagation);
							}
					break;
					}
				else
					{scwFoot.onclick=scwFootOutput;
					scwFoot.className='scwFoot';

					if (document.getElementById('scwIFrame'))
						{scwFoot.onmouseover  = scwChangeClass;
						scwFoot.onmouseout   = scwChangeClass;
						}
					}
				}
			}

		function scwSetOutput(scwOutputDate)
			{scwTargetEle.value =
				scwOutputDate.scwFormat(scwDateOutputFormat);
			scwHide();
			}

		function scwCellOutput(scwEvt)
			{var scwEle = scwEventTrigger(scwEvt),
				scwOutputDate = new Date(scwStartDate);

			if (scwEle.nodeType==3) scwEle=scwEle.parentNode;

			scwOutputDate.setDate(scwStartDate.getDate() +
									parseInt(scwEle.id.substr(8),10));

			scwSetOutput(scwOutputDate);
			}

		function scwChangeClass(scwEvt)
			{var scwEle = scwEventTrigger(scwEvt);

			if (scwEle.nodeType==3) scwEle=scwEle.parentNode;

			switch (scwEle.className)
				{case 'scwCells':
					scwEle.className = 'scwCellsHover';
					break;
				case 'scwCellsHover':
					scwEle.className = 'scwCells';
					break;
				case 'scwCellsExMonth':
					scwEle.className = 'scwCellsExMonthHover';
					break;
				case 'scwCellsExMonthHover':
					scwEle.className = 'scwCellsExMonth';
					break;
				case 'scwCellsWeekend':
					scwEle.className = 'scwCellsWeekendHover';
					break;
				case 'scwCellsWeekendHover':
					scwEle.className = 'scwCellsWeekend';
					break;
				case 'scwFoot':
					scwEle.className = 'scwFootHover';
					break;
				case 'scwFootHover':
					scwEle.className = 'scwFoot';
					break;
				case 'scwInputDate':
					scwEle.className = 'scwInputDateHover';
					break;
				case 'scwInputDateHover':
					scwEle.className = 'scwInputDate';
				}

			return true;
			}

		function scwEventTrigger(scwEvt)
			{if (!scwEvt) scwEvt = event;
			return scwEvt.target||scwEvt.srcElement;
			}

		function scwWeekNumber(scwInDate)
			{// The base day in the week of the input date
			var scwInDateWeekBase = new Date(scwInDate);

			scwInDateWeekBase.setDate(scwInDateWeekBase.getDate()
										- scwInDateWeekBase.getDay()
										+ scwWeekNumberBaseDay
										+ ((scwInDate.getDay()>
											scwWeekNumberBaseDay)?7:0));

			// The first Base Day in the year
			var scwFirstBaseDay =
					new Date(scwInDateWeekBase.getFullYear(),0,1)

			scwFirstBaseDay.setDate(scwFirstBaseDay.getDate()
										- scwFirstBaseDay.getDay()
										+ scwWeekNumberBaseDay
									);

			if (scwFirstBaseDay <
					new Date(scwInDateWeekBase.getFullYear(),0,1))
				{scwFirstBaseDay.setDate(scwFirstBaseDay.getDate()+7);}

			// Start of Week 01
			var scwStartWeekOne = new Date(scwFirstBaseDay
											- scwWeekNumberBaseDay
											+ scwInDate.getDay());

			if (scwStartWeekOne > scwFirstBaseDay)
				{scwStartWeekOne.setDate(scwStartWeekOne.getDate()-7);}

			// Subtract the date of the current week from the date of the
			// first week of the year to get the number of weeks in
			// milliseconds.  Divide by the number of milliseconds
			// in a week then round to no decimals in order to remove
			// the effect of daylight saving.  Add one to make the first
			// week, week 1.  Place a string zero on the front so that
			// week numbers are zero filled.

			var scwWeekNo =
				"0" + (Math.round((scwInDateWeekBase -
									scwFirstBaseDay)/604800000,0) + 1);

			// Return the last two characters in the week number string

			return scwWeekNo.substring(scwWeekNo.length-2,
										scwWeekNo.length);
			}

		// Treewalk to display the dates.
		// I tried to use getElementsByName but IE refused to cooperate
		// so I resorted to this method which works for all tested
		// browsers.

		var scwCells = document.getElementById('scwCells');

		for (i=0;i<scwCells.childNodes.length;i++)
			{var scwRows = scwCells.childNodes[i];
			if (scwRows.nodeType==1 && scwRows.tagName=='TR')
				{if (scwWeekNumberDisplay)
					{//Calculate the week number using scwShowDate
					scwRows.childNodes[0].innerHTML =
						scwWeekNumber(scwShowDate);
					scwRows.childNodes[0].style.display=
						(document.getElementById('scwIFrame')||
						document.getElementById('scwIEgte7'))
							?'block'
							:'table-cell';
					}
				else
					{scwRows.childNodes[0].style.display='none';}

				for (j=1;j<scwRows.childNodes.length;j++)
					{var scwCols = scwRows.childNodes[j];
					if (scwCols.nodeType==1 && scwCols.tagName=='TD')
						{scwRows.childNodes[j].innerHTML=
							scwShowDate.getDate();
						var scwCell=scwRows.childNodes[j],
							scwDisabled =
								(scwOutOfRangeDisable &&
								(scwShowDate < (new Date(scwBaseYear,0,1))
								||
								scwShowDate > (new Date(scwBaseYear+
														scwDropDownYears-
														1,11,31))
								)
								)?true:false;

						for (var k=0;k<scwDisabledDates.length;k++)
							{if ((typeof scwDisabledDates[k]=='object')
								&&
								(scwDisabledDates[k].constructor ==
								Date
								)
								&&
								scwShowDate.valueOf() ==
									scwDisabledDates[k].valueOf()
								)
								{scwDisabled = true;}
							else
								{if ((typeof scwDisabledDates[k]=='object')
									&&
									(scwDisabledDates[k].constructor ==
									Array
									)
									&&
									scwShowDate.valueOf() >=
										scwDisabledDates[k][0].valueOf()
									&&
									scwShowDate.valueOf() <=
										scwDisabledDates[k][1].valueOf()
									)
									{scwDisabled = true;}
								}
							}

						if (scwDisabled ||
							!scwEnabledDay[j-1+(7*((i*scwCells.
													childNodes.
													length)/6))] ||
							!scwPassEnabledDay[(j-1+(7*(i*scwCells.
														childNodes.
														length/6)))%7]
							)
							{scwRows.childNodes[j].onclick     = null;

							if (document.getElementById('scwIFrame'))
								{scwRows.childNodes[j].onmouseover  = null;
								scwRows.childNodes[j].onmouseout   = null;
								}

							scwCell.className=
								(scwShowDate.getMonth()!=scwCurMonth)
									?'scwCellsExMonthDisabled'
									:(scwBlnFullInputDate &&
									scwShowDate.toDateString()==
									scwSeedDate.toDateString())
										?'scwInputDateDisabled'
										:(scwShowDate.getDay()%6==0)
											?'scwCellsWeekendDisabled'
											:'scwCellsDisabled';
							}
						else
							{scwRows.childNodes[j].onclick=scwCellOutput;

							if (document.getElementById('scwIFrame'))
								{scwRows.childNodes[j].onmouseover  =
									scwChangeClass;
								scwRows.childNodes[j].onmouseout   =
									scwChangeClass;
								}

							scwCell.className=
								(scwShowDate.getMonth()!=scwCurMonth)
									?'scwCellsExMonth'
									:(scwBlnFullInputDate &&
									scwShowDate.toDateString()==
									scwSeedDate.toDateString())
										?'scwInputDate'
										:(scwShowDate.getDay()%6==0)
											?'scwCellsWeekend'
											:'scwCells';

						}

						scwShowDate.setDate(scwShowDate.getDate()+1);
						}
					}
				}
			}
		}
	// Force a re-draw to prevent Opera's poor dynamic rendering
	// from leaving garbage in the calendar when the displayed
	// month is changed.
	document.getElementById('scw').style.visibility='hidden';
	document.getElementById('scw').style.visibility='visible';
	}

//  End of Function Library
// *************************


// ***************************
// Start of Calendar structure

document.write(
"<!--[if gte IE 7]>" +
	"<div id='scwIEgte7'></div>" +
"<![endif]-->" +
"<!--[if lt  IE 7]>" +
	"<iframe class='scw' src='scwblank.html' " +
			"id='scwIframe' name='scwIframe' " +
			"frameborder='0'>" +
	"</iframe>" +
"<![endif]-->" +
"<table id='scw' class='scw' onclick='scwCancel(event);'>" +
"<tr class='scw'>" +
	"<td class='scw'>" +
	"<table class='scwHead' id='scwHead' width='100%' " +
				"onClick='scwStopPropagation(event);' " +
				"cellspacing='0' cellpadding='0'>" +
		"<tr id='scwDrag' style='display:none;'>" +
			"<td colspan='4' class='scwDrag' " +
				"onmousedown='scwBeginDrag(event);'>" +
				"<div id='scwDragText'></div>" +
			"</td>" +
		"</tr>" +
		"<tr class='scwHead'>" +
			"<td class='scwHead'>" +
				"<input class='scwHead' type='button' value='<' " +
						"onclick='scwShowMonth(-1);'  /></td>" +
			"<td class='scwHead'>" +
				"<select id='scwMonths' class='scwHead' " +
						"onChange='scwShowMonth(0);'>" +
				"</select>" +
			"</td>" +
			"<td class='scwHead'>" +
				"<select id='scwYears' class='scwHead' " +
						"onChange='scwShowMonth(0);'>" +
				"</select>" +
			"</td>" +
			"<td class='scwHead'>" +
				"<input class='scwHead' type='button' value='>' " +
						"onclick='scwShowMonth(1);' /></td>" +
			"</tr>" +
		"</table>" +
		"</td>" +
	"</tr>" +
	"<tr class='scw'>" +
		"<td class='scw'>" +
		"<table class='scwCells' align='center'>" +
			"<thead>" +
			"<tr><td class='scwWeekNumberHead' id='scwWeek_' ></td>");

for (i=0;i<7;i++)
	document.write( "<td class='scwWeek' id='scwWeekInit" + i + "'></td>");

document.write("</tr>" +
			"</thead>" +
			"<tbody id='scwCells' " +
					"onClick='scwStopPropagation(event);'>");

for (i=0;i<6;i++)
	{document.write(
				"<tr>" +
				"<td class='scwWeekNo' id='scwWeek_" + i + "'></td>");
	for (j=0;j<7;j++)
		{document.write(
					"<td class='scwCells' id='scwCell_" + (j+(i*7)) +
					"'></td>");
		}

	document.write(
				"</tr>");
	}

document.write(
			"</tbody>");

if ((new Date(scwBaseYear + scwDropDownYears, 11, 32)) > scwDateNow &&
	(new Date(scwBaseYear, 0, 0)) < scwDateNow)
	{document.write(
			"<tfoot class='scwFoot'>" +
				"<tr class='scwFoot'>" +
				"<td class='scwFoot' id='scwFoot' colspan='8'>" +
				"</td>" +
				"</tr>" +
			"</tfoot>");
	}

document.write(
		"</table>" +
		"</td>" +
	"</tr>" +
	"</table>");


// End of Calendar structure
// ***************************


// ****************************************
// Start of document level event definition
if (document.addEventListener) { document.addEventListener('click',scwHide, false); }
	else { document.attachEvent('onclick',scwHide); }
// End of document level event definition
// ****************************************