//用法：<input type="text" style="width:75px" readonly onfocus="HS_setDate(this,this.value)">
//注意：IE浏览器中 <input> 在 <p> 标签内时可能有运行时错误
//modify: ast@whu.edu.cn,2010

function HS_DateAdd(interval,number,date){
	number = parseInt(number);
	if (typeof(date)=="string"){var date = new Date(date.split("-")[0],date.split("-")[1],date.split("-")[2])}
	if (typeof(date)=="object"){var date = date}
	switch(interval){
	case "y":return new Date(date.getFullYear()+number,date.getMonth(),date.getDate()); break;
	case "m":return new Date(date.getFullYear(),date.getMonth()+number,_check_Month_Date(date.getFullYear(),date.getMonth()+number,date.getDate())); break;
	case "d":return new Date(date.getFullYear(),date.getMonth(),date.getDate()+number); break;
	case "w":return new Date(date.getFullYear(),date.getMonth(),7*number+date.getDate()); break;
	}
}
function _check_Month_Date(year,month,date){
	var enddate = ["31","28","31","30","31","30","31","31","30","31","30","31"];
	var returnDate = "";
	if (year%4==0){enddate[1]="29"}
	if (date>enddate[month]){returnDate = enddate[month]}else{returnDate = date}
	return returnDate;
}

function _check_WeekDay(date){
	var theDate;
	if (typeof(date)=="string"){theDate = new Date(date.split("-")[0],date.split("-")[1],date.split("-")[2]);}
	if (typeof(date)=="object"){theDate = date}
	return theDate.getDay();
}

function astPad(num, n) {
  var i = (''+num).length;
  while (i++ < n) num = '0' + num;
  return num;
}
//get date format YYYY-MM-DD
function astFormatdate(dateobj) {
	return dateobj.getFullYear()+"-"+astPad(parseInt(dateobj.getMonth())+1,2)+"-"+astPad(dateobj.getDate(),2);
}
function HS_calender(){
	var lis = "";
	var style = "";
	style +="<style type='text/css'>";
	style +=".calender { width:170px; height:auto; font-size:12px; margin-right:14px;background-color:white; border:1px solid #397EAE; padding:1px}";
	style +=".calender ul {list-style-type:none; margin:0; padding:0;}";
	style +=".calender .day { background-color:#BBBBCC;font-weight=bold; height:20px;}";
	style +=".calender .day li,.calender .date li{ float:left; width:14%; height:20px; line-height:20px; text-align:center}";
	style +=".calender li a { text-decoration:none; font-family:Tahoma; font-size:11px; color:#101010}";
	style +=".calender li a:hover { color:#f30; text-decoration:underline}";
	style +=".calender li a.hasArticle {font-weight:bold; color:#f06000 !important}";
	style +=".lastMonthDate, .nextMonthDate {color:#b0b0b0;font-size:11px}";
	style +=".disableDate {color:#68aaaa;font-size:11px}";
	style +=".disableToday {border:1px solid #ff0000;color:#68aaaa;font-size:11px}";
	style +=".today {  border:1px solid #ff0000; background-color:#ffffaa; padding:2px}";
	style +=".todayini {  border:1px solid #ff0000; font-weight:bold;background-color:#ffffaa; padding:2px}";
	style +=".iniday { border:1px solid #0000ff; font-weight:bold; background-color:#e0eeff; padding:2px}";
	style +=".today a { color:#f03000; }";
	style +=".selectThisYear a, .selectThisMonth a{text-decoration:underline; margin:0 2px; color:#ff0000; font-weight:bold}";
	style +=".calender .LastMonth, .calender .NextMonth{ text-decoration:none; color:#0000ff; font-size:18px; font-weight:bold; line-height:16px;}";
	style +=".calender .LastMonth { float:left;}";
	style +=".calender .NextMonth { float:right;}";
	style +=".calenderBody {clear:both}";
	style +=".calenderTitle {text-align:center;height:20px; line-height:20px; clear:both}";
	style +=".calenderBottom {clear:both; border-top:1px solid #ddd; padding: 3px 0; text-align:left}";
	style +=".calenderBottom a {text-decoration:none; margin:2px !important; font-weight:bold; color:#0000ff}";
	style +=".calenderBottom a.closeCalender{float:right}";
	style +=".closeCalenderBox {float:right; border:1px solid #000; background:#fff; font-size:9px; width:11px; height:11px; line-height:11px; text-align:center;overflow:hidden; font-weight:normal !important}";
	style +="</style>";

	var now;//初始化日期
	if (typeof(arguments[0])=="string"){
		ssd = arguments[0].split('-');
		now = new Date(ssd[0],ssd[1]-1,ssd[2]);
	}else if (typeof(arguments[0])=="object"){
		now = arguments[0];
	}
	var lastmd=now.getFullYear()+"-"+now.getMonth()+"-01";
	var lastMonthEndDate = HS_DateAdd("d","-1",lastmd).getDate();
	var lastMonthDate = _check_WeekDay(lastmd);
	
	var thisMonthLastDate = HS_DateAdd("d","-1",now.getFullYear()+"-"+(parseInt(now.getMonth())+1).toString()+"-01");
	var thisMonthEndDate = thisMonthLastDate.getDate();
	var thisMonthEndDay = thisMonthLastDate.getDay();
	
	var todayObj = new Date();//今天日期
	today = todayObj.getFullYear()+"-"+todayObj.getMonth()+"-"+todayObj.getDate();
	
	var todayString = astFormatdate(todayObj);
	
	for (i=0; i<lastMonthDate; i++){  // Last Month's Date
		lis = "<li class='lastMonthDate'>"+lastMonthEndDate+"</li>" + lis;
		lastMonthEndDate--;
	}
	
	var theYear=now.getFullYear();
	var theMonth=now.getMonth();
	
	for (i=1; i<=thisMonthEndDate; i++){ // Current Month's Date
		tmpi=astPad(i,2);
		
		var ymmdd=theYear+"-"+astPad(parseInt(theMonth)+1,2)+"-"+tmpi;
		var isdisable=(_init_HS_calender.maxdate && ymmdd >_init_HS_calender.maxdate) || (_init_HS_calender.mindate && ymmdd <_init_HS_calender.mindate);

		if(isdisable && todayString == ymmdd)
		{
			lis += "<li class='disableToday'>"+i+"</li>";
		}
		else if(isdisable)
		{
			lis += "<li class='disableDate'>"+i+"</li>";
		}
		else if(todayString == ymmdd && _init_HS_calender.inidate == ymmdd)
		{
			lis += "<li><a href=javascript:void(0) class='todayini' onclick='_selectThisDay(this)' title='"+ymmdd+"'>"+i+"</a></li>";
		}
		else if(todayString == ymmdd)
		{
			lis += "<li><a href=javascript:void(0) class='today' onclick='_selectThisDay(this)' title='"+ymmdd+"'>"+i+"</a></li>";
		}
		else if(_init_HS_calender.inidate == ymmdd)
		{
			lis += "<li><a href=javascript:void(0) class='iniday' onclick='_selectThisDay(this)' title='"+ymmdd+"'>"+i+"</a></li>";
		}
		else
		{
			lis += "<li><a href=javascript:void(0) onclick='_selectThisDay(this)' title='"+ymmdd+"'>"+i+"</a></li>";
		}
		
	}
	var j=1;
	for (i=thisMonthEndDay; i<6; i++){  // Next Month's Date
		lis += "<li class='nextMonthDate'>"+j+"</li>";
		j++;
	}
	lis += style;

	var CalenderTitle = "";
	CalenderTitle += "<a href='javascript:void(0)' class='NextMonth' onclick=HS_calender(HS_DateAdd('y',1,'"+theYear+"-"+theMonth+"-"+now.getDate()+"'),this) title='Next Year'>&raquo;</a>";
	CalenderTitle += " <a href='javascript:void(0)' class='NextMonth' onclick=HS_calender(HS_DateAdd('m',1,'"+theYear+"-"+theMonth+"-"+now.getDate()+"'),this) title='Next Month'>&rsaquo;&nbsp;</a>";
	CalenderTitle += "<a href='javascript:void(0)' class='LastMonth' onclick=HS_calender(HS_DateAdd('y',-1,'"+theYear+"-"+theMonth+"-"+now.getDate()+"'),this) title='Previous Year'>&laquo;</a>";
	CalenderTitle += " <a href='javascript:void(0)' class='LastMonth' onclick=HS_calender(HS_DateAdd('m',-1,'"+theYear+"-"+theMonth+"-"+now.getDate()+"'),this) title='Previous Month'>&nbsp;&lsaquo;</a>";
	CalenderTitle += "<span class='selectThisYear'><a href='javascript:void(0)' onclick='CalenderselectYear(this)' title='Click here to select other year' >"+theYear+"</a></span>年<span class='selectThisMonth'><a href='javascript:void(0)' onclick='CalenderselectMonth(this)' title='Click here to select other month'>"+(parseInt(theMonth)+1).toString()+"</a></span>月"; 

	if (arguments.length>1){
		arguments[1].parentNode.parentNode.getElementsByTagName("ul")[1].innerHTML = lis;
		arguments[1].parentNode.parentNode.getElementsByTagName("div")[0].innerHTML = CalenderTitle;
		//document.getElementById("calenderTitle").innerHTML = CalenderTitle;

	}else{
		var CalenderBox = style+"<div class='calender'><div class='calenderTitle'>"+CalenderTitle+"</div><div class='calenderBody'><ul class='day'><li><font color='#880000'>日</font></li><li>一</li><li>二</li><li>三</li><li>四</li><li>五</li><li><font color='#880000'>六</font></li></ul><ul class='date' id='thisMonthDate'>"+lis+"</ul></div><div class='calenderBottom'><a href='javascript:void(0)' class='closeCalender' onclick='_closeCalender(this)'>关闭</a><span><span><a href=javascript:void(0) onclick='_selectToday(this)' title='"+todayString+"'>今天("+todayString+")</a></span></span></div></div>";
		return CalenderBox;
	}
}
function _selectThisDay(d){
  var boxObj = d.parentNode.parentNode.parentNode.parentNode.parentNode;
	boxObj.targetObj.value = d.title;
	boxObj.parentNode.removeChild(boxObj);		
		_init_HS_calender=null;
}

function _selectToday(d){
	HS_calender(new Date(),d.parentNode.parentNode);
}

function _closeCalender(d){
	var boxObj = d.parentNode.parentNode.parentNode;
		boxObj.parentNode.removeChild(boxObj);
		_init_HS_calender=null;
}

function CalenderselectYear(obj){
		var opt = "";
		var thisYear = obj.innerText;
	
	var todayObj = new Date();
	thisyear = todayObj.getFullYear();
		
		for (i=thisyear-100; i<=thisyear+10; i++){
			if (i==thisYear){
				opt += "<option value="+i+" selected>"+i+"</option>";
			}else{
				opt += "<option value="+i+">"+i+"</option>";
			}
		}
		opt = "<select onblur='selectThisYear(this)' onchange='selectThisYear(this)' style='font-size:11px'>"+opt+"</select>";
		obj.parentNode.innerHTML = opt;
}


function CalenderselectMonth(obj){
		var opt = "";
		var thisMonth = obj.innerText;
		for (i=1; i<=12; i++){
			if (i==thisMonth){
				opt += "<option value="+i+" selected>"+i+"</option>";
			}else{
				opt += "<option value="+i+">"+i+"</option>";
			}
		}
		opt = "<select onblur='selectThisMonth(this)' onchange='selectThisMonth(this)' style='font-size:11px'>"+opt+"</select>";
		obj.parentNode.innerHTML = opt;
}

function selectThisYear(obj){
	var mobj=obj.parentNode.parentNode.getElementsByTagName("span")[1].getElementsByTagName("a")[0];
	var theMonth="";
	if(mobj)
		theMonth=mobj.innerText;
	else
		theMonth=obj.parentNode.parentNode.getElementsByTagName("span")[1].getElementsByTagName("select")[0].value;
	HS_calender(obj.value+"-"+theMonth+"-1",obj.parentNode);
}

function selectThisMonth(obj){
	var yobj=obj.parentNode.parentNode.getElementsByTagName("span")[0].getElementsByTagName("a")[0];
	var theyear="";
	if(yobj)
		theyear=yobj.innerText;
	else
		theyear=obj.parentNode.parentNode.getElementsByTagName("span")[0].getElementsByTagName("select")[0].value;
	HS_calender(theyear+"-"+obj.value+"-1",obj.parentNode);
}

//入口函数
//参数:输入框对象，初始显示日期，最大可选日期，最小可选日期
//至少要输入第一个参数
function HS_setDate(inputObj,inidate,maxdate,mindate)
{
	if(_init_HS_calender)
	{
		_init_HS_calender.parentNode.removeChild(_init_HS_calender);
		_init_HS_calender=null;
	}
	
	var calenderObj = document.createElement("span");
	_init_HS_calender=calenderObj;
	
	if(maxdate)
	{
		if (typeof(maxdate)=="string")
		{
			_init_HS_calender.maxdate=maxdate;
		}
		else if (typeof(maxdate)=="object")
		{
			_init_HS_calender.maxdate=astFormatdate(maxdate);
		}
	}
	if(mindate)
	{
		if (typeof(mindate)=="string")
		{
			_init_HS_calender.mindate=mindate;
		}
		else if (typeof(mindate)=="object")
		{
			_init_HS_calender.mindate=astFormatdate(mindate);
		}
	}
	
	if(! inidate ) inidate=new Date();
	_init_HS_calender.inidate=inidate;
	
	calenderObj.innerHTML = HS_calender(inidate);
	calenderObj.style.position = "absolute";
	calenderObj.targetObj = inputObj;
	inputObj.parentNode.insertBefore(calenderObj,inputObj.nextSibling);
	
}
var _init_HS_calender=null;
