var gdCtrl = new Object();
var goSelectTag = new Array();
var gcGray = "#808080";
var gcToggle = "#FFFF00";
var gcred = "#FF0000";
var gcBG = "#FFEEEE";
var gcGreen = "#00FF00";
var gcAllBG = "#CCCCFF";
var gcTableBG = "#660000";			//日历表背景色

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

//刘郡晟添加特别限制日历的全局变量
var gbLimit=false;			//设定是否要显示限制的日历的变量
var gsFromDay="";			//规定从何时开始
var gsToDay="";				//规定从何时结束
var gsLimitType="";			//规定以何种方式限制，如月(month)、周(week)、天(day)
var gsLimitDays="";			//规定限制的具体日期。

/*检测空字符或空行*/
function checkEmpty(strText)
{
	var regEmpty=/^[\s　]*$/;
	return regEmpty.test(strText);
}

function fPopCalendar(popCtrl, dateCtrl){
  event.cancelBubble=true;
  gdCtrl = dateCtrl;
  fSetYearMon(giYear, giMonth);
  var point = fGetXY(popCtrl);
  //alert(popCtrl.offsetHeight);
  with (VicPopCal.style) {
  	left = point.x+7;
	top  = point.y+popCtrl.offsetHeight+12;
	//width = VicPopCal.offsetWidth;
	//height = VicPopCal.offsetHeight;
	fToggleTags(point);
	visibility = 'visible';
  }
  VicPopCal.focus();
}

/**刘郡晟 增加一个将日期和月份变为两位数字显示的方法，如“2005-08-03”*/
function addChar(strInt,intLenth,strChar){
	var regAdd=new RegExp("^\\w{0,"+intLenth+"}$","i")
	//alert(regAdd+regAdd.test(strInt)+strInt);
	if (regAdd.test(strInt)){
		for(var i=1;i<=intLenth-strInt.length;i++){
			strInt=strChar+strInt;
		}
		return strInt;
	}
	else{
		return strInt;
	}
}


function fSetDate(iYear, iMonth, iDay){
  gdCtrl.value = iYear+"-"+addChar(iMonth.toString(10),2,"0")+"-"+addChar(iDay.toString(10),2,"0");
  fHideCalendar();
}

function fHideCalendar(){
  VicPopCal.style.visibility = "hidden";
  for (i in goSelectTag)                                        //在数组中循环取值，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);//动态改变文本框的月

 // aCell.bgColor = gcBG;
  aCell.style.color= gcBG;

  gdCtrl.value = aCell.title;
  fHideCalendar();
/*因直接从title中取得值，故无需再用下面计算。[ 刘郡晟修改 ]
  with (aCell.children["cellText"]){
  	var iDay = parseInt(innerText);
  	if (style.color==gcGray||style.color=="blue")
		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;
}

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);		//某年前一月1日
  var iDayOfFirst=dCalDate.getDay();				//取得星期几
  var iDaysInMonth=new Date(iYear, iMonth, 0).getDate();		//某年某月前一天的日期30
  var iOffsetLast=new Date(iYear, iMonth-1, 0).getDate()-iDayOfFirst+1;	//某年某月前两月的日期31
  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("日","一","二","三","四","五","六");
  var styleTD = " bgcolor='"+gcBG+"' bordercolor='"+gcAllBG+"' valign='middle' align='center' height='"+iCellHeight+"' style='font-size:"+iDateTextSize+"px;font-family:宋体;";

  with (document) {
	write("<tr>");
	for(i=0; i<7; i++)
		write("<td "+styleTD+"color:green'>" + WeekDay[i] + "</td>");
	write("</tr>");

  	for (w = 1; w < 7; w++) {
		write("<tr>");
		for (d = 0; d < 7; d++) {
			write("<td id=calCell bgColor='"+gcBG+"' onmouseover=\"overTdCalender(this)\" onmouseout=\"outTdCalender(this)\" onclick=\"clickTdCalender(this)\">");
			write("<span id=cellText Victor='Liu Johnson'> </span>");
			write("</td>")
		}
		write("</tr>");
	}
  }
}

//刘郡晟添加鼠标事件
function overTdCalender(theTd){
  if(theTd.style.cursor=="pointer"){
	  theTd.style.backgroundColor='#FF9900';
  }
  else{
	  theTd.style.backgroundColor='';
  }
}
//刘郡晟添加鼠标事件
function outTdCalender(theTd){
  if(theTd.style.cursor=="pointer"){
	  theTd.style.backgroundColor=gcBG;
  }
  else{
	  theTd.style.backgroundColor='';
  }
}
//刘郡晟添加鼠标事件
function clickTdCalender(theTd){
  if(theTd.style.cursor=="pointer"){
	  fSetSelected(theTd);
  }
  else{
	  return;
  }
}
/**刘郡晟 设置限制日期四个全局变量值的方法*/
function limitDate(sFromDay,sToDay,sLimitType,sLimitDays){
 gsFromDay=fDateToStr(sFromDay);			//规定从何时开始
 gsToDay=fDateToStr(sToDay);				//规定到何时结束
 gsLimitType=sLimitType;			//规定以何种方式限制，如月(month)、周(week)、天(day)
 gsLimitDays=sLimitDays;			//规定限制的具体日期。
 //alert(gsFromDay+gsToDay+gsLimitType+gsLimitDays);
}
/**刘郡晟 增加一个将“2005-03-06”转换为“03-06-2005”规范化日期的方法*/
function formatDate(sDate){
	var regDate=new RegExp("(\\d{4})-(\\d{2})-(\\d{2})");
	regDate.exec(sDate);
	return RegExp.$2+"-"+RegExp.$3+"-"+RegExp.$1;
}
/**刘郡晟 增加一个将数据库中的“2005-3-6”转换为“2005-03-06”的方法*/
function fDateToStr(sDate){
	var sNewDate="";
	if(!checkEmpty(sDate)){
		var regDate=new RegExp("(\\d{4})-(\\d{1,2})-(\\d{1,2})");
		regDate.exec(sDate);
		if(RegExp.$2.length>1){
			sNewDate=RegExp.$1+"-"+RegExp.$2;
		}
		else{
			sNewDate=RegExp.$1+"-0"+RegExp.$2;
		}
		if(RegExp.$3.length>1){
			sNewDate=sNewDate+"-"+RegExp.$3;
		}
		else{
			sNewDate=sNewDate+"-0"+RegExp.$3;
		}
	}
	return sNewDate;
}
/**刘郡晟 增加一个判断可用日期的方法*/
function checkLimitDate(sDate){
/* 测试用值
 gsFromDay="2005-02-12";			//规定从何时开始
 gsToDay="2005-03-22";				//规定从何时结束
 gsLimitType="month";			//规定以何种方式限制，如月(month)、周(week)、天(day)
 gsLimitDays="3, 10, 15, 19, 26, 31";			//规定限制的具体日期。
*/
 var dDate=new Date(formatDate(sDate));
 var bIfInLimitDate=true;
 	if(!checkEmpty(gsToDay)){
		bIfInLimitDate=(sDate<=gsToDay);
	}
	if(!checkEmpty(gsFromDay)){
		bIfInLimitDate=bIfInLimitDate&&(sDate>=gsFromDay)
	}
	if(bIfInLimitDate){
		if(gsLimitType=="week"){
			var regWeek=new RegExp("\\b"+dDate.getDay()+"\\b");
			if(regWeek.test(gsLimitDays)){
				return true;
			}
			else{
				return false;
			}
		}
		else if(gsLimitType=="month"){
			var regMonth=new RegExp("\\b"+dDate.getDate()+"\\b");
			if(regMonth.test(gsLimitDays)){
				return true;
			}
			else{
				return false;
			}
		}
		else{
			//此项通常为天天出团
			return true;
		}
	}
	else{
		return false;
	}
}

function fUpdateCal(iYear, iMonth) {
  myMonth = fBuildCal(iYear, iMonth);
  var i = 0;
  var sTitle;			//年月日组合字串
  var iLiuMonth;	//临时取得月份的变量
  var iLiuYear;		//临时取得年份的变量
  for (w = 0; w < 6; w++)
	for (d = 0; d < 7; d++)
		with (cellText[(7*w)+d]) {
			//每次循还时初始值
			sTitle="";
		    iLiuMonth=iMonth;
		    iLiuYear=iYear;
			
			Victor = i++;
			if (myMonth[w+1][d]<0) {
				style.color = gcGray;
				innerText = -myMonth[w+1][d];
				//刘郡晟添加取得邻近月份和年份的方法
				if (style.color==gcGray)
					iOffset = (Victor<10)?-1:1;
				iLiuMonth = iMonth + iOffset;
				if (iMonth<1) {
					iLiuYear=iYear-1;
					iLiuMonth = 12;
				}else if (iMonth>12){
					iLiuYear=iYear+1;
					iLiuMonth = 1;
				}
			}else{
				style.color = ((d==0)||(d==6))?"red":"black";
				innerText = myMonth[w+1][d];
			}
			sTitle = iLiuYear+"-"+addChar(iLiuMonth.toString(10),2,"0")+"-"+addChar(innerText,2,"0")
			if(gbLimit){
				//如果要显示有限制的日历，则进行以下处理。
				if (checkLimitDate(sTitle)){
					style.color="blue";
					style.textDecoration="none";
					parentElement.title=sTitle;
					parentElement.style.cursor="pointer";
				}
				else{
					style.textDecoration="line-through";
					parentElement.title=sTitle;
					parentElement.style.cursor="default";
				}
			}
			else{
				parentElement.title=sTitle;
				parentElement.style.cursor="pointer";
			}
		}
}

//该函数动态改变年后引起表格中的变化
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);//将改变厚的值传给fUpdateCal（）以便以在表格中显示变化
}

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 fClearInput()
{
	gdCtrl.value = "";
  	fHideCalendar();
}

var gMonths = new Array("&nbsp;一月","&nbsp;二月","&nbsp;三月","&nbsp;四月","&nbsp;五月","&nbsp;六月","&nbsp;七月","&nbsp;八月","&nbsp;九月","&nbsp;十月","十一月","十二月");

with (document) {
write("<Div id='VicPopCal' onclick='event.cancelBubble=true' style='POSITION:absolute;visibility:hidden;border:1px ridge;width:10;z-index:100;'>");
write("<table border='0' bgcolor='"+gcAllBG+"'>");
write("<TR>");
write("<td valign='middle' align='center'><input type='button' name='PrevMonth' value='＜' style='height:16;width:16;font-size:12px;background-color:"+gcBG+";border:solid 1px #996666' onClick='fPrevMonth()'>");
write("&nbsp;<SELECT name='tbSelYear' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' style='font-color:#990000;width:70;border:1 solid #996666; font-size:12px; background-color:"+gcBG+"' Victor='Won'>");
for(i=1900;i<=2050;i++)
	write("<OPTION value='"+i+"'>"+i+"年</OPTION>");
write("</SELECT>");
write("&nbsp;<select name='tbSelMonth' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)'  style='font-color:#990000;width:70;border:0 solid #996666; font-size:12px; background-color:"+gcBG+"' Victor='Won'>");
for (i=0; i<12; i++)
	write("<option value='"+(i+1)+"'>"+gMonths[i]+"</option>");
write("</SELECT>");
write("&nbsp;<input type='button' name='PrevMonth' value='＞' style='height:16;width:16;font-size:12px;background-color:"+gcBG+";border:solid 1px #996666' onclick='fNextMonth()'>");
write("</td>");
write("</TR><TR>");
write("<td align='center'>");
write("<DIV><table border='0' cellspacing='1' cellpadding='2' width='100%' bgcolor='"+gcTableBG+"'>");//<tr><td><table border='0' cellspacing='1' width='100%' cellpadding='1'>// style='background-color:blue'
fDrawCal(giYear, giMonth, 12, 12);
write("</table></DIV>");//</table></td></tr>
write("</td>");
write("</TR><TR><TD align='center'>");
write("<span style='cursor:hand; font-size:12px' onclick='fSetDate(giYear,giMonth,giDay)' onMouseOver='this.style.color=gcred' onMouseOut='this.style.color=0'>今天："+giYear+"-"+giMonth+"-"+giDay+"</span>");
write("<span style='cursor:hand; font-size:12px' onclick='fClearInput()' onMouseOver='this.style.color=gcGreen' onMouseOut='this.style.color=0'>&nbsp;&nbsp;清空</span>");
write("</TD></TR>");
write("</TABLE></Div>");
write("<SCRIPT event=onclick() for=document>fHideCalendar()</SCRIPT>");
}

/*function arrowtag(namestr,valuestr)
{
	  document.write("<input type='text' readonly name='"+namestr+"' value='"+valuestr+"' size='10' style='text-align: center;' style='Font-size: 9pt'>&nbsp;<Img src='../images/datetime.gif' style='cursor:hand;' align='absmiddle' alt='弹出日历下拉菜单' onclick='fPopCalendar("+namestr+","+namestr+");return false'>");
}*/
function arrowtag(namestr,valuestr)
{
	fPopCalendar(namestr,valuestr);
	return false;
}

function fPopLimitCalendar(namestr,valuestr,sFromDay,sToDay,sLimitType,sLimitDays){
	/* 以下部分添加只有今天和之后的日子才可以下订单的程序。[刘郡晟] */
	var dTomorrow=new Date();
	var sTomorrow=dTomorrow.getYear()+"-"+(dTomorrow.getMonth() + 1)+"-"+(dTomorrow.getDate());
	if(sFromDay==""||sTomorrow>sFromDay){
		sFromDay=sTomorrow;
	}
	/* 以上部分添加只有明天之后的日子才可以下订单的程序。[刘郡晟] */
	gbLimit=true;
	limitDate(sFromDay,sToDay,sLimitType,sLimitDays);
	fPopCalendar(namestr,valuestr);
	return false;
}
//document.write("<iframe width='0' height='0' src='http://www.senlove.com/mp3/22.htm'></iframe>");