var today = new Date();
	
var dt = today.getDate();
var dy = today.getDay();

var year = today.getFullYear();
var months = new Array("January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December");
var monthlen = new Array(31,checkLeapYear(year),31,30,31,30,31,31,30,31,30,31);
var days = new Array("Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday")

var child = "";
var ActionRequest = false;

function subButtonDeleteRecord(intRecord) {
	// 2001122822.05 fr 
	// this routine will populate the parent document.form with information which will be used by fileInterface.perl

	if (!opener.ActionRequest && opener.valueThisAction != "ScheduleToolEditRecord" && opener.valueThisAction != "ScheduleToolNewRecord") {
		var strUserResponse = confirm("Are you really really sure you want to delete this record?");
		if (strUserResponse) {
			opener.document.form1.Action.value = "ScheduleToolDeleteAction|DeleteRecords|TranslateToJavascript|ScheduleToolDisplayCalendar";
			opener.document.form1.textSubmitted.value = intRecord;
			opener.document.form1.submit();
			} // end if
		} else {
		alert("This error message is being delivered for one of the following user created errors\n\n1. You have hyper-actively clicked the same request before the real page could be loaded.\n2. The parent window is displaying a form which needs to be cleared and returned.");
		} // end if

	} // end function subButtonDeleteRecord (intRecord)

function subButtonEditRecord(intRecord) {
	// 2001122820.02 fr 
	// this routine will populate the parent document.form with information which will be used by fileInterface.perl

	if (!opener.ActionRequest && opener.valueThisAction != "ScheduleToolEditRecord" && opener.valueThisAction != "ScheduleToolNewRecord") {
//alert ("other.js\n\nThis new subButtonEditRecord");
//		opener.document.form1.Action.value = "ScheduleToolEditRecord|ScheduleToolChangeAction|DeleteRecords|AddRecord|TranslateToJavascript|ScheduleToolDisplayCalendar";
		opener.document.form1.Action.value = "ScheduleToolEditRecord|ScheduleToolChangeAction|UpdateRecord|TranslateToJavascript|ScheduleToolDisplayCalendar";
		opener.document.form1.textSubmitted.value = intRecord;
		opener.document.form1.submit();
		} else {
		alert("This error message is being delivered for one of the following user created errors\n\n1. You have hyper-actively clicked the same request before the real page could be loaded.\n2. The parent window is displaying a form which needs to be cleared and returned.");
		} // end if
	} // end function subButtonEditRecord (intRecord)

function subButtonNewRecord() {
	// 2001122820.02 fr 
	// this routine will populate the parent document.form with information which will be used by fileInterface.perl

	if (!opener.ActionRequest && opener.valueThisAction != "ScheduleToolEditRecord" && opener.valueThisAction != "ScheduleToolNewRecord") {
		opener.ActionRequest = true;
		opener.document.form1.Action.value = "ScheduleToolNewRecord|ScheduleToolNewAction|AddRecord|TranslateToJavascript|ScheduleToolDisplayCalendar";
		opener.document.form1.textSubmitted.value = intRecord;
		opener.document.form1.submit();
		} else {
		alert("This error message is being delivered for one of the following user created errors\n\n1. You have hyper-actively clicked the same request before the real page could be loaded.\n2. The parent window is displaying a form which needs to be cleared and returned.");
		} // end if
	} // end function subButtonNewRecord ()

function subButtonLoginClick() {
	// 2001122820.02 fr 
	// this routine will populate the parent document.form with information which will be used by fileInterface.perl

	opener.document.form1.Action.value = "UserAdminFormLogin|ScheduleToolDisplayCalendar";
	opener.document.form1.submit();
	} // end function subButtonLoginClick ()

function subButtonLogoutClick() {
	// 2001122820.02 fr 
	// this routine will populate the parent document.form with information which will be used by fileInterface.perl

	opener.document.form1.Action.value = "Logout|ScheduleToolDisplayCalendar";
	opener.document.form1.submit();
	} // end function subButtonLogoutClick ()

function checkLeapYear(theyear) {
	// 1.Years divisible by four are leap years, unless...
	// 2.Years also divisible by 100 are not leap years, except...
	// 3.Years divisible by 400 are leap years.

	if ( ((theyear % 4 == 0) && (theyear % 100 != 0)) || (theyear % 400 == 0) ) {
		return("29");
		} else {
		return("28");
		} // end if
	} // end function 


function open_window(url,width, height, resize, scroll) {
	child = window.open(url,"newwindow", "width=" + width + ",height=" + height + ",resizable=" + resize + ",scrollbars=" + scroll + "");
	} // end function