function emailCheck(emailStr) {
	 // addr must end with one of these
	var knownDomsPat = /^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;

	// addr must fit the user@domain format (also is used to separate the username from the domain
	var emailPat = /^(.+)@(.+)$/;

	// match all special characters - don't want to allow special characters in the address, including ( ) < > @ , ; : \ " . [ ]
	var specialChars = "\\(\\)><@,;:\\\\\\\"\\.\\[\\]";

	// range of characters allowed in a username or domainname (specifies which ones aren't allowed
	var validChars = "\[^\\s" + specialChars + "\]";

	// The following pattern applies if the "user" is a quoted string (in which case, there are no rules about which characters are allowed
	// and which aren't; anything goes).  E.g. "jiminy cricket"@disney.com is a legal e-mail address.
	var quotedUser = "(\"[^\"]*\")";

	// allow domains that are IP addresses, rather than symbolic names.  E.g. joe@[123.124.233.4] is
	// a legal e-mail address. NOTE: The square brackets are required.
	var ipDomainPat = /^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;

	// The following string represents an atom (basically a series of non-special characters)
	var atom = validChars + '+';

	// The following string represents one word in the typical username.  For example, in john.doe@somewhere.com, john and doe are words.
	// Basically, a word is either an atom or quoted string. */
	var word = "(" + atom + "|" + quotedUser + ")";

	// The following pattern describes the structure of the user
	var userPat = new RegExp("^" + word + "(\\." + word + ")*$");

	// The following pattern describes the structure of a normal symbolic domain, as opposed to ipDomainPat, shown above.
	var domainPat = new RegExp("^" + atom + "(\\." + atom +")*$");

	// break up user@domain into different pieces that are easy to analyze.
	var matchArray = emailStr.match(emailPat);

	if (matchArray == null) {
		// Too many/few @'s or something; basically, this address doesn't even fit the general mould of a valid e-mail address.
		if (emailStr > '') alert("Email address seems incorrect (check @ and .'s)");
		return false;
	}

	var user = matchArray[1];
	var domain = matchArray[2];

	// check that only basic ASCII characters are in the strings (0-127)
	for (i = 0; i < user.length; i++) {
		if (user.charCodeAt(i) > 127) {
			alert("The email address username contains invalid characters.");
			return false;
		}
	}
	for (i = 0; i < domain.length; i++) {
		if (domain.charCodeAt(i) > 127) {
			alert("The email address domain name contains invalid characters.");
			return false;
		}
	}

	// See if "user" is valid
	if (user.match(userPat) == null) {
		alert("The email address username doesn't seem to be valid.");
		return false;
	}

	// if the e-mail address is at an IP address (as opposed to a symbolic host name) make sure the IP address is valid.
	var IPArray = domain.match(ipDomainPat);
	if (IPArray != null) { // this is an IP address
		for (var i = 1; i <= 4; i++) {
			if (IPArray[i] > 255) {
				alert("The email address destination IP address is invalid!");
				return false;
			}
		}
		return true;
	}

	// Domain is symbolic name.  Check if it's valid.
	var atomPat = new RegExp("^" + atom + "$");
	var domArr = domain.split(".");
	var len = domArr.length;

	for (i = 0; i < len; i++) {
		if (domArr[i].search(atomPat) == -1) {
			alert("The email address domain name does not seem to be valid.");
			return false;
		}
	}

	// domain name seems valid, but now make sure that it ends in a known top-level domain (like com, edu, gov) or a two-letter word,
	// representing country (uk, nl), and that there's a hostname preceding the domain or country.
	if (domArr[domArr.length - 1].length != 2 &&
		  domArr[domArr.length - 1].toLowerCase().search(knownDomsPat) == -1) {
		alert("The email address must end in a well-known domain or two letter " + "country.");
		return false;
	}

	// Make sure there's a host name preceding the domain.
	if (len < 2) {
		alert("The email address is missing a hostname!");
		return false;
	}

	// If we've gotten this far, everything's valid!
	return true;
}

function TextIsEmpty(form, name) {
	for (i = 0; i < form.elements.length; i++) {
		if (name == form.elements[i].name) {
			if (form.elements[i].value.length > 0) return true;
			return false;
		}
	}
	return true;
}

function RadioNotSelected(form, name) {
	oneChecked = false;
	for (i = 0; i < form.elements.length; i++) {
		if (name == form.elements[i].name) {
			if (form.elements[i].checked) oneChecked = true;
		}
	}
	return !oneChecked;
}

function SelectValueChosen(form, name) {
	for (i = 0; i < form.elements.length; i++) {
		if (name == form.elements[i].name) {
			if (form.elements[i].value.selectedIndex > 0) return true;
			return false;
		}
	}
	return false;
}

function CalcAge(inDate) {
	var Sp1 = inDate.indexOf("/",0);
	var Sp2 = inDate.indexOf("/",(parseInt(Sp1) + 1));
	var mm = parseInt(inDate.substring(Sp1+1,Sp2));
	var dd = parseInt(inDate.substring(0,Sp1));
	var yy = parseInt(inDate.substring(Sp2+1,Sp2+5)) - 1900;

	function leapyear(a) {
		if (((a % 4 == 0) && (a % 100 != 0)) || (a % 400 == 0))
			return true;
		else
			return false;
	}

	days = new Date();
	gdate = days.getDate();
	gmonth = days.getMonth();
	gyear = days.getYear();
	age = gyear - yy;
	if((mm == (gmonth + 1)) && (dd <= parseInt(gdate))) age = age;
	else {
		if(mm <= (gmonth)) age = age;
		else age = age - 1;
	}
	if (age == 0) age = age;
	if (age > 1900) age -= 1900;
	return age;
}

// ===========================

//Javascript name: My Date Time Picker
//Date created: 16-Nov-2003 23:19
//Scripter: TengYong Ng
//Website: http://www.rainforestnet.com
//Copyright (c) 2003 TengYong Ng
//FileName: DateTimePicker.js
//Version: 1.9
//Contact: contact@rainforestnet.com
// Note: Permission given to use and modify this script in ANY kind of applications if
//       header lines are left unchanged.
//Date changed: 24-Dec-2007 by Burgsoft (Holland)
//Changed: Year picker as drop down. Code optimised. Tables filled with blank fields as needed.
//Known (non fatal) issue: javascript remains running after month or year select
//Date changed: 19-Jul-2008 by DRS Tech Solutions, Inc.
//Changed: modified to look prettier and select quarter-hour times only for CYT

//Global variables
var winCal;
var dtToday=new Date();
var Cal;
// English
var MonthName=["January", "February", "March", "April", "May", "June","July",
	"August", "September", "October", "November", "December"];
var WeekDayName1=["Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday"];
var WeekDayName2=["Monday","Tuesday","Wednesday","Thursday","Friday","Saturday","Sunday"];
var exDateTime;//Existing Date and Time
var selDate;//selected date. version 1.7

//Configurable parameters
var cnTop="400";//top coordinate of calendar window.
var cnLeft="500";//left coordinate of calendar window
var WindowTitle ="Please Choose";//Date Time Picker title.
var WeekChar=2;//number of character for week day. if 2 then Mo,Tu,We. if 3 then Mon,Tue,Wed.
var CellWidth=26;//Width of day cell.
var DateSeparator="/";//Date Separator, you can change it to "/" if you want.
var TimeMode=12;//default TimeMode value. 12 or 24

var ShowLongMonth=true;//Show long month name in Calendar header. example: "January".
var ShowMonthYear=true;//Show Month and Year in Calendar header.
var MonthYearColor="white";//Font Color of Month and Year in Calendar header.
var WeekHeadColor="#87cefa";//Background Color in Week header.
var SundayColor="#dbeaf5";//Background color of Sunday.
var SaturdayColor="#dbeaf5";//Background color of Saturday.
var WeekDayColor="white";//Background color of weekdays.
var FontColor="white";//color of font in Calendar day cell.
var TodayColor="#FFFF33";//Background color of today.
var SelDateColor="#ffb6c1";//Backgrond color of selected date in textbox.
var YrSelColor="white";//color of font of Year selector.
var MthSelColor="white";//color of font of Month selector if "MonthSelector" is "arrow".
var ThemeBg="";//Background image of Calendar window.
var PrecedeZero=false;//Preceding zero [true|false]
var MondayFirstDay=true;//true:Use Monday as first day; false:Sunday as first day. [true|false]  //added in version 1.7
//end Configurable parameters
//end Global variable

function NewCal(pCtrl,pFormat,pShowTime,pTimeMode,pScroller,pHideSeconds)
{
	Cal=new Calendar(dtToday);
	if ((pShowTime!=null) && (pShowTime))
	{
		Cal.ShowTime=true;
		if ((pTimeMode!=null) &&((pTimeMode=='12')||(pTimeMode=='24')))
		{
			TimeMode=pTimeMode;
		}
		if ((pHideSeconds!=null)&&(pHideSeconds))
		{
			Cal.ShowSeconds=false;
		}
	}
	if (pCtrl!=null)
		Cal.Ctrl=pCtrl;
	if (pFormat!=null)
		Cal.Format=pFormat.toUpperCase();
	if (pScroller!=null)
	{
		if (pScroller.toUpperCase()=="ARROW")
			Cal.Scroller="ARROW";
		else
			Cal.Scroller="DROPDOWN";
    }

	exDateTime=document.getElementById(pCtrl).value;
	if (exDateTime!="")//Parse existing Date String
	{
		var Sp1;//Index of Date Separator 1
		var Sp2;//Index of Date Separator 2
		var tSp1;//Index of Time Separator 1
		var tSp1;//Index of Time Separator 2
		var strMonth;
		var strDate;
		var strYear;
		var intMonth;
		var YearPattern;
		var strHour;
		var strMinute;
		var strSecond;
		var winHeight;

		if (Cal.Format.toUpperCase()=="MSSQL") {
			strMonth=exDateTime.substring(0,3);
			strDate=exDateTime.substring(4,6);
			strYear=exDateTime.substring(7,11);
			if (strDate.substring(0, 1) == ' ') strDate='0'+strDate.substring(1);;
		}
		else {
			//parse month
			Sp1=exDateTime.indexOf(DateSeparator,0)
			Sp2=exDateTime.indexOf(DateSeparator,(parseInt(Sp1)+1));

			var offset=parseInt(Cal.Format.toUpperCase().lastIndexOf("M"))-parseInt(Cal.Format.toUpperCase().indexOf("M"))-1;
			if ((Cal.Format.toUpperCase()=="DDMMYYYY") || (Cal.Format.toUpperCase()=="DDMMMYYYY"))
			{
				if (DateSeparator=="")
				{
					strMonth=exDateTime.substring(2,4+offset);
					strDate=exDateTime.substring(0,2);
					strYear=exDateTime.substring(4+offset,8+offset);
				}
				else
				{
					strMonth=exDateTime.substring(Sp1+1,Sp2);
					strDate=exDateTime.substring(0,Sp1);
					strYear=exDateTime.substring(Sp2+1,Sp2+5);
				}
			}
			else if ((Cal.Format.toUpperCase()=="MMDDYYYY") || (Cal.Format.toUpperCase()=="MMMDDYYYY"))
			{
				if (DateSeparator=="")
				{
					strMonth=exDateTime.substring(0,2+offset);
					strDate=exDateTime.substring(2+offset,4+offset);
					strYear=exDateTime.substring(4+offset,8+offset);
				}
				else
				{
					strMonth=exDateTime.substring(0,Sp1);
					strDate=exDateTime.substring(Sp1+1,Sp2);
					strYear=exDateTime.substring(Sp2+1,Sp2+5);
				}

			}
			else if ((Cal.Format.toUpperCase()=="YYYYMMDD") || (Cal.Format.toUpperCase()=="YYYYMMMDD"))
			{
				if (DateSeparator=="")
				{
					strMonth=exDateTime.substring(4,6+offset);
					strDate=exDateTime.substring(6+offset,8+offset);
					strYear=exDateTime.substring(0,4);
				}
				else
				{
					strMonth=exDateTime.substring(Sp1+1,Sp2);
					strDate=exDateTime.substring(Sp2+1,Sp2+3);
					strYear=exDateTime.substring(0,Sp1);
				}
			}
		}

		if (isNaN(strMonth))
			intMonth=Cal.GetMonthIndex(strMonth);
		else
			intMonth=parseInt(strMonth,10)-1;
		if ((parseInt(intMonth,10)>=0) && (parseInt(intMonth,10)<12))
			Cal.Month=intMonth;
		//end parse month
		//parse Date
		if ((parseInt(strDate,10)<=Cal.GetMonDays()) && (parseInt(strDate,10)>=1))
			Cal.Date=strDate;
		//end parse Date
		//parse year
		YearPattern=/^\d{4}$/;
		if (YearPattern.test(strYear))
			Cal.Year=parseInt(strYear,10);
		//end parse year
		//parse time
		if (Cal.ShowTime==true)
		{
			//parse AM or PM
			if (TimeMode==12)
			{
				strAMPM=exDateTime.substring(exDateTime.length-2,exDateTime.length)
				Cal.AMorPM=strAMPM;
			}
			tSp1=exDateTime.indexOf(":",0)
			tSp2=exDateTime.indexOf(":",(parseInt(tSp1)+1));
			if (tSp1>0)
			{
				strHour=exDateTime.substring(tSp1,(tSp1)-2);
				if (strHour.substring(0, 1) == ' ') strHour='0'+strHour.substring(1);
				Cal.SetHour(strHour);
				strMinute=exDateTime.substring(tSp1+1,tSp1+3);
				Cal.SetMinute(strMinute);
				if (Cal.Format.toUpperCase()=="MSSQL") {
					strSecond = '00';
				}
				else strSecond=exDateTime.substring(tSp2+1,tSp2+3);
				Cal.SetSecond(strSecond);
			}
			//window.status=strHour+":"+strMinute+":"+strSecond;
		}
	}
	selDate=new Date(Cal.Year,Cal.Month,Cal.Date);//version 1.7
	winCal=window.open("","DateTimePicker","toolbar=0,status=0,menubar=0,fullscreen=no,width=215,height=230,resizable=0,top="+cnTop+",left="+cnLeft);
	RenderCal();
	winCal.focus();
}

function RenderCal()
{
	var vCalHeader;
	var vCalData;
	var vCalTime;
	var i;
	var j;
	var SelectStr;
	var vDayCount=0;
	var vFirstDay;

	winCalData ="<html>\n<head>\n<title>"+WindowTitle+"</title>\n";
	winCalData+="<script type='text/javascript' language='javascript'>\n";
	winCalData+="var winMain=window.opener;\nfunction callback(id, datum) {\n";
	winCalData+=" var CalId = winMain.document.getElementById(id); CalId.value=datum;\n";
	winCalData+="if (winMain.Cal.ShowTime) {\n";
	winCalData+=" CalId.value+=' ';\nif (winMain.Cal.Format.toUpperCase()==\"MSSQL\") {\n";
	winCalData+="  if (winMain.Cal.getShowHour() < 10) CalId.value+=' '+winMain.Cal.getShowHour().substring(1);\n";
	winCalData+="  else CalId.value+=winMain.Cal.getShowHour();\n}\n";
	winCalData+=" else CalId.value+=winMain.Cal.getShowHour();\n";
	winCalData+=" CalId.value+=':'+winMain.Cal.Minutes;\n";
	winCalData+=" if (winMain.Cal.ShowSeconds)\n  CalId.value+=':'+winMain.Cal.Seconds;\n";
	winCalData+=" if (winMain.TimeMode==12)\n  CalId.value+=' '+winMain.Cal.getShowAMorPM();\n";
	winCalData+="}\n window.close();\n}\n";
	winCalData+="</script>\n";//winMain is window that opened calendar window.
	winCalData+="<style type='text/css'>\n td {font-family: verdana; font-size: 12Px; text-align: center; cursor: pointer; border:1px solid #4682B4; border-spacing:0px;}\ntd a {text-decoration: none;}\n .r {font-weight: bold;}\n</style>\n";
	winCalData+="</head>\n<body background='"+ThemeBg+"' link='"+FontColor+"' vlink='"+FontColor;
	winCalData+="'>\n<form name='Calendar'>\n<div style='position: absolute; margin: auto; auto; auto; auto;'>\n";
	winCal.document.open();
	winCal.document.writeln(winCalData);

	vCalHeader="<table cellspacing=0 cellpadding=0 style='border:1px inset #4682B4; border-spacing:0px;' valign=\"top\">\n";
	//Table for Month & Year Selector
	vCalHeader+="<tr>\n<td colspan='7'>\n<table width=100% border=0 cellpadding=0 cellspacing=0>\n<tr bgcolor='#4682B4' height=24px valign=middle>\n";

	//******************Month and Year selector in dropdown list************************
	if (Cal.Scroller=="DROPDOWN")
	{
		vCalHeader+="<td><select name=\"MonthSelector\" onChange=\"javascript:winMain.Cal.SwitchMth(this.selectedIndex);winMain.RenderCal();\">\n";
		for (i=0;i<12;i++)
		{
			if (i==Cal.Month)
				SelectStr="Selected";
			else
				SelectStr="";
			vCalHeader+="<option "+SelectStr+" value="+i+">"+MonthName[i]+"</option>\n";
		}
		vCalHeader+="</select></td>\n";
		//Year selector
		vCalHeader+="<td><select name=\"YearSelector\" size=\"1\" onChange=\"javascript:winMain.Cal.SwitchYear(this.value);winMain.RenderCal();\">\n";
		for (i = dtToday.getFullYear() - 19; i < (dtToday.getFullYear() + 2);i++)
		{
			if (i==Cal.Year)
				SelectStr="Selected";
			else
				SelectStr="";
			vCalHeader+="<option "+SelectStr+" value="+i+">"+i+"</option>\n";
		}
		vCalHeader+="</select></td>\n";
	}
	//******************End Month and Year selector in dropdown list*********************
	//******************Month and Year selector in arrow*********************************
	else if (Cal.Scroller=="ARROW")
	{
		vCalHeader+="<td>&nbsp;<a href='javascript:winMain.Cal.DecYear();winMain.RenderCal();'><img src=/images/calprev_year.gif border=0></a></td>\n";//Year scroller (decrease 1 year)
		vCalHeader+="<td>&nbsp;<a href='javascript:winMain.Cal.DecMonth();winMain.RenderCal();'><img src=/images/calprev.gif border=0></a></td>\n";//Month scroller (decrease 1 month)
		vCalHeader+="<td width='70%'><font color='"+YrSelColor+"'><b>"+Cal.GetMonthName(ShowLongMonth)+" "+Cal.Year+"</b></font></td>\n"//Month and Year
		vCalHeader+="<td><a href='javascript:winMain.Cal.IncMonth();winMain.RenderCal();'><img src=/images/calnext.gif border=0></a>&nbsp;</td>\n";//Month scroller (increase 1 month)
		vCalHeader+="<td><a href='javascript:winMain.Cal.IncYear();winMain.RenderCal();'><img src=/images/calnext_year.gif border=0></a>&nbsp;</td>\n";//Year scroller (increase 1 year)
	}
	vCalHeader+="</tr>\n</table>\n</td></tr>\n"
  //******************End Month and Year selector in arrow******************************
	//Calendar header shows Month and Year
	if ((ShowMonthYear)&&(Cal.Scroller=="DROPDOWN"))
		vCalHeader+="<tr><td colspan='7'>\n<font  class='r' color='"+MonthYearColor+"'>"+Cal.GetMonthName(ShowLongMonth)+" "+Cal.Year+"</font>\n</td></tr>\n";
	//Week day header
	vCalHeader+="<tr height="+CellWidth+" bgcolor="+WeekHeadColor+">\n";
	var WeekDayName=new Array();//Added version 1.7
	if (MondayFirstDay==true)
		WeekDayName=WeekDayName2;
	else
		WeekDayName=WeekDayName1;
	for (i=0;i<7;i++)
	{
		vCalHeader+="<td width="+CellWidth+">\n"+WeekDayName[i].substr(0,WeekChar)+"</td>\n";
	}

	vCalHeader+="</tr>\n";
	winCal.document.write(vCalHeader);
	//Calendar detail
	CalDate=new Date(Cal.Year,Cal.Month);
	CalDate.setDate(1);
	vFirstDay=CalDate.getDay();
	//Added version 1.7
	if (MondayFirstDay==true)
	{
		vFirstDay-=1;
		if (vFirstDay==-1)
			vFirstDay=6;
	}
	//Added version 1.7
	vCalData="<tr height=" + (CellWidth - 4) + ">\n";
	for (i=0;i<vFirstDay;i++)
	{
		vCalData=vCalData+GenCell();
		vDayCount=vDayCount+1;
	}
	//Added version 1.7
	for (j=1;j<=Cal.GetMonDays();j++)
	{
		var strCell;
		if((vDayCount%7==0)&&(j > 1))
		{
			vCalData=vCalData+"<tr height=" + (CellWidth - 4) + ">\n";
		}
		vDayCount=vDayCount+1;
		if ((j==selDate.getDate())&&(Cal.Month==selDate.getMonth())&&(Cal.Year==selDate.getFullYear()))//modified version 1.7
		{
			strCell=GenCell(j,true,SelDateColor);
		}
		else
		{
			if ((j==dtToday.getDate())&&(Cal.Month==dtToday.getMonth())&&(Cal.Year==dtToday.getFullYear()))
				strCell=GenCell(j,true,TodayColor);//Highlight today's date
			else
			{
				if (MondayFirstDay==true)
				{
					if (vDayCount%7==0)
						strCell=GenCell(j,false,SundayColor);
					else if ((vDayCount+1)%7==0)
						strCell=GenCell(j,false,SaturdayColor);
					else
						strCell=GenCell(j,null,WeekDayColor);
				}
				else
				{
					if (vDayCount%7==0)
						strCell=GenCell(j,false,SaturdayColor);
					else if ((vDayCount+6)%7==0)
						strCell=GenCell(j,false,SundayColor);
					else
						strCell=GenCell(j,null,WeekDayColor);
				}
			}
		}
		vCalData=vCalData+strCell;

		if((vDayCount%7==0)&&(j<Cal.GetMonDays()))
		{
			vCalData=vCalData+"</tr>\n";
		}
	}
	// finish the table proper
	if(!(vDayCount%7) == 0)
	{
		while(!(vDayCount % 7) == 0)
		{
			vCalData=vCalData+GenCell();
			vDayCount=vDayCount+1;
		}
		vCalData=vCalData+"</tr>\n";
	}

	winCal.document.writeln(vCalData);
	//Time picker
	if (Cal.ShowTime)
	{
		var showHour, selectedMinutes;
		showHour=Cal.getShowHour();
		selectedMinutes = false;
		vCalTime="<tr style='height:30px; background:"+WeekHeadColor+"'>\n<td colspan='7' align='center'>\n";
		if (Cal.Format.toUpperCase()=="MSSQL") {
			vCalTime+="<select name=\"hour\" onChange=\"javascript:winMain.Cal.SetHour(this.value)\">\n";
			for (i = 1; i <= TimeMode; i++) {
				var Selected =(parseInt(showHour)==i)? "Selected":"";
				vCalTime+="<option "+Selected+" value=\"" + i + "\">" + i + "</option>";
			}
			vCalTime+="</select>";
			vCalTime+=" : ";
			vCalTime+="<select name=\"minute\" onChange=\"javascript:winMain.Cal.SetMinute(this.value)\">\n";
			var Selected =(parseInt(Cal.Minutes)==0)? "Selected":"";
			selectedMinutes |= Selected;
			vCalTime+="<option "+Selected+" value=\"00\">00</option>";
			Selected =(parseInt(Cal.Minutes)==15)? "Selected":"";
			selectedMinutes |= Selected;
			vCalTime+="<option "+Selected+" value=\"15\">15</option>";
			Selected =(parseInt(Cal.Minutes)==30)? "Selected":"";
			selectedMinutes |= Selected;
			vCalTime+="<option "+Selected+" value=\"30\">30</option>";
			Selected =(parseInt(Cal.Minutes)==45)? "Selected":"";
			selectedMinutes |= Selected;
			vCalTime+="<option "+Selected+" value=\"45\">45</option>";
			vCalTime+="</select>";
			if (!selectedMinutes) Cal.Minutes = '00';
		}
		else {
			vCalTime+="<input type='text' name='hour' maxlength=2 size=1 style=\"WIDTH: 22px\" value="+showHour+" onChange=\"javascript:winMain.Cal.SetHour(this.value)\">\n";
			vCalTime+=" : ";
			vCalTime+="<input type='text' name='minute' maxlength=2 size=1 style=\"WIDTH: 22px\" value="+Cal.Minutes+" onChange=\"javascript:winMain.Cal.SetMinute(this.value)\">\n";
			if (Cal.ShowSeconds)
			{
				vCalTime+=" : ";
				vCalTime+="<input type='text' name='second' maxlength=2 size=1 style=\"WIDTH: 22px\" value="+Cal.Seconds+" onChange=\"javascript:winMain.Cal.SetSecond(this.value)\">\n";
			}
		}
		if (TimeMode==12)
		{
			var SelectAm =(Cal.AMorPM=="AM")? "Selected":"";
			var SelectPm =(Cal.AMorPM=="PM")? "Selected":"";

			vCalTime+=" <select name=\"ampm\" onChange=\"javascript:winMain.Cal.SetAmPm(this.options[this.selectedIndex].value);\">\n";
			vCalTime+="<option "+SelectAm+" value=\"AM\">AM</option>";
			vCalTime+="<option "+SelectPm+" value=\"PM\">PM<option>";
			vCalTime+="</select>";
		}
		vCalTime+=" <img src='/images/calOk.png' style='position:relative; top:5px; border:none;' onClick=\"javascript:winMain.Cal.Month="+selDate.getMonth()+";winMain.Cal.Year="+selDate.getYear()+";callback('"+Cal.Ctrl+"','"+Cal.FormatDate(selDate.getDate())+"');\">\n</td>\n</tr>";
		winCal.document.write(vCalTime);
	}
	//end time picker
	winCal.document.writeln("\n</table>\n");
	winCal.document.writeln("</div>\n</form>\n</body>\n</html>");
	winCal.document.close();
	return true;
}

function GenCell(pValue,pHighLight,pColor)//Generate table cell with value
{
	var PValue;
	var PCellStr;
	var vColor;
	var vHLstr1;//HighLight string
	var vHlstr2;
	var vTimeStr;

	if (pValue==null)
		PValue="";
	else
		PValue=pValue;

	if (pColor!=null)
		vColor="bgcolor=\""+pColor+"\"";
	else
		vColor="";
	if ((pHighLight!=null)&&(pHighLight))
		{vHLstr1="<font class='r'>";vHLstr2="</font>";}
	else
		{vHLstr1="";vHLstr2="";}

	if (Cal.ShowTime)
	{
		vTimeStr=' '+Cal.Hours+':'+Cal.Minutes;
		if (Cal.ShowSeconds)
			vTimeStr+=':'+Cal.Seconds;
		if (TimeMode==12)
			vTimeStr+=' '+Cal.AMorPM;
	}
	else
		vTimeStr="";
	if (PValue!="")
		PCellStr="<td "+vColor+" onClick=\"javascript:callback('"+Cal.Ctrl+"','"+Cal.FormatDate(PValue)+"');\">"+vHLstr1+PValue+vHLstr2+"</td>\n";
	else
		PCellStr="<td "+vColor+">&nbsp;</td>\n";
	return PCellStr;
}

function Calendar(pDate,pCtrl)
{
	//Properties
	this.Date=pDate.getDate();//selected date
	this.Month=pDate.getMonth();//selected month number
	this.Year=pDate.getFullYear();//selected year in 4 digits
	this.Hours=pDate.getHours();

	if (pDate.getMinutes()<10)
		this.Minutes="0"+pDate.getMinutes();
	else
		this.Minutes=pDate.getMinutes();

	if (pDate.getSeconds()<10)
		this.Seconds="0"+pDate.getSeconds();
	else
		this.Seconds=pDate.getSeconds();

	this.MyWindow=winCal;
	this.Ctrl=pCtrl;
	this.Format="ddMMyyyy";
	this.Separator=DateSeparator;
	this.ShowTime=false;
	this.Scroller="DROPDOWN";
	if (pDate.getHours()<12)
		this.AMorPM="AM";
	else
		this.AMorPM="PM";
	this.ShowSeconds=true;
}

function GetMonthIndex(shortMonthName)
{
	for (i=0;i<12;i++)
	{
		if (MonthName[i].substring(0,3).toUpperCase()==shortMonthName.toUpperCase())
		{	return i;}
	}
}
Calendar.prototype.GetMonthIndex=GetMonthIndex;

function IncYear()
{	Cal.Year++;}
Calendar.prototype.IncYear=IncYear;

function DecYear()
{	Cal.Year--;}
Calendar.prototype.DecYear=DecYear;

function IncMonth()
{
	Cal.Month++;
	if (Cal.Month>=12)
	{
		Cal.Month=0;
		Cal.IncYear();
	}
}
Calendar.prototype.IncMonth=IncMonth;

function DecMonth()
{
	Cal.Month--;
	if (Cal.Month<0)
	{
		Cal.Month=11;
		Cal.DecYear();
	}
}
Calendar.prototype.DecMonth=DecMonth;

function SwitchMth(intMth)
{	Cal.Month=intMth;}
Calendar.prototype.SwitchMth=SwitchMth;

function SwitchYear(intYear)
{	Cal.Year=intYear;}
Calendar.prototype.SwitchYear=SwitchYear;

function SetHour(intHour)
{
	var MaxHour;
	var MinHour;
	if (TimeMode==24)
	{	MaxHour=23;MinHour=0}
	else if (TimeMode==12)
	{	MaxHour=12;MinHour=1}
	else
		alert("TimeMode can only be 12 or 24");
	var HourExp=new RegExp("^\\d\\d");
	var SingleDigit=new RegExp("\\d");
	//alert(SingleDigit.test(intHour));
	if (SingleDigit.test(intHour))
	{
		intHour="0"+intHour+"";
		//alert(intHour);
	}
	if (HourExp.test(intHour) && (parseInt(intHour,10)<=MaxHour) && (parseInt(intHour,10)>=MinHour))
	{
		if ((TimeMode==12) && (Cal.AMorPM=="PM"))
		{
			if (parseInt(intHour,10)==12)
				Cal.Hours=12;
			else
				Cal.Hours=parseInt(intHour,10)+12;
		}
		else if ((TimeMode==12) && (Cal.AMorPM=="AM"))
		{
			if (intHour==12)
				intHour-=12;
			Cal.Hours=parseInt(intHour,10);
		}
		else if (TimeMode==24)
			Cal.Hours=parseInt(intHour,10);
	}
}
Calendar.prototype.SetHour=SetHour;

function SetMinute(intMin)
{
	var MinExp=new RegExp("^\\d\\d$");
	if (MinExp.test(intMin) && (intMin<60))
		Cal.Minutes=intMin;
}
Calendar.prototype.SetMinute=SetMinute;

function SetSecond(intSec)
{
	var SecExp=new RegExp("^\\d\\d$");
	if (SecExp.test(intSec) && (intSec<60))
		Cal.Seconds=intSec;
}
Calendar.prototype.SetSecond=SetSecond;

function SetAmPm(pvalue)
{
	this.AMorPM=pvalue;
	if (pvalue=="PM")
	{
		this.Hours=(parseInt(this.Hours,10))+12;
		if (this.Hours==24)
			this.Hours=12;
	}
	else if (pvalue=="AM")
		this.Hours-=12;
}
Calendar.prototype.SetAmPm=SetAmPm;

function getShowHour()
{
	var finalHour;
    if (TimeMode==12)
    {
    	if (parseInt(this.Hours,10)==0)
		{
			this.AMorPM="AM";
			finalHour=parseInt(this.Hours,10)+12;
		}
		else if (parseInt(this.Hours,10)==12)
		{
			this.AMorPM="PM";
			finalHour=12;
		}
		else if (this.Hours>12)
		{
			this.AMorPM="PM";
			if ((this.Hours-12)<10)
				finalHour="0"+((parseInt(this.Hours,10))-12);
			else
				finalHour=parseInt(this.Hours,10)-12;
		}
		else
		{
			this.AMorPM="AM";
			if (this.Hours<10)
				finalHour="0"+parseInt(this.Hours,10);
			else
				finalHour=this.Hours;
		}
	}
	else if (TimeMode==24)
	{
		if (this.Hours<10)
			finalHour="0"+parseInt(this.Hours,10);
		else
			finalHour=this.Hours;
	}
	return finalHour;
}
Calendar.prototype.getShowHour=getShowHour;

function getShowAMorPM()
{
	return this.AMorPM;
}
Calendar.prototype.getShowAMorPM=getShowAMorPM;

function GetMonthName(IsLong)
{
	var Month=MonthName[this.Month];
	if (IsLong)
		return Month;
	else
		return Month.substr(0,3);
}
Calendar.prototype.GetMonthName=GetMonthName;

function GetMonDays()//Get number of days in a month
{
	var DaysInMonth=[31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];
	if (this.IsLeapYear())
	{
		DaysInMonth[1]=29;
	}
	return DaysInMonth[this.Month];
}
Calendar.prototype.GetMonDays=GetMonDays;

function IsLeapYear()
{
	if ((this.Year%4)==0)
	{
		if ((this.Year%100==0) && (this.Year%400)!=0)
		{
			return false;
		}
		else
		{
			return true;
		}
	}
	else
	{
		return false;
	}
}
Calendar.prototype.IsLeapYear=IsLeapYear;

function FormatDate(pDate)
{
	var MonthDigit=this.Month+1;
	if (this.Format.toUpperCase()=="MSSQL") {
		if (pDate<10) pDate=" "+pDate;
	}
	else if (PrecedeZero==true)
	{
		if (pDate<10)
			pDate="0"+pDate;
		if (MonthDigit<10)
			MonthDigit="0"+MonthDigit;
	}

	if (this.Format.toUpperCase()=="MSSQL")
		return (this.GetMonthName(false)+' '+pDate+' '+this.Year);
	else if (this.Format.toUpperCase()=="DDMMYYYY")
		return (pDate+DateSeparator+MonthDigit+DateSeparator+this.Year);
	else if (this.Format.toUpperCase()=="DDMMMYYYY")
		return (pDate+DateSeparator+this.GetMonthName(false)+DateSeparator+this.Year);
	else if (this.Format.toUpperCase()=="MMDDYYYY")
		return (MonthDigit+DateSeparator+pDate+DateSeparator+this.Year);
	else if (this.Format.toUpperCase()=="MMMDDYYYY")
		return (this.GetMonthName(false)+DateSeparator+pDate+DateSeparator+this.Year);
	else if (this.Format.toUpperCase()=="YYYYMMDD")
		return (this.Year+DateSeparator+MonthDigit+DateSeparator+pDate);
	else if (this.Format.toUpperCase()=="YYYYMMMDD")
		return (this.Year+DateSeparator+this.GetMonthName(false)+DateSeparator+pDate);
	else
		return (pDate+DateSeparator+(this.Month+1)+DateSeparator+this.Year);
}
Calendar.prototype.FormatDate=FormatDate;