/*
 * Copyright (C) MyCourse Online Education Technology Co., Ltd. All rights reserved.
 * Created on 2007-01-05
 * Author: Xuke
 * Description: 通用日期选择组件
 * $Header: /APPLICATION/WebRoot/js/calendar.js 1     07-07-18 18:18 Admin $
 */

var gdCtrl = new Object();
var goSelectTag = new Array();
var gcGray = "#ffffff";
var gcToggle = "#ffff00";
var gcBG = "#ffffff";

var gdCurDate = new Date();
var giYear = gdCurDate.getFullYear();
var giMonth = gdCurDate.getMonth() + 1;
var giDay = gdCurDate.getDate();

//*****************************************************************************
// Param: popCtrl is the widget beyond which you want this calendar to appear;
//        dateCtrl is the widget into which you want to put the selected date.
// i.e.: <input type="text" name="dc" style="text-align: center" readonly>
// <input type="button" value="V" onclick="fPopCalendar(dc, dc); return false;">
//*****************************************************************************
function fPopCalendar(popCtrl, dateCtrl)
{
  event.cancelBubble = true;
  gdCtrl = dateCtrl;
  fSetYearMon(giYear, giMonth);
  //fSetYearMon("1980", giMonth);
  var point = fGetXY(popCtrl);
  with (VicPopCal.style)
  {
    left = point.x;
    top  = point.y + popCtrl.offsetHeight + 1;
    width = VicPopCal.offsetWidth;
    height = VicPopCal.offsetHeight;
    fToggleTags(point);
    visibility = 'visible';
  }
  VicPopCal.focus();
}

function fSetDate(iYear, iMonth, iDay)
{
  //Here, you could modify the locale as you need !!!!
  if (parseInt(iDay) <= 9)
  {
    if (parseInt(iMonth) <= 9)
    {
      gdCtrl.value = iYear + "-0" + iMonth + "-0" + iDay;
    }
    else
    {
      gdCtrl.value = iYear + "-" + iMonth + "-0" + iDay;
    }
  }
  else
  {
    if (parseInt(iMonth) <= 9)
    {
      gdCtrl.value = iYear + "-0" + iMonth + "-" + iDay;
    }
    else
    {
      gdCtrl.value = iYear + "-" + iMonth + "-" + iDay;
    }
  }
  fHideCalendar();
}

function fHideCalendar()
{
  VicPopCal.style.visibility = "hidden";
  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);

  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;
}

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("日", "一", "二", "三", "四", "五", "六");
  var styleTD = " bgcolor='" + gcBG + "' bordercolor='" + gcBG + "' valign='middle' align='center' height='" + iCellHeight + "' style='font:bold " + iDateTextSize + " 宋体;";
  
  with (document)
  {
    write("<tr>");
    for(i = 0; i < 7; i++)
    {
      write("<td " + styleTD + "color:#990099' >" + WeekDay[i] + "</td>");
    }
    write("</tr>");
    
    for (w = 1; w < 7; w++)
    {
      write("<tr>");
      for (d = 0; d < 7; d++)
      {
        write("<td id=calCell " + 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
        {
          color = ((d == 0) || (d == 6)) ? "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;
}

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:2px ridge;width:10;z-index:100;'>");
  write("<table border='0' bgcolor='#FFF4E8'>");
  write("<tr>");
  write("<td valign='middle' align='center'><input type='button' name='PrevMonth' value='<' style='background-color:#ffffff;font-size:9pt;width:20;height:16;border-left:1px solid #004B3B;border-right:1px solid #004B3B;border-top:1px solid #004B3B;border-bottom:1px solid #004B3B' onClick='fPrevMonth()'>");
  write("&nbsp;<select name='tbSelYear' style='background-color:#ffffff' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' Victor='Won'>");

  // 年度范围
  for (i = 1950; i <= 2020; i++)
  {
    write("<option value='" + i + "'>" + i + "年</option>");
  }
  write("</select>");
  write("&nbsp;<select name='tbSelMonth' style='background-color:#ffffff' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' 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='background-color:#ffffff;font-size:9pt;width:20;height:16;border-left:1px solid #004B3B;border-right:1px solid #004B3B;border-top:1px solid #004B3B;border-bottom:1px solid #004B3B;font:bold' onclick='fNextMonth()'>");
  write("</td>");
  write("</tr><tr>");
  write("<td align='center'>");
  write("<div style='background-color:teal'><table width='100%' border='0' cellpadding='2'>");
  fDrawCal(giYear, giMonth, 12, 12);
  write("</table></div>");
  write("</td>");
  write("</tr><tr><td align='center'>");
  write("<b style='cursor:hand;font:bold 16 宋体' onclick='fSetDate(giYear,giMonth,giDay)' onMouseOver='this.style.color=gcToggle' onMouseOut='this.style.color=0'>今天：" + giYear + "年" + giMonth + "月" + giDay + "日</b>");
  write("</td></tr>");
  write("</table></div>");
  write("<script event=onclick() for=document>fHideCalendar()</script>");
}