//----------------------------------------------------------------------------------------------
// function to select single date
//----------------------------------------------------------------------------------------------

var fmDateCtrl = new Object();
var toDateCtrl = new Object();
var goSelectTag = new Array();
//var gcGray = "#99CCFF";
var gcGray = "#808080";
var gcOrange = "#FFFF00";
//var gcToggle = "#99CCFF";
var gcToggle = "#DADBA4";
var gcBG = "#99CCFF";
//var gcBG = "#cccccc";
var weekdaygcBG ="#6051AD"

var gdCurDate = new Date();

var giYear = gdCurDate.getFullYear();
var giMonth = gdCurDate.getMonth()+1;
var giDay = gdCurDate.getDate();

var calDisplay="hidden";

// get the starting and ending date of the week
function fSetDate(iYear, iMonth, iDay){
VicPopCal.style.visibility = "hidden";
  calDisplay=VicPopCal.style.visibility;
  startDate.value = iMonth+"-"+iDay+"-"+iYear; //Here, you could modify the locale as you need !!!!
  for (i in goSelectTag)
  	goSelectTag[i].style.visibility = "visible";
  goSelectTag.length = 0;
}

// get the starting and ending date of this week
/*
function thisWeekSetDate(){
	
  	VicPopCal.style.visibility = "hidden";
  	var newDate = new Date();
	var iYear = newDate.getYear();
	var iMonth = newDate.getMonth()+1;
	var iDay = newDate.getDate();
	
  	var PreDaysInMonth=new Date(iYear, iMonth-1, 0).getDate();
  	var CurDaysInMonth=new Date(iYear, iMonth, 0).getDate();
  	var startDate = iDay-(newDate.getDay()-0);
	var startMonth = iMonth;
	var endMonth = iMonth;
	var startYear = iYear;
	var endYear = iYear;
	
	if (startDate<=0) {
		startDate = PreDaysInMonth-Math.abs((iDay-newDate.getDay()-0));
		startMonth=startMonth-1;
	}
	if (startMonth<=0) {
		startMonth = startMonth+12;
		startYear = startYear -1;
	}
		
	var endDate = iDay+(6-newDate.getDay());
	if (endDate>CurDaysInMonth){
		endDate = endDate-CurDaysInMonth;
		endMonth = endMonth +1;
	}
	if (endMonth>12) {
		endMonth=endMonth-12;
		endYear = endYear +1;
	}
	
  calDisplay=VicPopCal.style.visibility;
  document.prayerRequest.startDate.value = startMonth+"-"+startDate+"-"+startYear; //Here, you could modify the locale as you need !!!!
  document.prayerRequest.endDate.value = endMonth+"-"+endDate+"-"+endYear;
  
  for (i in goSelectTag)
  	goSelectTag[i].style.visibility = "visible";
  goSelectTag.length = 0;
}
*/
function fSetSelected(aCell){
  var iOffset = 0;
  var iYear = parseInt(tbSelYear.value);
  var iMonth = parseInt(tbSelMonth.value);

  self.event.cancelBubble = true;
  aCell.bgColor = gcBG;
  with (aCell.children["cellText"]){
  	var iDay = parseInt(innerText);
  	if (color==gcGray)
		iOffset = (Victor<10)?-1:1;
	iMonth += iOffset;
	if (iMonth<1) {
		iYear--;
		iMonth = 12;
	}else if (iMonth>12){
		iYear++;
		iMonth = 1;
	}
  }
  fSetDate(iYear, iMonth, iDay);
}

function Point(iX, iY){
	this.x = iX;
	this.y = iY;
}

// highlight the week when mouseover any date of that week
function highlightWeek (object) {
	var whichWeek=object.id.substring(0,3);
	var WeekObject = new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
	//alert (whichWeek);
	switch (whichWeek) {
		case ("One"):
			
			for (i = 0; i < 7; i++) {
				eval("One" + WeekObject[i] + ".bgColor=gcToggle");
			}
			break;
		case ("Two"):
			for (i = 0; i < 7; i++) {
				eval("Two" + WeekObject[i] + ".bgColor=gcToggle");
			}
			break;
		case ("Thr"):
			for (i = 0; i < 7; i++) {
				eval("Three" + WeekObject[i] + ".bgColor=gcToggle");
			}
			break;
		case ("Fou"):
			for (i = 0; i < 7; i++) {
				eval("Four" + WeekObject[i] + ".bgColor=gcToggle");
			}
			break;
		case ("Fiv"):
			for (i = 0; i < 7; i++) {
				eval("Five" + WeekObject[i] + ".bgColor=gcToggle");
			}
			break;
		case ("Six"):
			for (i = 0; i < 7; i++) {
				eval("Six" + WeekObject[i] + ".bgColor=gcToggle");
			}
			break;
			}
}

// de-highlight the week when mouseout
function dehighlightWeek (object) {
	var whichWeek=object.id.substring(0,3);
	var WeekObject = new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
	//alert (whichWeek);
	switch (whichWeek) {
		case ("One"):
			
			for (i = 0; i < 7; i++) {
				eval("One" + WeekObject[i] + ".bgColor=gcBG");
			}
			break;
		case ("Two"):
			for (i = 0; i < 7; i++) {
				eval("Two" + WeekObject[i] + ".bgColor=gcBG");
			}
			break;
		case ("Thr"):
			for (i = 0; i < 7; i++) {
				eval("Three" + WeekObject[i] + ".bgColor=gcBG");
			}
			break;
		case ("Fou"):
			for (i = 0; i < 7; i++) {
				eval("Four" + WeekObject[i] + ".bgColor=gcBG");
			}
			break;
		case ("Fiv"):
			for (i = 0; i < 7; i++) {
				eval("Five" + WeekObject[i] + ".bgColor=gcBG");
			}
			break;
		case ("Six"):
			for (i = 0; i < 7; i++) {
				eval("Six" + WeekObject[i] + ".bgColor=gcBG");
			}
			break;
			}
}

function fBuildCal(iYear, iMonth) {
  var aMonth=new Array();
  for(i=1;i<7;i++)
  	aMonth[i]=new Array(i);

  var dCalDate=new Date(iYear, iMonth-1, 1);
  var iDayOfFirst=dCalDate.getDay();
  var iDaysInMonth=new Date(iYear, iMonth, 0).getDate();
  var iOffsetLast=new Date(iYear, iMonth-1, 0).getDate()-iDayOfFirst+1;
  var iDate = 1;
  var iNext = 1;

  for (d = 0; d < 7; d++)
	aMonth[1][d] = (d<iDayOfFirst)?-(iOffsetLast+d):iDate++;
  for (w = 2; w < 7; w++)
  	for (d = 0; d < 7; d++)
		aMonth[w][d] = (iDate<=iDaysInMonth)?iDate++:-(iNext++);
  return aMonth;
}


function fDrawCal(iYear, iMonth, /*iCellHeight,*/ iDateTextSize) {
  var WeekDay = new Array("S","M","T","W","T","F","S");
  var WeekOb = new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
  var Weeks = new Array("One","Two","Three","Four","Five","Six");
  var WeekDayStyleTD = " bgcolor='"+weekdaygcBG+"' bordercolor='"+gcBG+"' valign='middle' align='center' height='"/*+iCellHeight*/+"' style='font:bold "+iDateTextSize+" Arial;";            //Coded by Liming Weng(Victor Won)  email:victorwon@netease.com
  var styleTD = " bgcolor='"+gcBG+"' bordercolor='"+gcBG+"' valign='middle' align='center' height='"/*+iCellHeight*/+"' style=' font:bold "+iDateTextSize+" Arial;";            //Coded by Liming Weng(Victor Won)  email:victorwon@netease.com
  
  with (document) {
	write("<tr>");
	for(i=0; i<7; i++)
		write("<td "+WeekDayStyleTD+"color:#FFFFFF' >" + WeekDay[i] + "</td>");
	write("</tr>");

  	for (w = 0; w < 6; w++) {
		write("<tr>");
		for (d = 0; d < 7; d++) {
			/*if (d==giDay) {
				write("<td bgColor='red' id=calCell "+styleTD+"cursor:hand;' onMouseOver='this.bgColor=gcToggle' onMouseOut='this.bgColor=gcBG' onclick='fSetSelected(this)'>");	
			}
			else {*/
			write("<td id='" + Weeks[w] + WeekOb[d] + "' " +styleTD+"cursor:hand;' onMouseOver='this.bgColor=gcToggle;' onMouseOut='this.bgColor=gcBG' onclick='fSetSelected(this)'>");
			//}
			write("<font id=cellText Victor='Liming Weng'> </font>");
			
			write("</td>")
		}
		write("</tr>");
	}
  }
}

function fUpdateCal(iYear, iMonth) {
  myMonth = fBuildCal(iYear, iMonth);
  var i = 0;
  for (w = 0; w < 6; w++)
	for (d = 0; d < 7; d++)
		with (cellText[(7*w)+d]) {
			Victor = i++;
			if (myMonth[w+1][d]<0) {
				color = gcGray;
				innerText = -myMonth[w+1][d];
			}
			else if (iYear==giYear & iMonth==giMonth & myMonth[w+1][d]==giDay) {
				color = gcOrange;
				innerText = myMonth[w+1][d];
			}
			else{
				//color = ((d==0)||(d==6))?"red":"black";
				color = (d==0)?"red":"black";
				innerText = myMonth[w+1][d];
			}
		}
}

function fSetYearMon(iYear, iMon){
  tbSelMonth.options[iMon-1].selected = true;
  for (i = 0; i < tbSelYear.length; i++)
	if (tbSelYear.options[i].value == iYear)
		tbSelYear.options[i].selected = true;
  fUpdateCal(iYear, iMon);
}

function fPrevMonth(){
  var iMon = tbSelMonth.value;
  var iYear = tbSelYear.value;

  if (--iMon<1) {
	  iMon = 12;
	  iYear--;
  }

  fSetYearMon(iYear, iMon);
}

function fNextMonth(){
  var iMon = tbSelMonth.value;
  var iYear = tbSelYear.value;

  if (++iMon>12) {
	  iMon = 1;
	  iYear++;
  }

  fSetYearMon(iYear, iMon);
}

function fToggleTags(){
  with (document.all.tags("SELECT")){
 	for (i=0; i<length; i++)
 		if ((item(i).Victor!="Won")&&fTagInBound(item(i))){
 			item(i).style.visibility = "hidden";
 			goSelectTag[goSelectTag.length] = item(i);
 		}
  }
}

function fTagInBound(aTag){
  with (VicPopCal.style){
  	var l = parseInt(left);
  	var t = parseInt(top);
  	var r = l+parseInt(width);
  	var b = t+parseInt(height);
	var ptLT = fGetXY(aTag);
	return !((ptLT.x>r)||(ptLT.x+aTag.offsetWidth<l)||(ptLT.y>b)||(ptLT.y+aTag.offsetHeight<t));
  }
}

function fGetXY(aTag){
  var oTmp = aTag;
  var pt = new Point(0,0);
  do {
  	pt.x += oTmp.offsetLeft;
  	pt.y += oTmp.offsetTop;
  	oTmp = oTmp.offsetParent;
  } while(oTmp.tagName!="BODY");
  return pt;
}

function fPopCalendar(popCtrl, fmCtrl){
	startDate = fmCtrl;
	
  	fSetYearMon(giYear, giMonth);
  	var point = fGetXY(popCtrl);
  
  	//alert (calDisplay);
  	if (calDisplay == 'hidden') {	
  		with (VicPopCal.style) {
  			left = point.x;
			top  = point.y+popCtrl.offsetHeight+1;
			width = VicPopCal.offsetWidth;
			height = VicPopCal.offsetHeight;
			fToggleTags(point);
			visibility = 'visible';
			VicPopCal.focus();
  		}
		calDisplay='visible';
	}
  	else if (calDisplay == 'visible'){
  		VicPopCal.style.visibility = 'hidden';
		calDisplay='hidden';
		fHideCal();
  	}
}

function fHideCal(){
	var oE = window.event;
  	if ((oE.clientX>0)&&(oE.clientY>0)&&(oE.clientX<document.body.clientWidth)&&(oE.clientY<document.body.clientHeight)) {
		var oTmp = document.elementFromPoint(oE.clientX,oE.clientY);
		while ((oTmp.tagName!="BODY") && (oTmp.id!="VicPopCal") )
			oTmp = oTmp.offsetParent;
		if (oTmp.id=="VicPopCal")
			return;
  	}
  	VicPopCal.style.visibility = 'hidden';
  	for (i in goSelectTag)
		goSelectTag[i].style.visibility = "visible";
  	goSelectTag.length = 0;
}

var gMonths = new Array("JAN","FEB","MAR","APR","MAY","JUN","JUL","AUG","SEP","OCT","NOV","DEC");

with (document) {
write("<Div id='VicPopCal' onclick='focus()' style='POSITION:absolute;visibility:hidden;border:2px ridge;width:10;z-index:100;'>");
write("<table border='0' bgcolor='#99CCFF' cellpadding=2 cellspacing=0>");
write("<TR >");
write("<td colspan=8 valign='middle' align='center'><a href='#' style='text-decoration:none' onClick='fPrevMonth()' onblur='fHideCal()'><</a>");
write("&nbsp;&nbsp;<select style='font-size:10px' name='tbSelMonth' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' Victor='Won' onclick='self.event.cancelBubble=true' onblur='fHideCal()'>");
for (i=0; i<12; i++)
	write("<option value='"+(i+1)+"'>"+gMonths[i]+"</option>");
write("</SELECT>");
write("&nbsp;<SELECT style='font-size:10px' name='tbSelYear' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' Victor='Won' onclick='self.event.cancelBubble=true' onblur='fHideCal()'>");
for(i=2000;i<2015;i++)
	write("<OPTION value='"+i+"'>"+i+"</OPTION>");
write("</SELECT>");
write("&nbsp;<a href='#' style='text-decoration:none' onClick='fNextMonth()' onblur='fHideCal()'>></a>");
write("</td>");
write("</TR>");

fDrawCal(giYear, giMonth, /*18,*/ 10);
write("</TABLE></Div>");
}
// End -- Coded by Liming Weng, email: victorwon@netease.com -->