﻿<!--
var gdCtrl = new Object();
var gcGray = "#808080";
var gcToggle = "#9999cc";
var gcBG = "#eeeeee";
var gdCurDate = new Date();
var giYear = gdCurDate.getFullYear();
var giMonth = gdCurDate.getMonth()+1;
var giDay = gdCurDate.getDate();
var VicPopCal = new Object();
var InteractCtrl = null;
var popLang;

var WeekDay = new Array("Mon","Tue","Wed","Thu","Fri","Sat","Sun");
var gMonths = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
var hideDropDown;

document.onclick= sh

function sh()
{
if (!event.srcElement.name )
	{
	document.all.popCal.style.display="none"
	  if (InteractCtrl != null)
  	{
	 with (InteractCtrl.style) {
		visibility = 'visible';
  		}
	}
	}
}
function setLang(lang){
  if (lang=='el'){
gMonths = new Array("Ιανουάριος","Φεβρουάριος","Μάρτιος","Απρίλιος","Μάϊος","Ιούνιος","Ιούλιος","Αύγουστος","Σεπτέμβριος","Οκτώβριος","Νοέμβριος","Δεκέμβριος");
WeekDay = new Array("Δευ","Τρι","Τετ","Πεμ","Παρ","Σαβ","Κυρ");
  document.all.popCal.document.all.ShowDays.value = "Δευ  Τρι  Τετ  Πεμ  Παρ  Σαβ Κυρ";
  }
  else{
    WeekDay = new Array("Mon","Tue","Wed","Thu","Fri","Sat","Sun");
     gMonths = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
  document.all.popCal.document.all.ShowDays.value = " Mon Tue Wed Thu Fri  Sat  Sun";
  }
  for (i=0; i<12; i++)
    document.all.tbSelMonth.options[i].text=gMonths[i]
}
function fPopCalendar(popCtrl, popCal, lang, interactCtrl){
  InteractCtrl = interactCtrl;
  if (InteractCtrl != null)
  {
  with (interactCtrl.style) {
	visibility = 'hidden';
  }
  }
  setLang(lang);
  parent.event.cancelBubble=true;
  VicPopCal = popCal;
  gdCtrl = popCtrl;
  fSetYearMon(giYear, giMonth);
  var point = fGetXY(popCtrl);
  with (VicPopCal.style) {
  	left = point.x;
	top  = point.y+popCtrl.offsetHeight+1;
	visibility = 'visible';
  }
  VicPopCal.focus();
}
function fSetDate(iYear, iMonth, iDay){
  if ( iDay < 10 )
    gdCtrl.value = "0" + iDay + "/";
  else
    gdCtrl.value = iDay + "/";
  if ( iMonth < 10 )
    gdCtrl.value += "0" + iMonth + "/" + iYear;
  else
    gdCtrl.value += iMonth + "/" + iYear;
  // gdCtrl.value = iDay+"/"+iMonth+"/"+iYear;
  VicPopCal.style.visibility = "hidden";


}
function fSetSelected(aCell){
  var iOffset = 0;
  var iYear = parseInt(document.all.tbSelYear.value);
  var iMonth = parseInt(document.all.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, 0);
  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, iCellWidth, iDateTextSize) {
  with (document) {
        write("<tr bgColor='#6162a2'><td colspan='8' align='center'>");
        write("<input type='text' name='ShowDays' ReadOnly style='font-family: Arial; font-size: 10px; height: 20px; width: 161px; background-color: #6162a2; color: white;'>");
        write("</td></tr>");
  	for (w = 1; w < 7; w++) {
		write("<tr>");
		for (d = 0; d < 7; d++) {
			write("<td height='15px' id=calCell valign='middle' align='right' style='cursor:hand;height:15px;' onMouseOver='this.bgColor=gcToggle' onMouseOut='this.bgColor=gcBG' onclick='fSetSelected(this)'>");
			write("<font size='1' face='Arial' color='#6162a2' id=cellText Victor='Liming Weng' style='font-family: Arial; font-size: 9px;'> </font></td>")
		}
		write("<td>&nbsp;</td></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==5)||(d==6))?"red":"black";
				innerText = myMonth[w+1][d];
			}
		}
}
function fSetYearMon(iYear, iMon){
  document.all.tbSelMonth.options[iMon-1].selected = true;
  for (i = 0; i < document.all.tbSelYear.length; i++)
	if (document.all.tbSelYear.options[i].value == iYear)
document.all.	    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 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;
}
with (document) {
	write("<table  cellspacing='0' cellpadding='0' id='popTable' border='1' bgcolor='#eeeeee' nowap><TR>");
	write("<td valign='middle' align='center'>&nbsp;<select style='FONT-SIZE: 11px; WIDTH: 95px; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; HEIGHT: 19px' name='tbSelMonth' 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;<SELECT  style='FONT-SIZE: 11px; WIDTH: 55px; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; HEIGHT: 19px' name='tbSelYear' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' Victor='Won'>");
	for(i=giYear-4;i<giYear+8;i++)
		write("<OPTION value='"+i+"'>"+i+"</OPTION>");
	write("</SELECT>&nbsp;</td></TR><TR><td align='center'><DIV ><table width='100%' border='0'  cellspacing='0' cellpadding='0'>");
	fDrawCal(giYear, giMonth, 19, 12);
	write("</table></DIV></td></TABLE>");
}
